INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A INCREASE A PRINT X INCREASE B REPEAT A TIMES ( REPEAT B TIMES ( # WHILE TRUE CLEAR Z REPEAT X TIMES ( INCREASE I REPEAT J TIMES ( CLEAR I CLEAR J INCREASE K REPEAT L TIMES ( CLEAR K CLEAR L INCREASE Z ) REPEAT K TIMES ( INCREASE L ) ) REPEAT I TIMES ( INCREASE J ) ) # Z = QUARTER X # I = J = MOD2 X # K = L = HALF MOD4 2X # PQRS = X=1234 MOD4 INCREASE J REPEAT I TIMES ( INCREASE L REPEAT K TIMES ( INCREASE R CLEAR K CLEAR L ) REPEAT L TIMES ( INCREASE P CLEAR L ) CLEAR I CLEAR J ) REPEAT J TIMES ( INCREASE L REPEAT K TIMES ( INCREASE Q CLEAR K CLEAR L ) REPEAT L TIMES ( INCREASE S CLEAR L ) CLEAR J ) REPEAT P TIMES ( # IF X=1 MOD4 INCREASE T REPEAT Z TIMES ( CLEAR T ) REPEAT T TIMES ( CLEAR B ) REPEAT B TIMES ( # IF Z=0 BREAK REPEAT Z TIMES ( INCREASE X INCREASE X INCREASE X INCREASE X INCREASE X INCREASE X INCREASE X INCREASE X ) INCREASE X INCREASE X INCREASE X PRINT X # 12Z+4 CLEAR X REPEAT Z TIMES ( INCREASE Z INCREASE Z INCREASE Z INCREASE Z INCREASE Z INCREASE X INCREASE X INCREASE X ) INCREASE Z INCREASE Z PRINT Z # 6Z+2 INCREASE X PRINT X # 3Z+1 CLEAR P ) ) REPEAT Q TIMES ( # IF X=2 MOD4 CLEAR X INCREASE T REPEAT Z TIMES ( INCREASE X INCREASE X CLEAR T ) INCREASE X PRINT X # 2Z+1 REPEAT T TIMES ( CLEAR B ) REPEAT B TIMES ( # IF Z=0, WE HAVE TO TERMINATE. REPEAT Z TIMES ( INCREASE Z INCREASE Z INCREASE Z INCREASE Z INCREASE Z INCREASE X ) INCREASE Z INCREASE Z INCREASE Z INCREASE Z PRINT Z # 6Z+4 INCREASE X PRINT X # 3Z+2 CLEAR Q ) ) REPEAT R TIMES ( # IF X=3 MOD 4 REPEAT Z TIMES ( INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE X INCREASE X ) INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y PRINT Y # 12Z+10 INCREASE X INCREASE X PRINT X # 6Z+5 REPEAT Z TIMES ( INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE X INCREASE X INCREASE X ) INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y INCREASE Y PRINT Y # 18Z+16 CLEAR Y INCREASE X INCREASE X INCREASE X PRINT X # 9Z+8 CLEAR R ) REPEAT S TIMES ( # IF 4 MOD4 CLEAR X REPEAT Z TIMES ( INCREASE Z INCREASE X ) PRINT Z # 2Z PRINT X # Z CLEAR S ) ) )