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