DRAKON.SU

/* Autogenerated with DRAKON Editor 1.17 */
#include "dummy.h"





static void Untitled();

static void Untitled() {
    item_69 :
    d0
   
    item_35 :
    if (q4) {
        goto item_68;
    } else {
    }
   
    // item 22
    if (q1) {
    } else {
        goto item_270001;
    }
   
    // item 16
    if (q2) {
    } else {
        goto item_63;
    }
   
    // item 19
    if (q3) {
        goto item_68;
    } else {
    }
   
    // item 40
    if ((q5) || (q6)) {
        goto item_69;
    } else {
    }
   
    // item 420001
    if (c2 == v4) {
        goto item_63;
    } else {
    }
   
    // item 420002
    if (c2 == v5) {
    } else {
        // item 420003
        UnexpectedBranch(c2);
    }
   
    // item 560001
    if (c3 == v6) {
        goto item_500001;
    } else {
    }
   
    // item 560002
    if (c3 == v7) {
    } else {
        // item 560003
        UnexpectedBranch(c3);
    }
   
    // item 48
    if (q9) {
        goto item_69;
    } else {
    }
   
    item_500001 :
    if ((c4 == v8) || (c4 == v9)) {
    } else {
        // item 500003
        UnexpectedBranch(c4);
    }
   
    item_63 :
    if ((q10) && (q11)) {
        goto item_63;
    } else {
        return;
    }
   
    item_270001 :
    if (((c1 == v1) || (c1 == v2)) || (c1 == v3)) {
    } else {
        // item 270004
        UnexpectedBranch(c1);
    }
   
    // item 25
    if (q7) {
    } else {
        goto item_270001;
    }
   
    item_68 :
    d1
   
    // item 38
    if (q8) {
        goto item_35;
    } else {
        goto item_69;
    }
   
}

# Autogenerated with DRAKON Editor 1.17

def Untitled():
   
    _next_item_ = 69
    while True:
        if _next_item_ == 69:
            d0
            _next_item_ = 35
   
        elif _next_item_ == 35:
            if q4:
                _next_item_ = 68
            else:
                _next_item_ = 22
   
        elif _next_item_ == 22:
            if q1:
                _next_item_ = 16
            else:
                _next_item_ = 270001
   
        elif _next_item_ == 16:
            if q2:
                _next_item_ = 19
            else:
                _next_item_ = 63
   
        elif _next_item_ == 19:
            if q3:
                _next_item_ = 68
            else:
                _next_item_ = 40
   
        elif _next_item_ == 40:
            if (q5) or (q6):
                _next_item_ = 69
            else:
                _next_item_ = 420001
   
        elif _next_item_ == 420001:
            if c2 == v4:
                _next_item_ = 63
            else:
                _next_item_ = 420002
   
        elif _next_item_ == 420002:
            if c2 == v5:
                _next_item_ = 560001
            else:
                #item 420003
                raise Exception("Not expected:  " + str(c2))
                _next_item_ = 560001
   
        elif _next_item_ == 560001:
            if c3 == v6:
                _next_item_ = 500001
            else:
                _next_item_ = 560002
   
        elif _next_item_ == 560002:
            if c3 == v7:
                _next_item_ = 48
            else:
                #item 560003
                raise Exception("Not expected:  " + str(c3))
                _next_item_ = 48
   
        elif _next_item_ == 48:
            if q9:
                _next_item_ = 69
            else:
                _next_item_ = 500001
   
        elif _next_item_ == 500001:
            if (c4 == v8) or (c4 == v9):
                _next_item_ = 63
            else:
                #item 500003
                raise Exception("Not expected:  " + str(c4))
                _next_item_ = 63
   
        elif _next_item_ == 63:
            if (q10) and (q11):
                _next_item_ = 63
            else:
                return None
   
        elif _next_item_ == 270001:
            if ((c1 == v1) or (c1 == v2)) or (c1 == v3):
                _next_item_ = 25
            else:
                #item 270004
                raise Exception("Not expected:  " + str(c1))
                _next_item_ = 25
   
        elif _next_item_ == 25:
            if q7:
                _next_item_ = 68
            else:
                _next_item_ = 270001
   
        elif _next_item_ == 68:
            d1
            _next_item_ = 38
   
        elif _next_item_ == 38:
            if q8:
                _next_item_ = 35
            else:
                _next_item_ = 69

MODULE Slepish;

CONST
  Dr000VtkExit = 0;
  Dr000Vtk0002 = 2;
  Dr000Vtk0013 = 13;
  Dr000Vtk0027 = 27;
  Dr000Vtk0036 = 36;
  Dr000Vtk0008 = 8;

PROCEDURE 0;
VAR
  Dr000Vtk: INTEGER;
BEGIN
  Dr000Vtk := Dr000Vtk0002;
  WHILE Dr000Vtk # Dr000VtkExit DO
    CASE Dr000Vtk OF
    | Dr000Vtk0002: (* 1 *)
      6
      Dr000Vtk := Dr000Vtk0013
    | Dr000Vtk0013: (* 2 *)
      IF 7 THEN
        8
        IF 9 THEN
          10
          (* 11 *)
          IF 12 THEN
            Dr000Vtk := Dr000Vtk0027
          ELSE
            Dr000Vtk := Dr000Vtk0013
          END; (* IF *)
        ELSE
          Dr000Vtk := Dr000Vtk0013
        END; (* IF *)
      ELSE
        Dr000Vtk := Dr000Vtk0008
      END; (* IF *)
    | Dr000Vtk0027: (* 3 *)
      13
      IF 14 THEN
        (* 15 *)
        IF 16 THEN
          Dr000Vtk := Dr000Vtk0036
        ELSE
          Dr000Vtk := Dr000Vtk0013
        END; (* IF *)
      ELSE
        CASE 17 OF
        | 18:
          20
          IF 21 THEN
            22
          END; (* IF *)
        | 19:
          23
        ELSE (* CASE *)
        END; (* CASE *)
        Dr000Vtk := Dr000Vtk0013
      END; (* IF *)
    | Dr000Vtk0036: (* 4 *)
      IF 24 THEN
        IF 44 THEN
          45
        END; (* IF *)
      ELSE
        IF 25 THEN
          26
          CASE 27 OF
          | 28:
            29
            IF 30 THEN
              33
            ELSE
              IF 31 THEN
                32
              END; (* IF *)
            END; (* IF *)
          | 34:
            35
          | 36:
            37
            IF 38 THEN
              39
            END; (* IF *)
          | 40:
            41
            IF 42 THEN
              43
            END; (* IF *)
          ELSE (* CASE *)
          END; (* CASE *)
        END; (* IF *)
      END; (* IF *)
      Dr000Vtk := Dr000Vtk0013
    | Dr000Vtk0008: (* 5 *)
      46
      Dr000Vtk := Dr000VtkExit
    ELSE (* CASE *)
    END (* CASE *)
  END (* WHILE *)
END 0;

END Slepish.