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