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