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