@0
MOV UP ACC!
MOV UP  NIL
MOV UP DOWN
MOV ACC DOWN
MOV ACC RIGHT
JRO -1

@1
MOV LEFT ACC
SUB RIGHT
MOV ACC DOWN

@2
MOV UP ANY

@3
MOV LEFT LAST
MOV LEFT NIL
MOV LEFT NIL
MOV LEFT NIL
MOV -9 DOWN
MOV ANY NIL

@4
MOV UP ACC
MOV ACC DOWN
MOV 0 DOWN
MOV DOWN NIL
MOV ACC DOWN
SUB UP
N:MOV ACC DOWN
JRO -1

@5
MOV UP ACC
MOV ACC DOWN
JEZ C0
B0:MOV UP ACC
MOV 0 RIGHT
C0:MOV UP ACC
MOV 0 RIGHT
JEZ C0

@6
   MOV UP ACC
   SUB DOWN
   JNZ N
   MOV 1 DOWN
   JRO RIGHT
N: MOV 0 DOWN
   JRO RIGHT
   MOV LEFT DOWN
   JRO -1

@7
MOV UP LEFT
MOV  3 LEFT

@8
MOV UP ANY

@9
MOV 0 RIGHT
MOV 0 RIGHT
MOV 0 RIGHT
MOV 0 RIGHT
MOV LEFT RIGHT
MOV LEFT RIGHT
MOV 0 RIGHT
N:MOV 0 RIGHT
S:MOV LEFT ACC
ADD UP
JNZ N
MOV 1 RIGHT
JMP S

@10
MOV ANY ANY