@1
S: MOV UP, ACC
JMP L
P: MOV -8, DOWN
MOV 0, RIGHT
L: SUB RIGHT
JGZ P
N: MOV 0, RIGHT
ADD RIGHT
MOV -999, RIGHT
MOV 999, DOWN
MOV ACC, DOWN

@2
S: MOV UP, ACC
SAV
ADD ACC
ADD ACC
ADD ACC
D: MOV ACC, LEFT
ADD LEFT
JGZ D
SWP
MOV ACC, DOWN

@4
L: ADD UP
JLZ L
MOV ACC, DOWN
MOV UP, ACC
O: SUB RIGHT
JLZ N
MOV -1, DOWN
MOV 0, RIGHT
JMP O
N: MOV 0, RIGHT
ADD RIGHT
MOV -999, RIGHT
MOV 999, DOWN
MOV ACC, DOWN
MOV 0, ACC

@5
S: MOV UP, ACC
D: MOV ACC, LEFT
ADD LEFT
JGZ D

@7
MOV UP, ACC
NEG
ADD 999
L: SUB UP
JGZ L
ADD 999
MOV ACC, DOWN
MOV UP, RIGHT

@8
MOV LEFT, DOWN
