for i:=1 to zu do begin if action=3 then break; if action=2 then delay(2); if action=1 then begin выполняем что-то end; end;