VAR
TON_START: TON;
X_0: REAL;
X_1: REAL;
END_VAR
VAR_INPUT
X: REAL;
END_VAR
VAR_OUTPUT
DELTA_X: REAL;
END_VAR
...............
X_1:=X;
TON_START(IN:=NOT(TON_START.Q) , PT:=T#4s)
IF TON_START.Q THEN
DELTA_X:=X_1-X_0;
X_0:=X_1;
END_IF
VAR
TON_START: TON;
X_0: REAL;
X_1: REAL;
END_VAR
VAR_INPUT
X: REAL;
END_VAR
VAR_OUTPUT
DELTA_X: REAL;
END_VAR
...............
X_1:=X;
TON_START(IN:=NOT(TON_START.Q) , PT:=T#4s)
IF TON_START.Q THEN
DELTA_X:=X_1-X_0;
X_0:=X_1;
END_IF
Последний раз редактировалось Jeck; 26.12.2008 в 12:55.
Ваши права
Ответить с цитированием