@1
MOV UP, RIGHT

@2
MOV LEFT, ACC
SAV
MOV UP, ACC
L: SWP
MOV ACC, DOWN
SWP
SUB 1
JGZ L
MOV 0, DOWN

@4
L: ADD RIGHT
JGZ L
ADD 999
MOV ACC, RIGHT
SUB ACC

@5
MOV UP, ACC
R: SWP
MOV UP, ACC
JEZ O
L: SWP
MOV ACC, LEFT
SWP
SUB 1
JGZ L
MOV -999, LEFT
MOV LEFT, ACC
JMP R
O: SWP
MOV ACC, DOWN

@7
MOV UP, DOWN
