@0
MOV 9, ACC
I: MOV 0, LEFT
SUB 1
JNZ I
MOV -1, LEFT
L: MOV UP, ACC
MOV ACC, DOWN
MOV ACC, DOWN
JMP L

@3
S: MOV RIGHT, ACC
JGZ P
JEZ I
N: MOV UP, DOWN
ADD 1
JLZ N
JMP I
P: MOV DOWN, UP
SUB 1
JGZ P
I: MOV DOWN, ACC
ADD 1
MOV ACC, DOWN

@4
MOV -10, LEFT
L: NEG
ADD UP
MOV ACC, LEFT
MOV UP, ACC
JGZ L
JEZ L
SUB 14
D: ADD 1
JLZ D
MOV ACC, DOWN

@7
MOV -1, LEFT
MOV UP, NIL
S: MOV LEFT, ACC
JLZ E
JEZ N
M: SWP
MOV ACC, DOWN
SWP
SUB 1
JGZ M
N: SWP
ADD 1
SWP
JMP S
E: MOV ACC, DOWN
