@1
MOV UP, ACC
SAV
SUB UP
SUB 1
MOV ACC, RIGHT
SWP
MOV ACC, RIGHT

@2
MOV LEFT, ACC
SAV
MOV LEFT, ACC
JEZ Q
K: MOV UP, NIL
SUB 1
JGZ K
Q: SWP
L: MOV UP, DOWN
ADD 1
JLZ L
MOV 0, DOWN
D: MOV UP, ACC
JNZ D

@6
MOV UP, DOWN

@9
MOV UP, DOWN
