PROGRAM EAF VAR_EXTERNAL END_VAR VAR_GLOBAL END_VAR VAR LEAFB2B01_COS:ARRAY[0..10] OF REAL; LIESB2B01_CO_AVE:BS_Average; LIESB2B02_CO_AVE:BS_Average; LIESB2B03_CO_AVE:BS_Average; LIESB2B04_CO_AVE:BS_Average; LIESB2B05_CO_AVE:BS_Average; EAFB2B01_SyncControl:IJ_LSyncControl; EAFB2B01_SLG:IJ_EAFGroup; EAFB2B01_RunTime:BS_RunTime; LEAFB2B01_LC :ARRAY[0..10] OF BOOL; EAFB2B02_SyncControl:IJ_LSyncControl; EAFB2B02_SLG:IJ_EAFGroup; EAFB2B02_RunTime:BS_RunTime; LEAFB2B02_LC :ARRAY[0..10] OF BOOL; EAFB2B03_SyncControl:IJ_LSyncControl; EAFB2B03_SLG:IJ_EAFGroup; EAFB2B03_RunTime:BS_RunTime; LEAFB2B03_LC :ARRAY[0..10] OF BOOL; EAFB2B04_SyncControl:IJ_LSyncControl; EAFB2B04_SLG:IJ_EAFGroup; EAFB2B04_RunTime:BS_RunTime; LEAFB2B04_LC :ARRAY[0..10] OF BOOL; LEAFB2A01_COS:ARRAY[0..10] OF REAL; LIESB2A01_CO_AVE:BS_Average; LIESB2A02_CO_AVE:BS_Average; LIESB2A03_CO_AVE:BS_Average; EAFB2A01_SyncControl:IJ_LSyncControl; EAFB2A01_SLG:IJ_EAFGroup; EAFB2A01_RunTime:BS_RunTime; LEAFB2A01_LC :ARRAY[0..10] OF BOOL; EAFB2A02_SyncControl:IJ_LSyncControl; EAFB2A02_SLG:IJ_EAFGroup; EAFB2A02_RunTime:BS_RunTime; LEAFB2A02_LC :ARRAY[0..10] OF BOOL; END_VAR LIESB2B01_CO_AVE(INPUT :=LIESB2B01_CO ); LIESB2B01_COS := BS_Scale(LIESB2B01_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LIESB2B02_CO_AVE(INPUT :=LIESB2B02_CO ); LIESB2B02_COS := BS_Scale(LIESB2B02_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LIESB2B03_CO_AVE(INPUT :=LIESB2B03_CO ); LIESB2B03_COS := BS_Scale(LIESB2B03_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LIESB2B04_CO_AVE(INPUT :=LIESB2B04_CO ); LIESB2B04_COS := BS_Scale(LIESB2B04_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LEAFB2B01_COS[1]:=LIESB2B01_COS; LEAFB2B01_COS[2]:=LIESB2B02_COS; LEAFB2B01_COS[3]:=LIESB2B03_COS; LEAFB2B01_COS[4]:=LIESB2B04_COS; LEAFB2B01_COS[5]:=LIESB2B05_COS; LEAFB2B01_TC :=LEAFB2B01_LC[1]; LEAFB2B02_TC :=LEAFB2B01_LC[2]; LEAFB2B03_TC :=LEAFB2B01_LC[3]; LEAFB2B04_TC :=LEAFB2B01_LC[4]; LEAFB2A01_TC :=LEAFB2B01_LC[5]; LEAFB2A02_TC :=LEAFB2B01_LC[6]; (*排风机联动程序*) EAFB2B01_SLG(ENABLE :=LEAFB2B01_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B01_TSTR ,ALLDAY :=LEAFB2B01_DM | LEAFB2B01_LC:= LINKAGEOUT); (*同步程序*) EAFB2B01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B01_C,BOOL_IN2:=REAFB2B01_C,BOOL_IN3:=LEAFB2B01_TC | LEAFB2B01_C:= BOOL_OUT1,REAFB2B01_C:=BOOL_OUT2); (*运行累积时间*) EAFB2B01_RunTime(RUN :=LEAFB2B01_R , RUNTIMESET :=LEAFB2B01_RSTV , RUNTIMERST :=LEAFB2B01_RST , RunTimeRec_In :=LEAFB2B01_RH | LEAFB2B01_RH:= RUNTIME); LEAFB2B01_DM :=1; (*排风机联动程序*) EAFB2B02_SLG(ENABLE :=LEAFB2B02_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B02_TSTR ,ALLDAY :=LEAFB2B02_DM | LEAFB2B02_LC:= LINKAGEOUT); (*同步程序*) EAFB2B02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B02_C,BOOL_IN2:=REAFB2B02_C,BOOL_IN3:=LEAFB2B02_TC | LEAFB2B02_C:= BOOL_OUT1,REAFB2B02_C:=BOOL_OUT2); (*运行累积时间*) EAFB2B02_RunTime(RUN :=LEAFB2B02_R , RUNTIMESET :=LEAFB2B02_RSTV , RUNTIMERST :=LEAFB2B02_RST , RunTimeRec_In :=LEAFB2B02_RH | LEAFB2B02_RH:= RUNTIME); (*排风机联动程序*) EAFB2B03_SLG(ENABLE :=LEAFB2B03_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B03_TSTR ,ALLDAY :=LEAFB2B03_DM | LEAFB2B03_LC:= LINKAGEOUT); (*同步程序*) EAFB2B03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B03_C,BOOL_IN2:=REAFB2B03_C,BOOL_IN3:=LEAFB2B03_TC | LEAFB2B03_C:= BOOL_OUT1,REAFB2B03_C:=BOOL_OUT2); (*运行累积时间*) EAFB2B03_RunTime(RUN :=LEAFB2B03_R , RUNTIMESET :=LEAFB2B03_RSTV , RUNTIMERST :=LEAFB2B03_RST , RunTimeRec_In :=LEAFB2B03_RH | LEAFB2B03_RH:= RUNTIME); (*排风机联动程序*) EAFB2B04_SLG(ENABLE :=LEAFB2B04_TM ,LINKAGEVALUE :=LEAFB2B01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2B04_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2B04_TSTR ,ALLDAY :=LEAFB2B04_DM | LEAFB2B04_LC:= LINKAGEOUT); (*同步程序*) EAFB2B04_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2B04_C,BOOL_IN2:=REAFB2B04_C,BOOL_IN3:=LEAFB2B04_TC | LEAFB2B04_C:= BOOL_OUT1,REAFB2B04_C:=BOOL_OUT2); (*运行累积时间*) EAFB2B04_RunTime(RUN :=LEAFB2B04_R , RUNTIMESET :=LEAFB2B04_RSTV , RUNTIMERST :=LEAFB2B04_RST , RunTimeRec_In :=LEAFB2B04_RH | LEAFB2B04_RH:= RUNTIME); LIESB2A01_CO_AVE(INPUT :=LIESB2A01_CO ); LIESB2A01_COS := BS_Scale(LIESB2A01_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LIESB2A02_CO_AVE(INPUT :=LIESB2A02_CO ); LIESB2A02_COS := BS_Scale(LIESB2A02_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LIESB2A03_CO_AVE(INPUT :=LIESB2A03_CO ); LIESB2A03_COS := BS_Scale(LIESB2A03_CO_AVE.Output , 3, 0, 1000, 0, 2.0); LEAFB2A01_COS[1]:=LIESB2A01_COS; LEAFB2A01_COS[2]:=LIESB2A02_COS; LEAFB2A01_COS[3]:=LIESB2A03_COS; (*排风机联动程序*) EAFB2A01_SLG(ENABLE :=LEAFB2A01_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2A01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2A01_TSTR ,ALLDAY :=LEAFB2A01_DM | LEAFB2A01_LC:= LINKAGEOUT); (*同步程序*) EAFB2A01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2A01_C,BOOL_IN2:=REAFB2A01_C,BOOL_IN3:=LEAFB2A01_TC | LEAFB2A01_C:= BOOL_OUT1,REAFB2A01_C:=BOOL_OUT2); (*运行累积时间*) EAFB2A01_RunTime(RUN :=LEAFB2A01_R , RUNTIMESET :=LEAFB2A01_RSTV , RUNTIMERST :=LEAFB2A01_RST , RunTimeRec_In :=LEAFB2A01_RH | LEAFB2A01_RH:= RUNTIME); (*排风机联动程序*) EAFB2A02_SLG(ENABLE :=LEAFB2A02_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=1.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2A02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2A02_TSTR ,ALLDAY :=LEAFB2A02_DM | LEAFB2A02_LC:= LINKAGEOUT); (*同步程序*) EAFB2A02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2A02_C,BOOL_IN2:=REAFB2A02_C,BOOL_IN3:=LEAFB2A02_TC | LEAFB2A02_C:= BOOL_OUT1,REAFB2A02_C:=BOOL_OUT2); (*运行累积时间*) EAFB2A02_RunTime(RUN :=LEAFB2A02_R , RUNTIMESET :=LEAFB2A02_RSTV , RUNTIMERST :=LEAFB2A02_RST , RunTimeRec_In :=LEAFB2A02_RH | LEAFB2A02_RH:= RUNTIME); END_PROGRAM