@0
L: MOV UP, ACC
JEZ E
MOV ACC, RIGHT
JMP L
E: MOV 10, DOWN

@1
MOV UP, DOWN

@2
MOV UP, RIGHT
L: MOV 10, RIGHT
JMP L

@3
Z: MOV LEFT, ACC
SUB RIGHT
SAV
SUB 1
JEZ F
P: MOV UP, DOWN
SUB 1
JNZ P
F: MOV UP, ACC
MOV ACC, RIGHT
MOV ACC, DOWN
SWP
R: SUB 1
MOV DOWN, UP
JNZ R

@4
MOV UP, LEFT
MOV LEFT, DOWN

@7
MOV UP, DOWN
