PROGRAM EAF VAR_EXTERNAL END_VAR VAR_GLOBAL END_VAR VAR LIES04D01_T_AVE:BS_Average; LEAF04D01_TS:ARRAY[0..10] OF REAL; EAF04D01_SyncControl:IJ_LSyncControl; EAF04D01_SLG:IJ_EAFGroup; EAF04D01_RunTime:BS_RunTime; LEAF04D01_LC :ARRAY[0..10] OF BOOL; END_VAR (*Automatically declared*) VAR_EXTERNAL LCMD00000_RM : INT; REAF04D01_C : BOOL; LEAF04D01_RSTV : REAL; LEAF04D01_RST : BOOL; RNLIES04C01_TS : REAL; RNIEAF00000_CM : BOOL; RNIEAF05X00_PC : BOOL; LIES04D01_TS : REAL; LEAF04D01_TSET : REAL; LEAF04D01_DM : BOOL; LEAF04D01_TC : BOOL; LEAF04D01_TM : BOOL; LEAF04D01_C : BOOL; LEAF04D01_TSTR : STRING; LEAF04D01_RH : REAL; LEAF04D01_R : BOOL; END_VAR (** LIES04D01_TS :=RNLIES04C01_TS; **) (* assign - Stmt *) LD RNLIES04C01_TS ST LIES04D01_TS (** LEAF04D01_TC :=LEAF04D01_LC[1]; **) (* assign - Stmt *) LD LEAF04D01_LC[1] ST LEAF04D01_TC (** LEAF04D01_TS[1]:=LIES04D01_TS; **) (* assign - Stmt *) LD LIES04D01_TS ST LEAF04D01_TS[1] (** {*排风机联动程序*} **) (** EAF04D01_SLG(ENABLE :=LEAF04D01_TM ,LINKAGEVALUE :=LEAF04D01_TS , DEAD_BAND :=1.0 , MAXRANGE :=50.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAF04D01_TSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAF04D01_TSTR ,ALLDAY :=LEAF04D01_DM | LEAF04D01_LC:= LINKAGEOUT); **) (* call - Stmt *) CAL EAF04D01_SLG ( ENABLE := LEAF04D01_TM, LINKAGEVALUE := LEAF04D01_TS, DEAD_BAND := 1.0, MAXRANGE := 50.0, MINRANGE := 0.1, LINKAGESET := LEAF04D01_TSET, HOLDDELAY := t#60s, ENABLENUM := 4, SCH_STR := LEAF04D01_TSTR, ALLDAY := LEAF04D01_DM | LEAF04D01_LC := LINKAGEOUT ) (** {*同步程序*} **) (** EAF04D01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAF05X00_PC,BOOL_IN1:=LEAF04D01_C,BOOL_IN2:=REAF04D01_C,BOOL_IN3:=LEAF04D01_TC | LEAF04D01_C:= BOOL_OUT1,REAF04D01_C:=BOOL_OUT2); **) (* call - Stmt *) CAL EAF04D01_SyncContRol ( CM := RNIEAF00000_CM, RM := LCMD00000_RM, BOOL_IN0 := RNIEAF05X00_PC, BOOL_IN1 := LEAF04D01_C, BOOL_IN2 := REAF04D01_C, BOOL_IN3 := LEAF04D01_TC | LEAF04D01_C := BOOL_OUT1, REAF04D01_C := BOOL_OUT2 ) (** {*运行累积时间*} **) (** EAF04D01_RunTime(RUN :=LEAF04D01_R , RUNTIMESET :=LEAF04D01_RSTV , RUNTIMERST :=LEAF04D01_RST, RunTimeRec_In :=LEAF04D01_RH | LEAF04D01_RH:= RUNTIME); **) (* call - Stmt *) CAL EAF04D01_RunTime ( RUN := LEAF04D01_R, RUNTIMESET := LEAF04D01_RSTV, RUNTIMERST := LEAF04D01_RST, RunTimeRec_In := LEAF04D01_RH | LEAF04D01_RH := RUNTIME ) (** **) END_PROGRAM