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.
216 lines
5.3 KiB
216 lines
5.3 KiB
PROGRAM EAF
|
|
VAR_EXTERNAL
|
|
|
|
|
|
|
|
END_VAR
|
|
|
|
VAR_GLOBAL
|
|
|
|
END_VAR
|
|
|
|
VAR
|
|
LEAFB1C01_COS:ARRAY[0..10] OF REAL;
|
|
LIESB1C01_CO_AVE:BS_Average;
|
|
LIESB1C02_CO_AVE:BS_Average;
|
|
|
|
|
|
|
|
EAFB1C01_SyncControl:IJ_LSyncControl;
|
|
EAFB1C01_SLG:IJ_EAFGroup;
|
|
EAFB1C01_RunTime:BS_RunTime;
|
|
LEAFB1C01_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
EAFB1C02_SyncControl:IJ_LSyncControl;
|
|
EAFB1C02_SLG:IJ_EAFGroup;
|
|
EAFB1C02_RunTime:BS_RunTime;
|
|
LEAFB1C02_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
END_VAR
|
|
|
|
(*Automatically declared*)
|
|
VAR_EXTERNAL
|
|
LEAFB1C02_RSTV : REAL;
|
|
LEAFB1C02_RST : BOOL;
|
|
LEAFB1C01_DM : BOOL;
|
|
LCMD00000_RM : INT;
|
|
LEAFB1C01_TC : BOOL;
|
|
LEAFB1C01_TM : BOOL;
|
|
LEAFB1C01_RSTV : REAL;
|
|
LEAFB1C01_RST : BOOL;
|
|
LIESB1C01_COS : REAL;
|
|
LIESB1C02_COS : REAL;
|
|
RNIEAFB2X00_PC : BOOL;
|
|
REAFB1C02_C : BOOL;
|
|
RNIEAF00000_CM : BOOL;
|
|
LEAFB1C02_COSET : REAL;
|
|
LEAFB1C01_COSET : REAL;
|
|
LIESB1C01_CO : INT;
|
|
REAFB1C01_C : BOOL;
|
|
LEAFB1C01_RH : REAL;
|
|
LIESB1C02_CO : INT;
|
|
LEAFB1C01_C : BOOL;
|
|
LEAFB1C01_R : BOOL;
|
|
LEAFB1C02_DM : BOOL;
|
|
LEAFB1C01_TSTR : STRING;
|
|
LEAFB1C02_TC : BOOL;
|
|
LEAFB1C02_TM : BOOL;
|
|
LEAFB1C02_C : BOOL;
|
|
LEAFB1C02_RH : REAL;
|
|
LEAFB1C02_R : BOOL;
|
|
LEAFB1C02_TSTR : STRING;
|
|
END_VAR
|
|
(** **)
|
|
(** LIESB1C01_CO_AVE(INPUT :=LIESB1C01_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB1C01_CO_AVE (
|
|
INPUT := LIESB1C01_CO
|
|
)
|
|
|
|
(** LIESB1C01_COS := BS_Scale(LIESB1C01_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB1C01_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB1C01_COS
|
|
|
|
(** LIESB1C02_CO_AVE(INPUT :=LIESB1C02_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB1C02_CO_AVE (
|
|
INPUT := LIESB1C02_CO
|
|
)
|
|
|
|
(** LIESB1C02_COS := BS_Scale(LIESB1C02_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB1C02_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB1C02_COS
|
|
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB1C01_COS[1]:=LIESB1C01_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB1C01_COS
|
|
ST LEAFB1C01_COS[1]
|
|
|
|
(** LEAFB1C01_COS[2]:=LIESB1C02_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB1C02_COS
|
|
ST LEAFB1C01_COS[2]
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB1C01_TC :=LEAFB1C01_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB1C01_LC[1]
|
|
ST LEAFB1C01_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB1C01_SLG(ENABLE :=LEAFB1C01_TM ,LINKAGEVALUE :=LEAFB1C01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1C01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1C01_TSTR ,ALLDAY :=LEAFB1C01_DM | LEAFB1C01_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB1C01_SLG (
|
|
ENABLE := LEAFB1C01_TM,
|
|
LINKAGEVALUE := LEAFB1C01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB1C01_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB1C01_TSTR,
|
|
ALLDAY := LEAFB1C01_DM
|
|
|
|
|
LEAFB1C01_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB1C01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB1C01_C,BOOL_IN2:=REAFB1C01_C,BOOL_IN3:=LEAFB1C01_TC | LEAFB1C01_C:= BOOL_OUT1,REAFB1C01_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB1C01_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB1C01_C,
|
|
BOOL_IN2 := REAFB1C01_C,
|
|
BOOL_IN3 := LEAFB1C01_TC
|
|
|
|
|
LEAFB1C01_C := BOOL_OUT1,
|
|
REAFB1C01_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB1C01_RunTime(RUN :=LEAFB1C01_R , RUNTIMESET :=LEAFB1C01_RSTV , RUNTIMERST :=LEAFB1C01_RST , RunTimeRec_In :=LEAFB1C01_RH | LEAFB1C01_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB1C01_RunTime (
|
|
RUN := LEAFB1C01_R,
|
|
RUNTIMESET := LEAFB1C01_RSTV,
|
|
RUNTIMERST := LEAFB1C01_RST,
|
|
RunTimeRec_In := LEAFB1C01_RH
|
|
|
|
|
LEAFB1C01_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB1C02_TC :=LEAFB1C02_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB1C02_LC[1]
|
|
ST LEAFB1C02_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB1C02_SLG(ENABLE :=LEAFB1C02_TM ,LINKAGEVALUE :=LEAFB1C01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1C02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1C02_TSTR ,ALLDAY :=LEAFB1C02_DM | LEAFB1C02_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB1C02_SLG (
|
|
ENABLE := LEAFB1C02_TM,
|
|
LINKAGEVALUE := LEAFB1C01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB1C02_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB1C02_TSTR,
|
|
ALLDAY := LEAFB1C02_DM
|
|
|
|
|
LEAFB1C02_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB1C02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB1C02_C,BOOL_IN2:=REAFB1C02_C,BOOL_IN3:=LEAFB1C02_TC | LEAFB1C02_C:= BOOL_OUT1,REAFB1C02_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB1C02_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB1C02_C,
|
|
BOOL_IN2 := REAFB1C02_C,
|
|
BOOL_IN3 := LEAFB1C02_TC
|
|
|
|
|
LEAFB1C02_C := BOOL_OUT1,
|
|
REAFB1C02_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB1C02_RunTime(RUN :=LEAFB1C02_R , RUNTIMESET :=LEAFB1C02_RSTV , RUNTIMERST :=LEAFB1C02_RST , RunTimeRec_In :=LEAFB1C02_RH | LEAFB1C02_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB1C02_RunTime (
|
|
RUN := LEAFB1C02_R,
|
|
RUNTIMESET := LEAFB1C02_RSTV,
|
|
RUNTIMERST := LEAFB1C02_RST,
|
|
RunTimeRec_In := LEAFB1C02_RH
|
|
|
|
|
LEAFB1C02_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
|
|
END_PROGRAM
|