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 "PRXRT2" 02 LBL 10 03 LBL A 04 7CLREG 05 7P<>S 06 7CLREG 07 SF 02 08 7DSP0 09 4 10 STO 25 11 7PRTX 12 LBL 11 13 LBL B 14 7DSP0 15 RCL 25 16 STOP 17 7DSP3 18 7PRTX 19 FS?C 02 20 GTO 01 21 X<0? 22 XEQ 16 23 .999 24 X<>Y 25 X>Y? 26 GTO 06 27 E1- 28 XEQ 18 29 .2 30 GTO 19 31 LBL 01 32 X<0? 33 SF 00 34 E3 35 * 36 ST+ IND 25 37 7 38 RCL 25 39 X=Y? 40 GTO 17 41 GTO 11 42 LBL 06 43 9.999 44 X<>Y 45 X>Y? 46 GTO 07 47 E2- 48 XEQ 18 49 .3 50 GTO 19 51 LBL 07 52 99.999 53 X<>Y 54 X>Y? 55 GTO 08 56 E3- 57 XEQ 18 58 .4 59 GTO 19 60 LBL 08 61 E4- 62 XEQ 18 63 .5 64 GTO 19 65 LBL 16 66 LBL b 67 CHS 68 .4 69 XEQ 02 70 RDN 71 RTN 72 LBL 18 73 LBL d 74 * 75 GTO 02 76 LBL 19 77 LBL e 78 XEQ 02 79 CF 00 80 7ISZ 81 RCL 25 82 7DSP0 83 7PRTX 84 SF 02 85 GTO 11 86 RTN 87 LBL 17 88 LBL c 89 8 90 STO 25 91 7DSP0 92 7PRTX 93 SF 02 94 GTO 11 95 RTN 96 LBL 12 97 LBL C 98 STO 25 99 7DSP0 100 7PRTX 101 0 102 STO IND 25 103 SF 02 104 GTO 11 105 LBL 02 106 FS? 00 107 CHS 108 ST+ IND 25 109 RTN 110 STOP 111 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall