@1
MOV -1 RIGHT
JMP R
L: MOV ACC RIGHT
R: MOV UP ACC
MOV ACC DOWN
JGZ L
JEZ L
JMP R

@3
SUB RIGHT
MOV ACC RIGHT

@4
MOV 999 ACC
U: MOV ACC LEFT
L: MOV UP ACC
JLZ E
ADD LEFT
JLZ U
MOV 0 LEFT
MOV UP ACC
JLZ E
ADD LEFT
JLZ U
MOV 0 LEFT
JMP L
E: MOV LEFT RIGHT
MOV RIGHT NIL

@5
S: MOV LEFT DOWN
MOV -1 RIGHT
JMP R
L: MOV ACC RIGHT
R: MOV UP ACC
JGZ L
JEZ L
MOV -1 UP
MOV 0 LEFT
O: MOV RIGHT ACC
MOV ACC DOWN
JGZ O
JEZ O

@7
S: MOV UP ACC
JMP R
L: MOV ACC DOWN
SWP
R: SAV
ADD UP
JLZ E
MOV ACC DOWN
SWP
SAV
ADD UP
JGZ L
JEZ L
E: MOV -1 DOWN
