@0
MOV RIGHT DOWN

@1
S: MOV UP ACC
JEZ R
SUB 180
JEZ L
JGZ D
MOV 3 RIGHT
JMP V
D: MOV 1 RIGHT
V: MOV UP RIGHT
JMP A
L: MOV 5 LEFT
JMP H
R: MOV 1 LEFT
H: MOV UP LEFT
A: MOV DOWN NIL

@2
MOV LEFT ACC
SAV
MOV LEFT ACC
MOV 4 DOWN
SUB 1
JEZ A
L: SWP
MOV ACC DOWN
SWP
SUB 1
JGZ L
A: MOV 10 DOWN

@4
MOV UP ACC
MOV 1 RIGHT
MOV ACC RIGHT
MOV UP ACC
SUB 1
MOV ACC RIGHT
MOV ACC RIGHT
ADD 1
MOV ACC RIGHT

@5
S: JRO ANY
MOV 7 RIGHT
JRO LEFT
ADD LEFT
MOV ACC DOWN
MOV LEFT DOWN
JMP H
SUB LEFT
MOV ACC DOWN
MOV LEFT NIL
MOV 0 DOWN
H: MOV LEFT DOWN
MOV 0 UP
JMP S
MOV 0 UP

@6
S: JRO ANY
ADD 1
JMP V
SUB 1
V: MOV 11 DOWN
MOV ACC DOWN
JMP S
MOV 1 DOWN
MOV ACC DOWN
JMP S
MOV 14 LEFT

@8
MOV UP RIGHT
MOV UP RIGHT
MOV UP ACC
L: MOV 3 RIGHT
SUB 1
JGZ L
MOV -1 RIGHT

@9
S: JRO UP
MOV LEFT ACC
SAV
SUB LEFT
MOV ACC DOWN
MOV UP DOWN
L: MOV LEFT ACC
MOV ACC DOWN
JGZ L
SWP
JMP S
MOV ACC DOWN
MOV UP DOWN
MOV 3 DOWN
MOV -1 DOWN
