INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
INCREASE W
#256 riittää kaikissa tapauksissa
INCREASE V
INCREASE V
INCREASE V
INCREASE X
PRINT X
REPEAT W TIMES (
#test if X is 1 then clear
CLEAR H
INCREASE H
#IF G
CLEAR A
REPEAT G TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
CLEAR H
)
REPEAT H TIMES (
CLEAR W
)
#IF W
CLEAR A
REPEAT W TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
#DIV2(
CLEAR D
INCREASE D
CLEAR E
REPEAT X TIMES (
CLEAR F
CLEAR C
REPEAT D TIMES (
CLEAR A
REPEAT C TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
INCREASE F
)
INCREASE C
)
CLEAR A
REPEAT F TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
INCREASE E
CLEAR D
)
INCREASE D
)
#)
CLEAR G
INCREASE G
INCREASE G
REPEAT D TIMES (
#DECREASE G(
CLEAR B
CLEAR C
REPEAT G TIMES (
CLEAR A
REPEAT C TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
INCREASE B
)
INCREASE C
)
CLEAR G
REPEAT B TIMES (
INCREASE G
)
#)
)
#IF 2-D (even case)
CLEAR A
REPEAT G TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
CLEAR X
REPEAT E TIMES (
INCREASE X
)
)
CLEAR G
REPEAT D TIMES (
INCREASE G
)
#DECREASE G
CLEAR B
CLEAR C
REPEAT G TIMES (
CLEAR A
REPEAT C TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
INCREASE B
)
INCREASE C
)
CLEAR G
REPEAT B TIMES (
INCREASE G
)
#IF D-1
CLEAR A
REPEAT G TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
CLEAR H
REPEAT V TIMES ( REPEAT X TIMES ( INCREASE H ) )
INCREASE H
CLEAR X
REPEAT H TIMES ( INCREASE X )
)
CLEAR G
REPEAT X TIMES (
INCREASE G
)
#DECREASE G
CLEAR B
CLEAR C
REPEAT G TIMES (
CLEAR A
REPEAT C TIMES (
CLEAR A
INCREASE A
)
REPEAT A TIMES (
INCREASE B
)
INCREASE C
)
CLEAR G
REPEAT B TIMES (
INCREASE G
)
PRINT X
)
)