PROGRAM EAF VAR_EXTERNAL END_VAR VAR_GLOBAL END_VAR VAR LEAFB3C01_COS:ARRAY[0..10] OF REAL; LIESB3C01_CO_AVE:BS_Average; LIESB3C02_CO_AVE:BS_Average; EAFB3C01_SyncControl:IJ_LSyncControl; EAFB3C01_SLG:IJ_EAFGroup; EAFB3C01_RunTime:BS_RunTime; LEAFB3C01_LC :ARRAY[0..10] OF BOOL; LEAFB3A01_COS:ARRAY[0..10] OF REAL; LIESB3A01_CO_AVE:BS_Average; LIESB3A02_CO_AVE:BS_Average; EAFB3A01_SyncControl:IJ_LSyncControl; EAFB3A01_SLG:IJ_EAFGroup; EAFB3A01_RunTime:BS_RunTime; LEAFB3A01_LC :ARRAY[0..10] OF BOOL; END_VAR (*Automatically declared*) VAR_EXTERNAL LEAFB3C01_DM : BOOL; LCMD00000_RM : INT; LEAFB3C01_TC : BOOL; LEAFB3C01_TM : BOOL; LEAFB3C01_RSTV : REAL; LEAFB3C01_RST : BOOL; LIESB3C01_COS : REAL; LIESB3A01_CO : INT; LEAFB3A01_RSTV : REAL; LEAFB3A01_RST : BOOL; LIESB3C02_COS : REAL; LEAFB3A01_TC : BOOL; RNIEAFB3X00_PC : BOOL; LIESB3A02_COS : REAL; LIESB3A01_COS : REAL; RNIEAF00000_CM : BOOL; LEAFB3C01_COSET : REAL; LIESB3C01_CO : INT; LEAFB3A01_RH : REAL; REAFB3C01_C : BOOL; LEAFB3A01_R : BOOL; LEAFB3C01_RH : REAL; LIESB3C02_CO : INT; LEAFB3C01_C : BOOL; LEAFB3C01_R : BOOL; LEAFB3A01_C : BOOL; LEAFB3C01_TSTR : STRING; LIESB3A02_CO : INT; REAFB3A01_C : BOOL; END_VAR (** **) (** LIESB3C01_CO_AVE(INPUT :=LIESB3C01_CO ); **) (* call - Stmt *) CAL LIESB3C01_CO_AVE ( INPUT := LIESB3C01_CO ) (** LIESB3C01_COS := BS_Scale(LIESB3C01_CO_AVE.Output , 3, 0, 1000, 0, 7.0); **) (* assign - Stmt *) LD LIESB3C01_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 7.0 ST LIESB3C01_COS (** LIESB3C02_CO_AVE(INPUT :=LIESB3C02_CO ); **) (* call - Stmt *) CAL LIESB3C02_CO_AVE ( INPUT := LIESB3C02_CO ) (** LIESB3C02_COS := BS_Scale(LIESB3C02_CO_AVE.Output , 3, 0, 1000, 0, 8.0); **) (* assign - Stmt *) LD LIESB3C02_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 8.0 ST LIESB3C02_COS (** **) (** LEAFB3C01_COS[1]:=LIESB3C01_COS; **) (* assign - Stmt *) LD LIESB3C01_COS ST LEAFB3C01_COS[1] (** LEAFB3C01_COS[2]:=LIESB3C02_COS; **) (* assign - Stmt *) LD LIESB3C02_COS ST LEAFB3C01_COS[2] (** **) (** LEAFB3C01_TC :=LEAFB3C01_LC[1]; **) (* assign - Stmt *) LD LEAFB3C01_LC[1] ST LEAFB3C01_TC (** LEAFB3A01_TC :=LEAFB3C01_LC[2]; **) (* assign - Stmt *) LD LEAFB3C01_LC[2] ST LEAFB3A01_TC (** **) (** {*排风机联动程序*} **) (** EAFB3C01_SLG(ENABLE :=LEAFB3C01_TM ,LINKAGEVALUE :=LEAFB3C01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3C01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3C01_TSTR ,ALLDAY :=LEAFB3C01_DM | LEAFB3C01_LC:= LINKAGEOUT); **) (* call - Stmt *) CAL EAFB3C01_SLG ( ENABLE := LEAFB3C01_TM, LINKAGEVALUE := LEAFB3C01_COS, DEAD_BAND := 1.0, MAXRANGE := 1000.0, MINRANGE := 0.1, LINKAGESET := LEAFB3C01_COSET, HOLDDELAY := t#60s, ENABLENUM := 4, SCH_STR := LEAFB3C01_TSTR, ALLDAY := LEAFB3C01_DM | LEAFB3C01_LC := LINKAGEOUT ) (** **) (** LEAFB3C01_DM :=1; **) (* assign - Stmt *) LD 1 ST LEAFB3C01_DM (** **) (** {*同步程序*} **) (** EAFB3C01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3C01_C,BOOL_IN2:=REAFB3C01_C,BOOL_IN3:=LEAFB3C01_TC | LEAFB3C01_C:= BOOL_OUT1,REAFB3C01_C:=BOOL_OUT2); **) (* call - Stmt *) CAL EAFB3C01_SyncContRol ( CM := RNIEAF00000_CM, RM := LCMD00000_RM, BOOL_IN0 := RNIEAFB3X00_PC, BOOL_IN1 := LEAFB3C01_C, BOOL_IN2 := REAFB3C01_C, BOOL_IN3 := LEAFB3C01_TC | LEAFB3C01_C := BOOL_OUT1, REAFB3C01_C := BOOL_OUT2 ) (** {*运行累积时间*} **) (** EAFB3C01_RunTime(RUN :=LEAFB3C01_R , RUNTIMESET :=LEAFB3C01_RSTV , RUNTIMERST :=LEAFB3C01_RST , RunTimeRec_In :=LEAFB3C01_RH | LEAFB3C01_RH:= RUNTIME); **) (* call - Stmt *) CAL EAFB3C01_RunTime ( RUN := LEAFB3C01_R, RUNTIMESET := LEAFB3C01_RSTV, RUNTIMERST := LEAFB3C01_RST, RunTimeRec_In := LEAFB3C01_RH | LEAFB3C01_RH := RUNTIME ) (** **) (** LIESB3A01_CO_AVE(INPUT :=LIESB3A01_CO ); **) (* call - Stmt *) CAL LIESB3A01_CO_AVE ( INPUT := LIESB3A01_CO ) (** LIESB3A01_COS := BS_Scale(LIESB3A01_CO_AVE.Output , 3, 0, 1000, 0, 14.0); **) (* assign - Stmt *) LD LIESB3A01_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 14.0 ST LIESB3A01_COS (** LIESB3A02_CO_AVE(INPUT :=LIESB3A02_CO ); **) (* call - Stmt *) CAL LIESB3A02_CO_AVE ( INPUT := LIESB3A02_CO ) (** LIESB3A02_COS := BS_Scale(LIESB3A02_CO_AVE.Output , 3, 0, 1000, 0, 14.0); **) (* assign - Stmt *) LD LIESB3A02_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 14.0 ST LIESB3A02_COS (** **) (** **) (** **) (** **) (** **) (** {*同步程序*} **) (** EAFB3A01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3A01_C,BOOL_IN2:=REAFB3A01_C,BOOL_IN3:=LEAFB3A01_TC | LEAFB3A01_C:= BOOL_OUT1,REAFB3A01_C:=BOOL_OUT2); **) (* call - Stmt *) CAL EAFB3A01_SyncContRol ( CM := RNIEAF00000_CM, RM := LCMD00000_RM, BOOL_IN0 := RNIEAFB3X00_PC, BOOL_IN1 := LEAFB3A01_C, BOOL_IN2 := REAFB3A01_C, BOOL_IN3 := LEAFB3A01_TC | LEAFB3A01_C := BOOL_OUT1, REAFB3A01_C := BOOL_OUT2 ) (** {*运行累积时间*} **) (** EAFB3A01_RunTime(RUN :=LEAFB3A01_R , RUNTIMESET :=LEAFB3A01_RSTV , RUNTIMERST :=LEAFB3A01_RST , RunTimeRec_In :=LEAFB3A01_RH | LEAFB3A01_RH:= RUNTIME); **) (* call - Stmt *) CAL EAFB3A01_RunTime ( RUN := LEAFB3A01_R, RUNTIMESET := LEAFB3A01_RSTV, RUNTIMERST := LEAFB3A01_RST, RunTimeRec_In := LEAFB3A01_RH | LEAFB3A01_RH := RUNTIME ) (** **) (** **) END_PROGRAM