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

534 lines
12 KiB

PROGRAM PAU
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
PAU2FA01_IN :FAU_IN;
PAU2FA01_OUT:FAU_OUT;
PAU2FA01_SyncControl:IJ_LSyncControl;
PAU2FA01_FAU:IJ_FAU;
PAU2FA01_ST_AVE :BS_Average;
PAU2FA01_WVB_AVE:BS_Average;
PAU2FA01_SLG :IJ_EAFGroup;
LPAU2FA01_CO2S:ARRAY[0..10] OF REAL;
LPAU2FA01_LC :ARRAY[0..10] OF BOOL;
PAU2FA02_IN :FAU_IN;
PAU2FA02_OUT:FAU_OUT;
PAU2FA02_SyncControl:IJ_LSyncControl;
PAU2FA02_FAU:IJ_FAU;
PAU2FA02_ST_AVE :BS_Average;
PAU2FA02_WVB_AVE:BS_Average;
PAU2FA02_SLG :IJ_EAFGroup;
LPAU2FA02_CO2S:ARRAY[0..10] OF REAL;
LPAU2FA02_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LPAU2FA01_PC : BOOL;
LPAU2FA01_VI : REAL;
LPAU2FA01_A : BOOL;
LPAU2FA01_R : BOOL;
LPAU2FA01_CO2SET : REAL;
LPAU2FA02_A : BOOL;
LPAU2FA02_R : BOOL;
LPAU2FA02_RH : REAL;
LPAU2FA02_ISO1 : BOOL;
LPAU2FA02_TSET : REAL;
LPAU2FA01_C : BOOL;
LPAU2FA02_WVCS : INT;
LPAU2FA02_ISO2 : BOOL;
LPAU2FA01_RH : REAL;
LPAU2FA01_ISO1 : BOOL;
LPAU2FA01_TSET : REAL;
LPAU2FA02_C : BOOL;
LPAU2FA02_FDSB : BOOL;
LPAU2FA01_FPS : BOOL;
LPAU2FA02_DM : BOOL;
LPAU2FA02_ISO3 : BOOL;
LPAU2FA01_WVCS : INT;
LPAU2FA01_ISO2 : BOOL;
LPAU2FA02_FDSC : BOOL;
LPAU2FA02_FPS : BOOL;
LPAU2FA01_FDSB : BOOL;
LPAU2FA02_TM : BOOL;
LPAU2FA02_VFCS : INT;
LPAU2FA01_DM : BOOL;
LPAU2FA01_ISO3 : BOOL;
LPAU2FA01_FDSC : BOOL;
LPAU2FA01_F : BOOL;
LIES2FA02_CO2S : REAL;
LPAU2FA02_VP : REAL;
LPAU2FA02_SM : INT;
LPAU2FA01_TM : BOOL;
LPAU2FA01_VFCS : INT;
LPAU2FA02_F : BOOL;
LPAU2FA01_IPS : BOOL;
LIES2FA01_CO2S : REAL;
LPAU2FA02_CO2SET : REAL;
LPAU2FA02_SN : INT;
LPAU2FA01_VP : REAL;
LPAU2FA01_SM : INT;
LPAU2FA02_FDOB : BOOL;
LPAU2FA02_IPS : BOOL;
LPAU2FA02_RSTV : REAL;
LPAU2FA01_SN : INT;
LPAU2FA02_FDOC : BOOL;
LPAU2FA01_FDOB : BOOL;
LPAU2FA01_RSTV : REAL;
LPAU2FA01_FDOC : BOOL;
LPAU2FA02_WVMC : BOOL;
LPAU2FA02_TC : BOOL;
LPAU2FA01_STS : REAL;
LPAU2FA01_WVMC : BOOL;
LPAU2FA02_LM : BOOL;
LPAU2FA02_STS : REAL;
LPAU2FA02_WVMV : REAL;
LPAU2FA01_TC : BOOL;
LPAU2FA01_RST : BOOL;
LPAU2FA02_ST : INT;
LPAU2FA02_RST : BOOL;
LPAU2FA01_LM : BOOL;
LPAU2FA01_WVMV : REAL;
LPAU2FA01_ST : INT;
LPAU2FA02_VFMV : INT;
LPAU2FA02_PC : BOOL;
LPAU2FA02_VI : REAL;
LPAU2FA01_VFMV : INT;
END_VAR
(** {********************************************PAU2FA01********************************************} **)
(** {*���룬���ͣ�ʾֵ���ޣ�ʾֵ���ޣ���׼��������������*} **)
(** PAU2FA01_ST_AVE (INPUT:=LPAU2FA01_ST ); **)
(* call - Stmt *)
CAL PAU2FA01_ST_AVE (
INPUT := LPAU2FA01_ST
)
(** LPAU2FA01_STS := BS_Scale(PAU2FA01_ST_AVE.Output ,1,0,100,0,0.0); **)
(* assign - Stmt *)
LD PAU2FA01_ST_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LPAU2FA01_STS
(** {*������*} **)
(** PAU2FA01_FAU(FAU_STRUCT_IN:=PAU2FA01_IN | PAU2FA01_OUT:=FAU_STRUCT_OUT); **)
(* call - Stmt *)
CAL PAU2FA01_FAU (
FAU_STRUCT_IN := PAU2FA01_IN
|
PAU2FA01_OUT := FAU_STRUCT_OUT
)
(** {*FAU_INSTRUCT*} **)
(** PAU2FA01_IN.SM :=LPAU2FA01_SM ; **)
(* assign - Stmt *)
LD LPAU2FA01_SM
ST PAU2FA01_IN.SM
(** PAU2FA01_IN.LM :=LPAU2FA01_LM ; **)
(* assign - Stmt *)
LD LPAU2FA01_LM
ST PAU2FA01_IN.LM
(** PAU2FA01_IN.Run :=LPAU2FA01_R ; **)
(* assign - Stmt *)
LD LPAU2FA01_R
ST PAU2FA01_IN.Run
(** PAU2FA01_IN.Fault :=LPAU2FA01_F ; **)
(* assign - Stmt *)
LD LPAU2FA01_F
ST PAU2FA01_IN.Fault
(** PAU2FA01_IN.Auto :=LPAU2FA01_A ; **)
(* assign - Stmt *)
LD LPAU2FA01_A
ST PAU2FA01_IN.Auto
(** PAU2FA01_IN.ContRol:=LPAU2FA01_PC ; **)
(* assign - Stmt *)
LD LPAU2FA01_PC
ST PAU2FA01_IN.ContRol
(** PAU2FA01_IN.FDOB :=LPAU2FA01_FDOB ; **)
(* assign - Stmt *)
LD LPAU2FA01_FDOB
ST PAU2FA01_IN.FDOB
(** PAU2FA01_IN.FDSB :=LPAU2FA01_FDSB ; **)
(* assign - Stmt *)
LD LPAU2FA01_FDSB
ST PAU2FA01_IN.FDSB
(** PAU2FA01_IN.TSET :=LPAU2FA01_TSET ; **)
(* assign - Stmt *)
LD LPAU2FA01_TSET
ST PAU2FA01_IN.TSET
(** PAU2FA01_IN.WVMC :=LPAU2FA01_WVMC ; **)
(* assign - Stmt *)
LD LPAU2FA01_WVMC
ST PAU2FA01_IN.WVMC
(** PAU2FA01_IN.WVMV :=LPAU2FA01_WVMV ; **)
(* assign - Stmt *)
LD LPAU2FA01_WVMV
ST PAU2FA01_IN.WVMV
(** PAU2FA01_IN.VFMV :=LPAU2FA01_VFMV ; **)
(* assign - Stmt *)
LD LPAU2FA01_VFMV
ST PAU2FA01_IN.VFMV
(** PAU2FA01_IN.STS :=LPAU2FA01_STS ; **)
(* assign - Stmt *)
LD LPAU2FA01_STS
ST PAU2FA01_IN.STS
(** PAU2FA01_IN.RST :=LPAU2FA01_RST ; **)
(* assign - Stmt *)
LD LPAU2FA01_RST
ST PAU2FA01_IN.RST
(** PAU2FA01_IN.RSTV :=LPAU2FA01_RSTV ; **)
(* assign - Stmt *)
LD LPAU2FA01_RSTV
ST PAU2FA01_IN.RSTV
(** PAU2FA01_IN.FPS :=LPAU2FA01_FPS ; **)
(* assign - Stmt *)
LD LPAU2FA01_FPS
ST PAU2FA01_IN.FPS
(** PAU2FA01_IN.IPS :=LPAU2FA01_IPS ; **)
(* assign - Stmt *)
LD LPAU2FA01_IPS
ST PAU2FA01_IN.IPS
(** PAU2FA01_IN.ISO1 :=LPAU2FA01_ISO1 ; **)
(* assign - Stmt *)
LD LPAU2FA01_ISO1
ST PAU2FA01_IN.ISO1
(** PAU2FA01_IN.ISO2 :=LPAU2FA01_ISO2 ; **)
(* assign - Stmt *)
LD LPAU2FA01_ISO2
ST PAU2FA01_IN.ISO2
(** PAU2FA01_IN.ISO3 :=LPAU2FA01_ISO3 ; **)
(* assign - Stmt *)
LD LPAU2FA01_ISO3
ST PAU2FA01_IN.ISO3
(** PAU2FA01_IN.VP :=LPAU2FA01_VP ; **)
(* assign - Stmt *)
LD LPAU2FA01_VP
ST PAU2FA01_IN.VP
(** PAU2FA01_IN.VI :=LPAU2FA01_VI ; **)
(* assign - Stmt *)
LD LPAU2FA01_VI
ST PAU2FA01_IN.VI
(** PAU2FA01_IN.FDELAY :=t#30s ; **)
(* assign - Stmt *)
LD t#30s
ST PAU2FA01_IN.FDELAY
(** PAU2FA01_IN.VDELAY :=t#120s ; **)
(* assign - Stmt *)
LD t#120s
ST PAU2FA01_IN.VDELAY
(** {*FAU_OUTSTRUCT*} **)
(** LPAU2FA01_WVCS :=PAU2FA01_OUT.WVCS ; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.WVCS
ST LPAU2FA01_WVCS
(** LPAU2FA01_VFCS :=PAU2FA01_OUT.VFCS ; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.VFCS
ST LPAU2FA01_VFCS
(** LPAU2FA01_FDOC :=PAU2FA01_OUT.FDO ; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.FDO
ST LPAU2FA01_FDOC
(** LPAU2FA01_FDSC :=PAU2FA01_OUT.FDS ; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.FDS
ST LPAU2FA01_FDSC
(** LPAU2FA01_C :=PAU2FA01_OUT.ContRol; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.ContRol
ST LPAU2FA01_C
(** LPAU2FA01_RH :=PAU2FA01_OUT.RH ; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.RH
ST LPAU2FA01_RH
(** LPAU2FA01_SN :=PAU2FA01_OUT.SN ; **)
(* assign - Stmt *)
LD PAU2FA01_OUT.SN
ST LPAU2FA01_SN
(** **)
(** {*�·���CO2��������*} **)
(** LPAU2FA01_TC:=LPAU2FA01_LC[1]; **)
(* assign - Stmt *)
LD LPAU2FA01_LC[1]
ST LPAU2FA01_TC
(** LPAU2FA01_CO2S[1]:=LIES2FA01_CO2S; **)
(* assign - Stmt *)
LD LIES2FA01_CO2S
ST LPAU2FA01_CO2S[1]
(** LPAU2FA01_CO2S[2]:=LIES2FA02_CO2S; **)
(* assign - Stmt *)
LD LIES2FA02_CO2S
ST LPAU2FA01_CO2S[2]
(** **)
(** PAU2FA01_SLG(ENABLE:=LPAU2FA01_TM,LINKAGEVALUE:=LPAU2FA01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0, **)
(* call - Stmt *)
CAL PAU2FA01_SLG (
ENABLE := LPAU2FA01_TM,
LINKAGEVALUE := LPAU2FA01_CO2S,
DEAD_BAND := 10.0,
MAXRANGE := 2000.0,
MINRANGE := 10.0,
(** LINKAGESET:=LPAU2FA01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,ALLDAY:=LPAU2FA01_DM | LPAU2FA01_LC:=LINKAGEOUT); **)
LINKAGESET := LPAU2FA01_CO2SET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
ALLDAY := LPAU2FA01_DM
|
LPAU2FA01_LC := LINKAGEOUT
)
(** {********************************************PAU2FA02********************************************} **)
(** {*���룬���ͣ�ʾֵ���ޣ�ʾֵ���ޣ���׼��������������*} **)
(** PAU2FA02_ST_AVE (INPUT:=LPAU2FA02_ST ); **)
(* call - Stmt *)
CAL PAU2FA02_ST_AVE (
INPUT := LPAU2FA02_ST
)
(** LPAU2FA02_STS := BS_Scale(PAU2FA02_ST_AVE.Output ,1,0,100,0,0.0); **)
(* assign - Stmt *)
LD PAU2FA02_ST_AVE.Output
BS_Scale 1, 0, 100, 0, 0.0
ST LPAU2FA02_STS
(** {*������*} **)
(** PAU2FA02_FAU(FAU_STRUCT_IN:=PAU2FA02_IN | PAU2FA02_OUT:=FAU_STRUCT_OUT); **)
(* call - Stmt *)
CAL PAU2FA02_FAU (
FAU_STRUCT_IN := PAU2FA02_IN
|
PAU2FA02_OUT := FAU_STRUCT_OUT
)
(** {*FAU_INSTRUCT*} **)
(** PAU2FA02_IN.SM :=LPAU2FA02_SM ; **)
(* assign - Stmt *)
LD LPAU2FA02_SM
ST PAU2FA02_IN.SM
(** PAU2FA02_IN.LM :=LPAU2FA02_LM ; **)
(* assign - Stmt *)
LD LPAU2FA02_LM
ST PAU2FA02_IN.LM
(** PAU2FA02_IN.Run :=LPAU2FA02_R ; **)
(* assign - Stmt *)
LD LPAU2FA02_R
ST PAU2FA02_IN.Run
(** PAU2FA02_IN.Fault :=LPAU2FA02_F ; **)
(* assign - Stmt *)
LD LPAU2FA02_F
ST PAU2FA02_IN.Fault
(** PAU2FA02_IN.Auto :=LPAU2FA02_A ; **)
(* assign - Stmt *)
LD LPAU2FA02_A
ST PAU2FA02_IN.Auto
(** PAU2FA02_IN.ContRol:=LPAU2FA02_PC ; **)
(* assign - Stmt *)
LD LPAU2FA02_PC
ST PAU2FA02_IN.ContRol
(** PAU2FA02_IN.FDOB :=LPAU2FA02_FDOB ; **)
(* assign - Stmt *)
LD LPAU2FA02_FDOB
ST PAU2FA02_IN.FDOB
(** PAU2FA02_IN.FDSB :=LPAU2FA02_FDSB ; **)
(* assign - Stmt *)
LD LPAU2FA02_FDSB
ST PAU2FA02_IN.FDSB
(** PAU2FA02_IN.TSET :=LPAU2FA02_TSET ; **)
(* assign - Stmt *)
LD LPAU2FA02_TSET
ST PAU2FA02_IN.TSET
(** PAU2FA02_IN.WVMC :=LPAU2FA02_WVMC ; **)
(* assign - Stmt *)
LD LPAU2FA02_WVMC
ST PAU2FA02_IN.WVMC
(** PAU2FA02_IN.WVMV :=LPAU2FA02_WVMV ; **)
(* assign - Stmt *)
LD LPAU2FA02_WVMV
ST PAU2FA02_IN.WVMV
(** PAU2FA02_IN.VFMV :=LPAU2FA02_VFMV ; **)
(* assign - Stmt *)
LD LPAU2FA02_VFMV
ST PAU2FA02_IN.VFMV
(** PAU2FA02_IN.STS :=LPAU2FA02_STS ; **)
(* assign - Stmt *)
LD LPAU2FA02_STS
ST PAU2FA02_IN.STS
(** PAU2FA02_IN.RST :=LPAU2FA02_RST ; **)
(* assign - Stmt *)
LD LPAU2FA02_RST
ST PAU2FA02_IN.RST
(** PAU2FA02_IN.RSTV :=LPAU2FA02_RSTV ; **)
(* assign - Stmt *)
LD LPAU2FA02_RSTV
ST PAU2FA02_IN.RSTV
(** PAU2FA02_IN.FPS :=LPAU2FA02_FPS ; **)
(* assign - Stmt *)
LD LPAU2FA02_FPS
ST PAU2FA02_IN.FPS
(** PAU2FA02_IN.IPS :=LPAU2FA02_IPS ; **)
(* assign - Stmt *)
LD LPAU2FA02_IPS
ST PAU2FA02_IN.IPS
(** PAU2FA02_IN.ISO1 :=LPAU2FA02_ISO1 ; **)
(* assign - Stmt *)
LD LPAU2FA02_ISO1
ST PAU2FA02_IN.ISO1
(** PAU2FA02_IN.ISO2 :=LPAU2FA02_ISO2 ; **)
(* assign - Stmt *)
LD LPAU2FA02_ISO2
ST PAU2FA02_IN.ISO2
(** PAU2FA02_IN.ISO3 :=LPAU2FA02_ISO3 ; **)
(* assign - Stmt *)
LD LPAU2FA02_ISO3
ST PAU2FA02_IN.ISO3
(** PAU2FA02_IN.VP :=LPAU2FA02_VP ; **)
(* assign - Stmt *)
LD LPAU2FA02_VP
ST PAU2FA02_IN.VP
(** PAU2FA02_IN.VI :=LPAU2FA02_VI ; **)
(* assign - Stmt *)
LD LPAU2FA02_VI
ST PAU2FA02_IN.VI
(** PAU2FA02_IN.FDELAY :=t#30s ; **)
(* assign - Stmt *)
LD t#30s
ST PAU2FA02_IN.FDELAY
(** PAU2FA02_IN.VDELAY :=t#120s ; **)
(* assign - Stmt *)
LD t#120s
ST PAU2FA02_IN.VDELAY
(** {*FAU_OUTSTRUCT*} **)
(** LPAU2FA02_WVCS :=PAU2FA02_OUT.WVCS ; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.WVCS
ST LPAU2FA02_WVCS
(** LPAU2FA02_VFCS :=PAU2FA02_OUT.VFCS ; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.VFCS
ST LPAU2FA02_VFCS
(** LPAU2FA02_FDOC :=PAU2FA02_OUT.FDO ; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.FDO
ST LPAU2FA02_FDOC
(** LPAU2FA02_FDSC :=PAU2FA02_OUT.FDS ; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.FDS
ST LPAU2FA02_FDSC
(** LPAU2FA02_C :=PAU2FA02_OUT.ContRol; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.ContRol
ST LPAU2FA02_C
(** LPAU2FA02_RH :=PAU2FA02_OUT.RH ; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.RH
ST LPAU2FA02_RH
(** LPAU2FA02_SN :=PAU2FA02_OUT.SN ; **)
(* assign - Stmt *)
LD PAU2FA02_OUT.SN
ST LPAU2FA02_SN
(** **)
(** {*�·���CO2��������*} **)
(** LPAU2FA02_TC:=LPAU2FA02_LC[1]; **)
(* assign - Stmt *)
LD LPAU2FA02_LC[1]
ST LPAU2FA02_TC
(** LPAU2FA02_CO2S[1]:=LIES2FA01_CO2S; **)
(* assign - Stmt *)
LD LIES2FA01_CO2S
ST LPAU2FA02_CO2S[1]
(** LPAU2FA02_CO2S[2]:=LIES2FA02_CO2S; **)
(* assign - Stmt *)
LD LIES2FA02_CO2S
ST LPAU2FA02_CO2S[2]
(** **)
(** PAU2FA02_SLG(ENABLE:=LPAU2FA02_TM,LINKAGEVALUE:=LPAU2FA02_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0, **)
(* call - Stmt *)
CAL PAU2FA02_SLG (
ENABLE := LPAU2FA02_TM,
LINKAGEVALUE := LPAU2FA02_CO2S,
DEAD_BAND := 10.0,
MAXRANGE := 2000.0,
MINRANGE := 10.0,
(** LINKAGESET:=LPAU2FA02_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,ALLDAY:=LPAU2FA02_DM | LPAU2FA02_LC:=LINKAGEOUT); **)
LINKAGESET := LPAU2FA02_CO2SET,
HOLDDELAY := t#60s,
ENABLENUM := 4,
ALLDAY := LPAU2FA02_DM
|
LPAU2FA02_LC := LINKAGEOUT
)
END_PROGRAM