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 High-Level Math 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 "SI" 02 "X?" 03 PROMPT 04 STO 02 05 STO 03 06 X^2 07 CHS 08 STO 00 09 1 10 STO 01 11 RCL 02 12 "SI<" 13 LBL 00 14 RCL 00 15 RCL 01 16 1 17 + 18 / 19 LASTX 20 XEQ 02 21 X#Y? 22 GTO 00 23 GTO d 24 LBL 02 25 1 26 + 27 STO 01 28 / 29 RCL 02 30 * 31 STO 02 32 RCL 01 33 / 34 + 35 RTN 36 LBL "CI" 37 "X?" 38 PROMPT 39 STO 03 40 X^2 41 CHS 42 STO 00 43 1 44 STO 02 45 0 46 STO 01 47 LASTX 48 XEQ 01 49 "CI<" 50 GTO 00 51 LBL 01 52 LN 53 .5772156649 54 + 55 RTN 56 LBL "EI" 57 "X?" 58 PROMPT 59 STO 03 60 STO 00 61 1 62 STO 02 63 0 64 STO 01 65 RCL 00 66 XEQ 01 67 LBL 03 68 RCL 00 69 RCL 01 70 XEQ 02 71 X#Y? 72 GTO 03 73 "EI<" 74 LBL d 75 FIX 02 76 RCL 03 77 ARCL X 78 ">=" 79 ARCL Y 80 AVIEW 81 STOP 82 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall