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.
 
 
 
 
 
 

107 lines
4.7 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LEAFB3G01_COS:ARRAY[0..10] OF REAL;
LIESB3G01_CO_AVE:BS_Average;
LIESB3G02_CO_AVE:BS_Average;
LIESB3G03_CO_AVE:BS_Average;
LIESB3G04_CO_AVE:BS_Average;
EAFB3G01_SyncControl:IJ_LSyncControl;
EAFB3G01_SLG:IJ_EAFGroup;
EAFB3G01_RunTime:BS_RunTime;
LEAFB3G01_LC :ARRAY[0..10] OF BOOL;
EAFB3G02_SyncControl:IJ_LSyncControl;
EAFB3G02_SLG:IJ_EAFGroup;
EAFB3G02_RunTime:BS_RunTime;
LEAFB3G02_LC :ARRAY[0..10] OF BOOL;
EAFB3G03_SyncControl:IJ_LSyncControl;
EAFB3G03_SLG:IJ_EAFGroup;
EAFB3G03_RunTime:BS_RunTime;
LEAFB3G03_LC :ARRAY[0..10] OF BOOL;
LEAFB3H01_COS:ARRAY[0..10] OF REAL;
LIESB3H01_CO_AVE:BS_Average;
EAFB3H01_SyncControl:IJ_LSyncControl;
EAFB3H01_SLG:IJ_EAFGroup;
EAFB3H01_RunTime:BS_RunTime;
LEAFB3H01_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIESB3H01_CO_AVE(INPUT :=LIESB3H01_CO );
LIESB3H01_COS := BS_Scale(LIESB3H01_CO_AVE.Output , 3, 0, 1000, 0, 5.0);
LEAFB3H01_COS[1]:=LIESB3H01_COS;
LEAFB3H01_TC :=LEAFB3H01_LC[1];
(*排风机联动程序*)
EAFB3H01_SLG(ENABLE :=LEAFB3H01_TM ,LINKAGEVALUE :=LEAFB3H01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3H01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3H01_TSTR ,ALLDAY :=LEAFB3H01_DM | LEAFB3H01_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3H01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3H01_C,BOOL_IN2:=REAFB3H01_C,BOOL_IN3:=LEAFB3H01_TC | LEAFB3H01_C:= BOOL_OUT1,REAFB3H01_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3H01_RunTime(RUN :=LEAFB3H01_R , RUNTIMESET :=LEAFB3H01_RSTV , RUNTIMERST :=LEAFB3H01_RST , RunTimeRec_In :=LEAFB3H01_RH | LEAFB3H01_RH:= RUNTIME);
LIESB3G01_CO_AVE(INPUT :=LIESB3G01_CO );
LIESB3G01_COS := BS_Scale(LIESB3G01_CO_AVE.Output , 3, 0, 1000, 0, 5.0);
LIESB3G02_CO_AVE(INPUT :=LIESB3G02_CO );
LIESB3G02_COS := BS_Scale(LIESB3G02_CO_AVE.Output , 3, 0, 1000, 0, 5.0);
LIESB3G03_CO_AVE(INPUT :=LIESB3G03_CO );
LIESB3G03_COS := BS_Scale(LIESB3G03_CO_AVE.Output , 3, 0, 1000, 0, 5.0);
LIESB3G04_CO_AVE(INPUT :=LIESB3G04_CO );
LIESB3G04_COS := BS_Scale(LIESB3G04_CO_AVE.Output , 3, 0, 1000, 0, 5.0);
LEAFB3G01_COS[1]:=LIESB3G01_COS;
LEAFB3G01_COS[2]:=LIESB3G02_COS;
LEAFB3G01_COS[3]:=LIESB3G03_COS;
LEAFB3G01_COS[4]:=LIESB3G04_COS;
LEAFB3G01_TC :=LEAFB3G01_LC[1];
(*排风机联动程序*)
EAFB3G01_SLG(ENABLE :=LEAFB3G01_TM ,LINKAGEVALUE :=LEAFB3G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3G01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3G01_TSTR ,ALLDAY :=LEAFB3G01_DM | LEAFB3G01_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3G01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3G01_C,BOOL_IN2:=REAFB3G01_C,BOOL_IN3:=LEAFB3G01_TC | LEAFB3G01_C:= BOOL_OUT1,REAFB3G01_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3G01_RunTime(RUN :=LEAFB3G01_R , RUNTIMESET :=LEAFB3G01_RSTV , RUNTIMERST :=LEAFB3G01_RST , RunTimeRec_In :=LEAFB3G01_RH | LEAFB3G01_RH:= RUNTIME);
LEAFB3G02_TC :=LEAFB3G02_LC[1];
(*排风机联动程序*)
EAFB3G02_SLG(ENABLE :=LEAFB3G02_TM ,LINKAGEVALUE :=LEAFB3G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3G02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3G02_TSTR ,ALLDAY :=LEAFB3G02_DM | LEAFB3G02_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3G02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3G02_C,BOOL_IN2:=REAFB3G02_C,BOOL_IN3:=LEAFB3G02_TC | LEAFB3G02_C:= BOOL_OUT1,REAFB3G02_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3G02_RunTime(RUN :=LEAFB3G02_R , RUNTIMESET :=LEAFB3G02_RSTV , RUNTIMERST :=LEAFB3G02_RST , RunTimeRec_In :=LEAFB3G02_RH | LEAFB3G02_RH:= RUNTIME);
LEAFB3G03_TC :=LEAFB3G03_LC[1];
(*排风机联动程序*)
EAFB3G03_SLG(ENABLE :=LEAFB3G03_TM ,LINKAGEVALUE :=LEAFB3G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3G03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3G03_TSTR ,ALLDAY :=LEAFB3G03_DM | LEAFB3G03_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3G03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3G03_C,BOOL_IN2:=REAFB3G03_C,BOOL_IN3:=LEAFB3G03_TC | LEAFB3G03_C:= BOOL_OUT1,REAFB3G03_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3G03_RunTime(RUN :=LEAFB3G03_R , RUNTIMESET :=LEAFB3G03_RSTV , RUNTIMERST :=LEAFB3G03_RST , RunTimeRec_In :=LEAFB3G03_RH | LEAFB3G03_RH:= RUNTIME);
END_PROGRAM