This program is Copyright © HP and is used here by permission. It was originally printed in the Control Solutions 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 "REG 2" 02 "A11?" 03 PROMPT 04 STO 01 05 "A12?" 06 PROMPT 07 STO 02 08 "A21?" 09 PROMPT 10 STO 03 11 "A22?" 12 PROMPT 13 STO 04 14 "b" 15 PROMPT 16 STO 05 17 LBL C 18 "Q11?" 19 PROMPT 20 "Q12?" 21 PROMPT 22 "Q22?" 23 PROMPT 24 "R?" 25 PROMPT 26 STO 07 27 / 28 STO 08 29 LASTX 30 * 31 RCL 01 32 * 33 RCL 02 34 / 35 X<>Y 36 2 37 * 38 - 39 RCL 01 40 * 41 RCL 02 42 / 43 + 44 RCL 07 45 / 46 STO 07 47 RCL 02 48 RCL 03 49 * 50 RCL 01 51 RCL 04 52 * 53 - 54 STO 06 55 RCL 07 56 SQRT 57 RCL 05 58 * 59 RCL 06 60 R-P 61 RCL 06 62 + 63 STO 06 64 2 65 * 66 RCL 05 67 X^2 68 RCL 08 69 * 70 + 71 SQRT 72 RCL 01 73 RCL 04 74 + 75 STO 07 76 R-P 77 RCL 07 78 + 79 STO 07 80 RCL 01 81 * 82 RCL 06 83 + 84 STO 06 85 RCL 05 86 / 87 "C1=" 88 XEQ d 89 RCL 07 90 RCL 02 91 * 92 STO 07 93 RCL 05 94 / 95 "C2=" 96 XEQ d 97 GTO C 98 LBL A 99 RCL 02 100 RCL 03 101 RCL 06 102 - 103 RCL 04 104 RCL 07 105 - 106 RCL 01 107 "A11=" 108 XEQ d 109 R^ 110 "A12=" 111 XEQ d 112 R^ 113 "A21=" 114 XEQ d 115 R^ 116 "A22=" 117 LBL d 118 FIX 03 119 ARCL X 120 AVIEW 121 STOP 122 RTN 123 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall