Цитата Сообщение от Евгений Кислов Посмотреть сообщение
Код:
PROGRAM PLC_PRG
VAR
        // команда включения насоса
	xEnablePump:	BOOL := TRUE;
        // сигнал от датчика
	xSensor:	BOOL := TRUE;
        // сигнал аварии
        xAlarm:		BOOL;
	
	fbAlarmTimer:	TON;
END_VAR


fbAlarmTimer(IN := xEnablePump AND NOT(xSensor), PT := T#5s);

IF fbAlarmTimer.Q THEN
   xEnablePump := FALSE;
   xAlarm := TRUE;
END_IF
Огромное спасибо!!!