Advertisement
Guest User

Untitled

a guest
Jul 5th, 2019
147
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SCL 0.64 KB | None | 0 0
  1. CASE iKrok OF
  2.     0:  //  Krok inicjalizacji
  3.         Akcja_0();
  4.         //warunek tranzycji
  5.         IF xStart THEN
  6.             iKrok := 10;
  7.         END_IF;
  8.     10:  //  Krok 10
  9.         Akcja_10();
  10.         //warunek tranzycji        
  11.         IF xWarunekTranzycji10 THEN
  12.             iKrok := 20;
  13.         END_IF;
  14.     20:  //  Krok 20
  15.         Akcja_20();
  16.         //warunek tranzycji        
  17.         IF xWarunekTranzycji20 THEN
  18.             iKrok := 30;
  19.         END_IF;
  20.     30:  //  Krok 30
  21.         Akcja_30();
  22.         //warunek tranzycji        
  23.         IF xWarunekTranzycji30 THEN
  24.             iKrok := 0;
  25.         END_IF;
  26. END_CASE;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement