PROGRAM prgMain

  VAR

  END_VAR

  CASE RAF OF
    0 : IF start = true
         THEN
          Raf := 1;
        END_IF;
    1 : IF K1 = true
         THEN
          Pas1 := 1;
          Raf := 2;
        END_IF;
    2 : IF K2 = true
         THEN
          Presun1:=1;
          Pas2:=1;
          Pas1:=0;
          Raf:=3;
        END_IF;
    3 : IF K3 = true
         THEN
          Presun1:=0;
          Raf:=4;
          END_IF;
    4 : IF K4 = true
         THEN
          Pas2:=0;
          odpocet1(IN :=K4 , PT :=Cas ,Q =>Pas2 );
          Raf:=5;

        END_IF;
    5 : IF K5 = true
         THEN
          Pas2:=0;
        END_IF;


  END_CASE;

END_PROGRAM