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