.s
S 100
I 101
.a 0
.c
st S r0
ld r1 #1
st I r1
:loop ld r2 I
sub r0 r2 #10
jmp GT exit
ld r1 S
ld r2 I
add r1 r1 r2
st S r1
add r2 r2 #1
st I r2
jmp always loop
:exit trap stop r0
.e
