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 Control 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 "BODE1" 02 CLRG 03 "FREQ.?" 04 PROMPT 05 STO 06 06 2 07 * 08 PI 09 * 10 STO 05 11 1 12 STO 01 13 "N?" 14 PROMPT 15 1 16 - 17 1000 18 / 19 STO 00 20 LBL B 21 "Z?" 22 PROMPT 23 "ZP?" 24 PROMPT 25 RCL 03 26 1 27 + 28 STO 03 29 STO 07 30 RDN 31 RCL 05 32 + 33 X<>Y 34 R-P 35 XEQ 00 36 ISG 00 37 GTO B 38 "M?" 39 PROMPT 40 1 41 - 42 1000 43 / 44 STO 00 45 LBL C 46 "P?" 47 PROMPT 48 "PP?" 49 PROMPT 50 RCL 04 51 1 52 - 53 STO 04 54 STO 07 55 RDN 56 RCL 05 57 + 58 CHS 59 X<>Y 60 R-P 61 1/X 62 XEQ 00 63 ISG 00 64 GTO C 65 0 66 "K?" 67 PROMPT 68 R-P 69 XEQ 00 70 RCL 01 71 LOG 72 20 73 * 74 FIX 01 75 "dB=" 76 XEQ d 77 RCL 01 78 SCI 04 79 "MAG=" 80 XEQ d 81 RCL 02 82 FIX 01 83 "=" ;"\0D=" 84 LBL d 85 ARCL X 86 AVIEW 87 STOP 88 RTN 89 LBL 00 90 ST* 01 91 RDN 92 RCL 02 93 + 94 1 95 P-R 96 R-P 97 RDN 98 STO 02 99 RTN 100 END
Go back to the HP-41 software library
Go back to the general software library
Go
back to the main exhibit hall