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

@1


@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
L: MOV UP,ACC
JLZ T
MOV ACC,LEFT
JMP L
T: MOV ACC,LEFT
MOV 10,UP
O: MOV UP,DOWN
JMP O

@5


@6


@7
L: MOV UP,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

