@1
S: MOV UP, ACC
L: MOV ACC, DOWN
SAV
MOV DOWN, ACC
JEZ D
MOV DOWN, ACC
SUB 1
JEZ X
MOV 3, DOWN
SWP
JMP L
D: MOV DOWN, ACC
MOV 5, DOWN
JMP L
X: MOV 7, DOWN

@4
MOV 0, ACC
SAV
MOV UP, ACC
C: MOV 1, DOWN
SWP
ADD 1
SWP
SUB DOWN
JGZ C
MOV ACC, UP
SWP
MOV ACC, UP
MOV UP, DOWN

@8
R: MOV 2, ACC
J: JRO UP
MOV ACC, UP
JMP J
ADD 1
JMP J
MOV ACC, DOWN
JMP J
MOV 0, DOWN
