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 Applied Stats 2 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 "ANVA8" 02 LBL A 03 CLRG 04 CF 00 05 CF 01 06 CF 02 07 2 08 ENTER 09 STOP 10 STO 08 11 Y^X 12 STO 00 13 STOP 14 STO 01 15 ADV 16 1 17 X=Y? 18 SF 01 19 XEQ 02 20 LBL 01 21 0 22 STO 02 23 FS? 01 24 GTO 04 25 LBL 03 26 STOP 27 ST+ 02 28 X^2 29 ST+ 03 30 GTO 03 31 LBL B 32 RCL 02 33 X^2 34 ST+ 09 35 LBL 04 36 RCL 02 37 FS? 01 38 STOP 39 STO IND 05 40 ISG 05 41 GTO 01 42 ADV 43 XEQ 08 44 SF 02 45 XEQ 09 46 CF 02 47 XEQ 08 48 SF 02 49 3 50 RCL 08 51 X=Y? 52 GTO 20 53 XEQ 09 54 CF 02 55 4 56 RCL 08 57 X=Y? 58 GTO 21 59 XEQ 08 60 SF 02 61 GTO 20 62 LBL 02 63 10 64 RCL 00 65 + 66 1000 67 / 68 11 69 + 70 FS? 02 71 GTO 10 72 STO 05 73 GTO 11 74 LBL 10 75 STO 06 76 LBL 11 77 RTN 78 LBL 05 79 45 80 RCL 00 81 + 82 1000 83 / 84 46 85 + 86 FS? 02 87 GTO 12 88 STO 06 89 GTO 13 90 LBL 12 91 STO 05 92 LBL 13 93 RTN 94 LBL 07 95 LBL 06 96 RCL IND 05 97 FS? 00 98 CHS 99 ISG 05 100 RCL IND 05 101 + 102 STO IND 06 103 ISG 06 104 1 105 ISG 05 106 GTO 06 107 RTN 108 LBL 08 109 XEQ 02 110 XEQ 05 111 XEQ 07 112 XEQ 02 113 SF 00 114 XEQ 07 115 CF 00 116 RTN 117 LBL 09 118 XEQ 02 119 XEQ 05 120 XEQ 07 121 XEQ 05 122 SF 00 123 XEQ 07 124 CF 00 125 RTN 126 LBL 21 127 XEQ 02 128 XEQ 05 129 LBL 25 130 RCL IND 05 131 STO IND 06 132 ISG 05 133 1 134 ISG 06 135 GTO 25 136 LBL 20 137 RCL 00 138 RCL 01 139 * 140 2 141 / 142 STO 04 143 RCL 00 144 RCL 01 145 * 146 STO 07 147 FS? 01 148 GTO 22 149 RCL 03 150 RCL 09 151 RCL 01 152 / 153 - 154 RCL 00 155 RCL 01 156 1 157 - 158 * 159 STO 13 160 / 161 STO 03 162 GTO 14 163 LBL 22 164 RCL 77 165 XEQ 15 166 RCL 76 167 XEQ 15 168 RCL 75 169 XEQ 15 170 RCL 74 171 XEQ 15 172 RCL 73 173 XEQ 15 174 RCL 72 175 XEQ 15 176 RCL 71 177 XEQ 15 178 RCL 69 179 XEQ 15 180 RCL 68 181 XEQ 15 182 RCL 67 183 XEQ 15 184 RCL 65 185 XEQ 15 186 RCL 61 187 XEQ 15 188 RCL 60 189 XEQ 15 190 RCL 59 191 XEQ 15 192 RCL 57 193 XEQ 15 194 RCL 53 195 XEQ 15 196 3 197 RCL 08 198 X=Y? 199 XEQ 16 200 4 201 RCL 08 202 X=Y? 203 XEQ 17 204 5 205 RCL 08 206 X=Y? 207 XEQ 18 208 LBL 14 209 "ANVA" 210 AVIEW 211 "A" 212 AVIEW 213 RCL 47 214 XEQ 19 215 RCL 47 216 XEQ 23 217 "B" 218 AVIEW 219 RCL 48 220 XEQ 19 221 RCL 48 222 XEQ 23 223 "C" 224 AVIEW 225 RCL 50 226 XEQ 19 227 RCL 50 228 XEQ 23 229 RCL 54 230 X=0? 231 GTO 24 232 "D" 233 AVIEW 234 XEQ 19 235 RCL 54 236 XEQ 23 237 RCL 62 238 X=0? 239 GTO 24 240 "E" 241 AVIEW 242 XEQ 19 243 RCL 62 244 XEQ 23 245 LBL 24 246 "AB" 247 AVIEW 248 RCL 49 249 XEQ 19 250 RCL 49 251 XEQ 23 252 "AC" 253 AVIEW 254 RCL 51 255 XEQ 19 256 RCL 51 257 XEQ 23 258 "BC" 259 AVIEW 260 RCL 52 261 XEQ 19 262 RCL 52 263 XEQ 23 264 RCL 55 265 X=0? 266 GTO 26 267 "AD" 268 AVIEW 269 XEQ 19 270 RCL 55 271 XEQ 23 272 "BD" 273 AVIEW 274 RCL 56 275 XEQ 19 276 RCL 56 277 XEQ 23 278 "CD" 279 AVIEW 280 RCL 58 281 XEQ 19 282 RCL 58 283 XEQ 23 284 RCL 63 285 X=0? 286 GTO 26 287 "AE" 288 AVIEW 289 XEQ 19 290 RCL 63 291 XEQ 23 292 "BE" 293 AVIEW 294 RCL 64 295 XEQ 19 296 RCL 64 297 XEQ 23 298 "CE" 299 AVIEW 300 RCL 66 301 XEQ 19 302 RCL 66 303 XEQ 23 304 "DE" 305 AVIEW 306 RCL 70 307 XEQ 19 308 RCL 70 309 XEQ 23 310 LBL 26 311 "ERR" 312 AVIEW 313 "D.L." 314 RCL 13 315 XEQ 11 316 "C.M." 317 RCL 03 318 XEQ 11 319 RTN 320 LBL 15 321 X^2 322 RCL 07 323 / 324 ST+ 10 325 RTN 326 LBL 16 327 1 328 STO 13 329 RCL 10 330 STO 03 331 RTN 332 LBL 17 333 RCL 10 334 5 335 STO 13 336 / 337 STO 03 338 RTN 339 LBL 18 340 RCL 10 341 16 342 STO 13 343 / 344 STO 03 345 RTN 346 LBL 19 347 RCL 04 348 / 349 "MOY" 350 XEQ 11 351 RTN 352 LBL 23 353 X^2 354 RCL 07 355 / 356 "CM" 357 XEQ 11 358 RCL 03 359 / 360 "F" 361 XEQ 11 362 RTN 363 LBL 11 364 "=" 365 ARCL X 366 AVIEW 367 RTN 368 XEQ "ANVA8" 369 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall