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