@1
D: MOV RIGHT ACC
MOV ACC DOWN
JNZ D
Q: MOV RIGHT ACC
ADD 200
L: SAV
SUB DOWN
JLZ D
SUB 200
MOV ACC DOWN
SWP
JMP L

@2
A: MOV RIGHT ACC
MOV ACC LEFT
JNZ A
Q: MOV RIGHT LEFT
R: MOV DOWN ACC
MOV ACC LEFT
JNZ R
JMP Q

@3
MOV UP LEFT

@4
MOV 0 LEFT
D: MOV UP ACC
MOV ACC LEFT
JNZ D
MOV LEFT NIL
L: MOV LEFT ACC
JEZ E
MOV ACC DOWN
JGZ N
NEG
N: MOV ACC UP
MOV UP DOWN
JMP L
E: MOV 999 UP
MOV 0 RIGHT

@5
S: MOV 0 DOWN
MOV LEFT NIL
R: MOV DOWN ACC
MOV ACC UP
JNZ R
JMP S

@7
L: MOV UP ACC
SAV
MOV UP ACC
JNZ N
SWP
NEG
JLZ P
MOV ACC DOWN
JMP L
N: SWP
P: MOV ACC RIGHT
JMP L
