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.
 
 
 
 
 
 

410 lines
11 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LEAFB3G01_COS:ARRAY[0..10] OF REAL;
LIESB3G01_CO_AVE:BS_Average;
LIESB3G02_CO_AVE:BS_Average;
LIESB3G03_CO_AVE:BS_Average;
LIESB3G04_CO_AVE:BS_Average;
EAFB3G01_SyncControl:IJ_LSyncControl;
EAFB3G01_SLG:IJ_EAFGroup;
EAFB3G01_RunTime:BS_RunTime;
LEAFB3G01_LC :ARRAY[0..10] OF BOOL;
EAFB3G02_SyncControl:IJ_LSyncControl;
EAFB3G02_SLG:IJ_EAFGroup;
EAFB3G02_RunTime:BS_RunTime;
LEAFB3G02_LC :ARRAY[0..10] OF BOOL;
EAFB3G03_SyncControl:IJ_LSyncControl;
EAFB3G03_SLG:IJ_EAFGroup;
EAFB3G03_RunTime:BS_RunTime;
LEAFB3G03_LC :ARRAY[0..10] OF BOOL;
LEAFB3H01_COS:ARRAY[0..10] OF REAL;
LIESB3H01_CO_AVE:BS_Average;
EAFB3H01_SyncControl:IJ_LSyncControl;
EAFB3H01_SLG:IJ_EAFGroup;
EAFB3H01_RunTime:BS_RunTime;
LEAFB3H01_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LEAFB3G03_RSTV : REAL;
LEAFB3G03_RST : BOOL;
REAFB3G02_C : BOOL;
LCMD00000_RM : INT;
LEAFB3G02_C : BOOL;
LEAFB3H01_C : BOOL;
LIESB3G04_COS : REAL;
REAFB3G03_C : BOOL;
LEAFB3G02_COSET : REAL;
LEAFB3G02_RH : REAL;
LEAFB3G02_RSTV : REAL;
LEAFB3G02_RST : BOOL;
LEAFB3H01_RH : REAL;
LIESB3G03_CO : INT;
LEAFB3G02_R : BOOL;
LEAFB3H01_R : BOOL;
LEAFB3G03_TSTR : STRING;
LEAFB3H01_DM : BOOL;
LIESB3H01_COS : REAL;
LEAFB3H01_TC : BOOL;
LEAFB3H01_TM : BOOL;
REAFB3H01_C : BOOL;
LIESB3G04_CO : INT;
RNIEAFB3X00_PC : BOOL;
REAFB3G01_C : BOOL;
LEAFB3G02_TSTR : STRING;
LEAFB3H01_TSTR : STRING;
LEAFB3G02_DM : BOOL;
LEAFB3H01_COSET : REAL;
LIESB3G01_CO : INT;
RNIEAF00000_CM : BOOL;
LEAFB3G03_RH : REAL;
LEAFB3G02_TC : BOOL;
LEAFB3G02_TM : BOOL;
LEAFB3G01_RSTV : REAL;
LEAFB3G01_RST : BOOL;
LEAFB3G03_R : BOOL;
LIESB3H01_CO : INT;
LIESB3G03_COS : REAL;
LIESB3G02_CO : INT;
LEAFB3G03_TC : BOOL;
LEAFB3G03_TM : BOOL;
LEAFB3G01_COSET : REAL;
LEAFB3G03_C : BOOL;
LIESB3G02_COS : REAL;
LIESB3G01_COS : REAL;
LEAFB3G03_DM : BOOL;
LEAFB3G01_TC : BOOL;
LEAFB3G01_TM : BOOL;
LEAFB3G03_COSET : REAL;
LEAFB3G01_DM : BOOL;
LEAFB3G01_RH : REAL;
LEAFB3H01_RSTV : REAL;
LEAFB3H01_RST : BOOL;
LEAFB3G01_R : BOOL;
LEAFB3G01_TSTR : STRING;
LEAFB3G01_C : BOOL;
END_VAR
(** **)
(** LIESB3H01_CO_AVE(INPUT :=LIESB3H01_CO ); **)
(* call - Stmt *)
CAL LIESB3H01_CO_AVE (
INPUT := LIESB3H01_CO
)
(** LIESB3H01_COS := BS_Scale(LIESB3H01_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3H01_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3H01_COS
(** **)
(** LEAFB3H01_COS[1]:=LIESB3H01_COS; **)
(* assign - Stmt *)
LD LIESB3H01_COS
ST LEAFB3H01_COS[1]
(** **)
(** LEAFB3H01_TC :=LEAFB3H01_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3H01_LC[1]
ST LEAFB3H01_TC
(** {*�ŷ�����������*} **)
(** EAFB3H01_SLG(ENABLE :=LEAFB3H01_TM ,LINKAGEVALUE :=LEAFB3H01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3H01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3H01_TSTR ,ALLDAY :=LEAFB3H01_DM | LEAFB3H01_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3H01_SLG (
ENABLE := LEAFB3H01_TM,
LINKAGEVALUE := LEAFB3H01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3H01_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3H01_TSTR,
ALLDAY := LEAFB3H01_DM
|
LEAFB3H01_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3H01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3H01_C,BOOL_IN2:=REAFB3H01_C,BOOL_IN3:=LEAFB3H01_TC | LEAFB3H01_C:= BOOL_OUT1,REAFB3H01_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3H01_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB3X00_PC,
BOOL_IN1 := LEAFB3H01_C,
BOOL_IN2 := REAFB3H01_C,
BOOL_IN3 := LEAFB3H01_TC
|
LEAFB3H01_C := BOOL_OUT1,
REAFB3H01_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3H01_RunTime(RUN :=LEAFB3H01_R , RUNTIMESET :=LEAFB3H01_RSTV , RUNTIMERST :=LEAFB3H01_RST , RunTimeRec_In :=LEAFB3H01_RH | LEAFB3H01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3H01_RunTime (
RUN := LEAFB3H01_R,
RUNTIMESET := LEAFB3H01_RSTV,
RUNTIMERST := LEAFB3H01_RST,
RunTimeRec_In := LEAFB3H01_RH
|
LEAFB3H01_RH := RUNTIME
)
(** **)
(** **)
(** **)
(** **)
(** **)
(** **)
(** LIESB3G01_CO_AVE(INPUT :=LIESB3G01_CO ); **)
(* call - Stmt *)
CAL LIESB3G01_CO_AVE (
INPUT := LIESB3G01_CO
)
(** LIESB3G01_COS := BS_Scale(LIESB3G01_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3G01_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3G01_COS
(** LIESB3G02_CO_AVE(INPUT :=LIESB3G02_CO ); **)
(* call - Stmt *)
CAL LIESB3G02_CO_AVE (
INPUT := LIESB3G02_CO
)
(** LIESB3G02_COS := BS_Scale(LIESB3G02_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3G02_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3G02_COS
(** LIESB3G03_CO_AVE(INPUT :=LIESB3G03_CO ); **)
(* call - Stmt *)
CAL LIESB3G03_CO_AVE (
INPUT := LIESB3G03_CO
)
(** LIESB3G03_COS := BS_Scale(LIESB3G03_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3G03_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3G03_COS
(** LIESB3G04_CO_AVE(INPUT :=LIESB3G04_CO ); **)
(* call - Stmt *)
CAL LIESB3G04_CO_AVE (
INPUT := LIESB3G04_CO
)
(** LIESB3G04_COS := BS_Scale(LIESB3G04_CO_AVE.Output , 3, 0, 1000, 0, 10.0); **)
(* assign - Stmt *)
LD LIESB3G04_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 10.0
ST LIESB3G04_COS
(** **)
(** LEAFB3G01_COS[1]:=LIESB3G01_COS; **)
(* assign - Stmt *)
LD LIESB3G01_COS
ST LEAFB3G01_COS[1]
(** LEAFB3G01_COS[2]:=LIESB3G02_COS; **)
(* assign - Stmt *)
LD LIESB3G02_COS
ST LEAFB3G01_COS[2]
(** LEAFB3G01_COS[3]:=LIESB3G03_COS; **)
(* assign - Stmt *)
LD LIESB3G03_COS
ST LEAFB3G01_COS[3]
(** LEAFB3G01_COS[4]:=LIESB3G04_COS; **)
(* assign - Stmt *)
LD LIESB3G04_COS
ST LEAFB3G01_COS[4]
(** **)
(** **)
(** LEAFB3G01_TC :=LEAFB3G01_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3G01_LC[1]
ST LEAFB3G01_TC
(** {*�ŷ�����������*} **)
(** EAFB3G01_SLG(ENABLE :=LEAFB3G01_TM ,LINKAGEVALUE :=LEAFB3G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3G01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3G01_TSTR ,ALLDAY :=LEAFB3G01_DM | LEAFB3G01_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3G01_SLG (
ENABLE := LEAFB3G01_TM,
LINKAGEVALUE := LEAFB3G01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3G01_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3G01_TSTR,
ALLDAY := LEAFB3G01_DM
|
LEAFB3G01_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3G01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3G01_C,BOOL_IN2:=REAFB3G01_C,BOOL_IN3:=LEAFB3G01_TC | LEAFB3G01_C:= BOOL_OUT1,REAFB3G01_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3G01_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB3X00_PC,
BOOL_IN1 := LEAFB3G01_C,
BOOL_IN2 := REAFB3G01_C,
BOOL_IN3 := LEAFB3G01_TC
|
LEAFB3G01_C := BOOL_OUT1,
REAFB3G01_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3G01_RunTime(RUN :=LEAFB3G01_R , RUNTIMESET :=LEAFB3G01_RSTV , RUNTIMERST :=LEAFB3G01_RST , RunTimeRec_In :=LEAFB3G01_RH | LEAFB3G01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3G01_RunTime (
RUN := LEAFB3G01_R,
RUNTIMESET := LEAFB3G01_RSTV,
RUNTIMERST := LEAFB3G01_RST,
RunTimeRec_In := LEAFB3G01_RH
|
LEAFB3G01_RH := RUNTIME
)
(** **)
(** LEAFB3G02_TC :=LEAFB3G02_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3G02_LC[1]
ST LEAFB3G02_TC
(** {*�ŷ�����������*} **)
(** EAFB3G02_SLG(ENABLE :=LEAFB3G02_TM ,LINKAGEVALUE :=LEAFB3G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3G02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3G02_TSTR ,ALLDAY :=LEAFB3G02_DM | LEAFB3G02_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3G02_SLG (
ENABLE := LEAFB3G02_TM,
LINKAGEVALUE := LEAFB3G01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3G02_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3G02_TSTR,
ALLDAY := LEAFB3G02_DM
|
LEAFB3G02_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3G02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3G02_C,BOOL_IN2:=REAFB3G02_C,BOOL_IN3:=LEAFB3G02_TC | LEAFB3G02_C:= BOOL_OUT1,REAFB3G02_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3G02_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB3X00_PC,
BOOL_IN1 := LEAFB3G02_C,
BOOL_IN2 := REAFB3G02_C,
BOOL_IN3 := LEAFB3G02_TC
|
LEAFB3G02_C := BOOL_OUT1,
REAFB3G02_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3G02_RunTime(RUN :=LEAFB3G02_R , RUNTIMESET :=LEAFB3G02_RSTV , RUNTIMERST :=LEAFB3G02_RST , RunTimeRec_In :=LEAFB3G02_RH | LEAFB3G02_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3G02_RunTime (
RUN := LEAFB3G02_R,
RUNTIMESET := LEAFB3G02_RSTV,
RUNTIMERST := LEAFB3G02_RST,
RunTimeRec_In := LEAFB3G02_RH
|
LEAFB3G02_RH := RUNTIME
)
(** **)
(** LEAFB3G03_TC :=LEAFB3G03_LC[1]; **)
(* assign - Stmt *)
LD LEAFB3G03_LC[1]
ST LEAFB3G03_TC
(** {*�ŷ�����������*} **)
(** EAFB3G03_SLG(ENABLE :=LEAFB3G03_TM ,LINKAGEVALUE :=LEAFB3G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3G03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3G03_TSTR ,ALLDAY :=LEAFB3G03_DM | LEAFB3G03_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB3G03_SLG (
ENABLE := LEAFB3G03_TM,
LINKAGEVALUE := LEAFB3G01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB3G03_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB3G03_TSTR,
ALLDAY := LEAFB3G03_DM
|
LEAFB3G03_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB3G03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3G03_C,BOOL_IN2:=REAFB3G03_C,BOOL_IN3:=LEAFB3G03_TC | LEAFB3G03_C:= BOOL_OUT1,REAFB3G03_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB3G03_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB3X00_PC,
BOOL_IN1 := LEAFB3G03_C,
BOOL_IN2 := REAFB3G03_C,
BOOL_IN3 := LEAFB3G03_TC
|
LEAFB3G03_C := BOOL_OUT1,
REAFB3G03_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB3G03_RunTime(RUN :=LEAFB3G03_R , RUNTIMESET :=LEAFB3G03_RSTV , RUNTIMERST :=LEAFB3G03_RST , RunTimeRec_In :=LEAFB3G03_RH | LEAFB3G03_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB3G03_RunTime (
RUN := LEAFB3G03_R,
RUNTIMESET := LEAFB3G03_RSTV,
RUNTIMERST := LEAFB3G03_RST,
RunTimeRec_In := LEAFB3G03_RH
|
LEAFB3G03_RH := RUNTIME
)
(** **)
(** **)
END_PROGRAM