1 files changed, 27 insertions, 39 deletions
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;