set I5, 29 bsr fib print I5 print "\n" end fib: le I5, 1, L0 sub I0, I5, 1 save I5 set I5, I0 bsr fib restore I0 sub I1, I0, 2 save I5 set I5, I1 bsr fib restore I0 add I5, I5, I0 ret L0: set I5, 1 ret