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/equalizer-help.pd | 57 +++++++++++++++++++++++++++++------------------ 1 file changed, 35 insertions(+), 22 deletions(-) (limited to 'filters/equalizer-help.pd') diff --git a/filters/equalizer-help.pd b/filters/equalizer-help.pd index 2a80108..65352db 100644 --- a/filters/equalizer-help.pd +++ b/filters/equalizer-help.pd @@ -1,27 +1,40 @@ -#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 +#N canvas 153 157 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 8 268 (C) Guenter Geiger 2000; -#X text 85 55 frequency; -#X text 75 221 Attention \, only the left inlet triggers new coefficients +#X text 63 340 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 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 5400 0; +#X obj 160 87 hsl 128 17 0 100 0 1 empty empty gain 5 9 0 10 -204786 +-1 -1 6300 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 bandwidth 5 9 0 10 -261682 +-1 -1 9100 0; #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; +#X obj 96 175 equalizer 5000 70 8; +#X connect 3 0 17 0; +#X connect 4 0 5 0; +#X connect 5 0 17 0; +#X connect 5 1 17 1; +#X connect 6 0 11 0; +#X connect 7 0 6 0; +#X connect 8 0 3 0; +#X connect 9 0 4 0; +#X connect 11 0 10 0; +#X connect 11 0 10 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 13 1 17 2; +#X connect 14 0 12 0; +#X connect 17 0 6 0; -- cgit v1.2.1