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