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.
 
 
 
 
 
 

366 lines
9.1 KiB

PROGRAM PAU
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
PAU05J01_IN :FAU_IN;
PAU05J01_OUT:FAU_OUT;
PAU05J01_SyncControl:IJ_LSyncControl;
PAU05J01_FAU:IJ_FAU;
PAU05J01_ST_AVE :BS_Average;
PAU05J01_WVB_AVE:BS_Average;
PAU05J01_SLG :IJ_EAFGroup;
LPAU05J01_CO2S:ARRAY[0..10] OF REAL;
LPAU05J01_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LPAU05J01_VFCS : INT;
LPAU05J01_ISO3 : BOOL;
LPAU05J01_RH : REAL;
LPAU05J01_ISO2 : BOOL;
LPAU05J01_ISO1 : BOOL;
LPAU05J01_WVMV : REAL;
LPAU05J01_WVMC : BOOL;
LCMD00000_RM : INT;
LPAU05J01_VFC : INT;
LPAU05J01_C : BOOL;
LPAU05J01_R : BOOL;
LPAU05J01_VFBS : INT;
RPAU05J01_SM : INT;
LPAU05J01_VFB : INT;
LPAU05J01_FDOC : BOOL;
LPAU05J01_FDOB : BOOL;
LPAU05J01_TSET : REAL;
LPAU05J01_AFS : BOOL;
LPAU05J01_TSTR : STRING;
LPAU05J01_LM : BOOL;
RPAU05J01_PC : BOOL;
RNIPAU05X00_SM : INT;
LPAU05J01_RSTV : REAL;
LPAU05J01_RST : BOOL;
LPAU05J01_FDSC : BOOL;
LPAU05J01_FDSB : BOOL;
LPAU05J01_FPS : BOOL;
RNIPAU00000_CM : BOOL;
RNIPAU05X00_PC : BOOL;
RPAU05J01_TSET : REAL;
LIES05J01_CO2S : REAL;
LPAU05J01_WVBS : REAL;
LPAU05J01_WVB : INT;
LPAU05J01_TM : BOOL;
LPAU05J01_TC : BOOL;
LPAU05J01_VFMV : INT;
LPAU05J01_WVCS : INT;
LPAU05J01_STS : REAL;
LPAU05J01_WVC : INT;
LPAU05J01_DM : BOOL;
LPAU05J01_IPS : BOOL;
LPAU05J01_VI : REAL;
LPAU05J01_VP : REAL;
RNLIES04C01_CO2S : REAL;
LPAU05J01_F : BOOL;
LPAU05J01_PC : BOOL;
LPAU05J01_A : BOOL;
RNIPAU05X00_TSET : REAL;
LPAU05J01_CO2SET : REAL;
LPAU05J01_SN : INT;
LPAU05J01_SM : INT;
LPAU05J01_ST : INT;
END_VAR
(** **)
(** **)
(** {********************************************PAU05J01********************************************} **)
(** {*输入,类型,示值上限,示值下限,基准补偿,输出补偿*} **)
(** PAU05J01_WVB_AVE(INPUT:=LPAU05J01_WVB); **)
(* call - Stmt *)
CAL PAU05J01_WVB_AVE (
INPUT := LPAU05J01_WVB
)
(** PAU05J01_ST_AVE (INPUT:=LPAU05J01_ST ); **)
(* call - Stmt *)
CAL PAU05J01_ST_AVE (
INPUT := LPAU05J01_ST
)
(** LPAU05J01_STS := BS_Scale(PAU05J01_ST_AVE.Output ,1,0,100,0,0.0); **)
(* assign - Stmt *)
LD PAU05J01_ST_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LPAU05J01_STS
(** LPAU05J01_WVBS:= BS_Scale(PAU05J01_WVB_AVE.Output,2,0,100,0,0.0); **)
(* assign - Stmt *)
LD PAU05J01_WVB_AVE.Output
BS_Scale 2, 0, 100, 0, 0.0
ST LPAU05J01_WVBS
(** LPAU05J01_WVC :=REAL_TO_INT(BS_Scale(LPAU05J01_WVCS ,4,0,100,0,0.0)); **)
(* assign - Stmt *)
LD LPAU05J01_WVCS
BS_Scale 4, 0, 100, 0, 0.0
REAL_TO_INT
ST LPAU05J01_WVC
(** LPAU05J01_VFBS:=REAL_TO_INT(BS_Scale(LPAU05J01_VFB ,2,0,50 ,0,0.0)); **)
(* assign - Stmt *)
LD LPAU05J01_VFB
BS_Scale 2, 0, 50, 0, 0.0
REAL_TO_INT
ST LPAU05J01_VFBS
(** LPAU05J01_VFC :=REAL_TO_INT(BS_Scale((LPAU05J01_VFCS*100) ,4,0,50 ,0,0.0)); **)
(* assign - Stmt *)
LD LPAU05J01_VFCS
MUL 100
BS_Scale 4, 0, 50, 0, 0.0
REAL_TO_INT
ST LPAU05J01_VFC
(** {*主程序*} **)
(** PAU05J01_FAU(FAU_STRUCT_IN:=PAU05J01_IN | PAU05J01_OUT:=FAU_STRUCT_OUT); **)
(* call - Stmt *)
CAL PAU05J01_FAU (
FAU_STRUCT_IN := PAU05J01_IN
|
PAU05J01_OUT := FAU_STRUCT_OUT
)
(** {*FAU_INSTRUCT*} **)
(** PAU05J01_IN.SM :=LPAU05J01_SM ; **)
(* assign - Stmt *)
LD LPAU05J01_SM
ST PAU05J01_IN.SM
(** PAU05J01_IN.LM :=LPAU05J01_LM ; **)
(* assign - Stmt *)
LD LPAU05J01_LM
ST PAU05J01_IN.LM
(** PAU05J01_IN.Run :=LPAU05J01_R ; **)
(* assign - Stmt *)
LD LPAU05J01_R
ST PAU05J01_IN.Run
(** PAU05J01_IN.Fault :=LPAU05J01_F ; **)
(* assign - Stmt *)
LD LPAU05J01_F
ST PAU05J01_IN.Fault
(** PAU05J01_IN.Auto :=LPAU05J01_A ; **)
(* assign - Stmt *)
LD LPAU05J01_A
ST PAU05J01_IN.Auto
(** PAU05J01_IN.ContRol:=LPAU05J01_PC ; **)
(* assign - Stmt *)
LD LPAU05J01_PC
ST PAU05J01_IN.ContRol
(** PAU05J01_IN.FDOB :=LPAU05J01_FDOB ; **)
(* assign - Stmt *)
LD LPAU05J01_FDOB
ST PAU05J01_IN.FDOB
(** PAU05J01_IN.FDSB :=LPAU05J01_FDSB ; **)
(* assign - Stmt *)
LD LPAU05J01_FDSB
ST PAU05J01_IN.FDSB
(** PAU05J01_IN.TSET :=LPAU05J01_TSET ; **)
(* assign - Stmt *)
LD LPAU05J01_TSET
ST PAU05J01_IN.TSET
(** PAU05J01_IN.WVMC :=LPAU05J01_WVMC ; **)
(* assign - Stmt *)
LD LPAU05J01_WVMC
ST PAU05J01_IN.WVMC
(** PAU05J01_IN.WVMV :=LPAU05J01_WVMV ; **)
(* assign - Stmt *)
LD LPAU05J01_WVMV
ST PAU05J01_IN.WVMV
(** PAU05J01_IN.VFMV :=LPAU05J01_VFMV ; **)
(* assign - Stmt *)
LD LPAU05J01_VFMV
ST PAU05J01_IN.VFMV
(** PAU05J01_IN.STS :=LPAU05J01_STS ; **)
(* assign - Stmt *)
LD LPAU05J01_STS
ST PAU05J01_IN.STS
(** PAU05J01_IN.RST :=LPAU05J01_RST ; **)
(* assign - Stmt *)
LD LPAU05J01_RST
ST PAU05J01_IN.RST
(** PAU05J01_IN.RSTV :=LPAU05J01_RSTV ; **)
(* assign - Stmt *)
LD LPAU05J01_RSTV
ST PAU05J01_IN.RSTV
(** PAU05J01_IN.FPS :=LPAU05J01_FPS ; **)
(* assign - Stmt *)
LD LPAU05J01_FPS
ST PAU05J01_IN.FPS
(** PAU05J01_IN.IPS :=LPAU05J01_IPS ; **)
(* assign - Stmt *)
LD LPAU05J01_IPS
ST PAU05J01_IN.IPS
(** PAU05J01_IN.AFS :=LPAU05J01_AFS ; **)
(* assign - Stmt *)
LD LPAU05J01_AFS
ST PAU05J01_IN.AFS
(** PAU05J01_IN.ISO1 :=LPAU05J01_ISO1 ; **)
(* assign - Stmt *)
LD LPAU05J01_ISO1
ST PAU05J01_IN.ISO1
(** PAU05J01_IN.ISO2 :=LPAU05J01_ISO2 ; **)
(* assign - Stmt *)
LD LPAU05J01_ISO2
ST PAU05J01_IN.ISO2
(** PAU05J01_IN.ISO3 :=LPAU05J01_ISO3 ; **)
(* assign - Stmt *)
LD LPAU05J01_ISO3
ST PAU05J01_IN.ISO3
(** PAU05J01_IN.VP :=LPAU05J01_VP ; **)
(* assign - Stmt *)
LD LPAU05J01_VP
ST PAU05J01_IN.VP
(** PAU05J01_IN.VI :=LPAU05J01_VI ; **)
(* assign - Stmt *)
LD LPAU05J01_VI
ST PAU05J01_IN.VI
(** PAU05J01_IN.FDELAY :=t#30s ; **)
(* assign - Stmt *)
LD t#30s
ST PAU05J01_IN.FDELAY
(** PAU05J01_IN.VDELAY :=t#120s ; **)
(* assign - Stmt *)
LD t#120s
ST PAU05J01_IN.VDELAY
(** {*FAU_OUTSTRUCT*} **)
(** LPAU05J01_WVCS :=PAU05J01_OUT.WVCS ; **)
(* assign - Stmt *)
LD PAU05J01_OUT.WVCS
ST LPAU05J01_WVCS
(** LPAU05J01_VFCS :=PAU05J01_OUT.VFCS ; **)
(* assign - Stmt *)
LD PAU05J01_OUT.VFCS
ST LPAU05J01_VFCS
(** LPAU05J01_FDOC :=PAU05J01_OUT.FDO ; **)
(* assign - Stmt *)
LD PAU05J01_OUT.FDO
ST LPAU05J01_FDOC
(** LPAU05J01_FDSC :=PAU05J01_OUT.FDS ; **)
(* assign - Stmt *)
LD PAU05J01_OUT.FDS
ST LPAU05J01_FDSC
(** LPAU05J01_C :=PAU05J01_OUT.ContRol; **)
(* assign - Stmt *)
LD PAU05J01_OUT.ContRol
ST LPAU05J01_C
(** LPAU05J01_RH :=PAU05J01_OUT.RH ; **)
(* assign - Stmt *)
LD PAU05J01_OUT.RH
ST LPAU05J01_RH
(** LPAU05J01_SN :=PAU05J01_OUT.SN ; **)
(* assign - Stmt *)
LD PAU05J01_OUT.SN
ST LPAU05J01_SN
(** {*同步程序*} **)
(** PAU05J01_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM, **)
(* call - Stmt *)
CAL PAU05J01_SyncContRol (
CM := RNIPAU00000_CM,
RM := LCMD00000_RM,
(** BOOL_IN0:=RNIPAU05X00_PC ,BOOL_IN1:=LPAU05J01_PC ,BOOL_IN2 :=RPAU05J01_PC ,BOOL_IN3:=LPAU05J01_TC, **)
BOOL_IN0 := RNIPAU05X00_PC,
BOOL_IN1 := LPAU05J01_PC,
BOOL_IN2 := RPAU05J01_PC,
BOOL_IN3 := LPAU05J01_TC,
(** REAL_IN0:=RNIPAU05X00_TSET,REAL_IN1:=LPAU05J01_TSET,REAL_IN2 :=RPAU05J01_TSET, **)
REAL_IN0 := RNIPAU05X00_TSET,
REAL_IN1 := LPAU05J01_TSET,
REAL_IN2 := RPAU05J01_TSET,
(** INT_IN0 :=RNIPAU05X00_SM ,INT_IN1 :=LPAU05J01_SM ,INT_IN2 :=RPAU05J01_SM | **)
INT_IN0 := RNIPAU05X00_SM,
INT_IN1 := LPAU05J01_SM,
INT_IN2 := RPAU05J01_SM
|
(** LPAU05J01_PC :=BOOL_OUT1 ,RPAU05J01_PC :=BOOL_OUT2 , **)
LPAU05J01_PC := BOOL_OUT1,
RPAU05J01_PC := BOOL_OUT2,
(** LPAU05J01_TSET:=REAL_OUT1 ,RPAU05J01_TSET:=REAL_OUT2 , **)
LPAU05J01_TSET := REAL_OUT1,
RPAU05J01_TSET := REAL_OUT2,
(** LPAU05J01_SM :=INT_OUT1 ,RPAU05J01_SM :=INT_OUT2 ); **)
LPAU05J01_SM := INT_OUT1,
RPAU05J01_SM := INT_OUT2
)
(** {*新风机CO2联动程序*} **)
(** LIES05J01_CO2S:=RNLIES04C01_CO2S; **)
(* assign - Stmt *)
LD RNLIES04C01_CO2S
ST LIES05J01_CO2S
(** LPAU05J01_TC:=LPAU05J01_LC[1]; **)
(* assign - Stmt *)
LD LPAU05J01_LC[1]
ST LPAU05J01_TC
(** LPAU05J01_CO2S[1]:=LIES05J01_CO2S; **)
(* assign - Stmt *)
LD LIES05J01_CO2S
ST LPAU05J01_CO2S[1]
(** **)
(** PAU05J01_SLG(ENABLE:=LPAU05J01_TM,LINKAGEVALUE:=LPAU05J01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0, **)
(* call - Stmt *)
CAL PAU05J01_SLG (
ENABLE := LPAU05J01_TM,
LINKAGEVALUE := LPAU05J01_CO2S,
DEAD_BAND := 10.0,
MAXRANGE := 2000.0,
MINRANGE := 10.0,
(** LINKAGESET:=LPAU05J01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,SCH_STR:=LPAU05J01_TSTR,ALLDAY:=LPAU05J01_DM | LPAU05J01_LC:=LINKAGEOUT); **)
LINKAGESET := LPAU05J01_CO2SET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
SCH_STR := LPAU05J01_TSTR,
ALLDAY := LPAU05J01_DM
|
LPAU05J01_LC := LINKAGEOUT
)
END_PROGRAM