PROGRAM EAF VAR_EXTERNAL END_VAR VAR_GLOBAL END_VAR VAR LEAFB2A01_COS:ARRAY[0..10] OF REAL; ESFB2A01_SyncControl:IJ_LSyncControl; ESFB2A01_SLG:IJ_EAFGroup; ESFB2A01_RunTime:BS_RunTime; LESFB2A01_LC :ARRAY[0..10] OF BOOL; SAFB2A02_SyncControl:IJ_LSyncControl; SAFB2A02_SLG:IJ_EAFGroup; SAFB2A02_RunTime:BS_RunTime; LSAFB2A02_LC :ARRAY[0..10] OF BOOL; EAFB2A03_SyncControl:IJ_LSyncControl; EAFB2A03_SLG:IJ_EAFGroup; EAFB2A03_RunTime:BS_RunTime; LEAFB2A03_LC :ARRAY[0..10] OF BOOL; END_VAR (*Automatically declared*) VAR_EXTERNAL LIESB2A04_COS : REAL; LEAFB2A03_RST : BOOL; LESFB2A01_RST : BOOL; LSAFB2A02_RH : REAL; LSAFB2A02_RSTV : REAL; LESFB2A01_TM : BOOL; LEAFB2A03_TC : BOOL; LSAFB2A02_TM : BOOL; LEAFB2A03_RSTV : REAL; LSAFB2A02_COSET : REAL; LEAFB2A03_R : BOOL; LSAFB2A02_R : BOOL; LESFB2A01_TC : BOOL; LESFB2A01_RSTV : REAL; LEAFB2A03_RH : REAL; LESFB2A01_R : BOOL; LSAFB2A02_TC : BOOL; LESFB2A01_COSET : REAL; LEAFB2A03_COSET : REAL; LEAFB2A03_TM : BOOL; LIESB2A01_COS : REAL; LIESB2A02_COS : REAL; LSAFB2A02_RST : BOOL; LIESB2A03_COS : REAL; LESFB2A01_RH : REAL; END_VAR (** LESFB2A01_TC :=LESFB2A01_LC[1]; **) (* assign - Stmt *) LD LESFB2A01_LC[1] ST LESFB2A01_TC (** {*排风机联动程序*} **) (** ESFB2A01_SLG(ENABLE :=LESFB2A01_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2A01_COSET , HOLDDELAY :=t#60s); **) (* call - Stmt *) CAL ESFB2A01_SLG ( ENABLE := LESFB2A01_TM, LINKAGEVALUE := LEAFB2A01_COS, DEAD_BAND := 10.0, MAXRANGE := 1000.0, MINRANGE := 0.1, LINKAGESET := LESFB2A01_COSET, HOLDDELAY := t#60s ) (** {*运行累积时间*} **) (** ESFB2A01_RunTime(RUN :=LESFB2A01_R , RUNTIMESET :=LESFB2A01_RSTV , RUNTIMERST :=LESFB2A01_RST , RunTimeRec_In :=LESFB2A01_RH | LESFB2A01_RH:= RUNTIME); **) (* call - Stmt *) CAL ESFB2A01_RunTime ( RUN := LESFB2A01_R, RUNTIMESET := LESFB2A01_RSTV, RUNTIMERST := LESFB2A01_RST, RunTimeRec_In := LESFB2A01_RH | LESFB2A01_RH := RUNTIME ) (** **) (** **) (** LSAFB2A02_TC :=LSAFB2A02_LC[1]; **) (* assign - Stmt *) LD LSAFB2A02_LC[1] ST LSAFB2A02_TC (** {*排风机联动程序*} **) (** SAFB2A02_SLG(ENABLE :=LSAFB2A02_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LSAFB2A02_COSET , HOLDDELAY :=t#60s); **) (* call - Stmt *) CAL SAFB2A02_SLG ( ENABLE := LSAFB2A02_TM, LINKAGEVALUE := LEAFB2A01_COS, DEAD_BAND := 10.0, MAXRANGE := 1000.0, MINRANGE := 0.1, LINKAGESET := LSAFB2A02_COSET, HOLDDELAY := t#60s ) (** {*运行累积时间*} **) (** SAFB2A02_RunTime(RUN :=LSAFB2A02_R , RUNTIMESET :=LSAFB2A02_RSTV , RUNTIMERST :=LSAFB2A02_RST , RunTimeRec_In :=LSAFB2A02_RH | LSAFB2A02_RH:= RUNTIME); **) (* call - Stmt *) CAL SAFB2A02_RunTime ( RUN := LSAFB2A02_R, RUNTIMESET := LSAFB2A02_RSTV, RUNTIMERST := LSAFB2A02_RST, RunTimeRec_In := LSAFB2A02_RH | LSAFB2A02_RH := RUNTIME ) (** **) (** **) (** **) (** LEAFB2A03_TC :=LEAFB2A03_LC[1]; **) (* assign - Stmt *) LD LEAFB2A03_LC[1] ST LEAFB2A03_TC (** {*排风机联动程序*} **) (** EAFB2A03_SLG(ENABLE :=LEAFB2A03_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2A03_COSET , HOLDDELAY :=t#60s); **) (* call - Stmt *) CAL EAFB2A03_SLG ( ENABLE := LEAFB2A03_TM, LINKAGEVALUE := LEAFB2A01_COS, DEAD_BAND := 10.0, MAXRANGE := 1000.0, MINRANGE := 0.1, LINKAGESET := LEAFB2A03_COSET, HOLDDELAY := t#60s ) (** {*运行累积时间*} **) (** EAFB2A03_RunTime(RUN :=LEAFB2A03_R , RUNTIMESET :=LEAFB2A03_RSTV , RUNTIMERST :=LEAFB2A03_RST , RunTimeRec_In :=LEAFB2A03_RH | LEAFB2A03_RH:= RUNTIME); **) (* call - Stmt *) CAL EAFB2A03_RunTime ( RUN := LEAFB2A03_R, RUNTIMESET := LEAFB2A03_RSTV, RUNTIMERST := LEAFB2A03_RST, RunTimeRec_In := LEAFB2A03_RH | LEAFB2A03_RH := RUNTIME ) (** **) (** LEAFB2A01_COS[1]:=LIESB2A01_COS; **) (* assign - Stmt *) LD LIESB2A01_COS ST LEAFB2A01_COS[1] (** LEAFB2A01_COS[2]:=LIESB2A02_COS; **) (* assign - Stmt *) LD LIESB2A02_COS ST LEAFB2A01_COS[2] (** LEAFB2A01_COS[3]:=LIESB2A03_COS; **) (* assign - Stmt *) LD LIESB2A03_COS ST LEAFB2A01_COS[3] (** LEAFB2A01_COS[4]:=LIESB2A04_COS; **) (* assign - Stmt *) LD LIESB2A04_COS ST LEAFB2A01_COS[4] (** **) END_PROGRAM