@0
MOV UP, RIGHT

@1
MOV LEFT, ACC
MOV ACC, DOWN
MOV LEFT, DOWN
MOV LEFT, DOWN
L: MOV ACC, RIGHT
JMP L

@2
MOV UP, ACC
SUB LEFT
MOV ACC, DOWN

@5
MOV UP, ACC
SAV
SUB UP
SWP
SUB UP
MOV ACC, RIGHT
SWP
L: MOV ACC, RIGHT
JMP L

@6
MOV LEFT, DOWN
P: MOV UP, ACC
MOV 999, DOWN
JNZ P
R: MOV UP, ACC
MOV 999, DOWN
D: ADD LEFT
JEZ Q
SUB LEFT
JEZ R
JMP P
Q: MOV UP, ACC
MOV ACC, DOWN
JNZ P
JMP D

@10
MOV UP, ACC
SAV
L: ADD UP
JEZ Y
MOV 0, DOWN
T: SWP
SAV
JMP L
Y: MOV 1, DOWN
JMP T
