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 "NORMAL" 02 CF 00 03 CF 01 04 CF 02 05 SF 21 06 .2316419 07 STO 02 08 1.330274429 09 STO 03 10 -1.821255978 11 STO 04 12 1.781477937 13 STO 05 14 -.356563782 15 STO 06 16 .31938153 17 STO 07 18 2.515517 19 STO 09 20 .802853 21 STO 10 22 .010328 23 STO 11 24 1.432788 25 STO 12 26 .189269 27 STO 13 28 .001308 29 STO 14 30 CLX 31 RTN 32 LBL A 33 STO 00 34 X^2 35 2 36 / 37 CHS 38 E^X 39 PI 40 2 41 * 42 SQRT 43 / 44 STO 01 45 FS? 02 46 RTN 47 "F" 48 GTO 09 49 LBL B 50 STO 00 51 SF 02 52 XEQ A 53 CF 02 54 RCL 00 55 X<0? 56 GTO 01 57 SF 00 58 LBL 13 59 1 60 RCL 00 61 RCL 02 62 * 63 + 64 1/X 65 ENTER 66 ENTER 67 ENTER 68 RCL 03 69 * 70 RCL 04 71 + 72 * 73 RCL 05 74 + 75 * 76 RCL 06 77 + 78 * 79 RCL 07 80 + 81 * 82 RCL 01 83 * 84 "Q" 85 FS? 00 86 GTO 09 87 RTN 88 LBL 01 89 CF 00 90 RCL 00 91 CHS 92 STO 00 93 XEQ 13 94 1 95 X<>Y 96 - 97 STO 08 98 "Q" 99 GTO 09 100 LBL C 101 X<0? 102 GTO 00 103 1 104 X<=Y? 105 GTO 00 106 RDN 107 .5 108 X<>Y 109 X>Y? 110 XEQ 08 111 X^2 112 1/X 113 LN 114 SQRT 115 STO 15 116 RCL 11 117 * 118 RCL 10 119 + 120 RCL 15 121 * 122 RCL 09 123 + 124 RCL 15 125 RCL 14 126 * 127 RCL 13 128 + 129 RCL 15 130 * 131 RCL 12 132 + 133 RCL 15 134 * 135 1 136 + 137 / 138 RCL 15 139 X<>Y 140 - 141 FS? 01 142 CHS 143 GTO 10 144 LBL 08 145 SF 01 146 1 147 - 148 CHS 149 RTN 150 LBL 00 151 0 152 / 153 LBL 10 154 "X" 155 LBL 09 156 CF 02 157 CF 01 158 CF 00 159 "=" 160 ARCL X 161 AVIEW 162 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall