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.
92 lines
1.2 KiB
92 lines
1.2 KiB
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
|
|
|
|
(*Automatically declared*)
|
|
VAR_EXTERNAL
|
|
END_VAR
|
|
(** **)
|
|
(** {* **)
|
|
(** **)
|
|
(** 时 间：20191003 **)
|
|
(** 版 本：1.0 **)
|
|
(** 作 者：姚立 **)
|
|
(** 名 称：设备心跳程序 **)
|
|
(** 说 明： **)
|
|
(** 备 注： **)
|
|
(** 依赖块：无 **)
|
|
(** **)
|
|
(** *} **)
|
|
(** **)
|
|
(** {* **)
|
|
(** **)
|
|
(** **)
|
|
(** **)
|
|
(** *} **)
|
|
(** TON01(PT:=t#60s); **)
|
|
(* call - Stmt *)
|
|
CAL TON01 (
|
|
PT := t#60s
|
|
)
|
|
|
|
(** **)
|
|
(** if DHV=DHVT then **)
|
|
(* if - Cond *)
|
|
LD DHV
|
|
EQ DHVT
|
|
JMPCN ODK_SKIP_000000000000001_000000000000001
|
|
|
|
(* then - Stmts *)
|
|
|
|
(** TON01.IN:=1; **)
|
|
(* assign - Stmt *)
|
|
LD 1
|
|
ST TON01.IN
|
|
|
|
(** DHVT:=DHV; **)
|
|
(* assign - Stmt *)
|
|
LD DHV
|
|
ST DHVT
|
|
|
|
JMP ODK_END_IF_000000000000001
|
|
|
|
(** else **)
|
|
(* else *)
|
|
ODK_SKIP_000000000000001_000000000000001:
|
|
|
|
(* else - Stmts *)
|
|
|
|
(** TON01.IN:=0; **)
|
|
(* assign - Stmt *)
|
|
LD 0
|
|
ST TON01.IN
|
|
|
|
(** end_if; **)
|
|
(* if - End *)
|
|
ODK_END_IF_000000000000001:
|
|
|
|
(** **)
|
|
(** DHR := not TON01.Q; **)
|
|
(* assign - Stmt *)
|
|
LD TON01.Q
|
|
NOT
|
|
ST DHR
|
|
|
|
(** **)
|
|
(** **)
|
|
|
|
END_FUNCTION_BLOCK
|