# Set I, the number of iterations, to 384
INCREASE I
INCREASE I
INCREASE I
INCREASE I
INCREASE I
INCREASE I

REPEAT I TIMES (
    REPEAT I TIMES (
        INCREASE I
    )
)


PRINT X


REPEAT I TIMES (

    # L is the result of X-1
    REPEAT X TIMES ( # X-1
        REPEAT N TIMES (
            INCREASE L
        )
        CLEAR N
        INCREASE N
    )

    # Getting P = 1 if X > 1
    REPEAT L TIMES (
        CLEAR P
        INCREASE P
    )


    REPEAT P TIMES (
        # Check if X is even (then E=1 and O=0)
        CLEAR E
        CLEAR O
        CLEAR T # Temp
        INCREASE E
        REPEAT X TIMES (
            # Flip O & E
            REPEAT O TIMES (
                INCREASE T
            )
            CLEAR O
            REPEAT E TIMES (
                INCREASE O
            )
            CLEAR E
            REPEAT T TIMES (
                INCREASE E
            )
            CLEAR T
        )

        # If X is even, make Z be X/2
        REPEAT E TIMES (

            # A is 1
            # B is 0
            CLEAR A
            CLEAR B
            INCREASE A
            REPEAT X TIMES (
                # Flip A & B
                REPEAT B TIMES (
                    INCREASE C
                )
                CLEAR B
                REPEAT A TIMES (
                    INCREASE B
                )
                CLEAR A
                REPEAT C TIMES (
                    INCREASE A
                )
                CLEAR C

                # If A = 1, increase z by 1
                REPEAT A TIMES (
                    INCREASE Z
                )
            )
        )

        # If X is odd, make Z be 3*X+1
        REPEAT O TIMES (
            # Set M to 3
            INCREASE M
            INCREASE M
            INCREASE M

            REPEAT X TIMES (
                REPEAT M TIMES (
                    INCREASE Z
                )
            )
            INCREASE Z
        )

        # Set X to be Z
        CLEAR X
        REPEAT Z TIMES (
            INCREASE X
        )

        PRINT X
    )



    # Clear all used variables (except X)
    CLEAR E
    CLEAR O
    CLEAR T
    CLEAR A
    CLEAR B
    CLEAR C
    CLEAR M
    CLEAR Z
    CLEAR L
    CLEAR N
    CLEAR P

)