#N canvas 468 23 561 621 10;
#X declare -stdpath ./;
#X obj 5 583 cnv 15 552 21 empty empty empty 20 12 0 14 #e0e0e0 #202020 0;
#X obj 5 356 cnv 3 550 3 empty empty inlets 8 12 0 13 #dcdcdc #000000 0;
#X obj 5 484 cnv 3 550 3 empty empty outlets 8 12 0 13 #dcdcdc #000000 0;
#X obj 5 517 cnv 3 550 3 empty empty arguments 8 12 0 13 #dcdcdc #000000 0;
#X obj 103 366 cnv 17 3 45 empty empty 0 5 9 0 16 #dcdcdc #9c9c9c 0;
#X obj 103 460 cnv 17 3 17 empty empty 3 5 9 0 16 #dcdcdc #9c9c9c 0;
#X text 168 365 signal;
#X obj 103 416 cnv 17 3 17 empty empty 1 5 9 0 16 #dcdcdc #9c9c9c 0;
#X obj 103 439 cnv 17 3 17 empty empty 2 5 9 0 16 #dcdcdc #9c9c9c 0;
#X obj 103 493 cnv 17 3 17 empty empty 0 5 9 0 16 #dcdcdc #9c9c9c 0;
#X text 168 493 signal;
#X text 156 526 1) float;
#X text 156 543 2) float;
#X text 156 559 3) float;
#X text 229 526 - initial gain (default 0);
#X text 229 559 - initial Q range (default 0.01);
#X text 132 439 float/signal;
#X text 132 460 float/signal;
#X text 229 493 - filtered signal;
#X text 132 418 float/signal;
#X obj 275 170 osc~ 1;
#X obj 225 143 hsl 128 15 0 2 0 0 empty empty empty -2 -8 0 10 #dcdcdc #000000 #000000 0 1;
#X text 127 174 input;
#X text 271 142 gain;
#X text 365 225 resonance (Q);
#X text 180 382 list;
#X text 174 398 clear;
#X obj 169 249 cyclone/reson~ 1 200 23, f 27;
#X obj 169 174 noise~;
#X text 229 382 - initial gain \, center frequency \, Q;
#X text 229 365 - signal to be filtered;
#X text 229 398 - clears the internal buffer's memory;
#X text 228 417 - sets gain;
#X text 227 439 - sets center frequency;
#X text 228 460 - sets the resonance Q;
#X text 229 543 - initial center frequency (default 0);
#X text 74 89 [reson~] is a bandpass resonant filter. All parameters can be set as float or signals.;
#X text 324 167 <= center frequency;
#X obj 328 226 nbx 3 14 0 100 0 0 empty empty empty 0 -8 0 10 #dcdcdc #000000 #000000 0 256;
#X obj 275 198 cyclone/scale~ -1 1 500 1500;
#X obj 222 202 nbx 3 14 0 100 0 0 empty empty empty 0 -8 0 10 #dcdcdc #000000 #000000 0 256;
#N canvas 957 289 409 160 formula 0;
#X text 27 76 Since it is a recursive filter \, you may need to use the "clear" message if it blows up.;
#X text 27 33 The equation of the filter is: y[n] = a0 * (x[n] - r * x[n-2]) + b1 * y[n-1] + b2 * y[n-2] - where r \, b1 \, and b2 are calculated from 'Q' and center frequency.;
#X restore 476 321 pd formula;
#X obj 169 287 output~;
#X obj 2 2 ./header reson~;
#X text 22 61 Bandpass resonant filter;
#X obj 24 308 declare -stdpath ./;
#X connect 20 0 39 0;
#X connect 21 0 40 0;
#X connect 27 0 42 0;
#X connect 28 0 27 0;
#X connect 38 0 27 3;
#X connect 39 0 27 2;
#X connect 40 0 27 1;
