@1
MOV UP, ACC
SAV
MOV ACC, RIGHT
MOV UP, ACC
L: SWP
JEZ D
SUB 1
SWP
SUB 1
JMP L
D: SWP
ADD 1
MOV ACC, RIGHT

@2
L: MOV LEFT, ACC
S: JEZ C
MOV UP, NIL
SUB 1
JNZ S
C: MOV LEFT, ACC
O: MOV UP, DOWN
SUB 1
JNZ O
MOV NIL, DOWN
D: MOV UP, ACC
JNZ D

@6
L: MOV UP, DOWN

@9
MOV UP, DOWN
