@0


@1
SAV
ADD UP
MOV ACC RIGHT
SWP
SUB 8

@2
S:MOV LEFT ACC
JGZ L
G:MOV UP ACC
SUB DOWN
JLZ LL
MOV -999 DOWN
JMP S
L:MOV DOWN NIL
MOV UP NIL
LL:MOV ACC DOWN

@3


@4


@5
MOV ACC UP
MOV ACC DOWN
MOV UP DOWN
ADD 8

@6


@7
MOV UP ACC
ADD UP
JGZ G
SUB ACC
G:MOV ACC DOWN

@8