@1
S: MOV UP, ACC
MOV ACC, DOWN
JEZ S
L: MOV ACC, DOWN
SUB 1
JNZ L

@4
S: MOV UP, ACC
JEZ O
SAV
MOV 0, ACC
L: ADD UP
SWP
SUB 1
JEZ D
SWP
JMP L
D: SWP
O: MOV ACC, DOWN

@8
MOV UP, DOWN
