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.

91 lines
3.5 KiB

4 months ago
PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LEAFB3B01_COS:ARRAY[0..10] OF REAL;
LIESB3B01_CO_AVE:BS_Average;
LIESB3B02_CO_AVE:BS_Average;
LIESB3B03_CO_AVE:BS_Average;
LIESB3B04_CO_AVE:BS_Average;
EAFB3B01_SyncControl:IJ_LSyncControl;
EAFB3B01_SLG:IJ_EAFGroup;
EAFB3B01_RunTime:BS_RunTime;
LEAFB3B01_LC :ARRAY[0..10] OF BOOL;
LEAFB3F01_COS:ARRAY[0..10] OF REAL;
LEAFB3F02_COS:ARRAY[0..10] OF REAL;
LIESB3F01_CO_AVE:BS_Average;
LIESB3F02_CO_AVE:BS_Average;
LIESB3F03_CO_AVE:BS_Average;
EAFB3F01_SyncControl:IJ_LSyncControl;
EAFB3F01_SLG:IJ_EAFGroup;
EAFB3F01_RunTime:BS_RunTime;
LEAFB3F01_LC :ARRAY[0..10] OF BOOL;
EAFB3F02_SyncControl:IJ_LSyncControl;
EAFB3F02_SLG:IJ_EAFGroup;
EAFB3F02_RunTime:BS_RunTime;
LEAFB3F02_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIESB3B01_CO_AVE(INPUT :=LIESB3B01_CO );
LIESB3B01_COS := BS_Scale(LIESB3B01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB3B01_COS[1]:=LIESB3B01_COS;
LEAFB3B01_COS[2]:=LIESB3B02_COS;
LEAFB3B01_COS[3]:=LIESB3B03_COS;
LEAFB3B01_COS[4]:=LIESB3B04_COS;
LEAFB3B01_TC :=LEAFB3B01_LC[1];
(*排风机联动程序*)
EAFB3B01_SLG(ENABLE :=LEAFB3B01_TM ,LINKAGEVALUE :=LEAFB3B01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3B01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3B01_TSTR ,ALLDAY :=LEAFB3B01_DM | LEAFB3B01_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3B01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3B01_C,BOOL_IN2:=REAFB3B01_C,BOOL_IN3:=LEAFB3B01_TC | LEAFB3B01_C:= BOOL_OUT1,REAFB3B01_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3B01_RunTime(RUN :=LEAFB3B01_R , RUNTIMESET :=LEAFB3B01_RSTV , RUNTIMERST :=LEAFB3B01_RST , RunTimeRec_In :=LEAFB3B01_RH | LEAFB3B01_RH:= RUNTIME);
LIESB3F01_CO_AVE(INPUT :=LIESB3F01_CO );
LIESB3F01_COS := BS_Scale(LIESB3F01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB3F01_COS[1]:=LIESB3F01_COS;
LEAFB3F01_COS[2]:=LIESB3F02_COS;
LEAFB3F01_COS[3]:=LIESB3F03_COS;
LEAFB3F01_TC :=LEAFB3F01_LC[1];
(*排风机联动程序*)
EAFB3F01_SLG(ENABLE :=LEAFB3F01_TM ,LINKAGEVALUE :=LEAFB3F01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3F01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3F01_TSTR ,ALLDAY :=LEAFB3F01_DM | LEAFB3F01_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3F01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3F01_C,BOOL_IN2:=REAFB3F01_C,BOOL_IN3:=LEAFB3F01_TC | LEAFB3F01_C:= BOOL_OUT1,REAFB3F01_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3F01_RunTime(RUN :=LEAFB3F01_R , RUNTIMESET :=LEAFB3F01_RSTV , RUNTIMERST :=LEAFB3F01_RST , RunTimeRec_In :=LEAFB3F01_RH | LEAFB3F01_RH:= RUNTIME);
LEAFB3F02_TC :=LEAFB3F02_LC[2];
(*排风机联动程序*)
EAFB3F02_SLG(ENABLE :=LEAFB3F02_TM ,LINKAGEVALUE :=LEAFB3F02_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB3F02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB3F02_TSTR ,ALLDAY :=LEAFB3F02_DM | LEAFB3F02_LC:= LINKAGEOUT);
(*同步程序*)
EAFB3F02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB3X00_PC,BOOL_IN1:=LEAFB3F02_C,BOOL_IN2:=REAFB3F02_C,BOOL_IN3:=LEAFB3F02_TC | LEAFB3F02_C:= BOOL_OUT1,REAFB3F02_C:=BOOL_OUT2);
(*运行累积时间*)
EAFB3F02_RunTime(RUN :=LEAFB3F02_R , RUNTIMESET :=LEAFB3F02_RSTV , RUNTIMERST :=LEAFB3F02_RST , RunTimeRec_In :=LEAFB3F02_RH | LEAFB3F02_RH:= RUNTIME);
END_PROGRAM