@0
MOV 11,ACC
I: MOV 0,LEFT
SUB 1
JNZ I
S: MOV UP,ACC
MOV ACC,DOWN
MOV ACC,DOWN
JMP S

@3
S: MOV RIGHT,ACC
JGZ F
R: JEZ B
MOV DOWN,UP
ADD 1
JMP R
F: MOV UP,DOWN
SUB 1
JGZ F
B: MOV UP,ACC
ADD 1
MOV ACC,UP

@4
MOV 9,ACC
S: SUB UP
MOV ACC,LEFT
MOV UP,ACC
JLZ E
JMP S
E: MOV 0,LEFT
MOV ACC,DOWN

@7
MOV -1,LEFT
MOV UP,NIL
D: MOV LEFT,ACC
JGZ L
JEZ N
MOV ACC,DOWN
L: SWP
MOV ACC,DOWN
SWP
SUB 1
JNZ L
N: SWP
ADD 1
SWP
JMP D
