Фиксация данных на определенный промежуток времени

[Spawn]

VAR
     TON1 : TON;
     Trig1 : R_TRIG;
     B1 : BYTE;
     Var1 : BYTE;
END_VAR

     B1 := B1 + 1;

     TON1(IN := NOT TON1.Q, PT := T#5000MS);

     Trig1(CLK := TON1.Q);

     IF Trig1.Q THEN
          Var1 := B1;
     END_IF

Адаптируйте под свои нужды и "заверните" в функциональный блок указанный выше код, который потом используйте в CFC.