16 files changed, 199 insertions, 294 deletions
diff --git a/filters/bandpass-help.pd b/filters/bandpass-help.pd
new file mode 100644
index 0000000..959fc26
--- /dev/null
+++ b/filters/bandpass-help.pd
@@ -0,0 +1,23 @@
+#N canvas 295 68 566 339 10;
+#X obj 77 199 print;
+#X floatatom 77 114 0 0 0 0 - - -;
+#X floatatom 168 114 0 0 0 0 - - -;
+#X msg 91 138 bang;
+#X text 139 93 bandwidth (0 - 100);
+#X text 75 226 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 76 12 Bandpass coefficients for biquad~;
+#X text 70 26 ===================================;
+#X text 6 320 (C) Guenter Geiger 2000;
+#X text 75 92 frequency;
+#X text 75 268 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X obj 77 160 bandpass 4000 33;
+#X obj 33 114 r doit;
+#X connect 1 0 11 0;
+#X connect 2 0 11 1;
+#X connect 2 0 3 0;
+#X connect 3 0 11 0;
+#X connect 11 0 0 0;
+#X connect 12 0 3 0;
diff --git a/filters/bandpass.pd b/filters/bandpass.pd
deleted file mode 100755
index 73cace4..0000000
--- a/filters/bandpass.pd
+++ /dev/null
@@ -1,38 +0,0 @@
-#N canvas 295 68 622 469 10;
-#X obj 77 199 print;
-#X floatatom 77 114 0 0 0;
-#X floatatom 139 114 0 0 0;
-#X msg 360 109 \; paint 0;
-#X obj 164 196 filtgain;
-#X msg 91 138 bang;
-#X text 139 93 bandwidth (0 - 100);
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which
-is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
-;
-#X text 358 25 click first;
-#X text 186 159 click on filtgain to view frequency plot;
-#X text 76 12 Bandpass coefficients for biquad~;
-#X text 70 26 ===================================;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients
-for biquad~;
-#X obj 77 160 bandpass 4000 33;
-#X obj 33 114 r doit;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X connect 1 0 24 0;
-#X connect 2 0 24 1;
-#X connect 2 0 5 0;
-#X connect 5 0 24 0;
-#X connect 24 0 0 0;
-#X connect 24 0 4 0;
-#X connect 25 0 5 0;
diff --git a/filters/equalizer-help.pd b/filters/equalizer-help.pd
new file mode 100644
index 0000000..2a80108
--- /dev/null
+++ b/filters/equalizer-help.pd
@@ -0,0 +1,27 @@
+#N canvas 212 148 577 304 10;
+#X obj 87 145 print;
+#X floatatom 87 77 0 0 0 0 - - -;
+#X floatatom 196 75 0 0 0 0 - - -;
+#X msg 101 101 bang;
+#X text 196 54 bandwidth (0 - 100);
+#X text 75 179 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 8 268 (C) Guenter Geiger 2000;
+#X text 85 55 frequency;
+#X text 75 221 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X floatatom 139 76 0 0 0 0 - - -;
+#X text 148 55 gain;
+#X text 71 26 ==============================================;
+#X text 76 12 Parametric Equalizer coefficients for biquad~;
+#X obj 87 123 equalizer 5000 70 8;
+#X obj 41 77 r doit;
+#X connect 1 0 13 0;
+#X connect 2 0 3 0;
+#X connect 2 0 13 2;
+#X connect 3 0 13 0;
+#X connect 9 0 3 0;
+#X connect 9 0 13 1;
+#X connect 13 0 0 0;
+#X connect 14 0 13 0;
diff --git a/filters/equalizer.pd b/filters/equalizer.pd
deleted file mode 100755
index 05f7c56..0000000
--- a/filters/equalizer.pd
+++ /dev/null
@@ -1,39 +0,0 @@
-#N canvas 561 126 620 459 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 186 112;
-#X msg 360 117 \; paint 0;
-#X obj 159 175 filtgain;
-#X msg 91 138 bang;
-#X text 186 91 bandwidth (0 - 100);
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 200 158 click on filtgain to view frequency plot;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X floatatom 129 113;
-#X text 138 92 gain;
-#X text 71 26 ==============================================;
-#X text 76 12 Parametric Equalizer coefficients for biquad~;
-#X obj 77 160 equalizer 5000 70 8;
-#X obj 31 114 r doit;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X connect 1 0 26 0;
-#X connect 2 0 5 0;
-#X connect 2 0 26 2;
-#X connect 5 0 26 0;
-#X connect 22 0 5 0;
-#X connect 22 0 26 1;
-#X connect 26 0 0 0;
-#X connect 26 0 4 0;
-#X connect 27 0 26 0;
diff --git a/filters/highpass-help.pd b/filters/highpass-help.pd
new file mode 100644
index 0000000..954b05c
--- /dev/null
+++ b/filters/highpass-help.pd
@@ -0,0 +1,23 @@
+#N canvas 365 183 559 332 10;
+#X obj 77 151 print;
+#X floatatom 77 83 0 0 0 0 - - -;
+#X floatatom 168 84 0 0 0 0 - - -;
+#X msg 91 107 bang;
+#X text 168 63 bandwidth (0 - 100);
+#X text 75 195 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 70 26 ===================================;
+#X text 3 308 (C) Guenter Geiger 2000;
+#X text 75 61 frequency;
+#X text 75 237 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X text 76 12 Highpass coefficients for biquad~;
+#X obj 77 129 highpass 4000 33;
+#X obj 34 82 r doit;
+#X connect 1 0 11 0;
+#X connect 2 0 3 0;
+#X connect 2 0 11 1;
+#X connect 3 0 11 0;
+#X connect 11 0 0 0;
+#X connect 12 0 11 0;
diff --git a/filters/highpass.pd b/filters/highpass.pd
deleted file mode 100755
index e953888..0000000
--- a/filters/highpass.pd
+++ /dev/null
@@ -1,35 +0,0 @@
-#N canvas 365 183 620 463 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 168 115;
-#X msg 360 109 \; paint 0;
-#X obj 159 175 filtgain;
-#X msg 91 138 bang;
-#X text 168 94 bandwidth (0 - 100);
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 182 148 click on filtgain to view frequency plot;
-#X text 70 26 ===================================;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X text 76 12 Highpass coefficients for biquad~;
-#X obj 77 160 highpass 4000 33;
-#X obj 34 113 r doit;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X connect 1 0 24 0;
-#X connect 2 0 5 0;
-#X connect 2 0 24 1;
-#X connect 5 0 24 0;
-#X connect 24 0 0 0;
-#X connect 24 0 4 0;
-#X connect 25 0 24 0;
diff --git a/filters/highshelf.pd b/filters/highshelf.pd
index be2a577..b2ab9f1 100755
--- a/filters/highshelf.pd
+++ b/filters/highshelf.pd
@@ -1,39 +1,27 @@
-#N canvas 310 193 620 455 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 186 112;
-#X msg 360 117 \; paint 0;
-#X obj 159 175 filtgain;
-#X msg 91 138 bang;
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 208 159 click on filtgain to view frequency plot;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X floatatom 129 113;
-#X text 138 92 gain;
-#X text 71 26 ==============================================;
-#X text 186 91 slope (0 - 100);
-#X text 76 12 Highshelf coefficients for biquad~;
-#X obj 77 160 highshelf 5000 70 100;
-#X obj 30 113 r doit;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X connect 1 0 26 0;
-#X connect 2 0 5 0;
-#X connect 2 0 26 2;
-#X connect 5 0 26 0;
-#X connect 21 0 5 0;
-#X connect 21 0 26 1;
-#X connect 26 0 0 0;
-#X connect 26 0 4 0;
-#X connect 27 0 26 0;
+#N canvas 310 193 553 339 10;
+#X obj 77 182 print;
+#X floatatom 77 114 0 0 0 0 - - -;
+#X floatatom 186 112 0 0 0 0 - - -;
+#X msg 91 138 bang;
+#X text 75 226 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 4 317 (C) Guenter Geiger 2000;
+#X text 75 92 frequency;
+#X text 75 268 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X floatatom 129 113 0 0 0 0 - - -;
+#X text 138 92 gain;
+#X text 71 26 ==============================================;
+#X text 186 91 slope (0 - 100);
+#X text 76 12 Highshelf coefficients for biquad~;
+#X obj 77 160 highshelf 5000 70 100;
+#X obj 30 113 r doit;
+#X connect 1 0 13 0;
+#X connect 2 0 3 0;
+#X connect 2 0 13 2;
+#X connect 3 0 13 0;
+#X connect 8 0 3 0;
+#X connect 8 0 13 1;
+#X connect 13 0 0 0;
+#X connect 14 0 13 0;
diff --git a/filters/hlshelf-help.pd b/filters/hlshelf-help.pd
new file mode 100644
index 0000000..91496f8
--- /dev/null
+++ b/filters/hlshelf-help.pd
@@ -0,0 +1,28 @@
+#N canvas 365 183 620 471 10;
+#X obj 38 182 print;
+#X floatatom 38 114 0 0 0 0 - - -;
+#X floatatom 71 115 0 0 0 0 - - -;
+#X text 37 12 Bandpass coefficients for biquad~;
+#X text 31 26 ===================================;
+#X text 7 313 (C) Guenter Geiger 2000;
+#X text 36 268 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X obj 38 160 hlshelf;
+#X floatatom 106 114 0 0 0 0 - - -;
+#X text 36 99;
+#X floatatom 173 114 0 0 0 0 - - -;
+#X floatatom 212 115 0 0 0 0 - - -;
+#X text 31 90 gain0;
+#X text 70 89 gain1;
+#X text 111 89 gain2;
+#X text 171 89 f-low;
+#X text 214 90 f-high;
+#X text 33 218 The hlshelf object creates filter coefficients for the
+biquad~ filter. The three shelfs of the filter are controlled through
+the gains \, the boundaries of the areas through f-low and f-high;
+#X connect 1 0 7 0;
+#X connect 2 0 7 1;
+#X connect 7 0 0 0;
+#X connect 8 0 7 2;
+#X connect 10 0 7 3;
+#X connect 11 0 7 4;
diff --git a/filters/hlshelf.pd b/filters/hlshelf.pd
deleted file mode 100755
index 0e5251d..0000000
--- a/filters/hlshelf.pd
+++ /dev/null
@@ -1,34 +0,0 @@
-#N canvas 365 183 620 471 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 139 114;
-#X msg 360 109 \; paint 0;
-#X obj 159 175 filtgain;
-#X text 139 93 bandwidth (0 - 100);
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 158 159 click on filtgain to view frequency plot;
-#X text 76 12 Bandpass coefficients for biquad~;
-#X text 70 26 ===================================;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X obj 77 61 r freq;
-#X obj 139 61 r bw;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; freq 4000 \; bw 33;
-#X obj 77 160 hlshelf;
-#X connect 1 0 26 0;
-#X connect 2 0 26 1;
-#X connect 23 0 1 0;
-#X connect 24 0 2 0;
-#X connect 26 0 0 0;
-#X connect 26 0 4 0;
diff --git a/filters/lowpass-help.pd b/filters/lowpass-help.pd
new file mode 100644
index 0000000..ca6b1cf
--- /dev/null
+++ b/filters/lowpass-help.pd
@@ -0,0 +1,23 @@
+#N canvas 365 183 515 357 10;
+#X obj 77 182 print;
+#X floatatom 77 114 0 0 0 0 - - -;
+#X floatatom 162 114 0 0 0 0 - - -;
+#X msg 91 138 bang;
+#X text 139 93 bandwidth (0 - 100);
+#X text 75 226 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 70 26 ===================================;
+#X text 5 320 (C) Guenter Geiger 2000;
+#X text 75 92 frequency;
+#X text 75 268 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X text 71 12 Lowpass coefficients for biquad~;
+#X obj 32 114 r doit;
+#X obj 77 160 lowpass 4000 33;
+#X connect 1 0 12 0;
+#X connect 2 0 3 0;
+#X connect 2 0 12 1;
+#X connect 3 0 12 0;
+#X connect 11 0 12 0;
+#X connect 12 0 0 0;
diff --git a/filters/lowpass.pd b/filters/lowpass.pd
deleted file mode 100755
index 9d15c16..0000000
--- a/filters/lowpass.pd
+++ /dev/null
@@ -1,35 +0,0 @@
-#N canvas 365 183 620 467 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 162 114;
-#X msg 360 109 \; paint 0;
-#X obj 159 175 filtgain;
-#X msg 91 138 bang;
-#X text 139 93 bandwidth (0 - 100);
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 175 159 click on filtgain to view frequency plot;
-#X text 70 26 ===================================;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X text 71 12 Lowpass coefficients for biquad~;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X obj 32 114 r doit;
-#X obj 77 160 lowpass 4000 33;
-#X connect 1 0 26 0;
-#X connect 2 0 5 0;
-#X connect 2 0 26 1;
-#X connect 5 0 26 0;
-#X connect 25 0 26 0;
-#X connect 26 0 0 0;
-#X connect 26 0 4 0;
diff --git a/filters/lowshelf-help.pd b/filters/lowshelf-help.pd
new file mode 100644
index 0000000..ad320a0
--- /dev/null
+++ b/filters/lowshelf-help.pd
@@ -0,0 +1,27 @@
+#N canvas 365 183 595 347 10;
+#X obj 77 182 print;
+#X floatatom 77 114 0 0 0 0 - - -;
+#X floatatom 192 113 0 0 0 0 - - -;
+#X msg 91 138 bang;
+#X text 75 226 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 4 319 (C) Guenter Geiger 2000;
+#X text 75 92 frequency;
+#X text 75 268 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X floatatom 129 113 0 0 0 0 - - -;
+#X text 138 92 gain;
+#X text 71 26 ==============================================;
+#X text 192 92 slope (0 - 100);
+#X text 76 12 Lowshelf coefficients for biquad~;
+#X obj 31 113 r doit;
+#X obj 77 160 lowshelf 4000 50 100;
+#X connect 1 0 14 0;
+#X connect 2 0 3 0;
+#X connect 2 0 14 2;
+#X connect 3 0 14 0;
+#X connect 8 0 3 0;
+#X connect 8 0 14 1;
+#X connect 13 0 14 0;
+#X connect 14 0 0 0;
diff --git a/filters/lowshelf.pd b/filters/lowshelf.pd
deleted file mode 100755
index 140c754..0000000
--- a/filters/lowshelf.pd
+++ /dev/null
@@ -1,39 +0,0 @@
-#N canvas 365 183 620 459 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 192 113;
-#X msg 360 117 \; paint 0;
-#X obj 159 175 filtgain;
-#X msg 91 138 bang;
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 211 159 click on filtgain to view frequency plot;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X floatatom 129 113;
-#X text 138 92 gain;
-#X text 71 26 ==============================================;
-#X text 192 92 slope (0 - 100);
-#X text 76 12 Lowshelf coefficients for biquad~;
-#X obj 31 113 r doit;
-#X msg 360 45 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X obj 77 160 lowshelf 4000 50 100;
-#X connect 1 0 28 0;
-#X connect 2 0 5 0;
-#X connect 2 0 28 2;
-#X connect 5 0 28 0;
-#X connect 21 0 5 0;
-#X connect 21 0 28 1;
-#X connect 26 0 28 0;
-#X connect 28 0 0 0;
-#X connect 28 0 4 0;
diff --git a/filters/moog~.pd b/filters/moog~-help.pd
index 7e0139b..7e0139b 100755..100644
--- a/filters/moog~.pd
+++ b/filters/moog~-help.pd
diff --git a/filters/notch-help.pd b/filters/notch-help.pd
new file mode 100644
index 0000000..ee53e7d
--- /dev/null
+++ b/filters/notch-help.pd
@@ -0,0 +1,21 @@
+#N canvas 363 47 641 397 10;
+#X obj 68 149 print;
+#X floatatom 68 81 0 0 0 0 - - -;
+#X floatatom 141 81 0 0 0 0 - - -;
+#X msg 82 105 bang;
+#X text 141 60 bandwidth (0 - 100);
+#X text 66 193 These filters are all controlled by a bandwidth which
+is expressed in octaves. A bandwidth of 100 is equivalent to one octave.
+;
+#X text 70 26 ===================================;
+#X text 7 310 (C) Guenter Geiger 2000;
+#X text 66 59 frequency;
+#X text 66 235 Attention \, only the left inlet triggers new coefficients
+for biquad~;
+#X text 72 13 Notch coefficients for biquad~;
+#X obj 68 127 notch 4000 33;
+#X connect 1 0 11 0;
+#X connect 2 0 3 0;
+#X connect 2 0 11 1;
+#X connect 3 0 11 0;
+#X connect 11 0 0 0;
diff --git a/filters/notch.pd b/filters/notch.pd
deleted file mode 100755
index a65d9c4..0000000
--- a/filters/notch.pd
+++ /dev/null
@@ -1,35 +0,0 @@
-#N canvas 363 47 620 467 10;
-#X obj 77 182 print;
-#X floatatom 77 114;
-#X floatatom 150 114;
-#X msg 360 109 \; paint 0;
-#X obj 159 175 filtgain;
-#X msg 91 138 bang;
-#X text 150 93 bandwidth (0 - 100);
-#X text 6 334 See also:;
-#X obj 72 335 bandpass;
-#X obj 139 336 notch;
-#X obj 195 337 lowpass;
-#X obj 247 336 highpass;
-#X obj 247 358 equalizer;
-#X obj 72 357 highshelf;
-#X obj 139 357 lowshelf;
-#X obj 195 357 hlshelf;
-#X text 75 226 These filters are all controlled by a bandwidth which is expressed in octaves. A bandwidth of 100 is equivalent to one octave.;
-#X text 358 25 click first;
-#X text 165 159 click on filtgain to view frequency plot;
-#X text 70 26 ===================================;
-#X text 6 393 (C) Guenter Geiger 2000;
-#X text 75 92 frequency;
-#X text 75 268 Attention \, only the left inlet triggers new coefficients for biquad~;
-#X text 72 13 Notch coefficients for biquad~;
-#X msg 360 46 \; pd dsp 1 \; paint 1 \; doit bang \;;
-#X obj 35 114 r doit;
-#X obj 77 160 notch 4000 33;
-#X connect 1 0 26 0;
-#X connect 2 0 5 0;
-#X connect 2 0 26 1;
-#X connect 5 0 26 0;
-#X connect 25 0 26 0;
-#X connect 26 0 0 0;
-#X connect 26 0 4 0;