PRINT X
# max number we can reach in the process: 190996 (17 bits), originally max is 1000 (10 bits)
# change X into a binary number: variables A-R serve as bits
# R
CLEAR Y # quotient, result of division
CLEAR R # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, R=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR R
INCREASE R
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR R
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# Q
CLEAR Y # quotient, result of division
CLEAR Q # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, Q=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR Q
INCREASE Q
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR Q
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# P
CLEAR Y # quotient, result of division
CLEAR P # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, P=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR P
INCREASE P
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR P
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# O
CLEAR Y # quotient, result of division
CLEAR O # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, O=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR O
INCREASE O
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR O
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# N
CLEAR Y # quotient, result of division
CLEAR N # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, N=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR N
INCREASE N
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR N
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# M
CLEAR Y # quotient, result of division
CLEAR M # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, M=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR M
INCREASE M
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR M
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# L
CLEAR Y # quotient, result of division
CLEAR L # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, L=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR L
INCREASE L
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR L
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# K
CLEAR Y # quotient, result of division
CLEAR K # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, K=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR K
INCREASE K
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR K
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# J
CLEAR Y # quotient, result of division
CLEAR J # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, J=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR J
INCREASE J
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR J
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# I
CLEAR Y # quotient, result of division
CLEAR I # remainder, 0/1, our next bit
CLEAR S
INCREASE S # flag, S=1 while we need to continue
REPEAT X TIMES (
REPEAT S TIMES (
# checking if X is equal to 0 (if X=0, S=0)
CLEAR S
REPEAT X TIMES (
CLEAR S
INCREASE S
)
# checking if X is equal to 1 (if X=1, I=1 and S=0)
REPEAT S TIMES (
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR S
CLEAR I
INCREASE I
REPEAT Z TIMES (
CLEAR S
INCREASE S
CLEAR I
)
)
)
REPEAT S TIMES ( # S=1 or S=0
INCREASE Y
# subtract 2 from X, result is in X
CLEAR T
REPEAT X TIMES (
CLEAR Z
REPEAT T TIMES (
INCREASE Z
)
INCREASE T
)
CLEAR T
REPEAT Z TIMES (
CLEAR X
REPEAT T TIMES (
INCREASE X
)
INCREASE T
)
)
)
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
# V=enough
INCREASE V
INCREASE V
INCREASE V
INCREASE V
INCREASE V
REPEAT V TIMES (
REPEAT V TIMES (
INCREASE V
)
)
CLEAR S
INCREASE S # S=1 while we continue
# compute the sequence
REPEAT V TIMES (
REPEAT S TIMES ( # if not 1, proceed
# checking if current number is 1
CLEAR Z
REPEAT Q TIMES ( # we count how many 0 there are
INCREASE Z
)
REPEAT P TIMES (
INCREASE Z
)
REPEAT O TIMES (
INCREASE Z
)
REPEAT N TIMES (
INCREASE Z
)
REPEAT M TIMES (
INCREASE Z
)
REPEAT L TIMES (
INCREASE Z
)
REPEAT K TIMES (
INCREASE Z
)
REPEAT J TIMES (
INCREASE Z
)
REPEAT I TIMES (
INCREASE Z
)
REPEAT H TIMES (
INCREASE Z
)
REPEAT G TIMES (
INCREASE Z
)
REPEAT F TIMES (
INCREASE Z
)
REPEAT E TIMES (
INCREASE Z
)
REPEAT D TIMES (
INCREASE Z
)
REPEAT C TIMES (
INCREASE Z
)
REPEAT B TIMES (
INCREASE Z
)
REPEAT A TIMES (
INCREASE Z
)
CLEAR S
REPEAT Z TIMES (
CLEAR S
INCREASE S
)
CLEAR Z # if Z=1, the number is divisible by 2
INCREASE Z
CLEAR T # if T=1, the number is not divisible by 2
REPEAT R TIMES (
CLEAR Z
INCREASE T
)
# divide by 2: if number is divisible by 2, the last bit R=0
REPEAT Z TIMES (
CLEAR R
REPEAT Q TIMES (
INCREASE R
)
CLEAR Q
REPEAT P TIMES (
INCREASE Q
)
CLEAR P
REPEAT O TIMES (
INCREASE P
)
CLEAR O
REPEAT N TIMES (
INCREASE O
)
CLEAR N
REPEAT M TIMES (
INCREASE N
)
CLEAR M
REPEAT L TIMES (
INCREASE M
)
CLEAR L
REPEAT K TIMES (
INCREASE L
)
CLEAR K
REPEAT J TIMES (
INCREASE K
)
CLEAR J
REPEAT I TIMES (
INCREASE J
)
CLEAR I
REPEAT H TIMES (
INCREASE I
)
CLEAR H
REPEAT G TIMES (
INCREASE H
)
CLEAR G
REPEAT F TIMES (
INCREASE G
)
CLEAR F
REPEAT E TIMES (
INCREASE F
)
CLEAR E
REPEAT D TIMES (
INCREASE E
)
CLEAR D
REPEAT C TIMES (
INCREASE D
)
CLEAR C
REPEAT B TIMES (
INCREASE C
)
CLEAR B
REPEAT A TIMES (
INCREASE B
)
CLEAR A
)
# multiply by 3 plus 1: if number is not divisible by 2, the Z=1
REPEAT T TIMES (
# ----------------------------
CLEAR Z # transfer to the next
REPEAT R TIMES (
INCREASE Z
)
INCREASE R
CLEAR W
CLEAR Y
REPEAT R TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR R
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE R
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT Q TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE Q
)
CLEAR W
CLEAR Y
REPEAT Q TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR Q
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE Q
)
REPEAT X TIMES (
INCREASE T
)
# ----------------------------
CLEAR Z # transfer to the next
REPEAT P TIMES (
INCREASE Z
)
REPEAT T TIMES (
INCREASE P
)
CLEAR W
CLEAR Y
REPEAT P TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR P
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE P
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT O TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE O
)
CLEAR W
CLEAR Y
REPEAT O TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR O
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE O
)
REPEAT X TIMES (
INCREASE T
)
# ----------------------------
CLEAR Z # transfer to the next
REPEAT N TIMES (
INCREASE Z
)
REPEAT T TIMES (
INCREASE N
)
CLEAR W
CLEAR Y
REPEAT N TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR N
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE N
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT M TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE M
)
CLEAR W
CLEAR Y
REPEAT M TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR M
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE M
)
REPEAT X TIMES (
INCREASE T
)
# ----------------------------
CLEAR Z # transfer to the next
REPEAT L TIMES (
INCREASE Z
)
REPEAT T TIMES (
INCREASE L
)
CLEAR W
CLEAR Y
REPEAT L TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR L
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE L
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT K TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE K
)
CLEAR W
CLEAR Y
REPEAT K TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR K
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE K
)
REPEAT X TIMES (
INCREASE T
)
# ----------------------------
CLEAR Z # transfer to the next
REPEAT J TIMES (
INCREASE Z
)
REPEAT T TIMES (
INCREASE J
)
CLEAR W
CLEAR Y
REPEAT J TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR J
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE J
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT I TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE I
)
CLEAR W
CLEAR Y
REPEAT I TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR I
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE I
)
REPEAT X TIMES (
INCREASE T
)
# ----------------------------
CLEAR Z # transfer to the next
REPEAT H TIMES (
INCREASE Z
)
REPEAT T TIMES (
INCREASE H
)
CLEAR W
CLEAR Y
REPEAT H TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR H
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE H
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT G TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE G
)
CLEAR W
CLEAR Y
REPEAT G TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR G
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE G
)
REPEAT X TIMES (
INCREASE T
)
# ----------------------------
CLEAR Z # transfer to the next
REPEAT F TIMES (
INCREASE Z
)
REPEAT T TIMES (
INCREASE F
)
CLEAR W
CLEAR Y
REPEAT F TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR F
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE F
)
REPEAT X TIMES (
INCREASE Z
)
# ----------------------------
CLEAR T # transfer to the next
REPEAT E TIMES (
INCREASE T
)
REPEAT Z TIMES (
INCREASE E
)
CLEAR W
CLEAR Y
REPEAT E TIMES (
CLEAR Y
REPEAT W TIMES (
INCREASE Y
)
INCREASE W
)
CLEAR X
REPEAT Y TIMES (
CLEAR E
CLEAR X
INCREASE X
)
CLEAR W
CLEAR U
REPEAT Y TIMES (
CLEAR U
REPEAT W TIMES (
INCREASE U
)
INCREASE W
)
REPEAT U TIMES (
INCREASE E
)
REPEAT X TIMES (
INCREASE T
)
# processing D - deleted
# processing C - deleted
# processing B - deleted
# processing A - deleted
)
# convert the number back
CLEAR X # this is the current number
CLEAR Y # power of 2
INCREASE Y
REPEAT R TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT Q TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT P TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT O TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT N TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT M TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT L TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT K TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT J TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT I TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT H TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT G TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT F TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
REPEAT Y TIMES (
INCREASE Y
)
REPEAT E TIMES (
REPEAT Y TIMES (
INCREASE X
)
)
# processing D - deleted
# processing C - deleted
# processing B - deleted
# processing A - deleted
PRINT X
)
)
