@0
JRO DOWN
MOV LEFT RIGHT
MOV LEFT RIGHT
MOV LEFT RIGHT
MOV LEFT RIGHT
MOV LEFT ACC
ADD 1
MOV ACC LEFT
JRO DOWN
MOV RIGHT LEFT
MOV RIGHT LEFT
MOV RIGHT LEFT
MOV RIGHT LEFT
MOV UP DOWN

@1
I:MOV 5 ACC
S:MOV 0 UP
SUB 1
JNZ S
MOV 13 RIGHT
L:MOV RIGHT ACC
SUB 1
JEZ E
MOV UP ACC
MOV ACC RIGHT
MOV ACC RIGHT
JMP L
E:MOV 999 RIGHT
MOV 0 RIGHT

@2
E:MOV LEFT UP
L:MOV UP ACC
JEZ Z
MOV ACC UP
MOV ACC UP
JMP L
Z:MOV 6 ACC
F:MOV ACC LEFT
MOV LEFT DOWN
MOV LEFT DOWN
SUB 1
MOV ACC DOWN
JNZ F

@4
L:MOV RIGHT ACC
JEZ E
JGZ N
MOV 0 ACC
N:SAV
JEZ L
MOV -9 RIGHT
JMP L
E:SWP
MOV 1 RIGHT
MOV ACC RIGHT

@5
L:SUB UP
JLZ N
JNZ O
MOV -1 LEFT
O:ADD UP
MOV UP NIL
JMP L
N:MOV UP ACC
MOV UP LEFT
JRO LEFT
MOV LEFT DOWN
