CLEAR A
CLEAR I
INCREASE I
INCREASE I
INCREASE I
INCREASE I
REPEAT I TIMES (
REPEAT I TIMES (
REPEAT I TIMES (
INCREASE A
INCREASE A
INCREASE A
)
)
)
PRINT X
REPEAT A TIMES (
CLEAR I
CLEAR B
REPEAT X TIMES (
REPEAT B TIMES (
CLEAR I
INCREASE I
)
CLEAR B
INCREASE B
)
REPEAT I TIMES (
CLEAR F
CLEAR Z
CLEAR L
REPEAT X TIMES (
REPEAT F TIMES ( INCREASE L INCREASE Z )
INCREASE F
REPEAT Z TIMES ( CLEAR F CLEAR Z )
)
REPEAT F TIMES (
REPEAT L TIMES (
INCREASE X
INCREASE X
INCREASE X
INCREASE X
)
INCREASE X
INCREASE X
INCREASE X
)
REPEAT F TIMES ( INCREASE Z )
INCREASE F
REPEAT Z TIMES ( CLEAR F CLEAR Z )
REPEAT F TIMES (
CLEAR X
REPEAT L TIMES ( INCREASE X )
)
PRINT X
)
)