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.
389 lines
10 KiB
389 lines
10 KiB
PROGRAM EAF
|
|
VAR_EXTERNAL
|
|
|
|
|
|
|
|
END_VAR
|
|
|
|
VAR_GLOBAL
|
|
|
|
END_VAR
|
|
|
|
VAR
|
|
LEAFB2E01_COS:ARRAY[0..10] OF REAL;
|
|
LEAFB2E02_COS:ARRAY[0..10] OF REAL;
|
|
LIESB2E01_CO_AVE:BS_Average;
|
|
LIESB2E02_CO_AVE:BS_Average;
|
|
|
|
|
|
EAFB2E01_SyncControl:IJ_LSyncControl;
|
|
EAFB2E01_SLG:IJ_EAFGroup;
|
|
EAFB2E01_RunTime:BS_RunTime;
|
|
LEAFB2E01_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
EAFB2E02_SyncControl:IJ_LSyncControl;
|
|
EAFB2E02_SLG:IJ_EAFGroup;
|
|
EAFB2E02_RunTime:BS_RunTime;
|
|
LEAFB2E02_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
EAFB2E03_SyncControl:IJ_LSyncControl;
|
|
EAFB2E03_SLG:IJ_EAFGroup;
|
|
EAFB2E03_RunTime:BS_RunTime;
|
|
LEAFB2E03_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
|
|
LEAFB2D01_COS:ARRAY[0..10] OF REAL;
|
|
|
|
LIESB2D01_CO_AVE:BS_Average;
|
|
LIESB2D02_CO_AVE:BS_Average;
|
|
|
|
|
|
EAFB2D01_SyncControl:IJ_LSyncControl;
|
|
EAFB2D01_SLG:IJ_EAFGroup;
|
|
EAFB2D01_RunTime:BS_RunTime;
|
|
LEAFB2D01_LC :ARRAY[0..10] OF BOOL;
|
|
|
|
|
|
|
|
|
|
|
|
END_VAR
|
|
|
|
(*Automatically declared*)
|
|
VAR_EXTERNAL
|
|
LEAFB2E02_COSET : REAL;
|
|
LIESB2D02_COS : REAL;
|
|
LEAFB2D01_TC : BOOL;
|
|
LEAFB2D01_TM : BOOL;
|
|
LCMD00000_RM : INT;
|
|
LEAFB2E03_COSET : REAL;
|
|
LEAFB2E03_TC : BOOL;
|
|
LEAFB2E03_TM : BOOL;
|
|
LEAFB2E01_COSET : REAL;
|
|
LEAFB2E03_DM : BOOL;
|
|
LEAFB2E02_RSTV : REAL;
|
|
LEAFB2E02_RST : BOOL;
|
|
LEAFB2D01_COSET : REAL;
|
|
LEAFB2D01_TSTR : STRING;
|
|
LEAFB2E03_RH : REAL;
|
|
LEAFB2E01_RSTV : REAL;
|
|
LEAFB2E01_RST : BOOL;
|
|
LEAFB2E02_C : BOOL;
|
|
LEAFB2E03_R : BOOL;
|
|
LEAFB2E02_TSTR : STRING;
|
|
LEAFB2E01_TSTR : STRING;
|
|
LEAFB2D01_C : BOOL;
|
|
LEAFB2E02_RH : REAL;
|
|
LEAFB2E03_C : BOOL;
|
|
LEAFB2E02_R : BOOL;
|
|
RNIEAFB2X00_PC : BOOL;
|
|
LEAFB2E03_RSTV : REAL;
|
|
LEAFB2E03_RST : BOOL;
|
|
LEAFB2E02_DM : BOOL;
|
|
LEAFB2E01_RH : REAL;
|
|
LEAFB2D01_RH : REAL;
|
|
LEAFB2D01_RSTV : REAL;
|
|
LEAFB2D01_RST : BOOL;
|
|
LEAFB2E01_R : BOOL;
|
|
LEAFB2D01_R : BOOL;
|
|
LIESB2E02_COS : REAL;
|
|
REAFB2E03_C : BOOL;
|
|
LEAFB2E02_TC : BOOL;
|
|
LEAFB2E02_TM : BOOL;
|
|
LIESB2D01_COS : REAL;
|
|
RNIEAF00000_CM : BOOL;
|
|
LEAFB2E01_TC : BOOL;
|
|
LEAFB2E01_TM : BOOL;
|
|
REAFB2D01_C : BOOL;
|
|
LEAFB2E01_C : BOOL;
|
|
LEAFB2E01_DM : BOOL;
|
|
LIESB2E01_COS : REAL;
|
|
LIESB2E02_CO : INT;
|
|
LIESB2D01_CO : INT;
|
|
REAFB2E01_C : BOOL;
|
|
REAFB2E02_C : BOOL;
|
|
LEAFB2E03_TSTR : STRING;
|
|
LEAFB2D01_DM : BOOL;
|
|
LIESB2E01_CO : INT;
|
|
LIESB2D02_CO : INT;
|
|
END_VAR
|
|
(** **)
|
|
(** LIESB2E01_CO_AVE(INPUT :=LIESB2E01_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2E01_CO_AVE (
|
|
INPUT := LIESB2E01_CO
|
|
)
|
|
|
|
(** LIESB2E01_COS := BS_Scale(LIESB2E01_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2E01_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2E01_COS
|
|
|
|
(** LIESB2E02_CO_AVE(INPUT :=LIESB2E02_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2E02_CO_AVE (
|
|
INPUT := LIESB2E02_CO
|
|
)
|
|
|
|
(** LIESB2E02_COS := BS_Scale(LIESB2E02_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2E02_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2E02_COS
|
|
|
|
(** LEAFB2E01_COS[1]:=LIESB2E01_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2E01_COS
|
|
ST LEAFB2E01_COS[1]
|
|
|
|
(** LEAFB2E01_COS[2]:=LIESB2E02_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2E02_COS
|
|
ST LEAFB2E01_COS[2]
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LEAFB2E01_TC :=LEAFB2E01_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2E01_LC[1]
|
|
ST LEAFB2E01_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2E01_SLG(ENABLE :=LEAFB2E01_TM ,LINKAGEVALUE :=LEAFB2E01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2E01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2E01_TSTR ,ALLDAY :=LEAFB2E01_DM | LEAFB2E01_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E01_SLG (
|
|
ENABLE := LEAFB2E01_TM,
|
|
LINKAGEVALUE := LEAFB2E01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2E01_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2E01_TSTR,
|
|
ALLDAY := LEAFB2E01_DM
|
|
|
|
|
LEAFB2E01_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2E01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2E01_C,BOOL_IN2:=REAFB2E01_C,BOOL_IN3:=LEAFB2E01_TC | LEAFB2E01_C:= BOOL_OUT1,REAFB2E01_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E01_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2E01_C,
|
|
BOOL_IN2 := REAFB2E01_C,
|
|
BOOL_IN3 := LEAFB2E01_TC
|
|
|
|
|
LEAFB2E01_C := BOOL_OUT1,
|
|
REAFB2E01_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2E01_RunTime(RUN :=LEAFB2E01_R , RUNTIMESET :=LEAFB2E01_RSTV , RUNTIMERST :=LEAFB2E01_RST , RunTimeRec_In :=LEAFB2E01_RH | LEAFB2E01_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E01_RunTime (
|
|
RUN := LEAFB2E01_R,
|
|
RUNTIMESET := LEAFB2E01_RSTV,
|
|
RUNTIMERST := LEAFB2E01_RST,
|
|
RunTimeRec_In := LEAFB2E01_RH
|
|
|
|
|
LEAFB2E01_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** LEAFB2E02_TC :=LEAFB2E02_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2E02_LC[1]
|
|
ST LEAFB2E02_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2E02_SLG(ENABLE :=LEAFB2E02_TM ,LINKAGEVALUE :=LEAFB2E01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2E02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2E02_TSTR ,ALLDAY :=LEAFB2E02_DM | LEAFB2E02_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E02_SLG (
|
|
ENABLE := LEAFB2E02_TM,
|
|
LINKAGEVALUE := LEAFB2E01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2E02_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2E02_TSTR,
|
|
ALLDAY := LEAFB2E02_DM
|
|
|
|
|
LEAFB2E02_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2E02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2E02_C,BOOL_IN2:=REAFB2E02_C,BOOL_IN3:=LEAFB2E02_TC | LEAFB2E02_C:= BOOL_OUT1,REAFB2E02_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E02_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2E02_C,
|
|
BOOL_IN2 := REAFB2E02_C,
|
|
BOOL_IN3 := LEAFB2E02_TC
|
|
|
|
|
LEAFB2E02_C := BOOL_OUT1,
|
|
REAFB2E02_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2E02_RunTime(RUN :=LEAFB2E02_R , RUNTIMESET :=LEAFB2E02_RSTV , RUNTIMERST :=LEAFB2E02_RST , RunTimeRec_In :=LEAFB2E02_RH | LEAFB2E02_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E02_RunTime (
|
|
RUN := LEAFB2E02_R,
|
|
RUNTIMESET := LEAFB2E02_RSTV,
|
|
RUNTIMERST := LEAFB2E02_RST,
|
|
RunTimeRec_In := LEAFB2E02_RH
|
|
|
|
|
LEAFB2E02_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** LEAFB2E03_TC :=LEAFB2E03_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2E03_LC[1]
|
|
ST LEAFB2E03_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2E03_SLG(ENABLE :=LEAFB2E03_TM ,LINKAGEVALUE :=LEAFB2E01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2E03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2E03_TSTR ,ALLDAY :=LEAFB2E03_DM | LEAFB2E03_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E03_SLG (
|
|
ENABLE := LEAFB2E03_TM,
|
|
LINKAGEVALUE := LEAFB2E01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2E03_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2E03_TSTR,
|
|
ALLDAY := LEAFB2E03_DM
|
|
|
|
|
LEAFB2E03_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2E03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2E03_C,BOOL_IN2:=REAFB2E03_C,BOOL_IN3:=LEAFB2E03_TC | LEAFB2E03_C:= BOOL_OUT1,REAFB2E03_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E03_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2E03_C,
|
|
BOOL_IN2 := REAFB2E03_C,
|
|
BOOL_IN3 := LEAFB2E03_TC
|
|
|
|
|
LEAFB2E03_C := BOOL_OUT1,
|
|
REAFB2E03_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2E03_RunTime(RUN :=LEAFB2E03_R , RUNTIMESET :=LEAFB2E03_RSTV , RUNTIMERST :=LEAFB2E03_RST , RunTimeRec_In :=LEAFB2E03_RH | LEAFB2E03_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2E03_RunTime (
|
|
RUN := LEAFB2E03_R,
|
|
RUNTIMESET := LEAFB2E03_RSTV,
|
|
RUNTIMERST := LEAFB2E03_RST,
|
|
RunTimeRec_In := LEAFB2E03_RH
|
|
|
|
|
LEAFB2E03_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** LIESB2D01_CO_AVE(INPUT :=LIESB2D01_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2D01_CO_AVE (
|
|
INPUT := LIESB2D01_CO
|
|
)
|
|
|
|
(** LIESB2D01_COS := BS_Scale(LIESB2D01_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2D01_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2D01_COS
|
|
|
|
(** LIESB2D02_CO_AVE(INPUT :=LIESB2D02_CO ); **)
|
|
(* call - Stmt *)
|
|
CAL LIESB2D02_CO_AVE (
|
|
INPUT := LIESB2D02_CO
|
|
)
|
|
|
|
(** LIESB2D02_COS := BS_Scale(LIESB2D02_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2D02_CO_AVE.Output
|
|
BS_Scale 3, 0, 1000, 0, 0.0
|
|
ST LIESB2D02_COS
|
|
|
|
(** LEAFB2D01_COS[1]:=LIESB2D01_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2D01_COS
|
|
ST LEAFB2D01_COS[1]
|
|
|
|
(** LEAFB2D01_COS[2]:=LIESB2D02_COS; **)
|
|
(* assign - Stmt *)
|
|
LD LIESB2D02_COS
|
|
ST LEAFB2D01_COS[2]
|
|
|
|
(** LEAFB2D01_TC :=LEAFB2D01_LC[1]; **)
|
|
(* assign - Stmt *)
|
|
LD LEAFB2D01_LC[1]
|
|
ST LEAFB2D01_TC
|
|
|
|
(** {*�ŷ�����������*} **)
|
|
(** EAFB2D01_SLG(ENABLE :=LEAFB2D01_TM ,LINKAGEVALUE :=LEAFB2D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2D01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2D01_TSTR ,ALLDAY :=LEAFB2D01_DM | LEAFB2D01_LC:= LINKAGEOUT); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2D01_SLG (
|
|
ENABLE := LEAFB2D01_TM,
|
|
LINKAGEVALUE := LEAFB2D01_COS,
|
|
DEAD_BAND := 10.0,
|
|
MAXRANGE := 1000.0,
|
|
MINRANGE := 0.1,
|
|
LINKAGESET := LEAFB2D01_COSET,
|
|
HOLDDELAY := t#60s,
|
|
ENABLENUM := 4,
|
|
SCH_STR := LEAFB2D01_TSTR,
|
|
ALLDAY := LEAFB2D01_DM
|
|
|
|
|
LEAFB2D01_LC := LINKAGEOUT
|
|
)
|
|
|
|
(** {*ͬ������*} **)
|
|
(** EAFB2D01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2D01_C,BOOL_IN2:=REAFB2D01_C,BOOL_IN3:=LEAFB2D01_TC | LEAFB2D01_C:= BOOL_OUT1,REAFB2D01_C:=BOOL_OUT2); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2D01_SyncContRol (
|
|
CM := RNIEAF00000_CM,
|
|
RM := LCMD00000_RM,
|
|
BOOL_IN0 := RNIEAFB2X00_PC,
|
|
BOOL_IN1 := LEAFB2D01_C,
|
|
BOOL_IN2 := REAFB2D01_C,
|
|
BOOL_IN3 := LEAFB2D01_TC
|
|
|
|
|
LEAFB2D01_C := BOOL_OUT1,
|
|
REAFB2D01_C := BOOL_OUT2
|
|
)
|
|
|
|
(** {*�����ۻ�ʱ��*} **)
|
|
(** EAFB2D01_RunTime(RUN :=LEAFB2D01_R , RUNTIMESET :=LEAFB2D01_RSTV , RUNTIMERST :=LEAFB2D01_RST , RunTimeRec_In :=LEAFB2D01_RH | LEAFB2D01_RH:= RUNTIME); **)
|
|
(* call - Stmt *)
|
|
CAL EAFB2D01_RunTime (
|
|
RUN := LEAFB2D01_R,
|
|
RUNTIMESET := LEAFB2D01_RSTV,
|
|
RUNTIMERST := LEAFB2D01_RST,
|
|
RunTimeRec_In := LEAFB2D01_RH
|
|
|
|
|
LEAFB2D01_RH := RUNTIME
|
|
)
|
|
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
|
|
END_PROGRAM
|