Цитата Сообщение от burn Посмотреть сообщение
Прошу прощения, но я ничего не понял можно комментарии к каждой строчке.
myTON:TON; (*определение фун блока таймера*)
myR_TRIG:R_TRIG; (*определение фун блока детектора переднего фронта*)

myTON(IN:=external_event,PT:=t#10s500ms); (*инициализация ФБ таймера, если переменная external_event переходит в true, то начинается отсчет времени, по окончании отсчета выход Q переходит в true*)

myR_TRIG(CLK:=myTon.Q); (*детектирование переднего фронта выхода Q*)

if myR_TRIG.Q then (*если передний фронт есть, то выполняются действия внутри условия*)
(*
действие после задержки - однократно
*)

end_if;