Programming Exercise (HP-15C, 15C LE - and others)

[Dave Britten]

Got a TI-95 in the mail today, and (naturally) had a go at this with the "new" machine:

Code:

LBL 00
10000
STO N
1
STO S
0
STO X
LBL 01
RCL N
1/x
*
RCL S
+/-
STO S
=
ST+ X
DSZ N
GTL 01
RCL X
HLT

This ran in just a hair under 13 minutes. (Make sure you ASM it.)

Some observations:
The TI-95 sort of reminds me of an algebraic HP-41C. The ASM instruction is interesting in that it translates all label branches (GTL, SBL) into absolute addresses (GTO, SBR) in order to improve speed in programs that do a lot of tight looping and branching. You can reverse the process with INV ASM to make editing easier. The STO/RCL operations are one byte smaller when using the alpha-named registers, as opposed to their numeric names, but there doesn't seem to be any meaningful difference in execution speed.