@0
MOV RIGHT DOWN

@1
   MOV UP LEFT
   JMP J
N: MOV ACC DOWN
N2:MOV UP  ACC
   MOV ACC DOWN
   JNZ N2
   MOV UP  ACC
   JEZ Z
G: MOV ACC LEFT
J: MOV UP  ACC
   JNZ N
E: MOV -4  DOWN
   MOV UP  ACC
   JGZ G
Z: MOV  0  DOWN

@2


@3
MOV LAST RIGHT
MOV ANY RIGHT

@4
L: MOV ACC  RIGHT
   MOV LEFT RIGHT
S: MOV UP  ACC
   JGZ G
   JLZ L
   MOV -3  RIGHT
   JMP S
G: SWP
   MOV UP  ACC
   JEZ Z
N: MOV ACC RIGHT
   MOV UP  ACC
   JGZ N
Z: MOV -5  RIGHT
   SWP

@5
MOV LEFT RIGHT

@6
MOV LEFT DOWN

@7
   JMP S
G: SAV
   MOV RIGHT ACC
   JLZ L
   MOV ACC   DOWN
   MOV RIGHT NIL
L: SWP
   MOV ACC   DOWN
   MOV RIGHT DOWN
   MOV RIGHT DOWN
   MOV RIGHT DOWN
   MOV  0    DOWN
S: MOV RIGHT ACC
   JGZ G
   JRO ACC

@8
   MOV UP LAST
   MOV UP LAST
S: MOV UP ACC
   JGZ G
   MOV ACC ANY
   JRO ACC
G: SAV
   JMP M
N: MOV ACC ANY
M: MOV UP  ACC
   JGZ N
L: MOV -6  ANY
   SWP
   MOV ACC LAST