[PD] looking for a simple eq

[oliver]

Jakob Laue wrote:
> Dear list,
> I am looking for a simple equalizer abstraction, preferably vanilla, but can be part of an external library, too!

Hi,

i recently made a "channel_gui" abstraction for a patch on the RPI, 
using vanilla filters and the object [equaliser] from the GGEE library 
(you will need to install that first with deken)

it has a lowpass, a highpass, and one parametric EQ like filter (made 
with [equaliser], which basically calculates the right coefficients for 
the vanilla [biquad~] object)

i attach it here, you will have to remove some stuff and tweak it for 
your needs, but it's not too complicated.

plus you can control output volume and add a delay (if needed)

best

oliver
-------------- next part --------------
#N canvas 386 128 885 527 12;
#X obj 221 48 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 212 66 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 588 23 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 588 43 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 227 96 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 220 155 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 161 21 cnv 10 88 148 \$0-bgnd \$0-bgnd-r 1 75 10 1 18 -249661
-159808 0;
#X obj 160 155 nbx 5 15 0 200 0 0 \$1-v \$1-v-r vol 60 8 1 12 -262110
-1 -1 100 256;
#X obj 160 20 nbx 3 15 0 44100 0 0 \$1-d \$1-d-r del 45 9 1 12 -203904
-1 -1 0 256;
#X obj 291 393 *~;
#X obj 291 348 biquad~;
#X obj 327 319 equalizer 20000 0 8, f 20;
#X obj 160 100 nbx 5 15 20 24000 1 0 \$1-f \$1-f-r freq 60 8 1 12 -204786
-1 -1 20000 256;
#X obj 160 115 nbx 5 15 0 10 0 0 \$1-q \$1-q-r q 60 8 1 12 -204786
-1 -1 0 256;
#X obj 160 130 nbx 5 15 -80 80 0 0 \$1-g \$1-g-r gain 60 8 1 12 -204786
-1 -1 0 256;
#X obj 327 289 t b f;
#X obj 373 289 t b f;
#X obj 291 421 dac~ \$1;
#X obj 297 19 loadbang;
#X obj 381 48 delwrite~ \$0-d 1000, f 10;
#X obj 292 118 delread~ \$0-d 0, f 17;
#X obj 382 19 catch~ \$1-out;
#X obj 638 45 del 100;
#X obj 638 70 \$1;
#X msg 532 263 symbol kiste_dfv;
#X obj 532 288 text search kiste_args;
#X obj 532 314 +, f 5;
#X obj 532 341 text get kiste_args;
#X obj 357 348 * 0.01;
#X obj 357 373 pow 2;
#X floatatom 357 400 5 0 0 0 - - -;
#X msg 125 152 100;
#X obj 64 375 text set kiste_args;
#X obj 16 345 spigot;
#X obj 741 122 s \$0-spig;
#X obj 88 345 r \$0-spig;
#X msg 741 96 0;
#X obj 638 123 del 100;
#X msg 638 148 1;
#X obj 67 345 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 26 62 t b f;
#X obj 16 35 t f;
#X obj 36 94 t b f;
#X obj 16 375 t b l;
#X obj 16 402 s writeargs;
#X obj 54 125 t b f;
#X text 390 151 Alle GUIs haben #1 am Anfang, f 9;
#X msg 297 44 bang;
#X obj 494 72 makefilename %d;
#X obj 494 45 \$1;
#X msg 494 97 label \$1;
#X obj 494 122 s \$0-bgnd-r;
#X obj 297 69 s \$0-init;
#X obj 638 19 r \$0-init;
#X obj 494 19 r \$0-init;
#X obj 700 306 r \$0-init;
#X obj 291 198 lop~;
#X obj 292 145 hip~;
#X obj 292 172 demux~;
#X obj 290 222 demux~;
#X obj 344 179 hip~;
#X obj 328 248 lop~;
#X obj 160 47 nbx 5 15 20 20000 1 0 \$1-hp \$1-hp-r hp 60 8 1 12 -232576
-1 -1 20 256;
#X obj 160 62 nbx 5 15 20 24000 1 0 \$1-lp \$1-lp-r lp 60 8 1 12 -232576
-1 -1 20000 256;
#X obj 160 77 tgl 13 0 \$1-oct \$1-oct-r -6db/-12db 20 8 1 11 -232576
-1 -1 1 1;
#X msg 700 333 0 20 20000 1 20000 0 0 100, f 14;
#X obj 532 489 s \$1-d-r;
#X obj 553 465 s \$1-hp-r;
#X obj 575 441 s \$1-lp-r;
#X obj 596 418 s \$1-oct-r;
#X obj 618 394 s \$1-f-r;
#X obj 639 489 s \$1-q-r;
#X obj 661 465 s \$1-g-r;
#X obj 683 441 s \$1-v-r;
#X obj 73 164 t b f;
#X obj 92 196 t b f;
#X obj 112 226 t b f;
#X obj 132 257 t b f;
#X obj 16 315 pack 0 0 0 0 0 0 0 0;
#X obj 532 368 unpack 0 0 0 0 0 0 0 0;
#X msg 109 39 20;
#X msg 109 59 24000;
#X msg 109 98 24000;
#X obj 480 186 r kiste_get_dfv_from;
#X obj 532 236 t b f;
#X obj 480 211 + 1;
#X obj 480 236 sel \$1;
#X floatatom 578 235 5 0 0 0 - - -;
#X msg 690 153 symbol kiste_dfv;
#X obj 690 178 text search kiste_args;
#X floatatom 690 228 5 0 0 0 - - -;
#X obj 690 203 +;
#X obj 638 97 t b f f b f b;
#X connect 0 0 80 0;
#X connect 1 0 81 0;
#X connect 4 0 82 0;
#X connect 5 0 31 0;
#X connect 7 0 28 0;
#X connect 7 0 77 0;
#X connect 8 0 20 0;
#X connect 8 0 41 0;
#X connect 9 0 17 0;
#X connect 10 0 9 0;
#X connect 11 0 10 0;
#X connect 12 0 11 0;
#X connect 12 0 74 0;
#X connect 13 0 16 0;
#X connect 13 0 75 0;
#X connect 14 0 15 0;
#X connect 14 0 76 0;
#X connect 15 0 11 0;
#X connect 15 1 11 1;
#X connect 16 0 11 0;
#X connect 16 1 11 2;
#X connect 18 0 47 0;
#X connect 20 0 57 0;
#X connect 21 0 19 0;
#X connect 22 0 23 0;
#X connect 23 0 92 0;
#X connect 24 0 25 0;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 27 0 79 0;
#X connect 28 0 29 0;
#X connect 29 0 9 1;
#X connect 29 0 30 0;
#X connect 31 0 7 0;
#X connect 33 0 43 0;
#X connect 35 0 39 0;
#X connect 36 0 34 0;
#X connect 37 0 38 0;
#X connect 38 0 34 0;
#X connect 39 0 33 1;
#X connect 40 0 78 0;
#X connect 40 1 78 1;
#X connect 41 0 78 0;
#X connect 42 0 78 0;
#X connect 42 1 78 2;
#X connect 43 0 44 0;
#X connect 43 1 32 0;
#X connect 45 0 78 0;
#X connect 45 1 78 3;
#X connect 47 0 52 0;
#X connect 48 0 50 0;
#X connect 49 0 48 0;
#X connect 50 0 51 0;
#X connect 53 0 22 0;
#X connect 54 0 49 0;
#X connect 55 0 65 0;
#X connect 56 0 59 0;
#X connect 57 0 58 0;
#X connect 58 0 56 0;
#X connect 58 1 60 0;
#X connect 59 0 10 0;
#X connect 59 1 61 0;
#X connect 60 0 56 0;
#X connect 61 0 10 0;
#X connect 62 0 57 1;
#X connect 62 0 60 1;
#X connect 62 0 40 0;
#X connect 63 0 56 1;
#X connect 63 0 61 1;
#X connect 63 0 42 0;
#X connect 64 0 58 0;
#X connect 64 0 59 0;
#X connect 64 0 45 0;
#X connect 65 0 79 0;
#X connect 74 0 78 0;
#X connect 74 1 78 4;
#X connect 75 0 78 0;
#X connect 75 1 78 5;
#X connect 76 0 78 0;
#X connect 76 1 78 6;
#X connect 77 0 78 0;
#X connect 77 1 78 7;
#X connect 78 0 33 0;
#X connect 79 0 66 0;
#X connect 79 1 67 0;
#X connect 79 2 68 0;
#X connect 79 3 69 0;
#X connect 79 4 70 0;
#X connect 79 5 71 0;
#X connect 79 6 72 0;
#X connect 79 7 73 0;
#X connect 80 0 62 0;
#X connect 81 0 63 0;
#X connect 82 0 12 0;
#X connect 83 0 85 0;
#X connect 84 0 24 0;
#X connect 84 1 26 1;
#X connect 84 1 87 0;
#X connect 85 0 86 0;
#X connect 86 1 84 0;
#X connect 88 0 89 0;
#X connect 89 0 91 0;
#X connect 91 0 90 0;
#X connect 91 0 32 1;
#X connect 92 0 37 0;
#X connect 92 1 84 0;
#X connect 92 3 88 0;
#X connect 92 4 91 1;
#X connect 92 5 36 0;
#X coords 0 -1 1 1 90 150 2 160 20;