HP HP-67 - Page 252

248 Using the I-Register for Indirect Control
211
212 (1)
213 (9
214
215 [sTI
216 (0
217 B (9
218 (4
219 B0 @
220 (pavse]
—» 221 Q@ ]
| 222 Q)
I 223
| 224
Execution transferred | 001 B (0
—10 steps. I 002 [E8 (@ |infinite loop.
| 003 8 (@
I 004
| |00
L 006 B )
— (007 @@ @ |
008 [RTN
When the program is run, steps 212 through 215 store —10 in the
I-register. Thereafter, execution of the (@ instruction in step 007
causes the running program to jump back 10 steps and resume
execution with step 221 (that is, 007 — 10 + 224 = 221). Thus, an
infinite loop is set up that generates and displays the Fibonacci series
until you stop the program by pressing (or any key) from the
keyboard.
To load the complete program, you must first load the instructions
in steps 001 through 008, then go to step 210 and load the instructions
into steps 211 through 224. To load the program into the calculator: