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.
193 lines
5.4 KiB
193 lines
5.4 KiB
FUNCTION_BLOCK IJ_DAHU
|
|
VAR_EXTERNAL
|
|
|
|
END_VAR
|
|
|
|
VAR_INPUT
|
|
DAHU_STRUCT_IN :DAHU_IN;
|
|
END_VAR
|
|
|
|
VAR_OUTPUT
|
|
DAHU_STRUCT_OUT :DAHU_OUT;
|
|
END_VAR
|
|
|
|
VAR
|
|
|
|
DAHU_RunTime :BS_Runtime;
|
|
DAHU_WVCTEMP :REAL;
|
|
RunTon1 :TON;
|
|
RunTon2 :TON;
|
|
RunTof1 :TOF;
|
|
RunTof2 :TOF;
|
|
DevCheck1_time :TIME :=t#15s; (*设备运行状态反馈*)
|
|
DevCheck2_time :TIME :=t#15s; (*设备运行状态反馈*)
|
|
Status0 :INT;
|
|
Status1 :INT;
|
|
Status2 :INT;
|
|
Status3 :INT;
|
|
DAHU_SPID_VP :REAL;
|
|
DAHU_SPID_VI :REAL;
|
|
DAHU_WPID_VP :REAL;
|
|
DAHU_WPID_VI :REAL;
|
|
PID_in :BOOL;
|
|
PID_timer :TON;
|
|
FPSSIM_timer :TON;
|
|
END_VAR
|
|
(*
|
|
|
|
时 间：20201120
|
|
版 本：1.5
|
|
作 者：姚立
|
|
名 称：吾悦定制吊顶空调机组程序功能块
|
|
说 明：
|
|
输入变量
|
|
DAHU_STRUCT_IN.
|
|
SM :INT ; 季节模式 0夏季 1冬季 2过渡
|
|
Run :BOOL; 运行状态
|
|
Fault :BOOL; 故障状态
|
|
Auto :BOOL; 自动状态
|
|
Control :BOOL; 程序控制
|
|
TSET :REAL; 温度设定
|
|
WVMC :BOOL; 水阀手动控制
|
|
WVMV :REAL; 水阀手动控制值
|
|
RTS :REAL; 回风温度
|
|
RST :BOOL; 运行时间累计重置
|
|
RSTV :REAL; 运行时间累计重置值
|
|
FPS :BOOL; 风机压差
|
|
ISO1 :BOOL; 运行故障反馈隔离
|
|
ISO2 :BOOL; 风机压差反馈隔离
|
|
VP :REAL; PI设定值P
|
|
VI :REAL; PI设定值I
|
|
|
|
|
|
DAHU_STRUCT_OUT.
|
|
WVCS :INT ; 水阀控制转换值，放大100倍
|
|
Control :BOOL; 启停控制
|
|
RH :REAL; 运行小时
|
|
SN :INT ; 设备状态代码
|
|
FPSSIM :BOOL; 压差模拟输出
|
|
|
|
包含以下几点功能
|
|
1.运行故障回检,输出故障代码，支持故障报警隔离
|
|
2.水阀PID调节/手动调节
|
|
3.运行时间累计
|
|
4.增加了压差模拟输出
|
|
|
|
备 注：
|
|
依赖块：
|
|
BS_Runtime;
|
|
|
|
*)
|
|
|
|
(******************************************************运行故障回检******************************************************)
|
|
RunTon1( IN:=DAHU_STRUCT_IN.Control , PT:=DevCheck1_time);
|
|
RunTof1( IN:=DAHU_STRUCT_IN.Control , PT:=DevCheck1_time);
|
|
RunTon2( IN:=DAHU_STRUCT_IN.Control , PT:=DevCheck2_time);
|
|
RunTof2( IN:=DAHU_STRUCT_IN.Control , PT:=DevCheck2_time);
|
|
|
|
(*设备电气控制箱控制指令与设备运行反馈不一致故障检测，检测故障产生原因电箱没电、断路器断开、中间继电器与接触器故障等为Status0*);
|
|
DAHU_STRUCT_OUT.Control:=DAHU_STRUCT_IN.Control;
|
|
if DAHU_STRUCT_IN.ISO1=0 then
|
|
if RunTon1.q or not RunTof1.q then
|
|
if DAHU_STRUCT_OUT.Control<>DAHU_STRUCT_IN.Run then
|
|
Status0:=1;
|
|
else
|
|
Status0:=0;
|
|
end_if;
|
|
if DAHU_STRUCT_IN.Fault=1 then
|
|
Status1:=1;
|
|
else
|
|
Status1:=0;
|
|
end_if;
|
|
end_if;
|
|
else
|
|
Status0:=0;
|
|
Status1:=0;
|
|
end_if;
|
|
|
|
(*设备电气控制箱控制指令与设备运行反馈不一致故障检测，检测故障产生风机压差无回检信号*);
|
|
if DAHU_STRUCT_IN.ISO2=0 then
|
|
if RunTon2.q or not RunTof2.q then
|
|
if DAHU_STRUCT_OUT.Control<>DAHU_STRUCT_IN.FPS then
|
|
Status2:=1;
|
|
else
|
|
Status2:=0;
|
|
end_if;
|
|
end_if;
|
|
else
|
|
Status2:=0;
|
|
end_if;
|
|
|
|
|
|
(*输出故障代码*)
|
|
if DAHU_STRUCT_OUT.Control<>0 then
|
|
DAHU_STRUCT_OUT.SN := Status0*1 + Status1*2 + Status2*4;
|
|
else
|
|
DAHU_STRUCT_OUT.SN := 0 ;
|
|
end_if;
|
|
|
|
(******************************************************压差信号模拟**************************************************)
|
|
(********************************************原则上不使用，谨慎使用**************************************************)
|
|
|
|
FPSSIM_timer( IN:=DAHU_STRUCT_IN.Run , PT:=t#5s );
|
|
if DAHU_STRUCT_IN.Run=1 and DAHU_STRUCT_IN.Fault=0 then
|
|
DAHU_STRUCT_OUT.FPSSIM:=FPSSIM_timer.q;
|
|
else
|
|
DAHU_STRUCT_OUT.FPSSIM:=0;
|
|
end_if;
|
|
|
|
(******************************************************水阀控制******************************************************)
|
|
|
|
PID_in:= not PID_timer.q;
|
|
PID_timer(in:=PID_in, pt:=t#1s );(*PID积分时间*)
|
|
|
|
if DAHU_STRUCT_IN.WVMC=0 then
|
|
if DAHU_STRUCT_IN.Run=1 then
|
|
(*制冷季*)
|
|
if DAHU_STRUCT_IN.SM=0 then
|
|
if DAHU_STRUCT_IN.RTS-DAHU_STRUCT_IN.TSET>=2.0 then
|
|
DAHU_WVCTEMP:=100.0;
|
|
end_if;
|
|
if DAHU_STRUCT_IN.RTS-DAHU_STRUCT_IN.TSET>0.2 and DAHU_STRUCT_IN.RTS-DAHU_STRUCT_IN.TSET<2.0 then (*死区*)
|
|
if PID_timer.q then
|
|
DAHU_WVCTEMP:=(DAHU_STRUCT_IN.RTS-DAHU_STRUCT_IN.TSET)*50.0;
|
|
end_if;
|
|
end_if;
|
|
if DAHU_STRUCT_IN.RTS-DAHU_STRUCT_IN.TSET<=0.0 then
|
|
DAHU_WVCTEMP:=0.0;
|
|
end_if;
|
|
end_if;
|
|
(*制热季*)
|
|
if DAHU_STRUCT_IN.SM=1 then
|
|
if DAHU_STRUCT_IN.TSET-DAHU_STRUCT_IN.RTS>=2.0 then
|
|
DAHU_WVCTEMP:=100.0;
|
|
end_if;
|
|
if DAHU_STRUCT_IN.TSET-DAHU_STRUCT_IN.RTS>0.2 and DAHU_STRUCT_IN.TSET-DAHU_STRUCT_IN.RTS<2.0 then (*死区*)
|
|
if PID_timer.q then
|
|
DAHU_WVCTEMP:=(DAHU_STRUCT_IN.TSET-DAHU_STRUCT_IN.RTS)*50.0;
|
|
end_if;
|
|
end_if;
|
|
if DAHU_STRUCT_IN.TSET-DAHU_STRUCT_IN.RTS<=0.0 then
|
|
DAHU_WVCTEMP:=0.0;
|
|
end_if;
|
|
end_if;
|
|
(*过渡季*)
|
|
if DAHU_STRUCT_IN.SM=2 then
|
|
DAHU_WVCTEMP:=0.0;
|
|
end_if;
|
|
else
|
|
DAHU_WVCTEMP:=0.0;
|
|
end_if;
|
|
else
|
|
DAHU_WVCTEMP:=DAHU_STRUCT_IN.WVMV;
|
|
end_if;
|
|
|
|
(*水阀赋值量程转换*)
|
|
DAHU_STRUCT_OUT.WVCS:=REAL_TO_INT(DAHU_WVCTEMP*100.0);
|
|
|
|
(******************************************************运行时间累计******************************************************)
|
|
DAHU_RunTime(RUN :=DAHU_STRUCT_IN.Run , RUNTIMESET :=DAHU_STRUCT_IN.RSTV , RUNTIMERST :=DAHU_STRUCT_IN.RST ,RunTimeRec_In :=DAHU_STRUCT_OUT.RH | DAHU_STRUCT_OUT.RH:= RUNTIME);
|
|
|
|
|
|
|
|
END_FUNCTION_BLOCK
|