33 lines
838 B
Smalltalk
33 lines
838 B
Smalltalk
(*
|
|
===============================================================================
|
|
Project : PLC_Library
|
|
Device : -
|
|
Path : Общие
|
|
Name : TONOF
|
|
Type : FUNCTION_BLOCK
|
|
Exported : 2026-07-31 11:16:16
|
|
===============================================================================
|
|
*)
|
|
|
|
FUNCTION_BLOCK TONOF
|
|
(*
|
|
TONOF генерирует TON и TOF задержки для переменной IN
|
|
Задержка на вход T_ON, задержка на выход T_OFF
|
|
*)
|
|
VAR_INPUT
|
|
IN : BOOL;
|
|
T_ON : TIME := T#0s; (* Задержка на вход *)
|
|
T_OFF : TIME := T#0s; (* Задержка на выход *)
|
|
END_VAR
|
|
VAR_OUTPUT
|
|
Q : BOOL;
|
|
END_VAR
|
|
VAR
|
|
X : TON;
|
|
END_VAR
|
|
|
|
(*----- IMPLEMENTATION -----*)
|
|
X(IN := IN XOR Q, PT := SEL(IN,T_OFF,T_ON));
|
|
IF X.Q THEN Q := IN; END_IF;
|
|
END_FUNCTION_BLOCK
|