海南电网项目下位机程序
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.

529 lines
13 KiB

PROGRAM PAU
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
PAU12FA01_IN :FAU_IN;
PAU12FA01_OUT:FAU_OUT;
PAU12FA01_SyncControl:IJ_LSyncControl;
PAU12FA01_FAU:IJ_FAU;
PAU12FA01_ST_AVE :BS_Average;
PAU12FA01_WVB_AVE:BS_Average;
PAU12FA01_SLG :IJ_EAFGroup;
LPAU12FA01_CO2S:ARRAY[0..10] OF REAL;
LPAU12FA01_LC :ARRAY[0..10] OF BOOL;
PAU12FA02_IN :FAU_IN;
PAU12FA02_OUT:FAU_OUT;
PAU12FA02_SyncControl:IJ_LSyncControl;
PAU12FA02_FAU:IJ_FAU;
PAU12FA02_ST_AVE :BS_Average;
PAU12FA02_WVB_AVE:BS_Average;
PAU12FA02_SLG :IJ_EAFGroup;
LPAU12FA02_CO2S:ARRAY[0..10] OF REAL;
LPAU12FA02_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LPAU12FA02_SN : INT;
LPAU12FA02_ISO1 : BOOL;
LPAU12FA02_TSET : REAL;
LPAU12FA01_VP : REAL;
LPAU12FA01_SM : INT;
LPAU12FA01_C : BOOL;
LPAU12FA02_WVCS : INT;
LPAU12FA02_ISO2 : BOOL;
LPAU12FA01_SN : INT;
LPAU12FA01_ISO1 : BOOL;
LPAU12FA01_TSET : REAL;
LPAU12FA02_C : BOOL;
LPAU12FA02_FDSB : BOOL;
LPAU12FA02_ISO3 : BOOL;
LPAU12FA01_WVCS : INT;
LPAU12FA01_ISO2 : BOOL;
LPAU12FA02_FDSC : BOOL;
LPAU12FA01_FDSB : BOOL;
LPAU12FA01_ISO3 : BOOL;
LPAU12FA01_STS : REAL;
LPAU12FA01_FDSC : BOOL;
LPAU12FA01_F : BOOL;
LPAU12FA02_STS : REAL;
LPAU12FA01_RST : BOOL;
LPAU12FA02_F : BOOL;
LIES12FA02_CO2S : REAL;
LPAU12FA02_TC : BOOL;
LPAU12FA02_RST : BOOL;
LPAU12FA02_FDOB : BOOL;
LIES12FA01_CO2S : REAL;
LPAU12FA02_LM : BOOL;
LPAU12FA02_RSTV : REAL;
LPAU12FA01_TC : BOOL;
LPAU12FA02_ST : INT;
LPAU12FA02_FDOC : BOOL;
LPAU12FA01_FDOB : BOOL;
LPAU12FA01_LM : BOOL;
LPAU12FA01_RSTV : REAL;
LPAU12FA01_ST : INT;
LPAU12FA01_FDOC : BOOL;
LPAU12FA02_PC : BOOL;
LPAU12FA02_VI : REAL;
LPAU12FA02_WVMC : BOOL;
LPAU12FA01_CO2SET : REAL;
LPAU12FA01_PC : BOOL;
LPAU12FA01_VI : REAL;
LPAU12FA01_WVMC : BOOL;
LPAU12FA02_WVMV : REAL;
LPAU12FA01_FPS : BOOL;
LPAU12FA02_RH : REAL;
LPAU12FA01_WVMV : REAL;
LPAU12FA02_FPS : BOOL;
LPAU12FA02_VFMV : INT;
LPAU12FA01_RH : REAL;
LPAU12FA02_DM : BOOL;
LPAU12FA01_VFMV : INT;
LPAU12FA01_IPS : BOOL;
LPAU12FA02_TM : BOOL;
LPAU12FA01_DM : BOOL;
LPAU12FA02_IPS : BOOL;
LPAU12FA01_A : BOOL;
LPAU12FA01_R : BOOL;
LPAU12FA02_CO2SET : REAL;
LPAU12FA02_VP : REAL;
LPAU12FA02_SM : INT;
LPAU12FA01_TM : BOOL;
LPAU12FA02_A : BOOL;
LPAU12FA02_R : BOOL;
END_VAR
(** {********************************************PAU12FA01********************************************} **)
(** {*���룬���ͣ�ʾֵ���ޣ�ʾֵ���ޣ���׼��������������*} **)
(** PAU12FA01_ST_AVE (INPUT:=LPAU12FA01_ST ); **)
(* call - Stmt *)
CAL PAU12FA01_ST_AVE (
INPUT := LPAU12FA01_ST
)
(** LPAU12FA01_STS := BS_Scale(PAU12FA01_ST_AVE.Output ,1,0,100,0,0.0); **)
(* assign - Stmt *)
LD PAU12FA01_ST_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LPAU12FA01_STS
(** {*������*} **)
(** PAU12FA01_FAU(FAU_STRUCT_IN:=PAU12FA01_IN | PAU12FA01_OUT:=FAU_STRUCT_OUT); **)
(* call - Stmt *)
CAL PAU12FA01_FAU (
FAU_STRUCT_IN := PAU12FA01_IN
|
PAU12FA01_OUT := FAU_STRUCT_OUT
)
(** {*FAU_INSTRUCT*} **)
(** PAU12FA01_IN.SM :=LPAU12FA01_SM ; **)
(* assign - Stmt *)
LD LPAU12FA01_SM
ST PAU12FA01_IN.SM
(** PAU12FA01_IN.LM :=LPAU12FA01_LM ; **)
(* assign - Stmt *)
LD LPAU12FA01_LM
ST PAU12FA01_IN.LM
(** PAU12FA01_IN.Run :=LPAU12FA01_R ; **)
(* assign - Stmt *)
LD LPAU12FA01_R
ST PAU12FA01_IN.Run
(** PAU12FA01_IN.Fault :=LPAU12FA01_F ; **)
(* assign - Stmt *)
LD LPAU12FA01_F
ST PAU12FA01_IN.Fault
(** PAU12FA01_IN.Auto :=LPAU12FA01_A ; **)
(* assign - Stmt *)
LD LPAU12FA01_A
ST PAU12FA01_IN.Auto
(** PAU12FA01_IN.ContRol:=LPAU12FA01_PC ; **)
(* assign - Stmt *)
LD LPAU12FA01_PC
ST PAU12FA01_IN.ContRol
(** PAU12FA01_IN.FDOB :=LPAU12FA01_FDOB ; **)
(* assign - Stmt *)
LD LPAU12FA01_FDOB
ST PAU12FA01_IN.FDOB
(** PAU12FA01_IN.FDSB :=LPAU12FA01_FDSB ; **)
(* assign - Stmt *)
LD LPAU12FA01_FDSB
ST PAU12FA01_IN.FDSB
(** PAU12FA01_IN.TSET :=LPAU12FA01_TSET ; **)
(* assign - Stmt *)
LD LPAU12FA01_TSET
ST PAU12FA01_IN.TSET
(** PAU12FA01_IN.WVMC :=LPAU12FA01_WVMC ; **)
(* assign - Stmt *)
LD LPAU12FA01_WVMC
ST PAU12FA01_IN.WVMC
(** PAU12FA01_IN.WVMV :=LPAU12FA01_WVMV ; **)
(* assign - Stmt *)
LD LPAU12FA01_WVMV
ST PAU12FA01_IN.WVMV
(** PAU12FA01_IN.VFMV :=LPAU12FA01_VFMV ; **)
(* assign - Stmt *)
LD LPAU12FA01_VFMV
ST PAU12FA01_IN.VFMV
(** PAU12FA01_IN.STS :=LPAU12FA01_STS ; **)
(* assign - Stmt *)
LD LPAU12FA01_STS
ST PAU12FA01_IN.STS
(** PAU12FA01_IN.RST :=LPAU12FA01_RST ; **)
(* assign - Stmt *)
LD LPAU12FA01_RST
ST PAU12FA01_IN.RST
(** PAU12FA01_IN.RSTV :=LPAU12FA01_RSTV ; **)
(* assign - Stmt *)
LD LPAU12FA01_RSTV
ST PAU12FA01_IN.RSTV
(** PAU12FA01_IN.FPS :=LPAU12FA01_FPS ; **)
(* assign - Stmt *)
LD LPAU12FA01_FPS
ST PAU12FA01_IN.FPS
(** PAU12FA01_IN.IPS :=LPAU12FA01_IPS ; **)
(* assign - Stmt *)
LD LPAU12FA01_IPS
ST PAU12FA01_IN.IPS
(** PAU12FA01_IN.ISO1 :=LPAU12FA01_ISO1 ; **)
(* assign - Stmt *)
LD LPAU12FA01_ISO1
ST PAU12FA01_IN.ISO1
(** PAU12FA01_IN.ISO2 :=LPAU12FA01_ISO2 ; **)
(* assign - Stmt *)
LD LPAU12FA01_ISO2
ST PAU12FA01_IN.ISO2
(** PAU12FA01_IN.ISO3 :=LPAU12FA01_ISO3 ; **)
(* assign - Stmt *)
LD LPAU12FA01_ISO3
ST PAU12FA01_IN.ISO3
(** PAU12FA01_IN.VP :=LPAU12FA01_VP ; **)
(* assign - Stmt *)
LD LPAU12FA01_VP
ST PAU12FA01_IN.VP
(** PAU12FA01_IN.VI :=LPAU12FA01_VI ; **)
(* assign - Stmt *)
LD LPAU12FA01_VI
ST PAU12FA01_IN.VI
(** PAU12FA01_IN.FDELAY :=t#30s ; **)
(* assign - Stmt *)
LD t#30s
ST PAU12FA01_IN.FDELAY
(** PAU12FA01_IN.VDELAY :=t#120s ; **)
(* assign - Stmt *)
LD t#120s
ST PAU12FA01_IN.VDELAY
(** {*FAU_OUTSTRUCT*} **)
(** LPAU12FA01_WVCS :=PAU12FA01_OUT.WVCS ; **)
(* assign - Stmt *)
LD PAU12FA01_OUT.WVCS
ST LPAU12FA01_WVCS
(** LPAU12FA01_FDOC :=PAU12FA01_OUT.FDO ; **)
(* assign - Stmt *)
LD PAU12FA01_OUT.FDO
ST LPAU12FA01_FDOC
(** LPAU12FA01_FDSC :=PAU12FA01_OUT.FDS ; **)
(* assign - Stmt *)
LD PAU12FA01_OUT.FDS
ST LPAU12FA01_FDSC
(** LPAU12FA01_C :=PAU12FA01_OUT.ContRol; **)
(* assign - Stmt *)
LD PAU12FA01_OUT.ContRol
ST LPAU12FA01_C
(** LPAU12FA01_RH :=PAU12FA01_OUT.RH ; **)
(* assign - Stmt *)
LD PAU12FA01_OUT.RH
ST LPAU12FA01_RH
(** LPAU12FA01_SN :=PAU12FA01_OUT.SN ; **)
(* assign - Stmt *)
LD PAU12FA01_OUT.SN
ST LPAU12FA01_SN
(** **)
(** {*�·���CO2��������*} **)
(** LPAU12FA01_TC:=LPAU12FA01_LC[1]; **)
(* assign - Stmt *)
LD LPAU12FA01_LC[1]
ST LPAU12FA01_TC
(** LPAU12FA01_CO2S[1]:=LIES12FA01_CO2S; **)
(* assign - Stmt *)
LD LIES12FA01_CO2S
ST LPAU12FA01_CO2S[1]
(** LPAU12FA01_CO2S[2]:=LIES12FA02_CO2S; **)
(* assign - Stmt *)
LD LIES12FA02_CO2S
ST LPAU12FA01_CO2S[2]
(** **)
(** PAU12FA01_SLG(ENABLE:=LPAU12FA01_TM,LINKAGEVALUE:=LPAU12FA01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0, **)
(* call - Stmt *)
CAL PAU12FA01_SLG (
ENABLE := LPAU12FA01_TM,
LINKAGEVALUE := LPAU12FA01_CO2S,
DEAD_BAND := 10.0,
MAXRANGE := 2000.0,
MINRANGE := 10.0,
(** LINKAGESET:=LPAU12FA01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,ALLDAY:=LPAU12FA01_DM | LPAU12FA01_LC:=LINKAGEOUT); **)
LINKAGESET := LPAU12FA01_CO2SET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
ALLDAY := LPAU12FA01_DM
|
LPAU12FA01_LC := LINKAGEOUT
)
(** **)
(** **)
(** **)
(** **)
(** **)
(** **)
(** {********************************************PAU12FA02********************************************} **)
(** {*���룬���ͣ�ʾֵ���ޣ�ʾֵ���ޣ���׼��������������*} **)
(** PAU12FA02_ST_AVE (INPUT:=LPAU12FA02_ST ); **)
(* call - Stmt *)
CAL PAU12FA02_ST_AVE (
INPUT := LPAU12FA02_ST
)
(** LPAU12FA02_STS := BS_Scale(PAU12FA02_ST_AVE.Output ,1,0,100,0,0.0); **)
(* assign - Stmt *)
LD PAU12FA02_ST_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LPAU12FA02_STS
(** {*������*} **)
(** PAU12FA02_FAU(FAU_STRUCT_IN:=PAU12FA02_IN | PAU12FA02_OUT:=FAU_STRUCT_OUT); **)
(* call - Stmt *)
CAL PAU12FA02_FAU (
FAU_STRUCT_IN := PAU12FA02_IN
|
PAU12FA02_OUT := FAU_STRUCT_OUT
)
(** {*FAU_INSTRUCT*} **)
(** PAU12FA02_IN.SM :=LPAU12FA02_SM ; **)
(* assign - Stmt *)
LD LPAU12FA02_SM
ST PAU12FA02_IN.SM
(** PAU12FA02_IN.LM :=LPAU12FA02_LM ; **)
(* assign - Stmt *)
LD LPAU12FA02_LM
ST PAU12FA02_IN.LM
(** PAU12FA02_IN.Run :=LPAU12FA02_R ; **)
(* assign - Stmt *)
LD LPAU12FA02_R
ST PAU12FA02_IN.Run
(** PAU12FA02_IN.Fault :=LPAU12FA02_F ; **)
(* assign - Stmt *)
LD LPAU12FA02_F
ST PAU12FA02_IN.Fault
(** PAU12FA02_IN.Auto :=LPAU12FA02_A ; **)
(* assign - Stmt *)
LD LPAU12FA02_A
ST PAU12FA02_IN.Auto
(** PAU12FA02_IN.ContRol:=LPAU12FA02_PC ; **)
(* assign - Stmt *)
LD LPAU12FA02_PC
ST PAU12FA02_IN.ContRol
(** PAU12FA02_IN.FDOB :=LPAU12FA02_FDOB ; **)
(* assign - Stmt *)
LD LPAU12FA02_FDOB
ST PAU12FA02_IN.FDOB
(** PAU12FA02_IN.FDSB :=LPAU12FA02_FDSB ; **)
(* assign - Stmt *)
LD LPAU12FA02_FDSB
ST PAU12FA02_IN.FDSB
(** PAU12FA02_IN.TSET :=LPAU12FA02_TSET ; **)
(* assign - Stmt *)
LD LPAU12FA02_TSET
ST PAU12FA02_IN.TSET
(** PAU12FA02_IN.WVMC :=LPAU12FA02_WVMC ; **)
(* assign - Stmt *)
LD LPAU12FA02_WVMC
ST PAU12FA02_IN.WVMC
(** PAU12FA02_IN.WVMV :=LPAU12FA02_WVMV ; **)
(* assign - Stmt *)
LD LPAU12FA02_WVMV
ST PAU12FA02_IN.WVMV
(** PAU12FA02_IN.VFMV :=LPAU12FA02_VFMV ; **)
(* assign - Stmt *)
LD LPAU12FA02_VFMV
ST PAU12FA02_IN.VFMV
(** PAU12FA02_IN.STS :=LPAU12FA02_STS ; **)
(* assign - Stmt *)
LD LPAU12FA02_STS
ST PAU12FA02_IN.STS
(** PAU12FA02_IN.RST :=LPAU12FA02_RST ; **)
(* assign - Stmt *)
LD LPAU12FA02_RST
ST PAU12FA02_IN.RST
(** PAU12FA02_IN.RSTV :=LPAU12FA02_RSTV ; **)
(* assign - Stmt *)
LD LPAU12FA02_RSTV
ST PAU12FA02_IN.RSTV
(** PAU12FA02_IN.FPS :=LPAU12FA02_FPS ; **)
(* assign - Stmt *)
LD LPAU12FA02_FPS
ST PAU12FA02_IN.FPS
(** PAU12FA02_IN.IPS :=LPAU12FA02_IPS ; **)
(* assign - Stmt *)
LD LPAU12FA02_IPS
ST PAU12FA02_IN.IPS
(** PAU12FA02_IN.ISO1 :=LPAU12FA02_ISO1 ; **)
(* assign - Stmt *)
LD LPAU12FA02_ISO1
ST PAU12FA02_IN.ISO1
(** PAU12FA02_IN.ISO2 :=LPAU12FA02_ISO2 ; **)
(* assign - Stmt *)
LD LPAU12FA02_ISO2
ST PAU12FA02_IN.ISO2
(** PAU12FA02_IN.ISO3 :=LPAU12FA02_ISO3 ; **)
(* assign - Stmt *)
LD LPAU12FA02_ISO3
ST PAU12FA02_IN.ISO3
(** PAU12FA02_IN.VP :=LPAU12FA02_VP ; **)
(* assign - Stmt *)
LD LPAU12FA02_VP
ST PAU12FA02_IN.VP
(** PAU12FA02_IN.VI :=LPAU12FA02_VI ; **)
(* assign - Stmt *)
LD LPAU12FA02_VI
ST PAU12FA02_IN.VI
(** PAU12FA02_IN.FDELAY :=t#30s ; **)
(* assign - Stmt *)
LD t#30s
ST PAU12FA02_IN.FDELAY
(** PAU12FA02_IN.VDELAY :=t#120s ; **)
(* assign - Stmt *)
LD t#120s
ST PAU12FA02_IN.VDELAY
(** {*FAU_OUTSTRUCT*} **)
(** LPAU12FA02_WVCS :=PAU12FA02_OUT.WVCS ; **)
(* assign - Stmt *)
LD PAU12FA02_OUT.WVCS
ST LPAU12FA02_WVCS
(** LPAU12FA02_FDOC :=PAU12FA02_OUT.FDO ; **)
(* assign - Stmt *)
LD PAU12FA02_OUT.FDO
ST LPAU12FA02_FDOC
(** LPAU12FA02_FDSC :=PAU12FA02_OUT.FDS ; **)
(* assign - Stmt *)
LD PAU12FA02_OUT.FDS
ST LPAU12FA02_FDSC
(** LPAU12FA02_C :=PAU12FA02_OUT.ContRol; **)
(* assign - Stmt *)
LD PAU12FA02_OUT.ContRol
ST LPAU12FA02_C
(** LPAU12FA02_RH :=PAU12FA02_OUT.RH ; **)
(* assign - Stmt *)
LD PAU12FA02_OUT.RH
ST LPAU12FA02_RH
(** LPAU12FA02_SN :=PAU12FA02_OUT.SN ; **)
(* assign - Stmt *)
LD PAU12FA02_OUT.SN
ST LPAU12FA02_SN
(** **)
(** {*�·���CO2��������*} **)
(** LPAU12FA02_TC:=LPAU12FA02_LC[1]; **)
(* assign - Stmt *)
LD LPAU12FA02_LC[1]
ST LPAU12FA02_TC
(** LPAU12FA02_CO2S[1]:=LIES12FA01_CO2S; **)
(* assign - Stmt *)
LD LIES12FA01_CO2S
ST LPAU12FA02_CO2S[1]
(** LPAU12FA02_CO2S[2]:=LIES12FA02_CO2S; **)
(* assign - Stmt *)
LD LIES12FA02_CO2S
ST LPAU12FA02_CO2S[2]
(** **)
(** PAU12FA02_SLG(ENABLE:=LPAU12FA02_TM,LINKAGEVALUE:=LPAU12FA02_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0, **)
(* call - Stmt *)
CAL PAU12FA02_SLG (
ENABLE := LPAU12FA02_TM,
LINKAGEVALUE := LPAU12FA02_CO2S,
DEAD_BAND := 10.0,
MAXRANGE := 2000.0,
MINRANGE := 10.0,
(** LINKAGESET:=LPAU12FA02_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,ALLDAY:=LPAU12FA02_DM | LPAU12FA02_LC:=LINKAGEOUT); **)
LINKAGESET := LPAU12FA02_CO2SET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
ALLDAY := LPAU12FA02_DM
|
LPAU12FA02_LC := LINKAGEOUT
)
END_PROGRAM