#N canvas 496 77 637 757 12;
#X declare -stdpath ./;
#X obj 84 568 output~;
#X obj 84 528 +~;
#X obj 93 337 delwrite~ G07-del 30;
#X obj 377 534 line~;
#X obj 226 541 *~;
#X obj 332 481 line~;
#X obj 189 483 *~;
#X obj 141 451 line~;
#X obj 102 448 *~;
#X obj 120 368 line~;
#X obj 84 368 *~;
#X obj 346 233 + 1;
#X obj 346 256 mod 4;
#X obj 311 244 f;
#X obj 355 307 random 1000;
#X obj 311 282 t f b;
#X obj 311 179 tgl 19 0 empty empty empty 0 -6 0 8 #dfdfdf #000000 #000000 0 1;
#X floatatom 399 231 5 10 1000 0 - - - 0;
#X obj 311 389 route 0 1 2 3;
#X obj 102 402 delread~ G07-del 30;
#X obj 189 457 delread~ G07-del 17;
#X obj 226 515 delread~ G07-del 11;
#X obj 399 266 * 4;
#X obj 355 334 expr 2 * $f1/1000 - 0.7;
#X floatatom 83 276 5 30 1000 0 - - - 0;
#X text 125 276 frequency;
#X text 259 179 on/off;
#X text 443 231 time constant (msec);
#X text 71 667 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 73;
#X obj 245 593 declare -stdpath ./;
#X obj 311 362 pack f f 200, f 13;
#X text 28 61 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 80;
#X obj 52 18 cnv 5 5 25 empty empty The\ "Shaker" 15 13 0 16 #dfdfdf #202020 0;
#X obj 83 222 loadbang;
#X msg 83 248 80;
#X obj 83 303 phasor~;
#X obj 311 205 metro;
#X obj 399 181 loadbang;
#X msg 399 205 50;
#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 11 0 12 0;
#X connect 12 0 13 1;
#X connect 13 0 11 0;
#X connect 13 0 15 0;
#X connect 14 0 23 0;
#X connect 15 0 30 0;
#X connect 15 1 14 0;
#X connect 16 0 36 0;
#X connect 17 0 22 0;
#X connect 17 0 36 1;
#X connect 18 0 9 0;
#X connect 18 1 7 0;
#X connect 18 2 5 0;
#X connect 18 3 3 0;
#X connect 19 0 8 0;
#X connect 20 0 6 0;
#X connect 21 0 4 0;
#X connect 22 0 30 2;
#X connect 23 0 30 1;
#X connect 24 0 35 0;
#X connect 30 0 18 0;
#X connect 33 0 34 0;
#X connect 34 0 24 0;
#X connect 35 0 2 0;
#X connect 35 0 10 0;
#X connect 36 0 13 0;
#X connect 37 0 38 0;
#X connect 38 0 17 0;
