@4
L:MOV ACC DOWN
SAV
ADD ACC
NEG
ADD 18
R:SWP
MOV ACC DOWN
SWP
SUB 1
JGZ R
MOV -1 DOWN
SWP
ADD 1

@8
S:MOV UP ACC
SAV
L:MOV UP ACC
MOV ACC RIGHT
SWP
MOV ACC RIGHT
ADD 1
SWP
JLZ E
ADD ACC
NEG
ADD 30
MOV ACC RIGHT
JMP L
E:MOV -1 RIGHT

@9
S:SWP
NEG
ADD 3
SWP
R:MOV -1 DOWN
MOV LEFT DOWN
MOV LEFT DOWN
MOV LEFT ACC
JLZ S
L:SWP
MOV ACC DOWN
SWP
SUB 1
JGZ L
JMP R
