From 84102c25d9b3dd3adadf5add3f820e640a78c8a6 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Fri, 5 Dec 2008 20:19:42 +0000 Subject: made all help patches actually control a [biquad~] with a [noise~] input svn path=/trunk/externals/ggee/; revision=10427 --- filters/highshelf-help.pd | 59 +++++++++++++++++++++++++++++------------------ 1 file changed, 36 insertions(+), 23 deletions(-) (limited to 'filters/highshelf-help.pd') diff --git a/filters/highshelf-help.pd b/filters/highshelf-help.pd index b2ab9f1..08cea2b 100644 --- a/filters/highshelf-help.pd +++ b/filters/highshelf-help.pd @@ -1,27 +1,40 @@ -#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 +#N canvas 321 83 456 417 10; +#X text 63 298 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 +#X text 70 26 ===================================; +#X text 63 340 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 8 388 (C) Guenter Geiger 2000; +#X floatatom 96 109 0 0 0 0 - - -; +#X floatatom 157 109 0 0 0 0 - - -; +#X obj 157 132 trigger bang float; +#X obj 43 206 biquad~; +#X obj 43 146 noise~; +#X obj 99 64 hsl 128 17 20 20000 1 1 empty empty frequency 5 9 0 10 +-203904 -1 -1 5100 0; +#X obj 160 87 hsl 128 17 0 100 0 1 empty empty gain 5 9 0 10 -204786 +-1 -1 2800 0; +#X obj 34 266 dac~; +#X obj 43 234 *~ 0.1; +#X floatatom 297 109 0 0 0 0 - - -; +#X obj 297 132 trigger bang float; +#X obj 300 87 hsl 128 17 0 100 0 1 empty empty slope 5 9 0 10 -261682 +-1 -1 6600 0; #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; +#X obj 96 175 highshelf 5000 70 100; +#X connect 4 0 17 0; +#X connect 5 0 6 0; +#X connect 6 0 17 0; +#X connect 6 1 17 1; +#X connect 7 0 12 0; +#X connect 8 0 7 0; +#X connect 9 0 4 0; +#X connect 10 0 5 0; +#X connect 12 0 11 0; +#X connect 12 0 11 1; +#X connect 13 0 14 0; +#X connect 14 0 17 0; +#X connect 14 1 17 2; +#X connect 15 0 13 0; +#X connect 17 0 7 0; -- cgit v1.2.1