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