@0
MOV 9,ACC
I: MOV 0,LEFT
SUB 1
JGZ I
L: MOV UP,ACC
JLZ O
MOV ACC,RIGHT
JMP L
O: MOV -1,RIGHT
MOV DOWN,ACC
D: MOV LEFT,RIGHT
SUB 1
JGZ D

@1
H: SWP
ADD 1
SWP
L: MOV LEFT,ACC
JLZ E
SUB 7
JEZ H
ADD 7
MOV ACC,DOWN
JMP L
E: MOV ACC,DOWN
SWP
MOV ACC,DOWN
O: MOV LEFT,DOWN
JMP O

@2


@3
L: MOV RIGHT,ACC
JLZ R
SAV
JEZ T
P: MOV UP,DOWN
SUB 1
JGZ P
T: MOV UP,ACC
ADD 1
MOV ACC,UP
SWP
JEZ L
R: MOV DOWN,UP
SUB 1
JGZ R

@4
JMP L
H: SWP
ADD 1
SWP
L: MOV RIGHT,ACC
JLZ E
JEZ H
SUB 1
MOV ACC,LEFT
JMP L
E: MOV -1,LEFT
MOV 9,UP
SWP
MOV ACC,RIGHT

@5
L: MOV UP,ACC
JLZ E
MOV ACC,LEFT
JMP L
E: MOV ACC,LEFT
MOV UP,DOWN
MOV LEFT,DOWN
O: MOV UP,DOWN
JMP O

@6


@7
L: MOV RIGHT,ACC
JEZ N
P: SWP
MOV ACC,DOWN
SWP
SUB 1
JGZ P
N: SWP
ADD 1
SAV
SUB 10
JNZ L
E: MOV -1,DOWN

@8
MOV UP,ACC
SUB 1
SAV
MOV UP,LEFT
MOV 6,ACC
L: MOV UP,LEFT
SUB 1
JGZ L
MOV UP,NIL
SWP
MOV ACC,LEFT
MOV UP,LEFT
MOV UP,LEFT
MOV UP,LEFT
