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.
 
 
 
 
 
 

235 lines
5.9 KiB

PROGRAM LIGHT
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LCBB1C01_SyncControl : IJ_LCB1030;
LCBB1C01_LGI : array[0..10,0..30] of bool;
LCBB1C01_LGO : array[0..10,0..30] of bool;
LCBB1B01_SyncControl : IJ_LCB1030;
LCBB1B01_LGI : array[0..10,0..30] of bool;
LCBB1B01_LGO : array[0..10,0..30] of bool;
END_VAR
if SYS_Run=0 then
(*组别绑定*)
LCBB1C01_LGI[1,0]:=RNILCBB3X0A_C;
LCBB1C01_LGI[2,0]:=RNILCBB3X0B_C;
LCBB1C01_LGI[3,0]:=RNILCBB3X0C_C;
LCBB1C01_LGI[4,0]:=RNILCBB3X0D_C;
LCBB1C01_LGI[5,0]:=RNILCBB3X0E_C;
LCBB1C01_LGI[6,0]:=RNILCBB3X0F_C;
LCBB1C01_LGI[7,0]:=RNILCBB3X0G_C;
LCBB1C01_LGI[8,0]:=RNILCBB3X0H_C;
(*回路绑定*)
LCBB1C01_LGI[1,1]:=LLCBB1C01_C;
LCBB1C01_LGI[1,2]:=LLCBB1C02_C;
LCBB1C01_LGI[2,1]:=LLCBB1C03_C;
LCBB1C01_LGI[2,2]:=LLCBB1C04_C;
LCBB1C01_LGI[3,1]:=LLCBB1C05_C;
LCBB1C01_LGI[3,2]:=LLCBB1C06_C;
LCBB1C01_LGI[4,1]:=LLCBB1C07_C;
LCBB1C01_LGI[4,2]:=LLCBB1C08_C;
LCBB1C01_LGI[4,3]:=LLCBB1C09_C;
LCBB1C01_LGI[5,1]:=LLCBB1C10_C;
LCBB1C01_LGI[5,2]:=LLCBB1C11_C;
LCBB1C01_LGI[5,3]:=LLCBB1C12_C;
LCBB1C01_LGI[5,4]:=LLCBB1C13_C;
LCBB1C01_LGI[5,5]:=LLCBB1C14_C;
LCBB1C01_LGI[6,1]:=LLCBB1C15_C;
LCBB1C01_LGI[6,2]:=LLCBB1C16_C;
LCBB1C01_LGI[6,3]:=LLCBB1C17_C;
LCBB1C01_LGI[6,4]:=LLCBB1C18_C;
LCBB1C01_LGI[6,5]:=LLCBB1C19_C;
LCBB1C01_LGI[6,6]:=LLCBB1C20_C;
LCBB1C01_LGI[7,1]:=LLCBB1C21_C;
LCBB1C01_LGI[7,2]:=LLCBB1C22_C;
LCBB1C01_LGI[7,3]:=LLCBB1C23_C;
LCBB1C01_LGI[7,4]:=LLCBB1C24_C;
LCBB1C01_LGI[7,5]:=LLCBB1C25_C;
LCBB1C01_LGI[7,6]:=LLCBB1C26_C;
LCBB1C01_LGI[7,7]:=LLCBB1C27_C;
LCBB1C01_LGI[8,1]:=LLCBB1C28_C;
LCBB1C01_LGI[8,2]:=LLCBB1C29_C;
LCBB1C01_LGI[8,3]:=LLCBB1C30_C;
LCBB1C01_LGI[8,4]:=LLCBB1C31_C;
LCBB1C01_LGI[8,5]:=LLCBB1C32_C;
LCBB1C01_LGI[8,6]:=LLCBB1C33_C;
(*A筒灯A,B筒灯B,C灯带,D导视,E广告,F筒灯C(夜间照明),G卫生间照明,H备用*)
LCBB1C01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCBB1C01_LGI | LCBB1C01_LGO:=LightGroup_Output );
LLCBB1C01_C:=LCBB1C01_LGO[1,1];
LLCBB1C02_C:=LCBB1C01_LGO[1,2];
LLCBB1C03_C:=LCBB1C01_LGO[2,1];
LLCBB1C04_C:=LCBB1C01_LGO[2,2];
LLCBB1C05_C:=LCBB1C01_LGO[3,1];
LLCBB1C06_C:=LCBB1C01_LGO[3,2];
LLCBB1C07_C:=LCBB1C01_LGO[4,1];
LLCBB1C08_C:=LCBB1C01_LGO[4,2];
LLCBB1C09_C:=LCBB1C01_LGO[4,3];
LLCBB1C10_C:=LCBB1C01_LGO[5,1];
LLCBB1C11_C:=LCBB1C01_LGO[5,2];
LLCBB1C12_C:=LCBB1C01_LGO[5,3];
LLCBB1C13_C:=LCBB1C01_LGO[5,4];
LLCBB1C14_C:=LCBB1C01_LGO[5,5];
LLCBB1C15_C:=LCBB1C01_LGO[6,1];
LLCBB1C16_C:=LCBB1C01_LGO[6,2];
LLCBB1C17_C:=LCBB1C01_LGO[6,3];
LLCBB1C18_C:=LCBB1C01_LGO[6,4];
LLCBB1C19_C:=LCBB1C01_LGO[6,5];
LLCBB1C20_C:=LCBB1C01_LGO[6,6];
LLCBB1C21_C:=LCBB1C01_LGO[7,1];
LLCBB1C22_C:=LCBB1C01_LGO[7,2];
LLCBB1C23_C:=LCBB1C01_LGO[7,3];
LLCBB1C24_C:=LCBB1C01_LGO[7,4];
LLCBB1C25_C:=LCBB1C01_LGO[7,5];
LLCBB1C26_C:=LCBB1C01_LGO[7,6];
LLCBB1C27_C:=LCBB1C01_LGO[7,7];
LLCBB1C28_C:=LCBB1C01_LGO[8,1];
LLCBB1C29_C:=LCBB1C01_LGO[8,2];
LLCBB1C30_C:=LCBB1C01_LGO[8,3];
LLCBB1C31_C:=LCBB1C01_LGO[8,4];
LLCBB1C32_C:=LCBB1C01_LGO[8,5];
LLCBB1C33_C:=LCBB1C01_LGO[8,6];
else
LLCBB1C01_C:=0;
LLCBB1C02_C:=0;
LLCBB1C03_C:=0;
LLCBB1C04_C:=0;
LLCBB1C05_C:=0;
LLCBB1C06_C:=0;
LLCBB1C07_C:=0;
LLCBB1C08_C:=0;
LLCBB1C09_C:=0;
LLCBB1C10_C:=0;
LLCBB1C11_C:=0;
LLCBB1C12_C:=0;
LLCBB1C13_C:=0;
LLCBB1C14_C:=0;
LLCBB1C15_C:=0;
LLCBB1C16_C:=0;
LLCBB1C17_C:=0;
LLCBB1C18_C:=0;
LLCBB1C19_C:=0;
LLCBB1C20_C:=0;
LLCBB1C21_C:=0;
LLCBB1C22_C:=0;
LLCBB1C23_C:=0;
LLCBB1C24_C:=0;
LLCBB1C25_C:=0;
LLCBB1C27_C:=0;
LLCBB1C28_C:=0;
LLCBB1C29_C:=0;
LLCBB1C30_C:=0;
LLCBB1C31_C:=0;
LLCBB1C32_C:=0;
LLCBB1C33_C:=0;
end_if;
if SYS_Run=0 then
(*组别绑定*)
LCBB1B01_LGI[1,0]:=RNILCBB3X0A_C;
LCBB1B01_LGI[2,0]:=RNILCBB3X0B_C;
LCBB1B01_LGI[3,0]:=RNILCBB3X0C_C;
LCBB1B01_LGI[4,0]:=RNILCBB3X0D_C;
LCBB1B01_LGI[5,0]:=RNILCBB3X0E_C;
LCBB1B01_LGI[6,0]:=RNILCBB3X0F_C;
LCBB1B01_LGI[7,0]:=RNILCBB3X0G_C;
LCBB1B01_LGI[8,0]:=RNILCBB3X0H_C;
(*回路绑定*)
LCBB1B01_LGI[1,1]:=LLCBB1B01_C;
LCBB1B01_LGI[1,2]:=LLCBB1B02_C;
LCBB1B01_LGI[2,1]:=LLCBB1B03_C;
LCBB1B01_LGI[2,2]:=LLCBB1B04_C;
LCBB1B01_LGI[3,1]:=LLCBB1B05_C;
LCBB1B01_LGI[3,2]:=LLCBB1B06_C;
LCBB1B01_LGI[4,1]:=LLCBB1B07_C;
LCBB1B01_LGI[4,2]:=LLCBB1B08_C;
LCBB1B01_LGI[4,3]:=LLCBB1B09_C;
LCBB1B01_LGI[5,1]:=LLCBB1B10_C;
LCBB1B01_LGI[5,2]:=LLCBB1B11_C;
LCBB1B01_LGI[5,3]:=LLCBB1B12_C;
LCBB1B01_LGI[6,1]:=LLCBB1B13_C;
LCBB1B01_LGI[6,2]:=LLCBB1B14_C;
LCBB1B01_LGI[6,3]:=LLCBB1B15_C;
LCBB1B01_LGI[7,1]:=LLCBB1B16_C;
LCBB1B01_LGI[7,2]:=LLCBB1B17_C;
LCBB1B01_LGI[7,3]:=LLCBB1B18_C;
LCBB1B01_LGI[7,4]:=LLCBB1B19_C;
LCBB1B01_LGI[7,5]:=LLCBB1B20_C;
LCBB1B01_LGI[8,1]:=LLCBB1B21_C;
LCBB1B01_LGI[8,2]:=LLCBB1B22_C;
LCBB1B01_LGI[8,3]:=LLCBB1B23_C;
LCBB1B01_LGI[8,4]:=LLCBB1B24_C;
(*A筒灯A,B筒灯B,C灯带,D导视,E广告,F筒灯C(夜间照明),G卫生间照明,H备用*)
LCBB1B01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCBB1B01_LGI | LCBB1B01_LGO:=LightGroup_Output );
LLCBB1B01_C:=LCBB1B01_LGO[1,1];
LLCBB1B02_C:=LCBB1B01_LGO[1,2];
LLCBB1B03_C:=LCBB1B01_LGO[2,1];
LLCBB1B04_C:=LCBB1B01_LGO[2,2];
LLCBB1B05_C:=LCBB1B01_LGO[3,1];
LLCBB1B06_C:=LCBB1B01_LGO[3,2];
LLCBB1B07_C:=LCBB1B01_LGO[4,1];
LLCBB1B08_C:=LCBB1B01_LGO[4,2];
LLCBB1B09_C:=LCBB1B01_LGO[4,3];
LLCBB1B10_C:=LCBB1B01_LGO[5,1];
LLCBB1B11_C:=LCBB1B01_LGO[5,2];
LLCBB1B12_C:=LCBB1B01_LGO[5,3];
LLCBB1B13_C:=LCBB1B01_LGO[6,1];
LLCBB1B14_C:=LCBB1B01_LGO[6,2];
LLCBB1B15_C:=LCBB1B01_LGO[6,3];
LLCBB1B16_C:=LCBB1B01_LGO[7,1];
LLCBB1B17_C:=LCBB1B01_LGO[7,2];
LLCBB1B18_C:=LCBB1B01_LGO[7,3];
LLCBB1B19_C:=LCBB1B01_LGO[7,4];
LLCBB1B20_C:=LCBB1B01_LGO[7,5];
LLCBB1B21_C:=LCBB1B01_LGO[8,1];
LLCBB1B22_C:=LCBB1B01_LGO[8,2];
LLCBB1B23_C:=LCBB1B01_LGO[8,3];
LLCBB1B24_C:=LCBB1B01_LGO[8,4];
else
LLCBB1B01_C:=0;
LLCBB1B02_C:=0;
LLCBB1B03_C:=0;
LLCBB1B04_C:=0;
LLCBB1B05_C:=0;
LLCBB1B06_C:=0;
LLCBB1B07_C:=0;
LLCBB1B08_C:=0;
LLCBB1B09_C:=0;
LLCBB1B10_C:=0;
LLCBB1B11_C:=0;
LLCBB1B12_C:=0;
LLCBB1B13_C:=0;
LLCBB1B14_C:=0;
LLCBB1B15_C:=0;
LLCBB1B16_C:=0;
LLCBB1B17_C:=0;
LLCBB1B18_C:=0;
LLCBB1B19_C:=0;
LLCBB1B20_C:=0;
LLCBB1B21_C:=0;
LLCBB1B22_C:=0;
LLCBB1B23_C:=0;
LLCBB1B24_C:=0;
end_if;
END_PROGRAM