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.
 
 
 
 
 
 

271 lines
7.2 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LIESB1D01_CO_AVE:BS_Average;
LIESB1D02_CO_AVE:BS_Average;
LEAFB1D01_COS:ARRAY[0..10] OF REAL;
EAFB1D01_SyncControl:IJ_LSyncControl;
EAFB1D01_SLG:IJ_EAFGroup;
EAFB1D01_RunTime:BS_RunTime;
LEAFB1D01_LC :ARRAY[0..10] OF BOOL;
EAFB1D02_SyncControl:IJ_LSyncControl;
EAFB1D02_SLG:IJ_EAFGroup;
EAFB1D02_RunTime:BS_RunTime;
LEAFB1D02_LC :ARRAY[0..10] OF BOOL;
EAFB1D03_SyncControl:IJ_LSyncControl;
EAFB1D03_SLG:IJ_EAFGroup;
EAFB1D03_RunTime:BS_RunTime;
LEAFB1D03_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LIESB1D02_COS : REAL;
LEAFB1D03_TC : BOOL;
LEAFB1D03_TM : BOOL;
LEAFB1D01_TC : BOOL;
LEAFB1D01_TM : BOOL;
LCMD00000_RM : INT;
LEAFB1D03_C : BOOL;
LEAFB1D03_COSET : REAL;
LEAFB1D03_RH : REAL;
LEAFB1D02_TC : BOOL;
LEAFB1D02_TM : BOOL;
LEAFB1D01_COSET : REAL;
LEAFB1D03_R : BOOL;
LEAFB1D01_TSTR : STRING;
REAFB1D03_C : BOOL;
LEAFB1D02_DM : BOOL;
LEAFB1D03_TSTR : STRING;
LEAFB1D03_RSTV : REAL;
LEAFB1D03_RST : BOOL;
LEAFB1D01_C : BOOL;
RNIEAFB1X00_PC : BOOL;
REAFB1D02_C : BOOL;
LEAFB1D01_RH : REAL;
LEAFB1D01_RSTV : REAL;
LEAFB1D01_RST : BOOL;
LEAFB1D01_R : BOOL;
LIESB1D01_COS : REAL;
LEAFB1D02_COSET : REAL;
LEAFB1D02_RSTV : REAL;
LEAFB1D02_RST : BOOL;
RNIEAF00000_CM : BOOL;
LEAFB1D02_RH : REAL;
REAFB1D01_C : BOOL;
LEAFB1D02_R : BOOL;
LEAFB1D02_C : BOOL;
LIESB1D01_CO : INT;
LEAFB1D03_DM : BOOL;
LEAFB1D01_DM : BOOL;
LIESB1D02_CO : INT;
LEAFB1D02_TSTR : STRING;
END_VAR
(** **)
(** LIESB1D01_CO_AVE(INPUT :=LIESB1D01_CO ); **)
(* call - Stmt *)
CAL LIESB1D01_CO_AVE (
INPUT := LIESB1D01_CO
)
(** LIESB1D01_COS := BS_Scale(LIESB1D01_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
(* assign - Stmt *)
LD LIESB1D01_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 0.0
ST LIESB1D01_COS
(** LIESB1D02_CO_AVE(INPUT :=LIESB1D02_CO ); **)
(* call - Stmt *)
CAL LIESB1D02_CO_AVE (
INPUT := LIESB1D02_CO
)
(** LIESB1D02_COS := BS_Scale(LIESB1D02_CO_AVE.Output , 3, 0, 1000, 0, 0.0); **)
(* assign - Stmt *)
LD LIESB1D02_CO_AVE.Output
BS_Scale 3, 0, 1000, 0, 0.0
ST LIESB1D02_COS
(** LEAFB1D01_COS[1]:=LIESB1D01_COS; **)
(* assign - Stmt *)
LD LIESB1D01_COS
ST LEAFB1D01_COS[1]
(** LEAFB1D01_COS[2]:=LIESB1D02_COS; **)
(* assign - Stmt *)
LD LIESB1D02_COS
ST LEAFB1D01_COS[2]
(** **)
(** **)
(** LEAFB1D01_TC :=LEAFB1D01_LC[1]; **)
(* assign - Stmt *)
LD LEAFB1D01_LC[1]
ST LEAFB1D01_TC
(** {*�ŷ�����������*} **)
(** EAFB1D01_SLG(ENABLE :=LEAFB1D01_TM ,LINKAGEVALUE :=LEAFB1D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1D01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1D01_TSTR ,ALLDAY :=LEAFB1D01_DM | LEAFB1D01_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB1D01_SLG (
ENABLE := LEAFB1D01_TM,
LINKAGEVALUE := LEAFB1D01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB1D01_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB1D01_TSTR,
ALLDAY := LEAFB1D01_DM
|
LEAFB1D01_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB1D01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1D01_C,BOOL_IN2:=REAFB1D01_C,BOOL_IN3:=LEAFB1D01_TC | LEAFB1D01_C:= BOOL_OUT1,REAFB1D01_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB1D01_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB1X00_PC,
BOOL_IN1 := LEAFB1D01_C,
BOOL_IN2 := REAFB1D01_C,
BOOL_IN3 := LEAFB1D01_TC
|
LEAFB1D01_C := BOOL_OUT1,
REAFB1D01_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB1D01_RunTime(RUN :=LEAFB1D01_R , RUNTIMESET :=LEAFB1D01_RSTV , RUNTIMERST :=LEAFB1D01_RST , RunTimeRec_In :=LEAFB1D01_RH | LEAFB1D01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB1D01_RunTime (
RUN := LEAFB1D01_R,
RUNTIMESET := LEAFB1D01_RSTV,
RUNTIMERST := LEAFB1D01_RST,
RunTimeRec_In := LEAFB1D01_RH
|
LEAFB1D01_RH := RUNTIME
)
(** **)
(** LEAFB1D02_TC :=LEAFB1D02_LC[1]; **)
(* assign - Stmt *)
LD LEAFB1D02_LC[1]
ST LEAFB1D02_TC
(** {*�ŷ�����������*} **)
(** EAFB1D02_SLG(ENABLE :=LEAFB1D02_TM ,LINKAGEVALUE :=LEAFB1D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1D02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1D02_TSTR ,ALLDAY :=LEAFB1D02_DM | LEAFB1D02_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB1D02_SLG (
ENABLE := LEAFB1D02_TM,
LINKAGEVALUE := LEAFB1D01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB1D02_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB1D02_TSTR,
ALLDAY := LEAFB1D02_DM
|
LEAFB1D02_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB1D02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1D02_C,BOOL_IN2:=REAFB1D02_C,BOOL_IN3:=LEAFB1D02_TC | LEAFB1D02_C:= BOOL_OUT1,REAFB1D02_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB1D02_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB1X00_PC,
BOOL_IN1 := LEAFB1D02_C,
BOOL_IN2 := REAFB1D02_C,
BOOL_IN3 := LEAFB1D02_TC
|
LEAFB1D02_C := BOOL_OUT1,
REAFB1D02_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB1D02_RunTime(RUN :=LEAFB1D02_R , RUNTIMESET :=LEAFB1D02_RSTV , RUNTIMERST :=LEAFB1D02_RST , RunTimeRec_In :=LEAFB1D02_RH | LEAFB1D02_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB1D02_RunTime (
RUN := LEAFB1D02_R,
RUNTIMESET := LEAFB1D02_RSTV,
RUNTIMERST := LEAFB1D02_RST,
RunTimeRec_In := LEAFB1D02_RH
|
LEAFB1D02_RH := RUNTIME
)
(** **)
(** LEAFB1D03_TC :=LEAFB1D03_LC[1]; **)
(* assign - Stmt *)
LD LEAFB1D03_LC[1]
ST LEAFB1D03_TC
(** {*�ŷ�����������*} **)
(** EAFB1D03_SLG(ENABLE :=LEAFB1D03_TM ,LINKAGEVALUE :=LEAFB1D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1D03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1D03_TSTR ,ALLDAY :=LEAFB1D03_DM | LEAFB1D03_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAFB1D03_SLG (
ENABLE := LEAFB1D03_TM,
LINKAGEVALUE := LEAFB1D01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB1D03_COSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAFB1D03_TSTR,
ALLDAY := LEAFB1D03_DM
|
LEAFB1D03_LC := LINKAGEOUT
)
(** {*ͬ������*} **)
(** EAFB1D03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1D03_C,BOOL_IN2:=REAFB1D03_C,BOOL_IN3:=LEAFB1D03_TC | LEAFB1D03_C:= BOOL_OUT1,REAFB1D03_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAFB1D03_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAFB1X00_PC,
BOOL_IN1 := LEAFB1D03_C,
BOOL_IN2 := REAFB1D03_C,
BOOL_IN3 := LEAFB1D03_TC
|
LEAFB1D03_C := BOOL_OUT1,
REAFB1D03_C := BOOL_OUT2
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB1D03_RunTime(RUN :=LEAFB1D03_R , RUNTIMESET :=LEAFB1D03_RSTV , RUNTIMERST :=LEAFB1D03_RST , RunTimeRec_In :=LEAFB1D03_RH | LEAFB1D03_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB1D03_RunTime (
RUN := LEAFB1D03_R,
RUNTIMESET := LEAFB1D03_RSTV,
RUNTIMERST := LEAFB1D03_RST,
RunTimeRec_In := LEAFB1D03_RH
|
LEAFB1D03_RH := RUNTIME
)
END_PROGRAM