@0
MOV UP RIGHT

@1
MOV UP   RIGHT
MOV LEFT RIGHT
MOV -999 RIGHT

@2
   MOV UP    ACC
   MOV RIGHT DOWN
   JMP E

N: MOV LEFT DOWN
E: SUB DOWN
   JLZ L
G: MOV 0 DOWN
   JMP A

L: MOV ACC DOWN
   NEG
A: ADD DOWN
   JNZ N

@3
MOV UP LEFT

@4


@5


@6
MOV UP  ACC
MOV ACC UP
MOV ACC LAST
ADD UP
MOV ACC UP
MOV ACC ANY

@7


@8


@9
S: MOV UP ACC
   SAV
D: SUB UP
   JLZ S
G: ADD UP
   JGZ D

L: SWP
   MOV ACC DOWN

   MOV UP  NIL

@10