@1
MOV UP,ACC
MOV ACC,DOWN
MOV ACC,RIGHT

@2
MOV LEFT,ACC
JNZ K
MOV -999,DOWN
K: MOV ACC,DOWN

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

@6
L: SUB LEFT
JLZ U
ADD UP
JGZ L
ADD 999
MOV ACC,DOWN
U: MOV UP,ACC

@8
S: MOV 999,ACC
L: SUB UP
JGZ U
ADD UP
JMP L
U: SAV
MOV UP,ACC
JNZ L
SWP
MOV ACC,DOWN

@9
MOV UP,DOWN
