@1
MOV UP, ACC
MOV ACC, RIGHT
MOV ACC, RIGHT

@2
START:
MOV UP, ACC
SAV
SUB LEFT
JLZ LESS
MOV LEFT, DOWN
MOV ACC, DOWN
JMP START
LESS:
NEG
MOV LEFT, NIL
SWP
MOV ACC, DOWN
SWP
MOV ACC, DOWN

@5
MOV UP, ACC
SAV
MOV UP, ACC
DIV: SUB 2
JLZ DONE
SWP
ADD 1
SWP
JMP DIV
DONE: SWP
MOV ACC, DOWN

@9
MOV UP, DOWN
