@0
I: MOV UP, ACC
T: SAV
SUB RIGHT
JGZ P
MOV RIGHT, ACC
O: MOV ACC, DOWN
MOV ACC, DOWN
JEZ I
SWP
JMP T
P: ADD RIGHT
JMP O

@1
S: MOV RIGHT, DOWN
L: MOV UP, ACC
JEZ Z
MOV ACC, LEFT
MOV ACC, LEFT
JMP L
Z: MOV 999, LEFT
MOV NIL, LEFT

@2
MOV UP, LEFT

@3
MOV UP, RIGHT

@4
I: MOV UP, ACC
T: SAV
SUB LEFT
JLZ P
MOV LEFT, ACC
O: MOV ACC, DOWN
JEZ I
SWP
JMP T
P: ADD LEFT
JMP O

@8
MOV UP, DOWN
