The Museum of HP Calculators

Butterworth Filter Design for the HP-41C/CV/CX

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 "BUT"
 02 ENG 03
 03 RAD
 04 "R=?"
 05 PROMPT
 06 STO 05
 07 "FO=?"
 08 PROMPT
 09 XEQ 10
 10 STO 07
 11 STOP
 12 LBL "LP"
 13 1
 14 GTO 01
 15 LBL "HP"
 16 2
 17 GTO 01
 18 LBL "BP"
 19 3
 20 GTO 01
 21 LBL "BE"
 22 4
 23 LBL 01
 24 STO 14
 25 3
 26 X>Y?
 27 GTO 00
 28 "BW=?"
 29 PROMPT
 30 XEQ 10
 31 STO 08
 32 LBL 00
 33 "F1=?"
 34 PROMPT
 35 "A=?"
 36 PROMPT
 37 10
 38 /
 39 10^X
 40 2
 41 *
 42 1
 43 -
 44 LN
 45 STO 12
 46 X<>Y
 47 XEQ 10
 48 XEQ 07
 49 RCL 12
 50 X<>Y
 51 LN
 52 ABS
 53 /
 54 1
 55 +
 56 2
 57 /
 58 INT
 59 STO 15
 60 STO 10
 61 "N="
 62 ARCL X
 63 AVIEW
 64 STOP
 65 LBL 08
 66 RCL 15
 67 RCL 10
 68 -
 69 1
 70 +
 71 STO 09
 72 2
 73 *
 74 1
 75 -
 76 PI
 77 *
 78 2
 79 /
 80 RCL 15
 81 /
 82 SIN
 83 2
 84 *
 85 LBL 09
 86 STO 11
 87 RCL 05
 88 -1
 89 RCL 09
 90 PSE
 91 Y^X
 92 Y^X
 93 *
 94 GTO IND 14
 95 LBL 01
 96 RCL 07
 97 /
 98 XEQ 06
 99 GTO 00
100 LBL 02
101 RCL 07
102 *
103 1/X
104 XEQ 06
105 CHS
106 GTO 00
107 LBL 03
108 SF 01
109 RCL 08
110 /
111 XEQ 06
112 XEQ 00
113 ABS
114 1/X
115 RCL 07
116 X^2
117 /
118 XEQ 06
119 CHS
120 GTO 00
121 LBL 04
122 SF 01
123 RCL 08
124 *
125 RCL 07
126 X^2
127 /
128 XEQ 06
129 XEQ 00
130 ABS
131 RCL 07
132 X^2
133 *
134 1/X
135 XEQ 06
136 CHS
137 LBL 00
138 "L="
139 X<0?
140 "C="
141 ABS
142 ARCL X
143 AVIEW
144 STOP
145 FS?C 01
146 RTN
147 DSE 10
148 GTO 08
149 RTN
150 LBL 07
151 STO 11
152 GTO IND 14
153 LBL 04
154 XEQ 03
155 GTO 00
156 LBL 02
157 XEQ 01
158 LBL 00
159 1/X
160 CHS
161 GTO 05
162 LBL 01
163 RCL 11
164 RCL 07
165 /
166 GTO 05
167 LBL 03
168 RCL 11
169 X^2
170 RCL 07
171 X^2
172 -
173 RCL 11
174 /
175 RCL 08
176 /
177 LBL 05
178 ABS
179 STO 13
180 RTN
181 LBL 06
182 -1
183 RCL 09
184 Y^X
185 *
186 RTN
187 LBL 10
188 2
189 *
190 PI
191 *
192 RTN
193 END

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