@5
MOV 0 DOWN
MOV 1 DOWN

@9
R: MOV 15 ACC
MOV UP DOWN
SWP
MOV ACC DOWN
SWP
P: MOV 3 DOWN
MOV 0 DOWN
SUB 1
JNZ P
MOV -1 DOWN
SWP
ADD 1
SAV
