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