@1
MOV -1 RIGHT
S: MOV UP ACC
MOV ACC DOWN
L: MOV ACC RIGHT
R: MOV UP ACC
MOV ACC DOWN
MOV ACC DOWN
JLZ S
JMP L

@4
MOV UP ACC
L: SAV
SUB UP
JGZ N
MOV UP NIL
SWP
JMP L
N: MOV UP ACC
JGZ L
JEZ L
SWP
NEG
MOV ACC 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
L: SAV
ADD UP
JLZ E
MOV ACC DOWN
SWP
JMP L
E: MOV -1 DOWN
