@1
MOV UP, DOWN

@5
MOV UP, ACC
MOV ACC, RIGHT
MOV ACC, DOWN
MOV ACC, DOWN

@6
MOV LEFT, ACC
MOV ACC, DOWN
MOV ACC, DOWN

@8
S0: MOV 999, ACC
S: SAV
L: SUB UP
JLZ K
MOV UP, ACC
JNZ S
SWP
MOV ACC, DOWN
JMP S0
K: ADD UP
JMP L

@9
L: SAV
SUB UP
JLZ N
MOV UP, ACC
JNZ K
SWP
MOV ACC, DOWN
SWP
JMP L
N: MOV UP, ACC
JMP L
K: SWP
