INCREASE T
REPEAT T TIMES ( INCREASE T)
REPEAT T TIMES ( INCREASE T)
REPEAT T TIMES ( INCREASE T)
REPEAT T TIMES ( INCREASE T)
REPEAT T TIMES ( INCREASE T)
REPEAT T TIMES ( INCREASE T)
REPEAT T TIMES ( INCREASE T)
INCREASE S
REPEAT T TIMES (
REPEAT S TIMES (
PRINT X
CLEAR Y
CLEAR P
REPEAT X TIMES (
CLEAR Z INCREASE Z
REPEAT P TIMES ( INCREASE Y CLEAR Z CLEAR P )
REPEAT Z TIMES ( INCREASE P )
)
REPEAT P TIMES (
CLEAR O
REPEAT Y TIMES (
CLEAR O
INCREASE O
)
REPEAT O TIMES (
REPEAT X TIMES (
INCREASE X
INCREASE X
)
INCREASE X
)
# FLIP
CLEAR Z INCREASE Z
REPEAT O TIMES ( CLEAR Z CLEAR O )
REPEAT Z TIMES ( INCREASE O )
# FLIP END
# X IS 1
REPEAT O TIMES (
CLEAR S
)
)
# FLIP
CLEAR Z INCREASE Z
REPEAT P TIMES ( CLEAR Z CLEAR P )
REPEAT Z TIMES ( INCREASE P )
# FLIP END
REPEAT P TIMES (
CLEAR X
REPEAT Y TIMES (
INCREASE X
)
)
)
)