# 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
)
