define(`one_r',r1)
define(`i_r',r2)
define(`sum_r',r3)

word(sum_m,0)
word(zero_m,0)
word(one_m,1)
word(ten_m,10)

label(start)

   load(zero_m,sum_r)
   load(one_m,one_r)
   load(ten_m,i_r)

label(loop)
   add(sum_r,i_r,sum_r)
   sub(i_r,one_r,i_r)
   bgt0(i_r,loop)	

   store(sum_r,sum_m)

   print(sum_m)

   halt

end(start)