@1
K: SAV
NEG
ADD 8
ADD ACC
L: SWP
MOV ACC, DOWN
SWP
MOV ACC, DOWN
SUB 1
JGZ L
SWP
ADD 2

@5
MOV UP, ACC
NEG
ADD 29
MOV ACC, DOWN
SUB 12
SUB UP
MOV ACC, DOWN
MOV 9, DOWN

@6
K: SAV
NEG
ADD 8
ADD ACC
L: SWP
MOV ACC, DOWN
SWP
MOV ACC, DOWN
SUB 1
JGZ L
SWP
ADD 2

@7
MOV 0, RIGHT
MOV 7, RIGHT
MOV 2, RIGHT
MOV 6, RIGHT
MOV 4, RIGHT
MOV 5, RIGHT
MOV 6, RIGHT
MOV 4, RIGHT
MOV 8, RIGHT
MOV 3, RIGHT
H: JRO 0

@8
MOV LEFT, ACC
MOV ACC, RIGHT
MOV ACC, RIGHT
MOV 1, RIGHT
SAV
MOV LEFT, ACC
MOV ACC, RIGHT
SWP
MOV ACC, RIGHT
NEG
ADD 17
MOV ACC, RIGHT
MOV 1, RIGHT
SWP
MOV ACC, RIGHT

@9
S: MOV ANY, DOWN
MOV LAST, DOWN
JRO LAST
MOV LAST, ACC
MOV 3, DOWN
L: MOV 3, DOWN
MOV 3, DOWN
MOV 3, DOWN
MOV 3, DOWN
SUB 1
JGZ L
MOV 3, DOWN
MOV -1, DOWN

@10
S: MOV UP, ACC
SUB 8
JEZ H
ADD 8
MOV ACC, LEFT
NEG
ADD 17
SUB UP
MOV ACC, LEFT
MOV 9, LEFT
JMP S
H: JRO 0
