@1
L: MOV UP, ACC
MOV ACC, DOWN
SWP
MOV ACC, DOWN

@5
MOV UP, NIL
MOV UP, NIL
MOV 0, RIGHT
L: MOV UP, ACC
SUB UP
MOV ACC, RIGHT
JMP L

@6
MOV LEFT, DOWN

@9
L: MOV UP, ACC
JGZ P
NEG
P: SUB 10
JLZ N
MOV 1, DOWN
JMP L
N: MOV 0, DOWN
