#N canvas 452 99 793 540 12;
#X declare -stdpath ./;
#X obj 54 415 output~;
#X obj 54 375 +~;
#X obj 63 184 delwrite~ G07-del 30;
#X obj 347 381 line~;
#X obj 196 388 *~;
#X obj 302 328 line~;
#X obj 159 330 *~;
#X obj 111 298 line~;
#X obj 72 295 *~;
#X obj 90 215 line~;
#X obj 54 215 *~;
#X text 73 51 THE "SHAKER";
#X obj 316 80 + 1;
#X obj 316 103 mod 4;
#X obj 281 91 f;
#X obj 325 154 random 1000;
#X obj 281 129 t f b;
#X obj 281 26 tgl 19 0 empty empty empty 0 -6 0 8 #dfdfdf #000000 #000000 0 1;
#X floatatom 369 28 5 10 1000 0 - - - 0;
#X obj 281 236 route 0 1 2 3;
#X obj 72 249 delread~ G07-del 30;
#X obj 53 153 phasor~ 80;
#X obj 159 304 delread~ G07-del 17;
#X obj 196 362 delread~ G07-del 11;
#X obj 369 63 * 4;
#X obj 325 181 expr 2 * $f1/1000 - 0.7;
#X floatatom 53 130 5 30 1000 0 - - - 0;
#X obj 281 52 metro 50;
#X text 53 106 frequency;
#X text 229 26 on/off;
#X text 413 28 time constant (msec);
#X text 555 492 updated for Pd version 0.37-1;
#X text 422 224 This is a time-varying comb filter \, combining four delayed copies of the input signal. The amplitude of each delayed copy varies randomly between -0.7 and +1.3. Each time the metronome goes off \, one of the four delay's gains is changed in sequence. The change occurs over the next four ticks of the metronome (so \, if the metronome ticks every 50 msec \, each message to a line~ has a second argument of 200.), f 45;
#X text 422 377 Any collection of four gains for the four delayed copies of the signal (including the original) defines some sort of irregular comb filter. The peaks and valleys of the comb filter shift constantly as the gains change to new \, random values., f 45;
#X obj 546 84 declare -stdpath ./;
#X obj 281 209 pack f f 200, f 13;
#X connect 1 0 0 0;
#X connect 3 0 4 1;
#X connect 4 0 1 1;
#X connect 5 0 6 1;
#X connect 6 0 1 1;
#X connect 7 0 8 1;
#X connect 8 0 1 1;
#X connect 9 0 10 1;
#X connect 10 0 1 0;
#X connect 12 0 13 0;
#X connect 13 0 14 1;
#X connect 14 0 12 0;
#X connect 14 0 16 0;
#X connect 15 0 25 0;
#X connect 16 0 35 0;
#X connect 16 1 15 0;
#X connect 17 0 27 0;
#X connect 18 0 24 0;
#X connect 18 0 27 1;
#X connect 19 0 9 0;
#X connect 19 1 7 0;
#X connect 19 2 5 0;
#X connect 19 3 3 0;
#X connect 20 0 8 0;
#X connect 21 0 2 0;
#X connect 21 0 10 0;
#X connect 22 0 6 0;
#X connect 23 0 4 0;
#X connect 24 0 35 2;
#X connect 25 0 35 1;
#X connect 26 0 21 0;
#X connect 27 0 14 0;
#X connect 35 0 19 0;
