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.
 
 
 
 
 
 

353 lines
7.2 KiB

PROGRAM LIGHT
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LCB01A01_SyncControl : IJ_LCB1030;
LCB01A01_LGI : array[0..10,0..30] of bool;
LCB01A01_LGO : array[0..10,0..30] of bool;
LCB01A02_SyncControl : IJ_LCB1030;
LCB01A02_LGI : array[0..10,0..30] of bool;
LCB01A02_LGO : array[0..10,0..30] of bool;
LCB01A03_SyncControl : IJ_LCB1030;
LCB01A03_LGI : array[0..10,0..30] of bool;
LCB01A03_LGO : array[0..10,0..30] of bool;
LCB01A04_SyncControl : IJ_LCB1030;
LCB01A04_LGI : array[0..10,0..30] of bool;
LCB01A04_LGO : array[0..10,0..30] of bool;
LCB02A01_SyncControl : IJ_LCB1030;
LCB02A01_LGI : array[0..10,0..30] of bool;
LCB02A01_LGO : array[0..10,0..30] of bool;
LCB02A02_SyncControl : IJ_LCB1030;
LCB02A02_LGI : array[0..10,0..30] of bool;
LCB02A02_LGO : array[0..10,0..30] of bool;
LCB02A03_SyncControl : IJ_LCB1030;
LCB02A03_LGI : array[0..10,0..30] of bool;
LCB02A03_LGO : array[0..10,0..30] of bool;
LCB02A04_SyncControl : IJ_LCB1030;
LCB02A04_LGI : array[0..10,0..30] of bool;
LCB02A04_LGO : array[0..10,0..30] of bool;
LCB02A05_SyncControl : IJ_LCB1030;
LCB02A05_LGI : array[0..10,0..30] of bool;
LCB02A05_LGO : array[0..10,0..30] of bool;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
RNILCB02X0D_C : BOOL;
RNILCB01X0D_C : BOOL;
RNILCB02X0A_C : BOOL;
RNILCB01X0A_C : BOOL;
LLCB01A04_C : BOOL;
LLCB01A01_C : BOOL;
LLCB02A04_C : BOOL;
LLCB02A01_C : BOOL;
RNILCB02X0E_C : BOOL;
RNILCB01X0E_C : BOOL;
RNILCB02X0B_C : BOOL;
RNILCB01X0B_C : BOOL;
SYS_RUN : BOOL;
LLCB01A02_C : BOOL;
LLCB02A02_C : BOOL;
RNILCB02X0G_C : BOOL;
RNILCB01X0G_C : BOOL;
LLCB01A03_C : BOOL;
LLCB02A03_C : BOOL;
LLCB02A05_C : BOOL;
RNILCB02X0F_C : BOOL;
RNILCB01X0F_C : BOOL;
RNILCB02X0C_C : BOOL;
RNILCB01X0C_C : BOOL;
RNILCB02X0H_C : BOOL;
RNILCB01X0H_C : BOOL;
END_VAR
(** if SYS_Run=0 then **)
(* if - Cond *)
LD SYS_Run
EQ 0
JMPCN ODK_SKIP_000000000000001_000000000000001
(* then - Stmts *)
(** **)
(** {*×é±ð°ó¶¨*} **)
(** LCB01A01_LGI[1,0]:=RNILCB01X0A_C; **)
(* assign - Stmt *)
LD RNILCB01X0A_C
ST LCB01A01_LGI[1,0]
(** LCB01A01_LGI[2,0]:=RNILCB01X0B_C; **)
(* assign - Stmt *)
LD RNILCB01X0B_C
ST LCB01A01_LGI[2,0]
(** LCB01A01_LGI[3,0]:=RNILCB01X0C_C; **)
(* assign - Stmt *)
LD RNILCB01X0C_C
ST LCB01A01_LGI[3,0]
(** LCB01A01_LGI[4,0]:=RNILCB01X0D_C; **)
(* assign - Stmt *)
LD RNILCB01X0D_C
ST LCB01A01_LGI[4,0]
(** LCB01A01_LGI[5,0]:=RNILCB01X0E_C; **)
(* assign - Stmt *)
LD RNILCB01X0E_C
ST LCB01A01_LGI[5,0]
(** LCB01A01_LGI[6,0]:=RNILCB01X0F_C; **)
(* assign - Stmt *)
LD RNILCB01X0F_C
ST LCB01A01_LGI[6,0]
(** LCB01A01_LGI[7,0]:=RNILCB01X0G_C; **)
(* assign - Stmt *)
LD RNILCB01X0G_C
ST LCB01A01_LGI[7,0]
(** LCB01A01_LGI[8,0]:=RNILCB01X0H_C; **)
(* assign - Stmt *)
LD RNILCB01X0H_C
ST LCB01A01_LGI[8,0]
(** **)
(** {*»ØÂ·°ó¶¨*} **)
(** LCB01A01_LGI[1,1]:=LLCB01A01_C; **)
(* assign - Stmt *)
LD LLCB01A01_C
ST LCB01A01_LGI[1,1]
(** LCB01A01_LGI[2,1]:=LLCB01A02_C; **)
(* assign - Stmt *)
LD LLCB01A02_C
ST LCB01A01_LGI[2,1]
(** LCB01A01_LGI[3,1]:=LLCB01A03_C; **)
(* assign - Stmt *)
LD LLCB01A03_C
ST LCB01A01_LGI[3,1]
(** LCB01A01_LGI[4,1]:=LLCB01A04_C; **)
(* assign - Stmt *)
LD LLCB01A04_C
ST LCB01A01_LGI[4,1]
(** **)
(** **)
(** {*AͲµÆA£¬BͲµÆB,CµÆ´ø£¬Dµ¼ÊÓ£¬E¹ã¸æ£¬FͲµÆC£¨Ò¹¼äÕÕÃ÷£©£¬GÎÀÉú¼äÕÕÃ÷£¬H±¸ÓÃ*} **)
(** LCB01A01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCB01A01_LGI | LCB01A01_LGO:=LightGroup_Output ); **)
(* call - Stmt *)
CAL LCB01A01_SyncControl (
CM := 1,
Lock := 0,
Delay := t#10ms,
LightGroup_Input := LCB01A01_LGI
|
LCB01A01_LGO := LightGroup_Output
)
(** **)
(** LLCB01A01_C:=LCB01A01_LGO[1,1]; **)
(* assign - Stmt *)
LD LCB01A01_LGO[1,1]
ST LLCB01A01_C
(** LLCB01A02_C:=LCB01A01_LGO[2,1]; **)
(* assign - Stmt *)
LD LCB01A01_LGO[2,1]
ST LLCB01A02_C
(** LLCB01A03_C:=LCB01A01_LGO[3,1]; **)
(* assign - Stmt *)
LD LCB01A01_LGO[3,1]
ST LLCB01A03_C
(** LLCB01A04_C:=LCB01A01_LGO[4,1]; **)
(* assign - Stmt *)
LD LCB01A01_LGO[4,1]
ST LLCB01A04_C
(** **)
(** **)
(** {*×é±ð°ó¶¨*} **)
(** LCB02A01_LGI[1,0]:=RNILCB02X0A_C; **)
(* assign - Stmt *)
LD RNILCB02X0A_C
ST LCB02A01_LGI[1,0]
(** LCB02A01_LGI[2,0]:=RNILCB02X0B_C; **)
(* assign - Stmt *)
LD RNILCB02X0B_C
ST LCB02A01_LGI[2,0]
(** LCB02A01_LGI[3,0]:=RNILCB02X0C_C; **)
(* assign - Stmt *)
LD RNILCB02X0C_C
ST LCB02A01_LGI[3,0]
(** LCB02A01_LGI[4,0]:=RNILCB02X0D_C; **)
(* assign - Stmt *)
LD RNILCB02X0D_C
ST LCB02A01_LGI[4,0]
(** LCB02A01_LGI[5,0]:=RNILCB02X0E_C; **)
(* assign - Stmt *)
LD RNILCB02X0E_C
ST LCB02A01_LGI[5,0]
(** LCB02A01_LGI[6,0]:=RNILCB02X0F_C; **)
(* assign - Stmt *)
LD RNILCB02X0F_C
ST LCB02A01_LGI[6,0]
(** LCB02A01_LGI[7,0]:=RNILCB02X0G_C; **)
(* assign - Stmt *)
LD RNILCB02X0G_C
ST LCB02A01_LGI[7,0]
(** LCB02A01_LGI[8,0]:=RNILCB02X0H_C; **)
(* assign - Stmt *)
LD RNILCB02X0H_C
ST LCB02A01_LGI[8,0]
(** **)
(** {*»ØÂ·°ó¶¨*} **)
(** LCB02A01_LGI[1,1]:=LLCB02A01_C; **)
(* assign - Stmt *)
LD LLCB02A01_C
ST LCB02A01_LGI[1,1]
(** LCB02A01_LGI[2,1]:=LLCB02A02_C; **)
(* assign - Stmt *)
LD LLCB02A02_C
ST LCB02A01_LGI[2,1]
(** LCB02A01_LGI[3,1]:=LLCB02A03_C; **)
(* assign - Stmt *)
LD LLCB02A03_C
ST LCB02A01_LGI[3,1]
(** LCB02A01_LGI[4,1]:=LLCB02A04_C; **)
(* assign - Stmt *)
LD LLCB02A04_C
ST LCB02A01_LGI[4,1]
(** LCB02A01_LGI[5,1]:=LLCB02A05_C; **)
(* assign - Stmt *)
LD LLCB02A05_C
ST LCB02A01_LGI[5,1]
(** **)
(** {*AͲµÆA£¬BͲµÆB,CµÆ´ø£¬Dµ¼ÊÓ£¬E¹ã¸æ£¬FͲµÆC£¨Ò¹¼äÕÕÃ÷£©£¬GÎÀÉú¼äÕÕÃ÷£¬H±¸ÓÃ*} **)
(** LCB02A01_SyncControl(CM:=1 , Lock:=0, Delay:=t#10ms , LightGroup_Input:=LCB01A01_LGI | LCB01A01_LGO:=LightGroup_Output ); **)
(* call - Stmt *)
CAL LCB02A01_SyncControl (
CM := 1,
Lock := 0,
Delay := t#10ms,
LightGroup_Input := LCB01A01_LGI
|
LCB01A01_LGO := LightGroup_Output
)
(** **)
(** LLCB02A01_C:=LCB02A01_LGO[1,1]; **)
(* assign - Stmt *)
LD LCB02A01_LGO[1,1]
ST LLCB02A01_C
(** LLCB02A02_C:=LCB02A01_LGO[2,1]; **)
(* assign - Stmt *)
LD LCB02A01_LGO[2,1]
ST LLCB02A02_C
(** LLCB02A03_C:=LCB02A01_LGO[3,1]; **)
(* assign - Stmt *)
LD LCB02A01_LGO[3,1]
ST LLCB02A03_C
(** LLCB02A04_C:=LCB02A01_LGO[4,1]; **)
(* assign - Stmt *)
LD LCB02A01_LGO[4,1]
ST LLCB02A04_C
(** LLCB02A05_C:=LCB02A01_LGO[5,1]; **)
(* assign - Stmt *)
LD LCB02A01_LGO[5,1]
ST LLCB02A05_C
JMP ODK_END_IF_000000000000001
(** else **)
(* else *)
ODK_SKIP_000000000000001_000000000000001:
(* else - Stmts *)
(** LLCB01A01_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB01A01_C
(** LLCB01A02_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB01A02_C
(** LLCB01A03_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB01A03_C
(** LLCB01A04_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB01A04_C
(** LLCB02A01_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB02A01_C
(** LLCB02A02_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB02A02_C
(** LLCB02A03_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB02A03_C
(** LLCB02A04_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB02A04_C
(** LLCB02A05_C:=0; **)
(* assign - Stmt *)
LD 0
ST LLCB02A05_C
(** end_if; **)
(* if - End *)
ODK_END_IF_000000000000001:
END_PROGRAM