%DeclareBeg  $$
%New odynychka
%New Zatrymka
%DeclareEnd

%Set $$odynychka="1"

%While($$odynychka == 1)
;  Zatrymka/1000/60   
%Set $$Zatrymka="600000"

60000000;
61000000;  ;
65000000;0;

%Delay 3600000
%EndWhile