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