@0
MOV UP, DOWN

@1
MOV UP, ACC
MOV ACC, DOWN
NEG
ADD 11
MOV ACC, DOWN

@2
MOV UP, ACC
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV ACC, DOWN
MOV ACC, DOWN

@3
MOV UP, RIGHT
MOV LEFT, ACC
L: SUB RIGHT
SUB RIGHT
SUB RIGHT
SUB RIGHT
MOV RIGHT, RIGHT
JLZ R
JMP L
R: ADD RIGHT
JLZ R
MOV ACC, DOWN
Y: MOV RIGHT, ACC
JNZ Y

@4
R: MOV LEFT, ACC
JEZ K
MOV ACC, DOWN
JMP B
K: SWP
B: SAV
MOV ACC, LEFT
MOV ACC, LEFT
MOV ACC, LEFT
MOV ACC, LEFT
MOV 0, LEFT

@5
MOV UP, ACC
SUB RIGHT
MOV ACC, DOWN
MOV -1, RIGHT
MOV UP, ACC
SUB RIGHT
MOV ACC, RIGHT

@6
S: MOV UP, ACC
SAV
ADD ACC
SUB RIGHT
JGZ U
MOV RIGHT, NIL
SWP
MOV ACC, LEFT
JMP E
U: SWP
SUB RIGHT
MOV ACC, LEFT
E: MOV LEFT, ACC
JLZ S
MOV ACC, DOWN

@7
MOV UP, ACC
MOV ACC, LEFT
MOV ACC, LEFT
