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