@0
MOV 100 LEFT
JRO DOWN
A:MOV LEFT RIGHT
B:SUB 1
JGZ A
MOV LEFT DOWN
MOV DOWN ACC
G:MOV ACC LEFT
MOV RIGHT ACC
JGZ G
MOV UP ACC
MOV -99 RIGHT
MOV ACC DOWN
JGZ B
JRO ANY

@1


@2
MOV -591 ACC
B: ADD 100
C:MOV ACC ANY
JLZ B
SWP
MOV ACC DOWN
MOV UP ACC
JEZ A
SAV
MOV 1 ACC
ADD UP
MOV ACC UP
A:MOV ACC DOWN
JGZ C

@3


@4


@5
C:MOV UP NIL
D:SUB UP
JEZ A
JGZ B
MOV UP ACC
SWP
MOV UP ACC
SWP
JMP D
A:SAV
B:ADD UP
JGZ C
SWP
MOV ACC DOWN

@6