# Constant that is used for the multiplication
INCREASE K INCREASE K

# Used to detect when to stop loop
INCREASE L

# Create a big number (180) to loop many times (number 871 takes the most steps: 178)
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q
INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q INCREASE Q

# Print the initial value
PRINT X

# Stop if X is 1 initially
REPEAT X TIMES (
    CLEAR L
    REPEAT D TIMES (
        INCREASE L
        CLEAR D
    )
    INCREASE D
)

# Start the main loop
REPEAT Q TIMES (
    REPEAT L TIMES (
        # Clear variables before re-use
        CLEAR A CLEAR B CLEAR C CLEAR D CLEAR E CLEAR O CLEAR V CLEAR Y

        # These need to both be 1 for the loops to work
        INCREASE O INCREASE B

        # Make a copy of X and store it in Y
        REPEAT X TIMES (
            INCREASE Y
        )

        # Check if X is odd or even, and save the halved value of X in X
        CLEAR X
        REPEAT Y TIMES (
            REPEAT A TIMES (
                INCREASE X
                INCREASE C
                CLEAR A
            )
            REPEAT B TIMES (
                INCREASE A
                CLEAR B
            )
            REPEAT C TIMES (
                INCREASE B
                CLEAR C
            )
        )
        
        # This only runs if X was odd because in that case A is 1 instead of 0
        REPEAT A TIMES (
            # Revert X back to original value
            CLEAR X
            REPEAT Y TIMES (
                INCREASE X
            )

            # Multiply X by 3 and add 1
            REPEAT K TIMES (
                REPEAT Y TIMES (
                    INCREASE X
                )
            )
            INCREASE X
        )

        # Print the resulting value
        PRINT X

        # Stop if X is 1
        REPEAT X TIMES (
            CLEAR L
            REPEAT D TIMES (
                INCREASE L
                CLEAR D
            )
            INCREASE D
        )
    )
)