You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

82 lines
2.0 KiB

PROGRAM LIGHT
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LCB02F01_SyncControl : IJ_LCB1030;
LCB02F01_LGI : array[0..10,0..30] of bool;
LCB02F01_LGO : array[0..10,0..30] of bool;
LCB01F01_SyncControl : IJ_LCB1030;
LCB01F01_LGI : array[0..10,0..30] of bool;
LCB01F01_LGO : array[0..10,0..30] of bool;
END_VAR
if SYS_Run=0 then
(**)
LCB02F01_LGI[1,0]:=RNILCB02X0A_C;
LCB02F01_LGI[2,0]:=RNILCB02X0B_C;
LCB02F01_LGI[3,0]:=RNILCB02X0C_C;
LCB02F01_LGI[4,0]:=RNILCB02X0D_C;
LCB02F01_LGI[5,0]:=RNILCB02X0E_C;
LCB02F01_LGI[6,0]:=RNILCB02X0F_C;
LCB02F01_LGI[7,0]:=RNILCB02X0G_C;
LCB02F01_LGI[8,0]:=RNILCB02X0H_C;
(**)
LCB02F01_LGI[1,1]:=LLCB02F01_C;
LCB02F01_LGI[2,1]:=LLCB02F02_C;
LCB02F01_LGI[3,1]:=LLCB02F03_C;
LCB02F01_LGI[4,1]:=LLCB02F04_C;
LCB02F01_LGI[5,1]:=LLCB02F04_C;
LCB02F01_LGI[6,1]:=LLCB02F04_C;
(*A筒灯AB筒灯B,C灯带D导视E广告F筒灯C夜间照明G卫生间照明H备用*)
LCB02F01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCB02F01_LGI | LCB02F01_LGO:=LightGroup_Output );
LLCB02F01_C:=LCB02F01_LGO[1,1];
LLCB02F02_C:=LCB02F01_LGO[2,1];
LLCB02F03_C:=LCB02F01_LGO[3,1];
LLCB02F04_C:=LCB02F01_LGO[4,1];
LLCB02F05_C:=LCB02F01_LGO[5,1];
LLCB02F06_C:=LCB02F01_LGO[6,1];
(**)
LCB01F01_LGI[1,0]:=RNILCB01X0A_C;
LCB01F01_LGI[2,0]:=RNILCB01X0B_C;
LCB01F01_LGI[3,0]:=RNILCB01X0C_C;
LCB01F01_LGI[4,0]:=RNILCB01X0D_C;
LCB01F01_LGI[5,0]:=RNILCB01X0E_C;
LCB01F01_LGI[6,0]:=RNILCB01X0F_C;
LCB01F01_LGI[7,0]:=RNILCB01X0G_C;
LCB01F01_LGI[8,0]:=RNILCB01X0H_C;
(**)
LCB01F01_LGI[1,1]:=LLCB01F01_C;
(*A筒灯AB筒灯B,C灯带D导视E广告F筒灯C夜间照明G卫生间照明H备用*)
LCB01F01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCB01F01_LGI | LCB01F01_LGO:=LightGroup_Output );
LLCB01F01_C:=LCB01F01_LGO[1,1];
else
LLCB02F01_C:=0;
LLCB02F02_C:=0;
LLCB02F03_C:=0;
LLCB02F04_C:=0;
LLCB02F04_C:=0;
LLCB02F04_C:=0;
LLCB01F01_C:=0;
end_if;
END_PROGRAM