INCREASE X INCREASE X INCREASE X INCREASE B INCREASE B INCREASE B INCREASE B REPEAT B TIMES ( REPEAT B TIMES ( REPEAT B TIMES ( REPEAT B TIMES ( INCREASE I ) ) ) ) PRINT X REPEAT I TIMES ( # I = 256 # IF X != 1 CLEAR C CLEAR F CLEAR Q REPEAT X TIMES ( REPEAT F TIMES ( CLEAR Q INCREASE Q CLEAR F ) INCREASE F ) REPEAT Q TIMES ( # Q is Basically an if x != 1 CLEAR O REPEAT X TIMES ( CLEAR E INCREASE E REPEAT O TIMES ( CLEAR O CLEAR E ) REPEAT E TIMES ( INCREASE O ) ) # after this, O is the remainder of X%2 CLEAR T INCREASE T # else block REPEAT O TIMES ( # IF X % 2 == 1 # set X = 3X + 1 REPEAT X TIMES ( INCREASE X INCREASE X ) INCREASE X CLEAR T ) REPEAT T TIMES ( # DIVIDE BY 2 CLEAR R REPEAT X TIMES ( CLEAR E INCREASE E REPEAT O TIMES ( CLEAR O CLEAR E ) REPEAT E TIMES ( INCREASE O INCREASE R # R is the result of x/2 ) ) # set X = R CLEAR X REPEAT R TIMES ( INCREASE X ) ) PRINT X ) )