PROGRAM EAF VAR_EXTERNAL END_VAR VAR_GLOBAL END_VAR VAR LEAFB1C01_COS:ARRAY[0..10] OF REAL; LIESB1C01_CO_AVE:BS_Average; LIESB1C02_CO_AVE:BS_Average; LIESB1B01_CO_AVE:BS_Average; LIESB1B02_CO_AVE:BS_Average; EAFB1C01_SyncControl:IJ_LSyncControl; EAFB1C01_SLG:IJ_EAFGroup; EAFB1C01_RunTime:BS_RunTime; LEAFB1C01_LC :ARRAY[0..10] OF BOOL; EAFB1C02_SyncControl:IJ_LSyncControl; EAFB1C02_SLG:IJ_EAFGroup; EAFB1C02_RunTime:BS_RunTime; LEAFB1C02_LC :ARRAY[0..10] OF BOOL; END_VAR (*Automatically declared*) VAR_EXTERNAL LEAFB1C02_RSTV : REAL; LEAFB1C02_RST : BOOL; LEAFB1C01_DM : BOOL; LCMD00000_RM : INT; LEAFB1C01_TC : BOOL; LEAFB1C01_TM : BOOL; LEAFB1C01_RSTV : REAL; LEAFB1C01_RST : BOOL; LIESB1C01_COS : REAL; LIESB1B02_CO : INT; LIESB1C02_COS : REAL; RNIEAFB1X00_PC : BOOL; REAFB1C02_C : BOOL; RNIEAF00000_CM : BOOL; LEAFB1C02_COSET : REAL; LEAFB1C01_COSET : REAL; LIESB1B02_COS : REAL; LIESB1B01_COS : REAL; REAFB1C01_C : BOOL; LEAFB1C01_RH : REAL; LIESB1C02_CO : INT; LEAFB1C01_C : BOOL; LEAFB1C01_R : BOOL; LEAFB1C02_DM : BOOL; LIESB1B01_CO : INT; LEAFB1C01_TSTR : STRING; LEAFB1C02_TC : BOOL; LEAFB1C02_TM : BOOL; LEAFB1C02_C : BOOL; LEAFB1C02_RH : REAL; LEAFB1C02_R : BOOL; LEAFB1C02_TSTR : STRING; END_VAR (** **) (** LIESB1C01_CO_AVE(INPUT :=LIESB1C02_CO ); **) (* call - Stmt *) CAL LIESB1C01_CO_AVE ( INPUT := LIESB1C02_CO ) (** LIESB1C01_COS := BS_Scale(LIESB1C01_CO_AVE.Output , 3, 0, 1000, 0, 2.0); **) (* assign - Stmt *) LD LIESB1C01_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 2.0 ST LIESB1C01_COS (** LIESB1C02_CO_AVE(INPUT :=LIESB1C02_CO ); **) (* call - Stmt *) CAL LIESB1C02_CO_AVE ( INPUT := LIESB1C02_CO ) (** LIESB1C02_COS := BS_Scale(LIESB1C02_CO_AVE.Output , 3, 0, 1000, 0, 2.0); **) (* assign - Stmt *) LD LIESB1C02_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 2.0 ST LIESB1C02_COS (** **) (** LIESB1B01_CO_AVE(INPUT :=LIESB1B01_CO ); **) (* call - Stmt *) CAL LIESB1B01_CO_AVE ( INPUT := LIESB1B01_CO ) (** LIESB1B01_COS := BS_Scale(LIESB1B01_CO_AVE.Output , 3, 0, 1000, 0, 2.0); **) (* assign - Stmt *) LD LIESB1B01_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 2.0 ST LIESB1B01_COS (** LIESB1B02_CO_AVE(INPUT :=LIESB1B02_CO ); **) (* call - Stmt *) CAL LIESB1B02_CO_AVE ( INPUT := LIESB1B02_CO ) (** LIESB1B02_COS := BS_Scale(LIESB1B02_CO_AVE.Output , 3, 0, 1000, 0, 2.0); **) (* assign - Stmt *) LD LIESB1B02_CO_AVE.Output BS_Scale 3, 0, 1000, 0, 2.0 ST LIESB1B02_COS (** **) (** LEAFB1C01_COS[1]:=LIESB1C01_COS; **) (* assign - Stmt *) LD LIESB1C01_COS ST LEAFB1C01_COS[1] (** LEAFB1C01_COS[2]:=LIESB1C02_COS; **) (* assign - Stmt *) LD LIESB1C02_COS ST LEAFB1C01_COS[2] (** **) (** **) (** **) (** LEAFB1C01_TC :=LEAFB1C01_LC[1]; **) (* assign - Stmt *) LD LEAFB1C01_LC[1] ST LEAFB1C01_TC (** LEAFB1C02_TC :=LEAFB1C01_LC[2]; **) (* assign - Stmt *) LD LEAFB1C01_LC[2] ST LEAFB1C02_TC (** **) (** {*排风机联动程序*} **) (** EAFB1C01_SLG(ENABLE :=LEAFB1C01_TM ,LINKAGEVALUE :=LEAFB1C01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1C01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1C01_TSTR ,ALLDAY :=LEAFB1C01_DM | LEAFB1C01_LC:= LINKAGEOUT); **) (* call - Stmt *) CAL EAFB1C01_SLG ( ENABLE := LEAFB1C01_TM, LINKAGEVALUE := LEAFB1C01_COS, DEAD_BAND := 1.0, MAXRANGE := 1000.0, MINRANGE := 0.1, LINKAGESET := LEAFB1C01_COSET, HOLDDELAY := t#60s, ENABLENUM := 4, SCH_STR := LEAFB1C01_TSTR, ALLDAY := LEAFB1C01_DM | LEAFB1C01_LC := LINKAGEOUT ) (** {*同步程序*} **) (** EAFB1C01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1C01_C,BOOL_IN2:=REAFB1C01_C,BOOL_IN3:=LEAFB1C01_TC | LEAFB1C01_C:= BOOL_OUT1,REAFB1C01_C:=BOOL_OUT2); **) (* call - Stmt *) CAL EAFB1C01_SyncContRol ( CM := RNIEAF00000_CM, RM := LCMD00000_RM, BOOL_IN0 := RNIEAFB1X00_PC, BOOL_IN1 := LEAFB1C01_C, BOOL_IN2 := REAFB1C01_C, BOOL_IN3 := LEAFB1C01_TC | LEAFB1C01_C := BOOL_OUT1, REAFB1C01_C := BOOL_OUT2 ) (** {*运行累积时间*} **) (** EAFB1C01_RunTime(RUN :=LEAFB1C01_R , RUNTIMESET :=LEAFB1C01_RSTV , RUNTIMERST :=LEAFB1C01_RST , RunTimeRec_In :=LEAFB1C01_RH | LEAFB1C01_RH:= RUNTIME); **) (* call - Stmt *) CAL EAFB1C01_RunTime ( RUN := LEAFB1C01_R, RUNTIMESET := LEAFB1C01_RSTV, RUNTIMERST := LEAFB1C01_RST, RunTimeRec_In := LEAFB1C01_RH | LEAFB1C01_RH := RUNTIME ) (** **) (** LEAFB1C01_DM :=1; **) (* assign - Stmt *) LD 1 ST LEAFB1C01_DM (** **) (** **) (** **) (** {*排风机联动程序*} **) (** EAFB1C02_SLG(ENABLE :=LEAFB1C02_TM ,LINKAGEVALUE :=LEAFB1C01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1C02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1C02_TSTR ,ALLDAY :=LEAFB1C02_DM | LEAFB1C02_LC:= LINKAGEOUT); **) (* call - Stmt *) CAL EAFB1C02_SLG ( ENABLE := LEAFB1C02_TM, LINKAGEVALUE := LEAFB1C01_COS, DEAD_BAND := 1.0, MAXRANGE := 1000.0, MINRANGE := 0.1, LINKAGESET := LEAFB1C02_COSET, HOLDDELAY := t#60s, ENABLENUM := 4, SCH_STR := LEAFB1C02_TSTR, ALLDAY := LEAFB1C02_DM | LEAFB1C02_LC := LINKAGEOUT ) (** {*同步程序*} **) (** EAFB1C02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1C02_C,BOOL_IN2:=REAFB1C02_C,BOOL_IN3:=LEAFB1C02_TC | LEAFB1C02_C:= BOOL_OUT1,REAFB1C02_C:=BOOL_OUT2); **) (* call - Stmt *) CAL EAFB1C02_SyncContRol ( CM := RNIEAF00000_CM, RM := LCMD00000_RM, BOOL_IN0 := RNIEAFB1X00_PC, BOOL_IN1 := LEAFB1C02_C, BOOL_IN2 := REAFB1C02_C, BOOL_IN3 := LEAFB1C02_TC | LEAFB1C02_C := BOOL_OUT1, REAFB1C02_C := BOOL_OUT2 ) (** {*运行累积时间*} **) (** EAFB1C02_RunTime(RUN :=LEAFB1C02_R , RUNTIMESET :=LEAFB1C02_RSTV , RUNTIMERST :=LEAFB1C02_RST , RunTimeRec_In :=LEAFB1C02_RH | LEAFB1C02_RH:= RUNTIME); **) (* call - Stmt *) CAL EAFB1C02_RunTime ( RUN := LEAFB1C02_R, RUNTIMESET := LEAFB1C02_RSTV, RUNTIMERST := LEAFB1C02_RST, RunTimeRec_In := LEAFB1C02_RH | LEAFB1C02_RH := RUNTIME ) (** **) END_PROGRAM