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.
 
 
 
 
 
 

130 lines
3.1 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LIES04A01_T_AVE:BS_Average;
LIES04A02_T_AVE:BS_Average;
LEAF04A01_TS:ARRAY[0..10] OF REAL;
EAF04A01_SyncControl:IJ_LSyncControl;
EAF04A01_SLG:IJ_EAFGroup;
EAF04A01_RunTime:BS_RunTime;
LEAF04A01_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LCMD00000_RM : INT;
LIES04A01_TS : REAL;
LIES04A01_T : INT;
REAF04A01_C : BOOL;
RNIEAF00000_CM : BOOL;
RNIEAF05X00_PC : BOOL;
LEAF04A01_DM : BOOL;
LEAF04A01_TC : BOOL;
LEAF04A01_TM : BOOL;
LEAF04A01_RH : REAL;
LEAF04A01_C : BOOL;
LEAF04A01_R : BOOL;
LIES04A02_TS : REAL;
LEAF04A01_RSTV : REAL;
LEAF04A01_RST : BOOL;
LIES04A02_T : INT;
LEAF04A01_TSET : REAL;
LEAF04A01_TSTR : STRING;
END_VAR
(** LIES04A01_T_AVE(INPUT :=LIES04A01_T ); **)
(* call - Stmt *)
CAL LIES04A01_T_AVE (
INPUT := LIES04A01_T
)
(** LIES04A01_TS := BS_Scale(LIES04A01_T_AVE.Output , 1, 0, 100, 0, 0.0); **)
(* assign - Stmt *)
LD LIES04A01_T_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LIES04A01_TS
(** LIES04A02_T_AVE(INPUT :=LIES04A02_T ); **)
(* call - Stmt *)
CAL LIES04A02_T_AVE (
INPUT := LIES04A02_T
)
(** LIES04A02_TS := BS_Scale(LIES04A02_T_AVE.Output , 1, 0, 100, 0, 0.0); **)
(* assign - Stmt *)
LD LIES04A02_T_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LIES04A02_TS
(** LEAF04A01_TC :=LEAF04A01_LC[1]; **)
(* assign - Stmt *)
LD LEAF04A01_LC[1]
ST LEAF04A01_TC
(** LEAF04A01_TS[1]:=LIES04A01_TS; **)
(* assign - Stmt *)
LD LIES04A01_TS
ST LEAF04A01_TS[1]
(** LEAF04A01_TS[2]:=LIES04A02_TS; **)
(* assign - Stmt *)
LD LIES04A02_TS
ST LEAF04A01_TS[2]
(** {*ÅÅ·ç»úÁª¶¯³ÌÐò*} **)
(** EAF04A01_SLG(ENABLE :=LEAF04A01_TM ,LINKAGEVALUE :=LEAF04A01_TS , DEAD_BAND :=1.0 , MAXRANGE :=50.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAF04A01_TSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAF04A01_TSTR ,ALLDAY :=LEAF04A01_DM | LEAF04A01_LC:= LINKAGEOUT); **)
(* call - Stmt *)
CAL EAF04A01_SLG (
ENABLE := LEAF04A01_TM,
LINKAGEVALUE := LEAF04A01_TS,
DEAD_BAND := 1.0,
MAXRANGE := 50.0,
MINRANGE := 0.1,
LINKAGESET := LEAF04A01_TSET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LEAF04A01_TSTR,
ALLDAY := LEAF04A01_DM
|
LEAF04A01_LC := LINKAGEOUT
)
(** {*ͬ²½³ÌÐò*} **)
(** EAF04A01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAF05X00_PC,BOOL_IN1:=LEAF04A01_C,BOOL_IN2:=REAF04A01_C,BOOL_IN3:=LEAF04A01_TC | LEAF04A01_C:= BOOL_OUT1,REAF04A01_C:=BOOL_OUT2); **)
(* call - Stmt *)
CAL EAF04A01_SyncContRol (
CM := RNIEAF00000_CM,
RM := LCMD00000_RM,
BOOL_IN0 := RNIEAF05X00_PC,
BOOL_IN1 := LEAF04A01_C,
BOOL_IN2 := REAF04A01_C,
BOOL_IN3 := LEAF04A01_TC
|
LEAF04A01_C := BOOL_OUT1,
REAF04A01_C := BOOL_OUT2
)
(** {*ÔËÐÐÀÛ»ýʱ¼ä*} **)
(** EAF04A01_RunTime(RUN :=LEAF04A01_R , RUNTIMESET :=LEAF04A01_RSTV , RUNTIMERST :=LEAF04A01_RST, RunTimeRec_In :=LEAF04A01_RH | LEAF04A01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAF04A01_RunTime (
RUN := LEAF04A01_R,
RUNTIMESET := LEAF04A01_RSTV,
RUNTIMERST := LEAF04A01_RST,
RunTimeRec_In := LEAF04A01_RH
|
LEAF04A01_RH := RUNTIME
)
(** **)
END_PROGRAM