From 87fd5886f1c162922a9d86ec56faa9e1f7f44b67 Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Mon, 23 Jun 2008 09:10:14 +0000 Subject: add a biquad with audio inlet for coefficients. add abstraction to compute a set of standard filter : low pass / high pass / band pass / band cut / low shelf and high shelf svn path=/trunk/externals/nusmuk/; revision=10069 --- biquad/bq_coef_peak.pd | 113 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 113 insertions(+) create mode 100644 biquad/bq_coef_peak.pd (limited to 'biquad/bq_coef_peak.pd') diff --git a/biquad/bq_coef_peak.pd b/biquad/bq_coef_peak.pd new file mode 100644 index 0000000..a3f2e2b --- /dev/null +++ b/biquad/bq_coef_peak.pd @@ -0,0 +1,113 @@ +#N canvas 0 0 433 621 10; +#X obj 50 32 inlet; +#X obj 206 31 inlet; +#X text 92 34 f; +#X text 251 31 Q; +#X obj 119 148 samplerate~; +#X obj 119 125 loadbang; +#X obj 176 126 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 50 180 /; +#X obj 50 349 cos; +#X obj 200 276 sin; +#X obj 206 126 * 2; +#X obj 50 574 outlet; +#X obj 283 485 + 1; +#X obj 50 467 * -2; +#X obj 50 249 t f f; +#X obj 50 519 /; +#X obj 94 520 /; +#X obj 139 520 /; +#X obj 229 520 /; +#X obj 139 574 outlet; +#X obj 94 574 outlet; +#X obj 184 574 outlet; +#X obj 229 574 outlet; +#X obj 50 226 f; +#X obj 206 195 t b f; +#X msg 94 458 1 \$1; +#X obj 206 74 max 0; +#X obj 50 73 max 0; +#X obj 50 128 * 3.14159; +#X msg 206 148 1 \$1; +#X obj 233 226 sinh; +#X obj 206 170 /; +#X obj 50 148 * 2; +#X obj 50 548 t f f; +#X obj 206 104 + 0.1; +#X obj 302 32 inlet; +#X text 344 198 A; +#X obj 302 117 pow; +#X msg 302 96 10; +#X obj 302 77 t b f; +#X obj 302 54 / 40; +#X msg 140 460 1 \$1; +#X msg 230 460 1 \$1; +#X obj 230 485 -; +#X obj 200 356 t f f; +#X obj 302 202 t b f; +#X obj 140 485 +; +#X obj 94 483 -; +#X obj 50 99 min 21000; +#X obj 200 406 / 1; +#X obj 230 407 * 1; +#X obj 283 407 / 1; +#X obj 200 303 * 74.2; +#X connect 0 0 27 0; +#X connect 1 0 26 0; +#X connect 4 0 7 1; +#X connect 5 0 4 0; +#X connect 6 0 4 0; +#X connect 7 0 23 0; +#X connect 8 0 13 0; +#X connect 9 0 52 0; +#X connect 10 0 29 0; +#X connect 12 0 15 1; +#X connect 12 0 16 1; +#X connect 12 0 17 1; +#X connect 12 0 18 1; +#X connect 13 0 15 0; +#X connect 14 0 8 0; +#X connect 14 1 9 0; +#X connect 15 0 33 0; +#X connect 16 0 20 0; +#X connect 17 0 19 0; +#X connect 18 0 22 0; +#X connect 23 0 14 0; +#X connect 24 0 23 0; +#X connect 24 1 30 0; +#X connect 25 0 47 0; +#X connect 26 0 34 0; +#X connect 27 0 48 0; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 52 1; +#X connect 31 0 24 0; +#X connect 32 0 7 0; +#X connect 33 0 11 0; +#X connect 33 1 21 0; +#X connect 34 0 10 0; +#X connect 35 0 40 0; +#X connect 37 0 45 0; +#X connect 38 0 37 0; +#X connect 39 0 38 0; +#X connect 39 1 37 1; +#X connect 40 0 39 0; +#X connect 41 0 46 0; +#X connect 42 0 43 0; +#X connect 43 0 18 0; +#X connect 44 0 49 0; +#X connect 44 0 50 0; +#X connect 44 1 51 0; +#X connect 45 0 23 0; +#X connect 45 1 49 1; +#X connect 45 1 50 1; +#X connect 45 1 51 1; +#X connect 46 0 17 0; +#X connect 47 0 16 0; +#X connect 48 0 28 0; +#X connect 49 0 25 0; +#X connect 50 0 42 0; +#X connect 50 0 41 0; +#X connect 51 0 12 0; +#X connect 52 0 44 0; -- cgit v1.2.1