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.
103 lines
1.6 KiB
103 lines
1.6 KiB
4 months ago
|
FUNCTION_BLOCK BS_Feedback
|
||
|
|
VAR_EXTERNAL
|
||
|
|
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
VAR_INPUT
|
||
|
|
Control :BOOL; (*设备控制指令*)
|
||
|
|
Run :BOOL; (*设备运行状态反馈*)
|
||
|
|
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
VAR_OUTPUT
|
||
|
|
ALARM :BOOL; (*设备电气控制箱故障报警*)
|
||
|
|
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
VAR
|
||
|
|
TON1 :TON;
|
||
|
|
TOF1 :TOF;
|
||
|
|
END_VAR
|
||
|
|
|
||
|
|
(*Automatically declared*)
|
||
|
|
VAR_EXTERNAL
|
||
|
|
END_VAR
|
||
|
|
(** {* **)
|
||
|
|
(** **)
|
||
|
|
(** ʱ �䣺20191003 **)
|
||
|
|
(** �� ����1.0 **)
|
||
|
|
(** �� �ߣ�Ҧ�� **)
|
||
|
|
(** �� �ƣ����Ʒ�����һ�±��� **)
|
||
|
|
(** ˵ ����ע���豸��������������ָ�����豸���з�����һ�¹��ϼ��⣬�������ϲ���ԭ������û�硢��·���Ͽ����м��̵������Ӵ������ϵ� **)
|
||
|
|
(** �� ע�� **)
|
||
|
|
(** **)
|
||
|
|
(** *} **)
|
||
|
|
(** **)
|
||
|
|
(** TON1( IN:=Control , PT:=t#15S); **)
|
||
|
|
(* call - Stmt *)
|
||
|
|
CAL TON1 (
|
||
|
|
IN := Control,
|
||
|
|
PT := t#15S
|
||
|
|
)
|
||
|
|
|
||
|
|
(** TOF1( IN:=Control , PT:=t#15S); **)
|
||
|
|
(* call - Stmt *)
|
||
|
|
CAL TOF1 (
|
||
|
|
IN := Control,
|
||
|
|
PT := t#15S
|
||
|
|
)
|
||
|
|
|
||
|
|
(** **)
|
||
|
|
(** IF TON1.q=1 or TOF1.q=1 then **)
|
||
|
|
(* if - Cond *)
|
||
|
|
LD TON1.q
|
||
|
|
EQ 1
|
||
|
|
OR ( TOF1.q
|
||
|
|
EQ 1
|
||
|
|
)
|
||
|
|
JMPCN ODK_SKIP_000000000000001_000000000000001
|
||
|
|
|
||
|
|
(* then - Stmts *)
|
||
|
|
|
||
|
|
(** if Control<>Run then **)
|
||
|
|
(* if - Cond *)
|
||
|
|
LD Control
|
||
|
|
NE Run
|
||
|
|
JMPCN ODK_SKIP_000000000000002_000000000000001
|
||
|
|
|
||
|
|
(* then - Stmts *)
|
||
|
|
|
||
|
|
(** ALARM:=1; **)
|
||
|
|
(* assign - Stmt *)
|
||
|
|
LD 1
|
||
|
|
ST ALARM
|
||
|
|
|
||
|
|
JMP ODK_END_IF_000000000000002
|
||
|
|
|
||
|
|
(** else **)
|
||
|
|
(* else *)
|
||
|
|
ODK_SKIP_000000000000002_000000000000001:
|
||
|
|
|
||
|
|
(* else - Stmts *)
|
||
|
|
|
||
|
|
(** ALARM:=0; **)
|
||
|
|
(* assign - Stmt *)
|
||
|
|
LD 0
|
||
|
|
ST ALARM
|
||
|
|
|
||
|
|
(** end_if; **)
|
||
|
|
(* if - End *)
|
||
|
|
ODK_END_IF_000000000000002:
|
||
|
|
|
||
|
|
JMP ODK_END_IF_000000000000001
|
||
|
|
|
||
|
|
(** END_IF; **)
|
||
|
|
(* if - End *)
|
||
|
|
ODK_SKIP_000000000000001_000000000000001:
|
||
|
|
ODK_END_IF_000000000000001:
|
||
|
|
|
||
|
|
(** **)
|
||
|
|
(** **)
|
||
|
|
(** **)
|
||
|
|
|
||
|
|
END_FUNCTION_BLOCK
|