This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Space Science 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.
Note: This is the original HP-67 version (as translated by the HP-41C card reader.) Tony has also provided a version that was modified for the HP-41C
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 "BINSTR" 02 LBL 10 03 LBL A 04 STO 20 05 RCL 02 06 - 07 2 08 * 09 PI 10 * 11 RCL 01 12 / 13 STO 08 14 RAD 15 LBL 00 16 ENTER 17 SIN 18 RCL 03 19 * 20 RCL 08 21 + 22 - 23 LASTX 24 ENTER 25 RDN 26 / 27 ABS 28 E-5 29 X<=Y? 30 SF 02 31 R^ 32 FS?C 02 33 GTO 00 34 ENTER 35 COS 36 RCL 03 37 * 38 1 39 X<>Y 40 - 41 RCL 04 42 * 43 STO 08 44 RDN 45 2 46 / 47 TAN 48 DEG 49 1 50 RCL 03 51 + 52 1 53 RCL 03 54 - 55 / 56 SQRT 57 * 58 ATAN 59 2 60 * 61 RCL 05 62 + 63 ENTER 64 TAN 65 RCL 06 66 COS 67 * 68 ATAN 69 X<>Y 70 COS 71 RCL 08 72 * 73 X<>Y 74 COS 75 LASTX 76 RDN 77 / 78 R^ 79 RCL 07 80 + 81 RDN 82 X<0? 83 SF 02 84 ABS 85 STO 21 86 CLX 87 180 88 R^ 89 FS?C 02 90 + 91 360 92 X>Y? 93 CLX 94 - 95 STO 22 96 RCL 21 97 7PRTX 98 X<>Y 99 RTN 100 LBL 11 101 LBL B 102 CF 22 103 7 104 STO 25 105 0 106 7PRTX 107 MRG 108 PSE 109 FS?C 22 110 RTN 111 1 112 STO 25 113 LBL 01 114 CF 22 115 PSE 116 FS?C 22 117 GTO 02 118 STOP 119 LBL 02 120 STO IND 25 121 7ISZ 122 7 123 RCL 25 124 X<=Y? 125 GTO 01 126 CLX 127 WDTA 128 RTN 129 LBL 13 130 LBL D 131 7P<>S 132 RTN 133 LBL 12 134 LBL C 135 STO 25 136 GTO 01 137 LBL 14 138 LBL E 139 X<>Y 140 RTN 141 STOP 142 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall