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

@3
S: MOV RIGHT, ACC
SAV
P: MOV UP, DOWN
SUB 1
JGZ P
MOV DOWN, ACC
ADD 1
MOV ACC, DOWN
SWP
R: MOV DOWN, UP
SUB 1
JGZ R

@4
L: MOV 10, ACC
SUB UP
MOV ACC, LEFT
SUB 11
JNZ L
ADD 17
D: SUB 1
JNZ 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
