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.
593 lines
16 KiB
593 lines
16 KiB
PROGRAM EAF
|
|
VAR_EXTERNAL
|
|
|
|
|
|
|
|
END_VAR
|
|
|
|
VAR_GLOBAL
|
|
|
|
END_VAR
|
|
|
|
VAR
|
|
LEAFB2B01_COS:ARRAY[0..10] OF REAL;
|
|
|
|
LIESB2B01_CO_AVE:BS_Average;
|
|
LIESB2B02_CO_AVE:BS_Average;
|
|
LIESB2B03_CO_AVE:BS_Average;
|
|
LIESB2B04_CO_AVE:BS_Average;
|
|
LIESB2B05_CO_AVE:BS_Average;
|
|
|
|
EAFB2B01_SyncControl:IJ_LSyncControl;
|
|
EAFB2B01_SLG:IJ_EAFGroup;
|
|
EAFB2B01_RunTime:BS_RunTime;
|
|
LEAFB2B01_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
EAFB2B02_SyncControl:IJ_LSyncControl;
|
|
EAFB2B02_SLG:IJ_EAFGroup;
|
|
EAFB2B02_RunTime:BS_RunTime;
|
|
LEAFB2B02_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
EAFB2B03_SyncControl:IJ_LSyncControl;
|
|
EAFB2B03_SLG:IJ_EAFGroup;
|
|
EAFB2B03_RunTime:BS_RunTime;
|
|
LEAFB2B03_LC :ARRAY[0..10] OF BOOL;
|
|
EAFB2B04_SyncControl:IJ_LSyncControl;
|
|
EAFB2B04_SLG:IJ_EAFGroup;
|
|
EAFB2B04_RunTime:BS_RunTime;
|
|
LEAFB2B04_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
|
|
|
|
LEAFB2A01_COS:ARRAY[0..10] OF REAL;
|
|
|
|
LIESB2A01_CO_AVE:BS_Average;
|
|
LIESB2A02_CO_AVE:BS_Average;
|
|
LIESB2A03_CO_AVE:BS_Average;
|
|
|
|
EAFB2A01_SyncControl:IJ_LSyncControl;
|
|
EAFB2A01_SLG:IJ_EAFGroup;
|
|
EAFB2A01_RunTime:BS_RunTime;
|
|
LEAFB2A01_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
EAFB2A02_SyncControl:IJ_LSyncControl;
|
|
EAFB2A02_SLG:IJ_EAFGroup;
|
|
EAFB2A02_RunTime:BS_RunTime;
|
|
LEAFB2A02_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
|
|
END_VAR
|
|
|
|
(*Automatically declared*)
|
|
VAR_EXTERNAL
|
|
LEAFB2B04_DM : BOOL;
|
|
LEAFB2B03_RSTV : REAL;
|
|
LEAFB2B03_RST : BOOL;
|
|
LEAFB2B01_COSET : REAL;
|
|
LCMD00000_RM : INT;
|
|
LIESB2B03_CO : INT;
|
|
LEAFB2B03_TSTR : STRING;
|
|
LEAFB2A02_RH : REAL;
|
|
LEAFB2A02_RSTV : REAL;
|
|
LEAFB2A02_RST : BOOL;
|
|
LEAFB2B04_TC : BOOL;
|
|
LEAFB2B04_TM : BOOL;
|
|
REAFB2B03_C : BOOL;
|
|
LEAFB2A02_R : BOOL;
|
|
LIESB2B02_CO : INT;
|
|
LEAFB2B04_TSTR : STRING;
|
|
LEAFB2B02_RH : REAL;
|
|
REAFB2B02_C : BOOL;
|
|
LIESB2A01_CO : INT;
|
|
LEAFB2B03_C : BOOL;
|
|
LEAFB2B02_R : BOOL;
|
|
LEAFB2A01_RSTV : REAL;
|
|
LEAFB2A01_RST : BOOL;
|
|
LEAFB2B02_TSTR : STRING;
|
|
LEAFB2A01_TC : BOOL;
|
|
LEAFB2A01_TM : BOOL;
|
|
LEAFB2B03_RH : REAL;
|
|
LEAFB2B02_COSET : REAL;
|
|
LEAFB2B01_TC : BOOL;
|
|
LEAFB2B01_TM : BOOL;
|
|
LEAFB2B02_C : BOOL;
|
|
LEAFB2B03_R : BOOL;
|
|
LEAFB2A02_TSTR : STRING;
|
|
RNIEAFB2X00_PC : BOOL;
|
|
LIESB2A02_COS : REAL;
|
|
LIESB2A01_COS : REAL;
|
|
LEAFB2A01_DM : BOOL;
|
|
LIESB2B04_COS : REAL;
|
|
LEAFB2B01_DM : BOOL;
|
|
REAFB2B04_C : BOOL;
|
|
LEAFB2B03_COSET : REAL;
|
|
LEAFB2B01_RH : REAL;
|
|
LEAFB2B01_C : BOOL;
|
|
LEAFB2B01_R : BOOL;
|
|
RNIEAF00000_CM : BOOL;
|
|
LEAFB2B01_TSTR : STRING;
|
|
LEAFB2B04_COSET : REAL;
|
|
LEAFB2B02_TC : BOOL;
|
|
LEAFB2B02_TM : BOOL;
|
|
LEAFB2B01_RSTV : REAL;
|
|
LEAFB2B01_RST : BOOL;
|
|
LIESB2A03_COS : REAL;
|
|
REAFB2A02_C : BOOL;
|
|
LIESB2B05_COS : REAL;
|
|
LEAFB2B04_RSTV : REAL;
|
|
LEAFB2B04_RST : BOOL;
|
|
LEAFB2B02_DM : BOOL;
|
|
LEAFB2A02_COSET : REAL;
|
|
LEAFB2A02_DM : BOOL;
|
|
LEAFB2A01_RH : REAL;
|
|
LIESB2B02_COS : REAL;
|
|
LIESB2B01_COS : REAL;
|
|
LEAFB2A01_R : BOOL;
|
|
LEAFB2A02_TC : BOOL;
|
|
LEAFB2A02_TM : BOOL;
|
|
LEAFB2A01_COSET : REAL;
|
|
LEAFB2B02_RSTV : REAL;
|
|
LEAFB2B02_RST : BOOL;
|
|
LEAFB2A01_C : BOOL;
|
|
LIESB2B01_CO : INT;
|
|
LEAFB2A01_TSTR : STRING;
|
|
REAFB2B01_C : BOOL;
|
|
LIESB2A02_CO : INT;
|
|
LIESB2B03_COS : REAL;
|
|
LEAFB2B03_DM : BOOL;
|
|
LIESB2B04_CO : INT;
|
|
REAFB2A01_C : BOOL;
|
|
LEAFB2B04_RH : REAL;
|
|
LEAFB2B03_TC : BOOL;
|
|
LEAFB2B03_TM : BOOL;
|
|
LIESB2A03_CO : INT;
|
|
LEAFB2A02_C : BOOL;
|
|
LEAFB2B04_C : BOOL;
|
|
LEAFB2B04_R : BOOL;
|
|
END_VAR
|
|
(** **)
|
|
(** LIESB2B01_CO_AVE(INPUT :=LIESB2B01_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2B01_CO_AVE (
|
|
INPUT := LIESB2B01_CO
|
|
)
|
|
|
|
(** LIESB2B01_COS := BS_Scale(LIESB2B01_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B01_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2B01_COS
|
|
|
|
(** LIESB2B02_CO_AVE(INPUT :=LIESB2B02_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2B02_CO_AVE (
|
|
INPUT := LIESB2B02_CO
|
|
)
|
|
|
|
(** LIESB2B02_COS := BS_Scale(LIESB2B02_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B02_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2B02_COS
|
|
|
|
(** LIESB2B03_CO_AVE(INPUT :=LIESB2B03_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2B03_CO_AVE (
|
|
INPUT := LIESB2B03_CO
|
|
)
|
|
|
|
(** LIESB2B03_COS := BS_Scale(LIESB2B03_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B03_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2B03_COS
|
|
|
|
(** LIESB2B04_CO_AVE(INPUT :=LIESB2B04_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2B04_CO_AVE (
|
|
INPUT := LIESB2B04_CO
|
|
)
|
|
|
|
(** LIESB2B04_COS := BS_Scale(LIESB2B04_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B04_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2B04_COS
|
|
|
|
(** **)
|
|
(** LEAFB2B01_COS[1]:=LIESB2B01_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B01_COS
|
|
ST LEAFB2B01_COS[1]
|
|
|
|
(** LEAFB2B01_COS[2]:=LIESB2B02_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B02_COS
|
|
ST LEAFB2B01_COS[2]
|
|
|
|
(** LEAFB2B01_COS[3]:=LIESB2B03_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B03_COS
|
|
ST LEAFB2B01_COS[3]
|
|
|
|
(** LEAFB2B01_COS[4]:=LIESB2B04_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B04_COS
|
|
ST LEAFB2B01_COS[4]
|
|
|
|
(** LEAFB2B01_COS[5]:=LIESB2B05_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2B05_COS
|
|
ST LEAFB2B01_COS[5]
|
|
|
|
(** **)
|
|
(** LEAFB2B01_TC :=LEAFB2B01_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2B01_LC[1]
|
|
ST LEAFB2B01_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2B01_SLG(ENABLE :=LEAFB2B01_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B01_TSTR ,ALLDAY :=LEAFB2B01_DM | LEAFB2B01_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B01_SLG (
|
|
ENABLE := LEAFB2B01_TM,
|
|
LINKAGEVALUE := LEAFB2B01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2B01_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2B01_TSTR,
|
|
ALLDAY := LEAFB2B01_DM
|
|
|
|
|
LEAFB2B01_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2B01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B01_C,BOOL_IN2:=REAFB2B01_C,BOOL_IN3:=LEAFB2B01_TC | LEAFB2B01_C:= BOOL_OUT1,REAFB2B01_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B01_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2B01_C,
|
|
BOOL_IN2 := REAFB2B01_C,
|
|
BOOL_IN3 := LEAFB2B01_TC
|
|
|
|
|
LEAFB2B01_C := BOOL_OUT1,
|
|
REAFB2B01_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2B01_RunTime(RUN :=LEAFB2B01_R , RUNTIMESET :=LEAFB2B01_RSTV , RUNTIMERST :=LEAFB2B01_RST , RunTimeRec_In :=LEAFB2B01_RH | LEAFB2B01_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B01_RunTime (
|
|
RUN := LEAFB2B01_R,
|
|
RUNTIMESET := LEAFB2B01_RSTV,
|
|
RUNTIMERST := LEAFB2B01_RST,
|
|
RunTimeRec_In := LEAFB2B01_RH
|
|
|
|
|
LEAFB2B01_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB2B02_TC :=LEAFB2B02_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2B02_LC[1]
|
|
ST LEAFB2B02_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2B02_SLG(ENABLE :=LEAFB2B02_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B02_TSTR ,ALLDAY :=LEAFB2B02_DM | LEAFB2B02_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B02_SLG (
|
|
ENABLE := LEAFB2B02_TM,
|
|
LINKAGEVALUE := LEAFB2B01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2B02_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2B02_TSTR,
|
|
ALLDAY := LEAFB2B02_DM
|
|
|
|
|
LEAFB2B02_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2B02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B02_C,BOOL_IN2:=REAFB2B02_C,BOOL_IN3:=LEAFB2B02_TC | LEAFB2B02_C:= BOOL_OUT1,REAFB2B02_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B02_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2B02_C,
|
|
BOOL_IN2 := REAFB2B02_C,
|
|
BOOL_IN3 := LEAFB2B02_TC
|
|
|
|
|
LEAFB2B02_C := BOOL_OUT1,
|
|
REAFB2B02_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2B02_RunTime(RUN :=LEAFB2B02_R , RUNTIMESET :=LEAFB2B02_RSTV , RUNTIMERST :=LEAFB2B02_RST , RunTimeRec_In :=LEAFB2B02_RH | LEAFB2B02_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B02_RunTime (
|
|
RUN := LEAFB2B02_R,
|
|
RUNTIMESET := LEAFB2B02_RSTV,
|
|
RUNTIMERST := LEAFB2B02_RST,
|
|
RunTimeRec_In := LEAFB2B02_RH
|
|
|
|
|
LEAFB2B02_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB2B03_TC :=LEAFB2B03_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2B03_LC[1]
|
|
ST LEAFB2B03_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2B03_SLG(ENABLE :=LEAFB2B03_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B03_TSTR ,ALLDAY :=LEAFB2B03_DM | LEAFB2B03_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B03_SLG (
|
|
ENABLE := LEAFB2B03_TM,
|
|
LINKAGEVALUE := LEAFB2B01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2B03_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2B03_TSTR,
|
|
ALLDAY := LEAFB2B03_DM
|
|
|
|
|
LEAFB2B03_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2B03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B03_C,BOOL_IN2:=REAFB2B03_C,BOOL_IN3:=LEAFB2B03_TC | LEAFB2B03_C:= BOOL_OUT1,REAFB2B03_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B03_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2B03_C,
|
|
BOOL_IN2 := REAFB2B03_C,
|
|
BOOL_IN3 := LEAFB2B03_TC
|
|
|
|
|
LEAFB2B03_C := BOOL_OUT1,
|
|
REAFB2B03_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2B03_RunTime(RUN :=LEAFB2B03_R , RUNTIMESET :=LEAFB2B03_RSTV , RUNTIMERST :=LEAFB2B03_RST , RunTimeRec_In :=LEAFB2B03_RH | LEAFB2B03_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B03_RunTime (
|
|
RUN := LEAFB2B03_R,
|
|
RUNTIMESET := LEAFB2B03_RSTV,
|
|
RUNTIMERST := LEAFB2B03_RST,
|
|
RunTimeRec_In := LEAFB2B03_RH
|
|
|
|
|
LEAFB2B03_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** LEAFB2B04_TC :=LEAFB2B04_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2B04_LC[1]
|
|
ST LEAFB2B04_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2B04_SLG(ENABLE :=LEAFB2B04_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B04_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B04_TSTR ,ALLDAY :=LEAFB2B04_DM | LEAFB2B04_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B04_SLG (
|
|
ENABLE := LEAFB2B04_TM,
|
|
LINKAGEVALUE := LEAFB2B01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2B04_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2B04_TSTR,
|
|
ALLDAY := LEAFB2B04_DM
|
|
|
|
|
LEAFB2B04_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2B04_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B04_C,BOOL_IN2:=REAFB2B04_C,BOOL_IN3:=LEAFB2B04_TC | LEAFB2B04_C:= BOOL_OUT1,REAFB2B04_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B04_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2B04_C,
|
|
BOOL_IN2 := REAFB2B04_C,
|
|
BOOL_IN3 := LEAFB2B04_TC
|
|
|
|
|
LEAFB2B04_C := BOOL_OUT1,
|
|
REAFB2B04_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2B04_RunTime(RUN :=LEAFB2B04_R , RUNTIMESET :=LEAFB2B04_RSTV , RUNTIMERST :=LEAFB2B04_RST , RunTimeRec_In :=LEAFB2B04_RH | LEAFB2B04_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2B04_RunTime (
|
|
RUN := LEAFB2B04_R,
|
|
RUNTIMESET := LEAFB2B04_RSTV,
|
|
RUNTIMERST := LEAFB2B04_RST,
|
|
RunTimeRec_In := LEAFB2B04_RH
|
|
|
|
|
LEAFB2B04_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** LIESB2A01_CO_AVE(INPUT :=LIESB2A01_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2A01_CO_AVE (
|
|
INPUT := LIESB2A01_CO
|
|
)
|
|
|
|
(** LIESB2A01_COS := BS_Scale(LIESB2A01_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2A01_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2A01_COS
|
|
|
|
(** LIESB2A02_CO_AVE(INPUT :=LIESB2A02_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2A02_CO_AVE (
|
|
INPUT := LIESB2A02_CO
|
|
)
|
|
|
|
(** LIESB2A02_COS := BS_Scale(LIESB2A02_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2A02_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2A02_COS
|
|
|
|
(** LIESB2A03_CO_AVE(INPUT :=LIESB2A03_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2A03_CO_AVE (
|
|
INPUT := LIESB2A03_CO
|
|
)
|
|
|
|
(** LIESB2A03_COS := BS_Scale(LIESB2A03_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2A03_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2A03_COS
|
|
|
|
(** **)
|
|
(** LEAFB2A01_COS[1]:=LIESB2A01_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2A01_COS
|
|
ST LEAFB2A01_COS[1]
|
|
|
|
(** LEAFB2A01_COS[2]:=LIESB2A02_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2A02_COS
|
|
ST LEAFB2A01_COS[2]
|
|
|
|
(** LEAFB2A01_COS[3]:=LIESB2A03_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2A03_COS
|
|
ST LEAFB2A01_COS[3]
|
|
|
|
(** **)
|
|
(** LEAFB2A01_TC :=LEAFB2A01_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2A01_LC[1]
|
|
ST LEAFB2A01_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2A01_SLG(ENABLE :=LEAFB2A01_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2A01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2A01_TSTR ,ALLDAY :=LEAFB2A01_DM | LEAFB2A01_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2A01_SLG (
|
|
ENABLE := LEAFB2A01_TM,
|
|
LINKAGEVALUE := LEAFB2A01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2A01_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2A01_TSTR,
|
|
ALLDAY := LEAFB2A01_DM
|
|
|
|
|
LEAFB2A01_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2A01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2A01_C,BOOL_IN2:=REAFB2A01_C,BOOL_IN3:=LEAFB2A01_TC | LEAFB2A01_C:= BOOL_OUT1,REAFB2A01_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2A01_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2A01_C,
|
|
BOOL_IN2 := REAFB2A01_C,
|
|
BOOL_IN3 := LEAFB2A01_TC
|
|
|
|
|
LEAFB2A01_C := BOOL_OUT1,
|
|
REAFB2A01_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2A01_RunTime(RUN :=LEAFB2A01_R , RUNTIMESET :=LEAFB2A01_RSTV , RUNTIMERST :=LEAFB2A01_RST , RunTimeRec_In :=LEAFB2A01_RH | LEAFB2A01_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2A01_RunTime (
|
|
RUN := LEAFB2A01_R,
|
|
RUNTIMESET := LEAFB2A01_RSTV,
|
|
RUNTIMERST := LEAFB2A01_RST,
|
|
RunTimeRec_In := LEAFB2A01_RH
|
|
|
|
|
LEAFB2A01_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB2A02_TC :=LEAFB2A02_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2A02_LC[1]
|
|
ST LEAFB2A02_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2A02_SLG(ENABLE :=LEAFB2A02_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2A02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2A02_TSTR ,ALLDAY :=LEAFB2A02_DM | LEAFB2A02_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2A02_SLG (
|
|
ENABLE := LEAFB2A02_TM,
|
|
LINKAGEVALUE := LEAFB2A01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2A02_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2A02_TSTR,
|
|
ALLDAY := LEAFB2A02_DM
|
|
|
|
|
LEAFB2A02_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2A02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2A02_C,BOOL_IN2:=REAFB2A02_C,BOOL_IN3:=LEAFB2A02_TC | LEAFB2A02_C:= BOOL_OUT1,REAFB2A02_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2A02_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2A02_C,
|
|
BOOL_IN2 := REAFB2A02_C,
|
|
BOOL_IN3 := LEAFB2A02_TC
|
|
|
|
|
LEAFB2A02_C := BOOL_OUT1,
|
|
REAFB2A02_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2A02_RunTime(RUN :=LEAFB2A02_R , RUNTIMESET :=LEAFB2A02_RSTV , RUNTIMERST :=LEAFB2A02_RST , RunTimeRec_In :=LEAFB2A02_RH | LEAFB2A02_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2A02_RunTime (
|
|
RUN := LEAFB2A02_R,
|
|
RUNTIMESET := LEAFB2A02_RSTV,
|
|
RUNTIMERST := LEAFB2A02_RST,
|
|
RunTimeRec_In := LEAFB2A02_RH
|
|
|
|
|
LEAFB2A02_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
|
|
END_PROGRAM
|