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.

394 lines
10 KiB

4 months ago
PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
EAFB3D01_COS:ARRAY[0..10] OF REAL;
LIESB3D01_CO_AVE:BS_Average;
LIESB3D02_CO_AVE:BS_Average;
EAFB3D01_SyncControl:IJ_LSyncControl;
EAFB3D01_SLG:IJ_EAFGroup;
EAFB3D01_RunTime:BS_RunTime;
LEAFB3D01_LC :ARRAY[0..10] OF BOOL;
LEAFB3E01_COS:ARRAY[0..10] OF REAL;
LIESB3E01_CO_AVE:BS_Average;
LIESB3E02_CO_AVE:BS_Average;
LIESB3E03_CO_AVE:BS_Average;
LIESB3E04_CO_AVE:BS_Average;
LIESB3E05_CO_AVE:BS_Average;
EAFB3E01_SyncControl:IJ_LSyncControl;
EAFB3E01_SLG:IJ_EAFGroup;
EAFB3E01_RunTime:BS_RunTime;
LEAFB3E01_LC :ARRAY[0..10] OF BOOL;
LEAFB3E02_COS:ARRAY[0..10] OF REAL;
EAFB3E02_SyncControl:IJ_LSyncControl;
EAFB3E02_SLG:IJ_EAFGroup;
EAFB3E02_RunTime:BS_RunTime;
LEAFB3E02_LC :ARRAY[0..10] OF BOOL;
4 months ago
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LEAFB3E02_COSET : REAL;
4 months ago
LIESB3D02_COS : REAL;
LEAFB3D01_TC : BOOL;
LEAFB3D01_TM : BOOL;
LCMD00000_RM : INT;
LEAFB3E01_COSET : REAL;
LEAFB3E02_RSTV : REAL;
LEAFB3E02_RST : BOOL;
4 months ago
LEAFB3D01_COSET : REAL;
LEAFB3D01_TSTR : STRING;
LEAFB3E01_RSTV : REAL;
LEAFB3E01_RST : BOOL;
LEAFB3E02_C : BOOL;
LEAFB3E02_TSTR : STRING;
4 months ago
LEAFB3E01_TSTR : STRING;
LEAFB3D01_C : BOOL;
LEAFB3E02_RH : REAL;
LEAFB3E02_R : BOOL;
4 months ago
RNIEAFB2X00_PC : BOOL;
RNIEAFB3X00_PC : BOOL;
LEAFB3E02_DM : BOOL;
4 months ago
LEAFB3E01_RH : REAL;
LEAFB3D01_RH : REAL;
LEAFB3D01_RSTV : REAL;
LEAFB3D01_RST : BOOL;
LEAFB3D01_R : BOOL;
LEAFB3E01_R : BOOL;
LIESB3E02_COS : REAL;
LEAFB3E02_TC : BOOL;
LEAFB3E02_TM : BOOL;
4 months ago
LIESB3D01_COS : REAL;
LIESB3E05_CO : INT;
RNIEAF00000_CM : BOOL;
LEAFB3E01_TC : BOOL;
LEAFB3E01_TM : BOOL;
REAFB3D01_C : BOOL;
LEAFB3E01_C : BOOL;
LEAFB3E01_DM : BOOL;
LIESB3E01_COS : REAL;
LIESB3E05_COS : REAL;
LIESB3D01_CO : INT;
LIESB3E02_CO : INT;
REAFB3E01_C : BOOL;
LIESB3E03_CO : INT;
REAFB3E02_C : BOOL;
4 months ago
LIESB3E04_CO : INT;
LIESB3E04_COS : REAL;
LIESB3E03_COS : REAL;
LEAFB3D01_DM : BOOL;
LIESB3D02_CO : INT;
LIESB3E01_CO : INT;
END_VAR
(** LIESB3D01_CO_AVE(INPUT :=LIESB3D01_CO ); **)
(* call - Stmt *)
CAL LIESB3D01_CO_AVE (
INPUT := LIESB3D01_CO
)
(** LIESB3D01_COS := BS_Scale(LIESB3D01_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3D01_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3D01_COS
(** LIESB3D02_CO_AVE(INPUT :=LIESB3D02_CO ); **)
(* call - Stmt *)
CAL LIESB3D02_CO_AVE (
INPUT := LIESB3D02_CO
)
(** LIESB3D02_COS := BS_Scale(LIESB3D02_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3D02_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3D02_COS
(** EAFB3D01_COS[1]:=LIESB3D01_COS; **)
(* assign - Stmt *)
LD LIESB3D01_COS
ST EAFB3D01_COS[1]
(** EAFB3D01_COS[2]:=LIESB3D02_COS; **)
(* assign - Stmt *)
LD LIESB3D02_COS
ST EAFB3D01_COS[2]
(** LEAFB3D01_TC :=LEAFB3D01_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3D01_LC[1]
ST LEAFB3D01_TC
(** {*�ŷ�����������*} **)
(** EAFB3D01_SLG(ENABLE :=LEAFB3D01_TM , LINKAGEVALUE :=EAFB3D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 , LINKAGESET :=LEAFB3D01_COSET ,HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3D01_TSTR , ALLDAY :=LEAFB3D01_DM | LEAFB3D01_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3D01_SLG (
ENABLE := LEAFB3D01_TM,
LINKAGEVALUE := EAFB3D01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3D01_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3D01_TSTR,
ALLDAY := LEAFB3D01_DM
|
LEAFB3D01_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3D01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB3D01_C,BOOL_IN2:=REAFB3D01_C,BOOL_IN3:=LEAFB3D01_TC | LEAFB3D01_C:= BOOL_OUT1,REAFB3D01_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3D01_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB2X00_PC,
BOOL_IN1 := LEAFB3D01_C,
BOOL_IN2 := REAFB3D01_C,
BOOL_IN3 := LEAFB3D01_TC
|
LEAFB3D01_C := BOOL_OUT1,
REAFB3D01_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3D01_RunTime(RUN :=LEAFB3D01_R , RUNTIMESET :=LEAFB3D01_RSTV , RUNTIMERST :=LEAFB3D01_RST , RunTimeRec_In :=LEAFB3D01_RH | LEAFB3D01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3D01_RunTime (
RUN := LEAFB3D01_R,
RUNTIMESET := LEAFB3D01_RSTV,
RUNTIMERST := LEAFB3D01_RST,
RunTimeRec_In := LEAFB3D01_RH
|
LEAFB3D01_RH := RUNTIME
)
(** **)
(** **)
(** LIESB3E01_CO_AVE(INPUT :=LIESB3E01_CO ); **)
(* call - Stmt *)
CAL LIESB3E01_CO_AVE (
INPUT := LIESB3E01_CO
)
(** LIESB3E01_COS := BS_Scale(LIESB3E01_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3E01_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3E01_COS
(** LIESB3E02_CO_AVE(INPUT :=LIESB3E02_CO ); **)
(* call - Stmt *)
CAL LIESB3E02_CO_AVE (
INPUT := LIESB3E02_CO
)
(** LIESB3E02_COS := BS_Scale(LIESB3E02_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3E02_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3E02_COS
(** LIESB3E03_CO_AVE(INPUT :=LIESB3E03_CO ); **)
(* call - Stmt *)
CAL LIESB3E03_CO_AVE (
INPUT := LIESB3E03_CO
)
(** LIESB3E03_COS := BS_Scale(LIESB3E03_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3E03_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3E03_COS
(** LIESB3E04_CO_AVE(INPUT :=LIESB3E04_CO ); **)
(* call - Stmt *)
CAL LIESB3E04_CO_AVE (
INPUT := LIESB3E04_CO
)
(** LIESB3E04_COS := BS_Scale(LIESB3E04_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3E04_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3E04_COS
(** LIESB3E05_CO_AVE(INPUT :=LIESB3E05_CO ); **)
(* call - Stmt *)
CAL LIESB3E05_CO_AVE (
INPUT := LIESB3E05_CO
)
(** LIESB3E05_COS := BS_Scale(LIESB3E05_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3E05_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3E05_COS
(** **)
(** LEAFB3E01_COS[1]:=LIESB3E01_COS; **)
(* assign - Stmt *)
LD LIESB3E01_COS
ST LEAFB3E01_COS[1]
(** LEAFB3E01_COS[2]:=LIESB3E02_COS; **)
(* assign - Stmt *)
LD LIESB3E02_COS
ST LEAFB3E01_COS[2]
(** LEAFB3E01_COS[3]:=LIESB3E03_COS; **)
(* assign - Stmt *)
LD LIESB3E03_COS
ST LEAFB3E01_COS[3]
(** LEAFB3E01_COS[4]:=LIESB3E04_COS; **)
(* assign - Stmt *)
LD LIESB3E04_COS
ST LEAFB3E01_COS[4]
(** LEAFB3E01_COS[5]:=LIESB3E05_COS; **)
(* assign - Stmt *)
LD LIESB3E05_COS
ST LEAFB3E01_COS[5]
(** LEAFB3E01_TC :=LEAFB3E01_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3E01_LC[1]
ST LEAFB3E01_TC
(** {*�ŷ�����������*} **)
(** EAFB3E01_SLG(ENABLE :=LEAFB3E01_TM ,LINKAGEVALUE :=LEAFB3E01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3E01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3E01_TSTR ,ALLDAY :=LEAFB3E01_DM | LEAFB3E01_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3E01_SLG (
ENABLE := LEAFB3E01_TM,
LINKAGEVALUE := LEAFB3E01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3E01_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3E01_TSTR,
ALLDAY := LEAFB3E01_DM
|
LEAFB3E01_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3E01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3E01_C,BOOL_IN2:=REAFB3E01_C,BOOL_IN3:=LEAFB3E01_TC | LEAFB3E01_C:= BOOL_OUT1,REAFB3E01_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3E01_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB3X00_PC,
BOOL_IN1 := LEAFB3E01_C,
BOOL_IN2 := REAFB3E01_C,
BOOL_IN3 := LEAFB3E01_TC
|
LEAFB3E01_C := BOOL_OUT1,
REAFB3E01_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3E01_RunTime(RUN :=LEAFB3E01_R , RUNTIMESET :=LEAFB3E01_RSTV , RUNTIMERST :=LEAFB3E01_RST , RunTimeRec_In :=LEAFB3E01_RH | LEAFB3E01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3E01_RunTime (
RUN := LEAFB3E01_R,
RUNTIMESET := LEAFB3E01_RSTV,
RUNTIMERST := LEAFB3E01_RST,
RunTimeRec_In := LEAFB3E01_RH
|
LEAFB3E01_RH := RUNTIME
)
(** **)
(** **)
(** LEAFB3E02_COS[1]:=LIESB3E01_COS; **)
(* assign - Stmt *)
LD LIESB3E01_COS
ST LEAFB3E02_COS[1]
(** LEAFB3E02_COS[2]:=LIESB3E02_COS; **)
(* assign - Stmt *)
LD LIESB3E02_COS
ST LEAFB3E02_COS[2]
(** LEAFB3E02_COS[3]:=LIESB3E03_COS; **)
(* assign - Stmt *)
LD LIESB3E03_COS
ST LEAFB3E02_COS[3]
(** LEAFB3E02_COS[4]:=LIESB3E04_COS; **)
(* assign - Stmt *)
LD LIESB3E04_COS
ST LEAFB3E02_COS[4]
(** LEAFB3E02_COS[5]:=LIESB3E05_COS; **)
(* assign - Stmt *)
LD LIESB3E05_COS
ST LEAFB3E02_COS[5]
(** LEAFB3E02_TC :=LEAFB3E02_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3E02_LC[1]
ST LEAFB3E02_TC
(** {*�ŷ�����������*} **)
(** EAFB3E02_SLG(ENABLE :=LEAFB3E02_TM ,LINKAGEVALUE :=LEAFB3E02_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3E02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3E02_TSTR ,ALLDAY :=LEAFB3E02_DM | LEAFB3E02_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3E02_SLG (
ENABLE := LEAFB3E02_TM,
LINKAGEVALUE := LEAFB3E02_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3E02_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3E02_TSTR,
ALLDAY := LEAFB3E02_DM
|
LEAFB3E02_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3E02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3E02_C,BOOL_IN2:=REAFB3E02_C,BOOL_IN3:=LEAFB3E02_TC | LEAFB3E02_C:= BOOL_OUT1,REAFB3E02_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3E02_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB3X00_PC,
BOOL_IN1 := LEAFB3E02_C,
BOOL_IN2 := REAFB3E02_C,
BOOL_IN3 := LEAFB3E02_TC
|
LEAFB3E02_C := BOOL_OUT1,
REAFB3E02_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3E02_RunTime(RUN :=LEAFB3E02_R , RUNTIMESET :=LEAFB3E02_RSTV , RUNTIMERST :=LEAFB3E02_RST , RunTimeRec_In :=LEAFB3E02_RH | LEAFB3E02_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3E02_RunTime (
RUN := LEAFB3E02_R,
RUNTIMESET := LEAFB3E02_RSTV,
RUNTIMERST := LEAFB3E02_RST,
RunTimeRec_In := LEAFB3E02_RH
|
LEAFB3E02_RH := RUNTIME
)
4 months ago
END_PROGRAM