The Museum of HP Calculators


Frequency Response of a Transfer Function for the HP-41C/CV/CX

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

Program Listing

LINE  KEYS
 01 LBL "FREQ"
 02 FIX 02
 03 "K1=?"
 04 PROMPT
 05 STO 01
 06 "Z2=?"
 07 PROMPT
 08 STO 02
 09 "N3=?"
 10 PROMPT
 11 STO 03
 12 "Z4=?"
 13 PROMPT
 14 STO 04
 15 "Z5=?"
 16 PROMPT
 17 STO 05
 18 "Z6=?"
 19 PROMPT
 20 STO 06
 21 "W7=?"
 22 PROMPT
 23 STO 07
 24 LBL "W2"
 25 "W=?"
 26 PROMPT
 27 STO 08
 28 RCL 06
 29 RCL 07
 30 /
 31 2
 32 *
 33 RCL 08
 34 *
 35 1
 36 RCL 08
 37 RCL 07
 38 /
 39 X^2
 40 -
 41 R-P
 42 RCL 05
 43 RCL 08
 44 *
 45 1
 46 R-P
 47 XEQ 01
 48 RCL 04
 49 RCL 08
 50 *
 51 1
 52 R-P
 53 XEQ 01
 54 RCL 08
 55 RCL 03
 56 Y^X
 57 *
 58 X<>Y
 59 RCL 03
 60 90
 61 *
 62 +
 63 CHS
 64 X<>Y
 65 1/X
 66 RCL 02
 67 RCL 08
 68 *
 69 RCL 01
 70 *
 71 RCL 01
 72 R-P
 73 XEQ 01
 74 "G<JW>="
 75 ARCL X
 76 AVIEW
 77 STOP
 78 STO 09
 79 X<>Y
 80 "[angle]G<JW>="  ;"\0DG<JW>="
 81 ARCL X
 82 AVIEW
 83 STOP
 84 RCL 09
 85 LOG
 86 "LOG G="
 87 ARCL X
 88 AVIEW
 89 STOP
 90 LBL 01
 91 X<>Y
 92 RDN
 93 *
 94 RDN
 95 +
 96 R^
 97 RTN
 98 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall