@0


@1
   MOV UP  NIL
0: MOV -5  LAST
S: MOV -1  ACC
   SUB UP
N: JGZ 24
   MOV -99 ANY
   JLZ 0
1: MOV 1   RIGHT
   JMP S

24:MOV ACC RIGHT
   MOV -1  ACC
   SUB UP
   MOV 99  RIGHT
   JMP N

@2
   JGZ S

0: MOV UP   ACC
   MOV ACC  ANY
S: SWP
D: MOV LEFT DOWN
   MOV ACC  DOWN
   JRO LEFT

1: MOV UP   ACC
   SWP
   MOV ACC  LAST
   JMP D

24:MOV UP   ACC

@3


@4


@5


@6
MOV UP DOWN

@7


@8


@9
   SWP
   MOV LAST ACC
M: MOV ANY  DOWN
J: JRO UP
2: JMP 2B
3: SAV
4: SWP
   MOV ACC DOWN
   MOV UP  ACC
   JMP J

2B:SWP
   JMP M

@10