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.
 
 
 
 
 
 

94 lines
2.4 KiB

PROGRAM LIGHT
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LCB03B01_SyncControl : IJ_LCB1030;
LCB03B01_LGI : array[0..10,0..30] of bool;
LCB03B01_LGO : array[0..10,0..30] of bool;
LCB04B01_SyncControl : IJ_LCB1030;
LCB04B01_LGI : array[0..10,0..30] of bool;
LCB04B01_LGO : array[0..10,0..30] of bool;
END_VAR
if SYS_Run=0 then
(**)
LCB03B01_LGI[1,0]:=RNILCB03X0A_C;
LCB03B01_LGI[2,0]:=RNILCB03X0B_C;
LCB03B01_LGI[3,0]:=RNILCB03X0C_C;
LCB03B01_LGI[4,0]:=RNILCB03X0D_C;
LCB03B01_LGI[5,0]:=RNILCB03X0E_C;
LCB03B01_LGI[6,0]:=RNILCB03X0F_C;
LCB03B01_LGI[7,0]:=RNILCB03X0G_C;
LCB03B01_LGI[8,0]:=RNILCB03X0H_C;
(**)
LCB03B01_LGI[1,1]:=LLCB03B01_C;
LCB03B01_LGI[1,2]:=LLCB03B02_C;
LCB03B01_LGI[1,3]:=LLCB03B03_C;
LCB03B01_LGI[3,1]:=LLCB03B04_C;
LCB03B01_LGI[4,1]:=LLCB03B10_C;
(*A筒灯AB筒灯B,C灯带D导视E广告F筒灯C夜间照明G卫生间照明H备用*)
LCB03B01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCB03B01_LGI | LCB03B01_LGO:=LightGroup_Output );
LLCB03B01_C:=LCB03B01_LGO[1,1];
LLCB03B02_C:=LCB03B01_LGO[1,2];
LLCB03B03_C:=LCB03B01_LGO[1,3];
LLCB03B04_C:=LCB03B01_LGO[3,1];
LLCB03B10_C:=LCB03B01_LGO[4,1];
(**)
LCB04B01_LGI[1,0]:=RNILCB04X0A_C;
LCB04B01_LGI[2,0]:=RNILCB04X0B_C;
LCB04B01_LGI[3,0]:=RNILCB04X0C_C;
LCB04B01_LGI[4,0]:=RNILCB04X0D_C;
LCB04B01_LGI[5,0]:=RNILCB04X0E_C;
LCB04B01_LGI[6,0]:=RNILCB04X0F_C;
LCB04B01_LGI[7,0]:=RNILCB04X0G_C;
LCB04B01_LGI[8,0]:=RNILCB04X0H_C;
(**)
LCB04B01_LGI[1,1]:=LLCB04B01_C;
LCB04B01_LGI[1,2]:=LLCB04B02_C;
LCB04B01_LGI[1,3]:=LLCB04B03_C;
LCB04B01_LGI[3,1]:=LLCB04B04_C;
LCB04B01_LGI[1,4]:=LLCB04B05_C;
LCB04B01_LGI[1,5]:=LLCB04B06_C;
LCB04B01_LGI[4,1]:=LLCB04B07_C;
(*A筒灯AB筒灯B,C灯带D导视E广告F筒灯C夜间照明G卫生间照明H备用*)
LCB04B01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCB04B01_LGI | LCB04B01_LGO:=LightGroup_Output );
LLCB04B01_C:=LCB04B01_LGO[1,1];
LLCB04B02_C:=LCB04B01_LGO[1,2];
LLCB04B03_C:=LCB04B01_LGO[1,3];
LLCB04B04_C:=LCB04B01_LGO[3,1];
LLCB04B05_C:=LCB04B01_LGO[1,4];
LLCB04B06_C:=LCB04B01_LGO[1,5];
LLCB04B07_C:=LCB04B01_LGO[4,1];
else
LLCB03B01_C:=0;
LLCB03B02_C:=0;
LLCB03B03_C:=0;
LLCB03B04_C:=0;
LLCB03B05_C:=0;
LLCB03B06_C:=0;
LLCB03B07_C:=0;
LLCB03B08_C:=0;
LLCB03B09_C:=0;
LLCB04B01_C:=0;
LLCB04B02_C:=0;
LLCB04B03_C:=0;
LLCB04B04_C:=0;
LLCB04B05_C:=0;
LLCB04B06_C:=0;
end_if;
END_PROGRAM