The Museum of HP Calculators


Aid to Root Locus Plots 2 - Complex Poles 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 "ROOTS 2"
 02 "Z1?"
 03 PROMPT
 04 STO 01
 05 "Z2?"
 06 PROMPT
 07 STO 02
 08 "P1?"
 09 PROMPT
 10 STO 03
 11 "P2?"
 12 PROMPT
 13 STO 04
 14 "A?"
 15 PROMPT
 16 STO 05
 17 "B?"
 18 PROMPT
 19 STO 06
 20 LBL A
 21 "a?"
 22 PROMPT
 23 "W?"
 24 PROMPT
 25 LBL B
 26 STO 08
 27 X<>Y
 28 STO 07
 29 RCL 05
 30 +
 31 X<>Y
 32 RCL 06
 33 +
 34 RCL 08
 35 RCL 06
 36 -
 37 R^
 38 R-P
 39 RDN
 40 RDN
 41 XEQ E
 42 RCL 04
 43 RCL 07
 44 +
 45 RCL 08
 46 XEQ E
 47 RCL 03
 48 RCL 07
 49 +
 50 RCL 08
 51 XEQ E
 52 RCL 07
 53 RCL 08
 54 XEQ E
 55 RCL 02
 56 XEQ D
 57 RCL 01
 58 XEQ D
 59 X<>Y
 60 STO 00
 61 180
 62 -
 63 ABS
 64 .01
 65 X>Y?
 66 GTO C
 67 RCL 00
 68 60
 69 /
 70 4
 71 -
 72 CHS
 73 RCL 08
 74 *
 75 STO 08
 76 RCL 07
 77 RCL 08
 78 GTO B
 79 LBL C
 80 FIX 03
 81 RCL Z
 82 "K="
 83 XEQ d
 84 RCL 08
 85 "W="
 86 XEQ d
 87 GTO A
 88 LBL d
 89 ARCL X
 90 AVIEW
 91 STOP
 92 RTN
 93 LBL D
 94 RCL 07
 95 +
 96 RCL 08
 97 X<>Y
 98 R-P
 99 X<>Y
100 RDN
101 /
102 RDN
103 -
104 CHS
105 R^
106 RTN
107 LBL E
108 X<>Y
109 R-P
110 X<>Y
111 RDN
112 *
113 RDN
114 +
115 R^
116 RTN
117 END

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