@2
D: MOV RIGHT ACC
MOV ACC DOWN
JNZ D
Q: MOV RIGHT ACC
JEZ Q
ADD 200
L: SAV
SUB DOWN
JLZ E
MOV ACC DOWN
SWP
JMP L
E: MOV 0 DOWN
JMP Q

@3
MOV UP LEFT

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

@5
A: MOV UP ACC
MOV ACC LEFT
JNZ A
S: MOV 0 DOWN
L: MOV LEFT UP
MOV UP ACC
JEZ R
SUB 200
MOV ACC LEFT
JMP L
R: MOV DOWN ACC
MOV ACC LEFT
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
