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.
 
 
 
 
 
 

208 lines
5.1 KiB

PROGRAM LIGHT
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LCBB3H01_SyncControl : IJ_LCB1030;
LCBB3H01_LGI : array[0..10,0..30] of bool;
LCBB3H01_LGO : array[0..10,0..30] of bool;
LCBB3G01_SyncControl : IJ_LCB1030;
LCBB3G01_LGI : array[0..10,0..30] of bool;
LCBB3G01_LGO : array[0..10,0..30] of bool;
END_VAR
if SYS_Run=0 then
(**)
LCBB3H01_LGI[1,0]:=RNILCBB3X0A_C;
LCBB3H01_LGI[2,0]:=RNILCBB3X0B_C;
LCBB3H01_LGI[3,0]:=RNILCBB3X0C_C;
LCBB3H01_LGI[4,0]:=RNILCBB3X0D_C;
LCBB3H01_LGI[5,0]:=RNILCBB3X0E_C;
LCBB3H01_LGI[6,0]:=RNILCBB3X0F_C;
LCBB3H01_LGI[7,0]:=RNILCBB3X0G_C;
LCBB3H01_LGI[8,0]:=RNILCBB3X0H_C;
(**)
LCBB3H01_LGI[1,1]:=LLCBB3H01_C;
LCBB3H01_LGI[1,2]:=LLCBB3H02_C;
LCBB3H01_LGI[2,1]:=LLCBB3H03_C;
LCBB3H01_LGI[2,2]:=LLCBB3H04_C;
LCBB3H01_LGI[3,1]:=LLCBB3H05_C;
LCBB3H01_LGI[3,2]:=LLCBB3H06_C;
LCBB3H01_LGI[4,1]:=LLCBB3H07_C;
LCBB3H01_LGI[4,2]:=LLCBB3H08_C;
LCBB3H01_LGI[5,1]:=LLCBB3H09_C;
LCBB3H01_LGI[5,2]:=LLCBB3H10_C;
LCBB3H01_LGI[6,1]:=LLCBB3H11_C;
LCBB3H01_LGI[6,2]:=LLCBB3H12_C;
LCBB3H01_LGI[7,1]:=LLCBB3H13_C;
LCBB3H01_LGI[7,2]:=LLCBB3H14_C;
LCBB3H01_LGI[7,3]:=LLCBB3H15_C;
LCBB3H01_LGI[7,4]:=LLCBB3H16_C;
LCBB3H01_LGI[7,5]:=LLCBB3H17_C;
LCBB3H01_LGI[7,6]:=LLCBB3H18_C;
(*A筒灯AB筒灯B,C灯带D导视E广告F筒灯C夜间照明G卫生间照明H备用*)
LCBB3H01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCBB3H01_LGI | LCBB3H01_LGO:=LightGroup_Output );
LLCBB3H01_C:=LCBB3H01_LGO[1,1];
LLCBB3H02_C:=LCBB3H01_LGO[1,2];
LLCBB3H03_C:=LCBB3H01_LGO[2,1];
LLCBB3H04_C:=LCBB3H01_LGO[2,2];
LLCBB3H05_C:=LCBB3H01_LGO[3,1];
LLCBB3H06_C:=LCBB3H01_LGO[3,2];
LLCBB3H07_C:=LCBB3H01_LGO[4,1];
LLCBB3H08_C:=LCBB3H01_LGO[4,2];
LLCBB3H09_C:=LCBB3H01_LGO[5,1];
LLCBB3H10_C:=LCBB3H01_LGO[5,2];
LLCBB3H11_C:=LCBB3H01_LGO[6,1];
LLCBB3H12_C:=LCBB3H01_LGO[6,2];
LLCBB3H13_C:=LCBB3H01_LGO[7,1];
LLCBB3H14_C:=LCBB3H01_LGO[7,2];
LLCBB3H15_C:=LCBB3H01_LGO[7,3];
LLCBB3H16_C:=LCBB3H01_LGO[7,4];
LLCBB3H17_C:=LCBB3H01_LGO[7,5];
LLCBB3H18_C:=LCBB3H01_LGO[7,6];
else
LLCBB3H01_C:=0;
LLCBB3H02_C:=0;
LLCBB3H03_C:=0;
LLCBB3H04_C:=0;
LLCBB3H05_C:=0;
LLCBB3H06_C:=0;
LLCBB3H07_C:=0;
LLCBB3H08_C:=0;
LLCBB3H09_C:=0;
LLCBB3H10_C:=0;
LLCBB3H11_C:=0;
LLCBB3H12_C:=0;
LLCBB3H13_C:=0;
LLCBB3H14_C:=0;
LLCBB3H15_C:=0;
LLCBB3H16_C:=0;
LLCBB3H17_C:=0;
LLCBB3H18_C:=0;
end_if;
if SYS_Run=0 then
(**)
LCBB3G01_LGI[1,0]:=RNILCBB3X0A_C;
LCBB3G01_LGI[2,0]:=RNILCBB3X0B_C;
LCBB3G01_LGI[3,0]:=RNILCBB3X0C_C;
LCBB3G01_LGI[4,0]:=RNILCBB3X0D_C;
LCBB3G01_LGI[5,0]:=RNILCBB3X0E_C;
LCBB3G01_LGI[6,0]:=RNILCBB3X0F_C;
LCBB3G01_LGI[7,0]:=RNILCBB3X0G_C;
LCBB3G01_LGI[8,0]:=RNILCBB3X0H_C;
(**)
LCBB3G01_LGI[1,1]:=LLCBB3G01_C;
LCBB3G01_LGI[1,2]:=LLCBB3G02_C;
LCBB3G01_LGI[2,1]:=LLCBB3G03_C;
LCBB3G01_LGI[2,2]:=LLCBB3G04_C;
LCBB3G01_LGI[3,1]:=LLCBB3G05_C;
LCBB3G01_LGI[3,2]:=LLCBB3G06_C;
LCBB3G01_LGI[3,3]:=LLCBB3G07_C;
LCBB3G01_LGI[4,1]:=LLCBB3G08_C;
LCBB3G01_LGI[4,2]:=LLCBB3G09_C;
LCBB3G01_LGI[4,3]:=LLCBB3G10_C;
LCBB3G01_LGI[5,1]:=LLCBB3G11_C;
LCBB3G01_LGI[5,2]:=LLCBB3G12_C;
LCBB3G01_LGI[5,3]:=LLCBB3G13_C;
LCBB3G01_LGI[5,4]:=LLCBB3G14_C;
LCBB3G01_LGI[6,1]:=LLCBB3G15_C;
LCBB3G01_LGI[6,2]:=LLCBB3G16_C;
LCBB3G01_LGI[6,3]:=LLCBB3G17_C;
LCBB3G01_LGI[6,4]:=LLCBB3G18_C;
LCBB3G01_LGI[6,5]:=LLCBB3G19_C;
LCBB3G01_LGI[6,6]:=LLCBB3G20_C;
LCBB3G01_LGI[6,7]:=LLCBB3G21_C;
LCBB3G01_LGI[6,8]:=LLCBB3G22_C;
LCBB3G01_LGI[6,9]:=LLCBB3G23_C;
LCBB3G01_LGI[7,2]:=LLCBB3G24_C;
LCBB3G01_LGI[7,3]:=LLCBB3G25_C;
LCBB3G01_LGI[7,4]:=LLCBB3G26_C;
LCBB3G01_LGI[7,5]:=LLCBB3G27_C;
LCBB3G01_LGI[7,6]:=LLCBB3G28_C;
(*A筒灯AB筒灯B,C灯带D导视E广告F筒灯C夜间照明G卫生间照明H备用*)
LCBB3G01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCBB3G01_LGI | LCBB3G01_LGO:=LightGroup_Output );
LLCBB3G01_C:=LCBB3G01_LGO[1,1];
LLCBB3G02_C:=LCBB3G01_LGO[1,2];
LLCBB3G03_C:=LCBB3G01_LGO[2,1];
LLCBB3G04_C:=LCBB3G01_LGO[2,2];
LLCBB3G05_C:=LCBB3G01_LGO[3,1];
LLCBB3G06_C:=LCBB3G01_LGO[3,2];
LLCBB3G07_C:=LCBB3G01_LGO[3,3];
LLCBB3G08_C:=LCBB3G01_LGO[4,1];
LLCBB3G09_C:=LCBB3G01_LGO[4,2];
LLCBB3G10_C:=LCBB3G01_LGO[4,3];
LLCBB3G11_C:=LCBB3G01_LGO[5,1];
LLCBB3G12_C:=LCBB3G01_LGO[5,2];
LLCBB3G13_C:=LCBB3G01_LGO[5,3];
LLCBB3G14_C:=LCBB3G01_LGO[5,4];
LLCBB3G15_C:=LCBB3G01_LGO[6,1];
LLCBB3G16_C:=LCBB3G01_LGO[6,2];
LLCBB3G17_C:=LCBB3G01_LGO[6,3];
LLCBB3G18_C:=LCBB3G01_LGO[6,4];
LLCBB3G19_C:=LCBB3G01_LGO[6,5];
LLCBB3G20_C:=LCBB3G01_LGO[6,6];
LLCBB3G21_C:=LCBB3G01_LGO[6,7];
LLCBB3G22_C:=LCBB3G01_LGO[6,8];
LLCBB3G23_C:=LCBB3G01_LGO[6,9];
LLCBB3G24_C:=LCBB3G01_LGO[7,2];
LLCBB3G25_C:=LCBB3G01_LGO[7,3];
LLCBB3G26_C:=LCBB3G01_LGO[7,4];
LLCBB3G27_C:=LCBB3G01_LGO[7,5];
LLCBB3G28_C:=LCBB3G01_LGO[7,6];
else
LLCBB3G01_C:=0;
LLCBB3G02_C:=0;
LLCBB3G03_C:=0;
LLCBB3G04_C:=0;
LLCBB3G05_C:=0;
LLCBB3G06_C:=0;
LLCBB3G07_C:=0;
LLCBB3G08_C:=0;
LLCBB3G09_C:=0;
LLCBB3G10_C:=0;
LLCBB3G11_C:=0;
LLCBB3G12_C:=0;
LLCBB3G13_C:=0;
LLCBB3G14_C:=0;
LLCBB3G15_C:=0;
LLCBB3G16_C:=0;
LLCBB3G17_C:=0;
LLCBB3G18_C:=0;
LLCBB3G19_C:=0;
LLCBB3G20_C:=0;
LLCBB3G21_C:=0;
LLCBB3G22_C:=0;
LLCBB3G23_C:=0;
LLCBB3G24_C:=0;
LLCBB3G25_C:=0;
LLCBB3G26_C:=0;
LLCBB3G27_C:=0;
LLCBB3G28_C:=0;
end_if;
END_PROGRAM