IF #TR THEN

    #C0 := #ctomb[#indexb].%X0;
    #C1 := #ctomb[#indexb].%X1;
    #C2 := #ctomb[#indexb].%X2;

END_IF;

IF NOT (#TR) AND #tr_prev THEN

    #indexb := #indexb + 1;
    IF #indexb > 6 THEN
        #indexb := 0;
    END_IF;

END_IF;

#tr_prev := #TR;

// IF #TR THEN

//     #C0 := #ctomb[#index].%X0;
//     #C1 := #ctomb[#index].%X1;
//     #C2 := #ctomb[#index].%X2;

// END_IF;

// IF NOT (#TR) AND #tr_prev THEN

//     #index := #index + 1;

// END_IF;

// #tr_prev := #TR;

CASE #index OF

    0:
        #H12 := TRUE;
        #H42 := TRUE;
        #H62 := TRUE;
    IF #S1 THEN

      #index := 1;

    END_IF;

  1:
    #M1 := TRUE;
    IF #S2 THEN
      #index := 2;
    END_IF;

  2:


    // IF #S2 AND NOT (#press) THEN

    #M1 := FALSE;
    #H11 := TRUE;
    #H12 := FALSE;
    #H2 := TRUE;
    #press := TRUE;

    //END_IF;


    IF #H2A AND #H1F THEN
      #index := 3;


    END_IF;
  3:
    #Simple_Wait_Time_v1_Instance(min_wait_time := t#3s,
                                  done => #wait1);

    IF #wait1 THEN
      #index := 4;


    END_IF;
  4:
    #H2 := FALSE;
    #H11 := FALSE;
    #H12 := TRUE;

    IF #H2F AND #H1A THEN

      #index := 5;


    END_IF;
  5:
    #M2 := TRUE;
    // #press := false;

    IF #S3 THEN
      #index := 6;
    END_IF;
  6:
    #M2 := FALSE;
    #H3 := TRUE;

    // IF #S3 AND NOT (#paint) THEN

    //     #M2 := false;
    //     #H3 := true;
    //     #paint := true;

    // END_IF;

    IF #H3A THEN
      #index := 7;



    END_IF;
  7:
    #Simple_Wait_Time_v1_Instance_1(min_wait_time := t#3s,
                                    done => #wait2);

    IF #wait2 THEN
      #index := 8;



    END_IF;
  8:
    #H3 := FALSE;

    IF #H3F THEN
      #index := 9;



    END_IF;
  9:
    #M3 := TRUE;
    #M4 := TRUE;
    //#paint := false;

    IF #CS1 OR #CS2 THEN

      #color.%X0 := #CS1;
      #color.%X1 := #CS2;

    END_IF;

    IF #S4 THEN

        #M3 := FALSE;
        #M4 := FALSE;
      CASE #color OF

        2, 3:
          #index := 11;

        1:
          #index := 10;

      END_CASE;

    END_IF;

  10:
    #M5 := TRUE;

    IF #S6 THEN
      #index := 0;
      #M5 := FALSE;

    END_IF;

  11:
    #H41 := TRUE;
    #H42 := FALSE;

    IF #H4F THEN
      #index := 12;

    END_IF;

  12:
    #H5 := TRUE;

    IF #H5V THEN
      #index := 13;


    END_IF;

  13:
    #M6 := TRUE;
    #H5 := FALSE;
    #H41 := FALSE;
    #H42 := TRUE;

    IF #S5 THEN
        #M6 := FALSE;
      CASE #color OF

        2:
          #index := 14;

        3:
          #index := 15;


      END_CASE;

    END_IF;

  14:
    #M7 := TRUE;

    IF #S7 THEN
      #index := 0;
      #M7 := FALSE;

    END_IF;
  15:
    #H61 := TRUE;
    #H62 := FALSE;

    IF #H6F THEN
      #index := 16;


    END_IF;

  16:
    #H7 := TRUE;

    IF #H7V THEN
      #index := 17;


    END_IF;

  17:
    #M8 := TRUE;
    #H7 := FALSE;
    #H61 := FALSE;
    #H62 := TRUE;

    IF #S8 THEN

      #M8 := FALSE;
      #index := 0;
    END_IF;


END_CASE;