This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Standard Pac. This program was ported to the HP-41C by reading with the HP-41C card reader and the card reader may be required for operation of this program. This program was entered and uploaded by Tony Duell.
This program is supplied without representation or warranty of any kind. Tony Duell, Hewlett Packard and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.
Documentation Information (CD or source code)
How to get this Program to your Calculator (via
HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download
LINE KEYS 01 LBL "TBLT67" 02 LBL 15 03 LBL a 04 CF 02 05 7CLREG 06 7P<>S 07 7CLREG 08 INT 09 1 10 X>Y? 11 GTO 02 12 CLX 13 24 14 X<>Y 15 X<=Y? 16 GTO 00 17 GTO 07 18 LBL 00 19 1 20 % 21 + 22 STO 25 23 0 24 ENTER 25 ENTER 26 ENTER 27 RTN 28 LBL 10 29 LBL A 30 FS?C 02 31 XEQ 01 32 ST+ IND 25 33 ST+ 00 34 X<>Y 35 RDN 36 + 37 LASTX 38 FS? 00 39 7PRTX 40 7DSZ 41 RTN 42 FS? 00 43 ADV 44 SF 02 45 RCL 25 46 E4 47 % 48 + 49 STO 25 50 CLX 51 ENTER 52 R^ 53 FS? 00 54 7PRTX 55 FS? 00 56 ADV 57 RTN 58 LBL 01 59 0 60 ENTER 61 ENTER 62 R^ 63 RTN 64 LBL 11 65 LBL B 66 FS?C 02 67 GTO 01 68 7ISZ 69 - 70 LASTX 71 ST- 00 72 ST- IND 25 73 FS? 00 74 ADV 75 RTN 76 LBL 01 77 R^ 78 RCL 25 79 FRC 80 1 81 + 82 STO 25 83 RDN 84 - 85 LASTX 86 ST- 00 87 ST- IND 25 88 FS? 00 89 ADV 90 RTN 91 LBL 16 92 LBL b 93 FS? 00 94 GTO 00 95 SF 00 96 CLX 97 ADV 98 1 99 RTN 100 LBL 00 101 CF 00 102 CLX 103 0 104 RTN 105 LBL 12 106 LBL C 107 CF 01 108 LBL 06 109 ADV 110 RCL 25 111 FRC 112 E4 113 % 114 X<> 25 115 7DSP2 116 LBL 04 117 RCL IND 25 118 FS? 01 119 XEQ 14 120 7PRTX 121 RDN 122 7DSZ 123 GTO 04 124 ADV 125 RCL 00 126 FS? 01 127 XEQ 14 128 7PRTX 129 RDN 130 STO 25 131 R^ 132 CF 01 133 RTN 134 LBL 13 135 LBL D 136 SF 01 137 GTO 06 138 LBL 14 139 LBL E 140 RCL 00 141 / 142 E2 143 * 144 RTN 145 LBL 02 146 RDN 147 LBL 07 148 PSE 149 GTO 07 150 STOP 151 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall