@0


@1
 MOV UP ANY

@2
   MOV UP   DOWN
   MOV UP   DOWN
   MOV UP   ACC
   JNZ N
Z: MOV LEFT ACC
   ADD RIGHT
   MOV ACC  DOWN
   MOV UP   DOWN
   MOV UP   DOWN
   MOV UP   ACC
   JEZ Z
N: JGZ G
   JRO RIGHT
G: MOV LEFT NIL
   MOV ANY  DOWN

@3
 MOV UP DOWN
 MOV UP DOWN
 MOV UP ACC

  JNZ N
   MOV 99 ACC

N: MOV ACC LEFT

@4


@5
 MOV UP DOWN
 MOV UP RIGHT
 MOV -1 DOWN

@6
   MOV ANY   DOWN
   MOV UP    DOWN
   MOV UP    ACC
   JNZ N
Z: MOV RIGHT ACC
   ADD LEFT
   MOV ACC   DOWN
   MOV UP    DOWN
   MOV UP    DOWN
   MOV UP    ACC
   JEZ Z
N: JGZ G
   JRO RIGHT
G: MOV LEFT  NIL
   MOV ANY   DOWN

@7
 MOV LAST LEFT
 MOV ANY  DOWN

@8
 MOV RIGHT NIL
 MOV UP RIGHT
 JRO UP

@9
   MOV UP   LAST
   MOV ANY  ANY
   MOV UP   ACC
   JNZ N
Z: MOV LEFT ACC
   ADD RIGHT
   MOV ACC  ANY
   MOV UP   DOWN
   MOV UP   DOWN
   MOV UP   ACC
   JEZ Z
N: JGZ G
   JRO RIGHT
G: MOV LEFT NIL
   MOV ANY  ANY

@10
N: MOV ACC LEFT
   MOV UP ACC

   JNZ N

  MOV 99 ACC