HP-67 Base Conversion from HP Key Notes

[Thomas Klemm]

Here's the version of the program that implements the trick mentioned in my previous post:

Code:

001 *LBL A
002  STO 0
003  RDN
004  ENTER
005  GSB 3
006  GSB 0
007  RCL 0
008  GSB 3
009  RCL 0
010 *LBL 0
011  STO 1
012  STO 5
013  RDN
014  STO 2
015  STO- 5
016  RDN
017  STO 3
018  STO 4
019 *LBL 1
020  RCL 3
021  X=0?
022  GTO 2
023  RCL 1
024  /
025  INT
026  STO 3
027  RCL 5
028  *
029  STO- 4
030  RCL 2
031  STO* 5
032  GTO 1
033 *LBL 2
034  RCL 4
035  RTN
036 *LBL 3
037  1
038  -
039  LOG
040  INT
041  1
042  +
043  10^x
044  RTN

Example: 325₈ to base 3

325 ENTER
8 ENTER
3 A

21220


I tested the original program using an HP-11C and got 20219. This is probably due to this line:

Code:

034 INT

After changing it to RND (rounding) I got the correct result.
The program above isn't affected by this rounding problem.

Cheers
Thomas