This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 M.E. Pac 1. 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 "HXPE67" 02 LBL 15 03 LBL a 04 STO 02 05 RTN 06 LBL 16 07 LBL b 08 * 09 STO 03 10 RTN 11 LBL 17 12 LBL c 13 STO 01 14 RTN 15 LBL 18 16 LBL d 17 * 18 STO 04 19 RTN 20 LBL 19 21 LBL e 22 FS? 01 23 GTO 00 24 0 25 SF 01 26 RTN 27 LBL 00 28 1 29 CF 01 30 RTN 31 LBL 10 32 LBL A 33 STO 05 34 XEQ 01 35 XEQ 00 36 STO 08 37 RTN 38 LBL 11 39 LBL B 40 STO 08 41 XEQ 01 42 XEQ 02 43 RCL 07 44 * 45 RCL 01 46 RCL 02 47 - 48 * 49 STO 06 50 RTN 51 LBL 12 52 LBL C 53 STO 06 54 RCL 03 55 / 56 RCL 02 57 + 58 RTN 59 LBL 13 60 LBL D 61 RCL 02 62 - 63 RCL 03 64 * 65 RCL 04 66 / 67 RCL 01 68 - 69 CHS 70 RTN 71 LBL 14 72 LBL E 73 STO 05 74 XEQ 01 75 RCL 04 76 RCL 07 77 / 78 RCL 01 79 RCL 05 80 - 81 * 82 RCL 01 83 RCL 02 84 - 85 / 86 STO 05 87 RTN 88 LBL 00 89 X#0? 90 GTO 00 91 1 92 RCL 05 93 - 94 LN 95 CHS 96 RTN 97 LBL 02 98 X#0? 99 GTO 02 100 1 101 RCL 08 102 CHS 103 E^X 104 - 105 RTN 106 LBL 01 107 RCL 03 108 RCL 04 109 X>Y? 110 X<>Y 111 STO 07 112 X<>Y 113 / 114 STO 00 115 RTN 116 STOP 117 STOP 118 STOP 119 STOP 120 STOP 121 STOP 122 STOP 123 STOP 124 LBL 00 125 XEQ 06 126 2 127 * 128 RCL 06 129 2 130 RCL 05 131 / 132 + 133 RCL 09 134 - 135 / 136 CHS 137 1 138 + 139 LN 140 RCL 06 141 / 142 CHS 143 RCL 07 144 / 145 LASTX 146 ENTER 147 * 148 * 149 RTN 150 LBL 02 151 XEQ 06 152 RCL 08 153 RCL 07 154 / 155 RCL 06 156 * 157 CHS 158 E^X 159 1 160 X<>Y 161 + 162 1 163 LASTX 164 - 165 / 166 RCL 06 167 * 168 RCL 09 169 + 170 2 171 X<>Y 172 / 173 RTN 174 LBL 06 175 RCL 00 176 1 177 + 178 STO 09 179 RCL 00 180 X^2 181 1 182 + 183 SQRT 184 STO 06 185 RTN 186 STOP 187 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall