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.
 
 
 
 
 
 

167 lines
6.8 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LEAFB2G01_COS:ARRAY[0..10] OF REAL;
LEAFB2G02_COS:ARRAY[0..10] OF REAL;
LIESB2G01_CO_AVE:BS_Average;
LIESB2G02_CO_AVE:BS_Average;
LIESB2G03_CO_AVE:BS_Average;
ESFB2G01_SyncControl:IJ_LSyncControl;
ESFB2G01_SLG:IJ_EAFGroup;
ESFB2G01_RunTime:BS_RunTime;
LESFB2G01_LC :ARRAY[0..10] OF BOOL;
ESFB2G02_SyncControl:IJ_LSyncControl;
ESFB2G02_SLG:IJ_EAFGroup;
ESFB2G02_RunTime:BS_RunTime;
LESFB2G02_LC :ARRAY[0..10] OF BOOL;
LEAFB2C01_COS:ARRAY[0..10] OF REAL;
LEAFB2C02_COS:ARRAY[0..10] OF REAL;
LIESB2C01_CO_AVE:BS_Average;
LIESB2C02_CO_AVE:BS_Average;
LIESB2C03_CO_AVE:BS_Average;
LIESB2C04_CO_AVE:BS_Average;
LIESB2C05_CO_AVE:BS_Average;
LIESB2C06_CO_AVE:BS_Average;
LIESB2C07_CO_AVE:BS_Average;
ESFB2C01_SyncControl:IJ_LSyncControl;
ESFB2C01_SLG:IJ_EAFGroup;
ESFB2C01_RunTime:BS_RunTime;
LESFB2C01_LC :ARRAY[0..10] OF BOOL;
ESFB2C02_SyncControl:IJ_LSyncControl;
ESFB2C02_SLG:IJ_EAFGroup;
ESFB2C02_RunTime:BS_RunTime;
LESFB2C02_LC :ARRAY[0..10] OF BOOL;
LEAFB2F01_COS:ARRAY[0..10] OF REAL;
LEAFB2F02_COS:ARRAY[0..10] OF REAL;
LIESB2F01_CO_AVE:BS_Average;
LIESB2F02_CO_AVE:BS_Average;
LIESB2F03_CO_AVE:BS_Average;
ESFB2F01_SyncControl:IJ_LSyncControl;
ESFB2F01_SLG:IJ_EAFGroup;
ESFB2F01_RunTime:BS_RunTime;
LESFB2F01_LC :ARRAY[0..10] OF BOOL;
ESFB2F02_SyncControl:IJ_LSyncControl;
ESFB2F02_SLG:IJ_EAFGroup;
ESFB2F02_RunTime:BS_RunTime;
LESFB2F02_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIESB2G01_CO_AVE(INPUT :=LIESB2G01_CO );
LIESB2G01_COS := BS_Scale(LIESB2G01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB2G01_COS[1]:=LIESB2G01_COS;
LEAFB2G01_COS[2]:=LIESB2G02_COS;
LEAFB2G01_COS[3]:=LIESB2G03_COS;
LESFB2G01_TC :=LESFB2G01_LC[1];
(*排风机联动程序*)
ESFB2G01_SLG(ENABLE :=LESFB2G01_TM ,LINKAGEVALUE :=LEAFB2G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2G01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2G01_TSTR ,ALLDAY :=LESFB2G01_DM | LESFB2G01_LC:= LINKAGEOUT);
(*同步程序*)
ESFB2G01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LESFB2G01_C,BOOL_IN2:=RESFB2G01_C,BOOL_IN3:=LESFB2G01_TC | LESFB2G01_C:= BOOL_OUT1,RESFB2G01_C:=BOOL_OUT2);
(*运行累积时间*)
ESFB2G01_RunTime(RUN :=LESFB2G01_R , RUNTIMESET :=LESFB2G01_RSTV , RUNTIMERST :=LESFB2G01_RST , RunTimeRec_In :=LESFB2G01_RH | LESFB2G01_RH:= RUNTIME);
LESFB2G02_TC :=LESFB2G02_LC[1];
(*排风机联动程序*)
ESFB2G02_SLG(ENABLE :=LESFB2G02_TM ,LINKAGEVALUE :=LEAFB2G02_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2G02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2G02_TSTR ,ALLDAY :=LESFB2G02_DM | LESFB2G02_LC:= LINKAGEOUT);
(*同步程序*)
ESFB2G02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LESFB2G02_C,BOOL_IN2:=RESFB2G02_C,BOOL_IN3:=LESFB2G02_TC | LESFB2G02_C:= BOOL_OUT1,RESFB2G02_C:=BOOL_OUT2);
(*运行累积时间*)
ESFB2G02_RunTime(RUN :=LESFB2G02_R , RUNTIMESET :=LESFB2G02_RSTV , RUNTIMERST :=LESFB2G02_RST , RunTimeRec_In :=LESFB2G02_RH | LESFB2G02_RH:= RUNTIME);
LIESB2C01_CO_AVE(INPUT :=LIESB2C01_CO );
LIESB2C01_COS := BS_Scale(LIESB2C01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB2C01_COS[1]:=LIESB2C01_COS;
LEAFB2C01_COS[2]:=LIESB2C02_COS;
LEAFB2C01_COS[3]:=LIESB2C03_COS;
LEAFB2C01_COS[4]:=LIESB2C04_COS;
LEAFB2C01_COS[5]:=LIESB2C05_COS;
LEAFB2C01_COS[6]:=LIESB2C06_COS;
LEAFB2C01_COS[7]:=LIESB2C07_COS;
LESFB2C01_TC :=LESFB2C01_LC[1];
(*排风机联动程序*)
ESFB2C01_SLG(ENABLE :=LESFB2C01_TM ,LINKAGEVALUE :=LEAFB2C01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2C01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2C01_TSTR ,ALLDAY :=LESFB2C01_DM | LESFB2C01_LC:= LINKAGEOUT);
(*同步程序*)
ESFB2C01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LESFB2C01_C,BOOL_IN2:=RESFB2C01_C,BOOL_IN3:=LESFB2C01_TC | LESFB2C01_C:= BOOL_OUT1,RESFB2C01_C:=BOOL_OUT2);
(*运行累积时间*)
ESFB2C01_RunTime(RUN :=LESFB2C01_R , RUNTIMESET :=LESFB2C01_RSTV , RUNTIMERST :=LESFB2C01_RST , RunTimeRec_In :=LESFB2C01_RH | LESFB2C01_RH:= RUNTIME);
LESFB2C02_TC :=LESFB2C02_LC[1];
(*排风机联动程序*)
ESFB2C02_SLG(ENABLE :=LESFB2C02_TM ,LINKAGEVALUE :=LEAFB2C02_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2C02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2C02_TSTR ,ALLDAY :=LESFB2C02_DM | LESFB2C02_LC:= LINKAGEOUT);
(*同步程序*)
ESFB2C02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LESFB2C02_C,BOOL_IN2:=RESFB2C02_C,BOOL_IN3:=LESFB2C02_TC | LESFB2C02_C:= BOOL_OUT1,RESFB2C02_C:=BOOL_OUT2);
(*运行累积时间*)
ESFB2C02_RunTime(RUN :=LESFB2C02_R , RUNTIMESET :=LESFB2C02_RSTV , RUNTIMERST :=LESFB2C02_RST , RunTimeRec_In :=LESFB2C02_RH | LESFB2C02_RH:= RUNTIME);
LIESB2F01_CO_AVE(INPUT :=LIESB2F01_CO );
LIESB2F01_COS := BS_Scale(LIESB2F01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB2F01_COS[1]:=LIESB2F01_COS;
LEAFB2F01_COS[2]:=LIESB2F02_COS;
LEAFB2F01_COS[3]:=LIESB2F03_COS;
LESFB2F01_TC :=LESFB2F01_LC[1];
(*排风机联动程序*)
ESFB2F01_SLG(ENABLE :=LESFB2F01_TM ,LINKAGEVALUE :=LEAFB2F01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2F01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2F01_TSTR ,ALLDAY :=LESFB2F01_DM | LESFB2F01_LC:= LINKAGEOUT);
(*同步程序*)
ESFB2F01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LESFB2F01_C,BOOL_IN2:=RESFB2F01_C,BOOL_IN3:=LESFB2F01_TC | LESFB2F01_C:= BOOL_OUT1,RESFB2F01_C:=BOOL_OUT2);
(*运行累积时间*)
ESFB2F01_RunTime(RUN :=LESFB2F01_R , RUNTIMESET :=LESFB2F01_RSTV , RUNTIMERST :=LESFB2F01_RST , RunTimeRec_In :=LESFB2F01_RH | LESFB2F01_RH:= RUNTIME);
LESFB2F02_TC :=LESFB2F02_LC[1];
(*排风机联动程序*)
ESFB2F02_SLG(ENABLE :=LESFB2F02_TM ,LINKAGEVALUE :=LEAFB2F02_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2F02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2F02_TSTR ,ALLDAY :=LESFB2F02_DM | LESFB2F02_LC:= LINKAGEOUT);
(*同步程序*)
ESFB2F02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LESFB2F02_C,BOOL_IN2:=RESFB2F02_C,BOOL_IN3:=LESFB2F02_TC | LESFB2F02_C:= BOOL_OUT1,RESFB2F02_C:=BOOL_OUT2);
(*运行累积时间*)
ESFB2F02_RunTime(RUN :=LESFB2F02_R , RUNTIMESET :=LESFB2F02_RSTV , RUNTIMERST :=LESFB2F02_RST , RunTimeRec_In :=LESFB2F02_RH | LESFB2F02_RH:= RUNTIME);
END_PROGRAM