@1
MOV UP, ACC
SUB 999
SUB 1
MOV ACC, RIGHT

@2
S: MOV 500, ACC
SAV
MOV UP, ACC
ADD LEFT
JLZ O
JEZ R
SUB 1
JEZ R
P: SUB 2
SWP
ADD 1
SWP
JGZ P
R: SWP
O: MOV ACC, DOWN

@5
S: MOV UP, ACC
JLZ N
MOV ACC, DOWN
JMP S
N: SAV
MOV 500, ACC
SWP
L: ADD 2
SWP
SUB 1
SWP
JLZ L
SWP
MOV ACC, DOWN

@9
MOV UP, DOWN
