@1
A:MOV UP ACC
N:SAV
MOV ACC DOWN
MOV -1 ACC
L:ADD 1
JRO DOWN
SWP
JMP N
JEZ T
MOV -3 DOWN
ADD 1
JMP N
T:MOV 1 DOWN
JMP A

@4
A:MOV UP ACC
L:SUB DOWN
JGZ P
JEZ S
MOV 1 UP
MOV -2 DOWN
JMP A
P:MOV -1 UP
MOV -1 DOWN
JMP L
S:MOV 3 UP
MOV 1 DOWN
MOV UP DOWN

@8
A:MOV 1 ACC
I:ADD 1
L:MOV ACC UP
JRO UP
MOV ACC DOWN
JRO UP
MOV 0 DOWN
