1 files changed, 97 insertions, 0 deletions
diff --git a/delayPhasor~.pd b/delayPhasor~.pd
new file mode 100644
index 0000000..92b0d89
--- /dev/null
+++ b/delayPhasor~.pd
@@ -0,0 +1,97 @@
+#N canvas 362 310 740 458 10;
+#N canvas 460 241 627 300 delayphasor 0;
+#X obj 311 292 *~ 0.8;
+#X obj 310 249 /~ 44.1;
+#X obj 310 226 +~ 100;
+#X obj 310 204 *~ 50;
+#X obj 308 132 -~ 0.5;
+#X obj 309 158 abs~;
+#X obj 310 183 *~ 2;
+#X obj 84 247 /~ 44.1;
+#X obj 84 224 +~ 100;
+#X obj 84 202 *~ 50;
+#X obj 82 130 -~ 0.5;
+#X obj 83 156 abs~;
+#X obj 84 181 *~ 2;
+#X floatatom 169 91 5 0 0 0 - - -;
+#X obj 84 290 *~ 0.8;
+#X obj 9 4 inlet~;
+#X obj 169 50 loadbang;
+#X msg 169 69 0.5;
+#X floatatom 380 36 5 0 0 0 - - -;
+#X floatatom 422 34 5 0 0 0 - - -;
+#X obj 380 12 inlet;
+#X obj 422 11 inlet;
+#X obj 253 68 inlet~;
+#X obj 83 110 phasor~ 0.033;
+#X obj 309 112 phasor~ 0.033;
+#X obj 83 317 outlet~;
+#X obj 312 319 outlet~;
+#X obj 9 26 delwrite~ dpdelay11 1000;
+#X obj 253 90 delwrite~ dpdelay22 1000;
+#X obj 309 271 vd~ dpdelay22;
+#X obj 82 269 vd~ dpdelay11;
+#X obj 488 13 inlet phasor;
+#X connect 0 0 26 0;
+#X connect 0 0 28 0;
+#X connect 1 0 29 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 3 0;
+#X connect 7 0 30 0;
+#X connect 8 0 7 0;
+#X connect 9 0 8 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 9 0;
+#X connect 13 0 23 1;
+#X connect 14 0 25 0;
+#X connect 14 0 27 0;
+#X connect 15 0 27 0;
+#X connect 16 0 17 0;
+#X connect 17 0 13 0;
+#X connect 18 0 9 1;
+#X connect 18 0 3 1;
+#X connect 19 0 8 1;
+#X connect 19 0 2 1;
+#X connect 20 0 18 0;
+#X connect 21 0 19 0;
+#X connect 22 0 28 0;
+#X connect 23 0 10 0;
+#X connect 24 0 4 0;
+#X connect 29 0 0 0;
+#X connect 30 0 14 0;
+#X connect 31 0 13 0;
+#X restore 27 86 pd delayphasor;
+#X obj 135 309 outlet~;
+#X obj 227 308 outlet~;
+#X obj 27 47 inlet~;
+#X obj 87 47 inlet~;
+#X obj 590 32 inlet params;
+#X obj 590 78 print PARAM_NOTFOUND;
+#X obj 135 273 tof/crossfade~ 2;
+#X obj 253 176 tof/param /wet 0 /g slider 0 1;
+#X obj 307 48 tof/param /delay2 10 /g slider 1 20000;
+#X obj 307 18 tof/param /delay1 100 /g slider 1 20000;
+#X obj 317 98 tof/param /phasor 0.3 /g slider 0.01 10;
+#X obj 253 219 line~;
+#X msg 253 198 \$1 5;
+#X obj 590 54 tof/param route;
+#X connect 0 0 7 2;
+#X connect 0 1 7 3;
+#X connect 3 0 0 0;
+#X connect 3 0 7 0;
+#X connect 4 0 0 1;
+#X connect 4 0 7 1;
+#X connect 5 0 14 0;
+#X connect 7 0 1 0;
+#X connect 7 1 2 0;
+#X connect 8 0 13 0;
+#X connect 9 0 0 3;
+#X connect 10 0 0 2;
+#X connect 11 0 0 4;
+#X connect 12 0 7 4;
+#X connect 13 0 12 0;
+#X connect 14 0 6 0;