PRINT X
INCREASE R
INCREASE W INCREASE W INCREASE W INCREASE W INCREASE W
REPEAT W TIMES ( REPEAT W TIMES ( 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
REPEAT W TIMES (
REPEAT R TIMES (
INCREASE P
CLEAR C
REPEAT X TIMES (
INCREASE Z
REPEAT A TIMES (
CLEAR Z
CLEAR A
)
REPEAT Z TIMES (
INCREASE A
INCREASE C
)
)
REPEAT A TIMES (
CLEAR Q
INCREASE Q
REPEAT X TIMES (
REPEAT Q TIMES (
REPEAT S TIMES (
INCREASE R
CLEAR Q
)
REPEAT Q TIMES (
CLEAR R
)
INCREASE S
)
INCREASE X INCREASE X
)
INCREASE X
CLEAR P
CLEAR C
CLEAR A
CLEAR Z
CLEAR S
)
REPEAT P TIMES (
CLEAR X
CLEAR P
)
REPEAT C TIMES ( INCREASE X )
REPEAT R TIMES ( PRINT X )
)
)