Цитата Сообщение от Валенок Посмотреть сообщение
delay : TON;

..........
IF button THEN
delay( in := TRUE, pt := T#1s );
IF delay.Q THEN
delay( in := FALSE );
fr:=fr + 500;
END_IF
ELSE
fr:=450;
delay( in := FALSE ); (* необязательно *)
END_IF
По пробивал ваш код программы , не получается чтото , делает один, шаг прибавляет одно значение за одну секунду и останавливается.