gistfile1.txt

PROGRAM PLC_PRG
VAR
  xDi:      BOOL; // Сигнал от дискретного входа ПЛК
  xAlarm:   BOOL; // Сигнал тревоги
  fbDelay:  TON; // Экземпляр таймера задержки включения
  i:        INT;
END_VAR

fbDelay
(
  IN := xDi,
  PT := T#5S,
  Q  => xAlarm
);

i := i + 1;