chorus~.pd

#N canvas 1327 149 543 605 12;
#X obj 21 108 inlet~;
#X obj 21 132 delwrite~ \$0-buffer 100;
#X obj 286 190 osc~;
#X obj 289 517 vd~ \$0-buffer;
#X obj 287 552 outlet~;
#X obj 286 214 +~ 1;
#X obj 286 238 /~ 2;
#X obj 286 302 *~;
#X obj 119 515 vd~ \$0-buffer;
#X obj 254 107 inlet;
#X obj 254 131 deff \$1 0.2;
#X obj 426 109 inlet;
#X obj 426 229 line~;
#X text 38 516 dry signal;
#X text 393 519 wet signal;
#X text 11 83 input signal;
#X text 93 20 adapted from https://www.youtube.com/watch?v=vsaK_45HFk4
;
#X obj 426 133 deff \$2 0.4;
#X text 22 213 unipolar (between 0 and 1) sine wave;
#X text 36 396 apply an offset to help w/ phasing issues \; when combining
the wet and dry signals;
#X obj 426 157 clip 0 1;
#X text 249 84 \$1 rate (hz);
#X text 416 88 \$2 depth (0...1);
#X obj 355 404 +~ 7;
#X msg 426 205 \$1 10;
#X obj 426 181 * 7;
#X connect 0 0 1 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 23 0;
#X connect 8 0 4 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X connect 11 0 17 0;
#X connect 12 0 7 1;
#X connect 17 0 20 0;
#X connect 20 0 25 0;
#X connect 23 0 3 0;
#X connect 24 0 12 0;
#X connect 25 0 24 0;