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