检测存储区的填充量示例：

检测存储区的填充量

下图显示的系统中包含两条传送带和一个临时存储区，临时存储区位于两条传送带之间。传送带 1 将包裹传送到该存储区。传送带 1 末端靠近存储区的光电屏蔽，负责检测传送到存储区的包裹数量。传送带 2 将包裹从临时存储区域传输到装载台，包裹将在此装载到卡车上。存储区出口处的光电屏蔽，负责检测离开存储区传入装载台的包裹数量。五个指示灯用于指示临时存储区的容量。

以下 STL 程序说明了如何实现此示例：

当一个包裹传送到存储区时，“PEB1”处的信号状态从“0”变为“1”（信号上升沿）。“PEB1”在信号上升沿时，将启用“加计数”计数器，同时“PACKAGECOUNT”的当前计数值递增 1。

当一个包裹从存储区传送到装载台，“PEB2”处的信号状态从“0”变为“1”（信号上升沿）。“PEB2”在信号上升沿时，将启用“减计数”计数器，同时“PACKAGECOUNT”的当前计数值递减 1。

只要存储区中没有包裹（“PACKAGECOUNT”=“0”），则“STOR_EMPTY”变量的信号状态置位为“1”同时点亮“存储区为空”指示灯。

“RESET”变量的信号状态置位为“1”时，会将当前计数值复位为“0”。

如果“LOAD”变量的信号状态设置为“1”，则会将当前计数值设置为“MAX STORAGE AREA FILL AMOUNT”变量的值。如果当前计数值大于或等于“MAX STORAGE AREA FILL AMOUNT”变量的值，则“STOCK_PACKAGES”变量的信号状态为“1”。

SCL：

"VOLUME_50" := 5; // 为比较值预先赋值 50 个包裹（对于测试仅使用 5 个包裹）

"VOLUME_90" := 9; // 为比较值预先赋值 90 个包裹（对于测试仅使用 9 个包裹）

"VOLUME_100" := 10; // 为比较值预先赋值 100 个包裹（对于测试仅使用 10 个包裹）

"MAX STORAGE AREA FILL AMOUNT" := 10; // 为存储区中的Zui大数量预先赋值 100 个包裹（对于测试仅使用 10 个包裹）

"IEC_Counter_0_DB".CTUD(CU := "PEB1",

                        CD := "PEB2",

                        R := "RESET",

                        LD := "LOAD",

                        PV := "MAX STORAGE AREA FILL AMOUNT",

                        QU => "STOCK_PACKAGES",

                        QD => "STOR_EMPTY",

                        CV => "PACKAGECOUNT");

只要存储区中有包裹，“存储区非空”指示灯就会点亮。

SCL:

"STOR_NOT_EMPTY" := NOT "STOR_EMPTY"

如果存储区中的包裹数低于 50%，“存储区已用 50 %”、“存储区已用 90 %”和“存储区已满”报警指示灯就会熄灭。

SCL:

IF "PACKAGECOUNT" < "VOLUME_50" THEN

"STOR_50%_FULL" := 0;

"STOR_90%_FULL" := 0;

"STOR_FULL" := 0;

END_IF;

如果存储区中的包裹数大于或等于 50 %，则“存储区已用 50 %”指示灯将点亮。

SCL:

IF "PACKAGECOUNT" >= "VOLUME_50" AND "PACKAGECOUNT <= "VOLUME_90" THEN

"STOR_50%_FULL" := 1;

"STOR_90%_FULL" := 0;

"STOR_FULL" := 0;

END_IF;

如果存储区中的包裹数大于或等于 90 %，则“存储区已用 90 %”指示灯将点亮。“存储区已用 50 %”的指示灯仍然点亮。

SCL:

IF "PACKAGECOUNT" >= "VOLUME_90" AND "PACKAGECOUNT < "VOLUME_100" THEN

"STOR_50%_FULL" := 1;

"STOR_90%_FULL" := 1;

"STOR_FULL" := 0;

END_IF;

如果存储区中的包裹数达到 100 %，则“存储区已满”消息指示灯将点亮。“存储区已用 50 %”和“存储区已用 90 %”的指示灯仍然点亮。

SCL:

IF "PACKAGECOUNT" >= "VOLUME_100" THEN

"STOR_50%_FULL" := 1;

"STOR_90%_FULL" := 1;

"STOR_FULL" := 1;

END_IF;