Аналог lag1st для s7-1500

[Yuran66]

Добрый день! Подскажите аналог фб lag1st для s7-1500. Необходимо на вход пид регулятора небольшую задержку поставить.

[Gucev]

FUNCTION FC_FIL_1_ORDE : REAL
VAR_INPUT
fInput : REAL;
fTfil : REAL:=1.0;
fTcycle : REAL:=0.02;
END_VAR
VAR_IN_OUT
fOut_1 : REAL;

END_VAR

VAR_TEMP
fTfilCl : REAL;
// Temporary Variables

END_VAR
IF fTfil=0.0 OR fTcycle=0.0 THEN
FC_FIL_1_ORDE:=fInput;
RETURN;
END_IF;
IF fTfil< fTcycle*2.0 THEN
fTfilCl:=fTcycle*2.0;
ELSE
fTfilCl:=fTfil;
END_IF;

FC_FIL_1_ORDE:=EXP(-1.0*fTcycle/fTfilCl)*fOut_1 + (1-EXP(-1.0*fTcycle/fTfilCl))*fInput;
fOut_1:=FC_FIL_1_ORDE;

// Statement Section
;

END_FUNCTION

[Yuran66]

Спасибо, работает! Я так понимаю это ваша разработка, а библиотечного получается нет для 1500?
Еще вопрос. От "fOut_1" никак не избавиться? хотя бы чтоб на вход ничего не нужно было цеплять?