@1
MOV UP, DOWN

@2
MOV UP, DOWN

@4
S: MOV UP, ACC
SAV
MOV 1, ACC
L: SWP
MOV ACC, RIGHT
SWP
SUB 1
JNZ L
MOV -999, RIGHT
MOV RIGHT, ACC
JNZ L

@5
MOV UP, ACC
SWP
L: ADD LEFT
JGZ L
ADD 999
SWP
SUB 1
JEZ D
SWP
MOV ACC, LEFT
SUB ACC
JMP L
D: SWP
MOV ACC, DOWN
MOV 0, LEFT

@7
MOV UP, DOWN
