Advertisement
Guest User

Untitled

a guest
Jul 5th, 2019
190
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
SCL 0.68 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 := 15;
  13.         END_IF;
  14.     15:  //  Krok 20, 30
  15.         Akcja_20();
  16.         Akcja_30();
  17.         //warunek tranzycji        
  18.         IF WarunekTranzycji20 AND WarunekTranzycji30 THEN
  19.             iKrok := 40;
  20.         END_IF;
  21.     40:  //  Krok 40
  22.         Akcja_40();
  23.         //warunek tranzycji        
  24.         IF WarunekTranzycji40 THEN
  25.             iKrok := 0;
  26.         END_IF;
  27. END_CASE;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement