@1
MOV UP, DOWN

@2
MOV UP, DOWN

@4
S: MOV UP, ACC
L: SUB RIGHT
JLZ F
MOV 1, DOWN
MOV 1, RIGHT
JMP L
F: MOV 0, RIGHT
ADD RIGHT
MOV ACC, RIGHT
MOV -999, DOWN
JMP S

@5
S: MOV UP, ACC
SAV
L: SWP
MOV ACC, LEFT
SWP
MOV LEFT, ACC
JGZ L
SWP
MOV ACC, LEFT
MOV LEFT, ACC
MOV ACC, DOWN
JMP S

@7
L: ADD UP
JGZ L
ADD 999
MOV ACC, DOWN
MOV 0, ACC
JMP L

@8
MOV UP, DOWN
