1 files changed, 167 insertions, 0 deletions
diff --git a/effects/rrad.eros~.pd b/effects/rrad.eros~.pd
new file mode 100644
index 0000000..1ba168e
--- /dev/null
+++ b/effects/rrad.eros~.pd
@@ -0,0 +1,167 @@
+#N canvas 269 340 106 131 10;
+#X obj 400 3 inlet OSC;
+#N canvas 0 0 981 424 saves 0;
+#X msg 15 103 set;
+#X msg 45 104 substate \$1;
+#X obj 15 78 t b f;
+#X obj 45 160 originator \$1 \$0;
+#X obj 152 132 inlet OSC;
+#X obj 47 55 r \$0-substate;
+#X obj 15 13 inlet substate;
+#X obj 15 35 route substate;
+#X obj 159 55 r \$0-copy;
+#X msg 159 76 copy;
+#X obj 243 50 r \$0-paste;
+#X msg 241 71 paste;
+#X text 154 15 This is the originator \, including some ready to use
+standard functionality.;
+#X text 507 56 Put your commun sends here \, if you like.;
+#X obj 507 110 commun /Q \$0;
+#X obj 507 86 r \$0-Q;
+#X obj 507 135 s \$0-Q;
+#X obj 606 86 r \$0-no;
+#X obj 606 136 s \$0-no;
+#X obj 606 110 commun /type \$0;
+#X obj 508 165 r \$0-amnt;
+#X obj 508 215 s \$0-amnt;
+#X obj 508 189 commun /amount \$0;
+#X obj 641 165 r \$0-f;
+#X obj 641 215 s \$0-f;
+#X obj 641 189 commun /freq \$0;
+#X connect 0 0 3 0;
+#X connect 1 0 3 0;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 4 0 3 1;
+#X connect 5 0 2 0;
+#X connect 6 0 7 0;
+#X connect 7 0 2 0;
+#X connect 7 1 3 0;
+#X connect 8 0 9 0;
+#X connect 9 0 3 0;
+#X connect 10 0 11 0;
+#X connect 11 0 3 0;
+#X connect 14 0 16 0;
+#X connect 15 0 14 0;
+#X connect 17 0 19 0;
+#X connect 19 0 18 0;
+#X connect 20 0 22 0;
+#X connect 22 0 21 0;
+#X connect 23 0 25 0;
+#X connect 25 0 24 0;
+#X restore 338 2 pd saves;
+#X text 40 1 look! ==>;
+#X obj 3 19 cnv 15 98 108 empty empty erosion~ 16 12 0 10 -225271 -250685
+0;
+#X obj 16 45 tgl 15 0 \$0-no \$0-no type 0 20 0 6 -257472 -1 -250685
+0 1;
+#X obj 17 75 hsl 64 8 0 5 0 0 \$0-amnt \$0-amnt amount 40 -6 0 8 -257472
+-250685 -1 0 1;
+#X obj 18 96 hsl 64 8 0 127 0 0 \$0-f \$0-f freq -2 -6 0 8 -257472
+-250685 -1 0 1;
+#X obj 34 45 cnv 15 50 16 empty \$0-show |||-noise 4 6 1 8 -257472
+-66577 0;
+#X obj 17 108 nbx 3 14 -1e+37 1e+37 0 0 \$0-Q \$0-Q Q -10 6 0 8 -257472
+-1 -1 0 256;
+#X obj 51 108 nbx 3 14 -1e+37 1e+37 0 0 \$0-substate \$0-substate S
+38 6 0 8 -262131 -1 -1 2 256;
+#X obj 299 119 outlet~;
+#X obj 199 6 inlet~;
+#N canvas 0 0 849 539 all 0;
+#X obj 107 59 inlet~;
+#X obj 139 390 outlet~;
+#N canvas 0 0 450 300 write 0;
+#X obj 95 118 delwrite~ \$0-delay 5000;
+#X obj 77 80 inlet~;
+#X obj 82 178 outlet~;
+#X connect 1 0 0 0;
+#X connect 1 0 2 0;
+#X restore 141 236 pd write;
+#N canvas 0 0 450 300 read 0;
+#X obj 276 165 vd~ \$0-delay;
+#X obj 131 103 inlet~;
+#X obj 125 204 outlet~;
+#X obj 278 112 inlet~;
+#X obj 269 200 env~;
+#X floatatom 273 228 5 0 0 0 - - -;
+#X connect 0 0 2 0;
+#X connect 3 0 0 0;
+#X connect 4 0 5 0;
+#X restore 140 305 pd read;
+#X obj 267 148 bp~ 440;
+#X obj 266 93 noise~;
+#X obj 346 36 mtof;
+#X obj 486 80 osc~ 0;
+#X obj 489 183 *~ 1;
+#X obj 267 245 *~ 1;
+#X obj 569 98 select 0 1;
+#X msg 333 179 0;
+#X msg 366 179 1;
+#X msg 538 215 0;
+#X msg 571 215 1;
+#X obj 348 9 r \$0-f;
+#X obj 387 105 r \$0-amnt;
+#X obj 311 120 r \$0-Q;
+#X obj 569 69 r \$0-no;
+#X msg 660 306 \; \$2-show label \$1;
+#X obj 660 262 pack s \$0;
+#X msg 703 236 symbol |||-noise;
+#X msg 660 188 symbol |||-osc;
+#X obj 443 16 inlet;
+#X obj 491 16 inlet;
+#X obj 580 20 inlet;
+#X obj 444 44 s \$0-f;
+#X obj 585 48 s \$0-no;
+#X obj 497 42 s \$0-amnt;
+#X obj 488 157 +~ 1;
+#X obj 267 182 +~ 1;
+#X floatatom 418 190 5 0 0 0 - - -;
+#X obj 268 208 *~ 0;
+#X obj 463 238 *~ 1;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 30 0;
+#X connect 5 0 4 0;
+#X connect 6 0 4 1;
+#X connect 6 0 7 0;
+#X connect 7 0 29 0;
+#X connect 8 0 33 0;
+#X connect 9 0 3 1;
+#X connect 10 0 11 0;
+#X connect 10 0 14 0;
+#X connect 10 0 22 0;
+#X connect 10 1 12 0;
+#X connect 10 1 13 0;
+#X connect 10 1 21 0;
+#X connect 11 0 9 1;
+#X connect 12 0 9 1;
+#X connect 13 0 33 1;
+#X connect 14 0 33 1;
+#X connect 15 0 6 0;
+#X connect 16 0 8 1;
+#X connect 16 0 31 0;
+#X connect 16 0 32 1;
+#X connect 17 0 4 2;
+#X connect 18 0 10 0;
+#X connect 20 0 19 0;
+#X connect 21 0 20 0;
+#X connect 22 0 20 0;
+#X connect 23 0 26 0;
+#X connect 24 0 28 0;
+#X connect 25 0 27 0;
+#X connect 29 0 8 0;
+#X connect 30 0 32 0;
+#X connect 32 0 9 0;
+#X connect 33 0 3 1;
+#X restore 295 83 pd all;
+#X obj 266 42 route freq amount type;
+#X obj 128 72 r \$0-parentstate;
+#X connect 0 0 1 1;
+#X connect 11 0 12 0;
+#X connect 12 0 10 0;
+#X connect 13 0 12 1;
+#X connect 13 1 12 2;
+#X connect 13 2 12 3;
+#X connect 14 0 9 0;
+#X coords 0 0 1 1 102 130 1;