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.
49 lines
439 B
49 lines
439 B
6 months ago
|
FUNCTION_BLOCK BS_DevHeartCheck
|
||
|
|
VAR_EXTERNAL
|
||
|
|
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
VAR_INPUT
|
||
|
|
DHV :INT;
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
VAR_OUTPUT
|
||
|
|
DHR :BOOL;
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
VAR
|
||
|
|
DHVT :INT;
|
||
|
|
TON01 :TON;
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
(*
|
||
|
|
|
||
|
|
时 间：20191003
|
||
|
|
版 本：1.0
|
||
|
|
作 者：姚立
|
||
|
|
名 称：设备心跳程序
|
||
|
|
说 明：
|
||
|
|
备 注：
|
||
|
|
依赖块：无
|
||
|
|
|
||
|
|
*)
|
||
|
|
|
||
|
|
(*
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
*)
|
||
|
|
TON01(PT:=t#60s);
|
||
|
|
|
||
|
|
if DHV=DHVT then
|
||
|
|
TON01.IN:=1;
|
||
|
|
DHVT:=DHV;
|
||
|
|
else
|
||
|
|
TON01.IN:=0;
|
||
|
|
end_if;
|
||
|
|
|
||
|
|
DHR := not TON01.Q;
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
END_FUNCTION_BLOCK
|