@1
MOV UP ACC
MOV ACC RIGHT
MOV ACC RIGHT

@2
MOV LEFT ACC
MOV LEFT DOWN
JMP L
K: SWP
MOV LEFT DOWN
L: SAV
SUB LEFT
JLZ K
MOV LEFT ACC
MOV ACC DOWN
JNZ L
MOV -998 DOWN
SWP
MOV ACC DOWN

@3
L: SUB RIGHT
JLZ L
SUB 999
MOV RIGHT DOWN
MOV ACC DOWN
MOV 0 ACC

@5
MOV RIGHT NIL
MOV 1 RIGHT
S: MOV UP RIGHT
MOV UP ACC
L: ADD RIGHT
MOV ACC RIGHT
JLZ L
ADD 1
MOV ACC DOWN
JMP S

@6
MOV ACC LEFT
ADD 1
JRO LEFT
MOV LEFT ACC
