This commit was generated by cvs2svn to compensate for changes in r1630,svn2git-root

which included commits to RCS files with non-trunk default branches.

svn path=/trunk/abstractions/rradical/; revision=1631

11 files changed, 1618 insertions, 0 deletions

diff --git a/effects/rrad.adsr.pd b/effects/rrad.adsr.pd
new file mode 100644
index 0000000..ff9230f
--- /dev/null
+++ b/effects/rrad.adsr.pd
@@ -0,0 +1,202 @@
+#N canvas 500 433 157 126 10;
+#X obj 2 15 cnv 15 150 100 empty \$0-background-cnv empty 20 12 1 14
+-207850 -66577 0;
+#X obj 433 -3 inlet OSC;
+#N canvas 127 377 981 424 saves 0;
+#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 msg 15 91 setsub \$1;
+#X msg 249 184 svdir \$1;
+#X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 250 163 savepanel;
+#X obj 152 189 outlet OSC;
+#X msg 108 214 svxdir /tmp/svdir.xml;
+#X msg 78 241 ldxdir /tmp/svdir.xml;
+#X obj 538 176 s \$0-ain;
+#X obj 610 176 s \$0-din;
+#X obj 682 176 s \$0-sin;
+#X obj 776 179 s \$0-rin;
+#X obj 536 107 r \$0-a;
+#X obj 630 105 r \$0-d;
+#X obj 698 106 r \$0-s;
+#X obj 769 106 r \$0-r;
+#X obj 772 142 commun /r \$0;
+#X obj 682 142 commun /s \$0;
+#X obj 582 141 commun /d \$0;
+#X obj 496 137 commun /a \$0;
+#X connect 0 2 15 0;
+#X connect 1 0 0 1;
+#X connect 2 0 11 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 4 1 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X connect 7 0 8 0;
+#X connect 8 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 0;
+#X connect 16 0 0 0;
+#X connect 17 0 0 0;
+#X connect 22 0 29 0;
+#X connect 23 0 28 0;
+#X connect 24 0 27 0;
+#X connect 25 0 26 0;
+#X connect 26 0 21 0;
+#X connect 27 0 20 0;
+#X connect 28 0 19 0;
+#X connect 29 0 18 0;
+#X restore 371 -4 pd saves;
+#N canvas 569 61 450 300 cnv.ctl 0;
+#X obj 90 188 s \$0-background-cnv;
+#X floatatom 108 59 5 100 1000 0 width - -;
+#X floatatom 112 83 4 50 500 0 height - -;
+#X obj 92 132 pack 0 0;
+#X msg 92 159 vis_size \$1 \$2;
+#X obj 110 106 t b f;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X restore 296 -4 pd cnv.ctl;
+#X obj 117 34 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -225271
+-1 -1;
+#X obj 117 62 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -257472
+-1 -1;
+#X text 184 -4 look! ==>;
+#X obj 371 17 outlet OSC;
+#X obj 10 37 vsl 8 64 0 100 0 0 \$0-a \$0-ain a 0 -8 1 8 -355 -260818
+-143491 2300 1;
+#X obj 29 37 vsl 8 64 0 127 0 0 \$0-d \$0-din d 0 -8 1 8 -355 -260818
+-143491 3500 1;
+#X obj 49 37 vsl 8 64 0 127 0 0 \$0-s \$0-sin s 0 -8 1 8 -355 -260818
+-143491 1900 1;
+#X obj 69 37 vsl 8 64 0 127 0 0 \$0-r \$0-rin r 0 -8 1 8 -355 -260818
+-143491 1300 1;
+#X obj 189 21 inlet;
+#N canvas 0 0 600 400 envelope 0;
+#X obj 173 134 r \$0-level;
+#X obj 252 35 r \$0-a;
+#X obj 293 85 r \$0-d;
+#X obj 315 139 r \$0-s;
+#X obj 413 132 r \$0-r;
+#X obj 25 119 inlet;
+#N canvas 231 224 600 400 adsr 0;
+#X text 52 50 This patch is used as an abstraction in 25.envelope.pd
+;
+#X obj 95 108 inlet;
+#X obj 298 111 inlet;
+#X text 91 79 trigger;
+#X obj 95 138 sel 0;
+#X obj 144 138 t b;
+#X obj 104 359 pack 0 \$2;
+#X obj 362 112 inlet;
+#X obj 309 301 del \$2;
+#X obj 338 324 f \$4;
+#X obj 371 369 pack 0 \$3;
+#X obj 410 112 inlet;
+#X obj 459 111 inlet;
+#X obj 504 111 inlet;
+#X msg 95 191 stop;
+#X obj 517 360 pack 0 \$5;
+#X text 378 86 Traditional A \, D \, S \, R;
+#X text 296 88 level;
+#X text 32 302 ATTACK;
+#X text 7 325 recall level;
+#X text 7 345 and pack with;
+#X text 8 365 attack time;
+#X text 28 124 if zero;
+#X text 29 141 release;
+#X text 17 183 and cancel;
+#X text 17 199 decay;
+#X text 148 120 bang if attack;
+#X text 183 294 on attack \, set a;
+#X text 147 307 delay to go to sustain;
+#X text 189 324 recall sustain value;
+#X text 185 347 multiply by overall level;
+#X text 220 370 pack with decay time;
+#X text 510 386 on release ramp;
+#X text 511 403 back to zero;
+#X text 63 12 adsr - arguments: level \, attack time \, decay time
+\, sustain level \, release time;
+#X text 17 487 When you send this patch a nonzero trigger it schedules
+a line~ to do an attack and decay \, and if zero \, it starts the release
+ramp.;
+#X text 18 533 Objects such as f and pack can be given dollar sign
+arguments to initialize their contents from adsr's creation arguments.
+Inlets are supplied to update them on the fly.;
+#X obj 104 334 f;
+#X obj 364 346 * 1;
+#X obj 371 422 line 10;
+#X obj 371 449 outlet;
+#X connect 1 0 4 0;
+#X connect 2 0 37 0;
+#X connect 2 0 38 1;
+#X connect 4 0 14 0;
+#X connect 4 0 15 0;
+#X connect 4 1 5 0;
+#X connect 5 0 8 0;
+#X connect 6 0 39 0;
+#X connect 7 0 6 1;
+#X connect 7 0 8 1;
+#X connect 8 0 9 0;
+#X connect 9 0 38 0;
+#X connect 10 0 39 0;
+#X connect 11 0 10 1;
+#X connect 12 0 9 1;
+#X connect 13 0 15 1;
+#X connect 14 0 8 0;
+#X connect 15 0 39 0;
+#X connect 37 0 6 0;
+#X connect 38 0 10 0;
+#X connect 39 0 40 0;
+#X restore 174 292 pd adsr -----------;
+#X obj 100 181 s \$0-level;
+#X obj 253 62 scale 0 127 0 200;
+#X obj 308 164 scale 0 127 0 1;
+#X obj 289 119 scale 0 127 0 200;
+#X obj 172 168 scale 0 127 0 1;
+#X obj 366 202 scale 0 127 0 1000;
+#X obj 74 149 select 0;
+#X obj 174 346 outlet;
+#X connect 0 0 11 0;
+#X connect 1 0 8 0;
+#X connect 2 0 10 0;
+#X connect 3 0 9 0;
+#X connect 4 0 12 0;
+#X connect 5 0 13 0;
+#X connect 5 0 6 0;
+#X connect 6 0 14 0;
+#X connect 8 0 6 2;
+#X connect 9 0 6 4;
+#X connect 10 0 6 3;
+#X connect 11 0 6 1;
+#X connect 12 0 6 5;
+#X connect 13 1 7 0;
+#X restore 189 47 pd envelope;
+#X text 23 -1 Graphical ADSR;
+#X obj 95 37 vsl 8 64 0 127 0 0 empty \$0-level lvl 0 -8 1 8 -62784
+-262144 -258699 4261 1;
+#X obj 116 90 nbx 2 14 -1e+37 1e+37 0 0 \$0-substate \$0-parentstate
+preset 0 -6 0 8 -261681 -1 -1 0 256;
+#X obj 189 72 outlet;
+#X connect 1 0 2 1;
+#X connect 2 0 7 0;
+#X connect 12 0 13 0;
+#X connect 13 0 17 0;
+#X coords 0 0 1 1 152 115 1;
diff --git a/effects/rrad.adsr~.pd b/effects/rrad.adsr~.pd
new file mode 100644
index 0000000..ffed044
--- /dev/null
+++ b/effects/rrad.adsr~.pd
@@ -0,0 +1,202 @@
+#N canvas 500 433 157 126 10;
+#X obj 2 15 cnv 15 150 100 empty \$0-background-cnv empty 20 12 1 14
+-228905 -66577 0;
+#X obj 433 -3 inlet OSC;
+#N canvas 127 377 981 424 saves 0;
+#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 msg 15 91 setsub \$1;
+#X msg 249 184 svdir \$1;
+#X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 250 163 savepanel;
+#X obj 152 189 outlet OSC;
+#X msg 108 214 svxdir /tmp/svdir.xml;
+#X msg 78 241 ldxdir /tmp/svdir.xml;
+#X obj 538 176 s \$0-ain;
+#X obj 610 176 s \$0-din;
+#X obj 682 176 s \$0-sin;
+#X obj 776 179 s \$0-rin;
+#X obj 536 107 r \$0-a;
+#X obj 630 105 r \$0-d;
+#X obj 698 106 r \$0-s;
+#X obj 769 106 r \$0-r;
+#X obj 772 142 commun /r \$0;
+#X obj 682 142 commun /s \$0;
+#X obj 582 141 commun /d \$0;
+#X obj 496 137 commun /a \$0;
+#X connect 0 2 15 0;
+#X connect 1 0 0 1;
+#X connect 2 0 11 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 4 1 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X connect 7 0 8 0;
+#X connect 8 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
+#X connect 13 0 14 0;
+#X connect 14 0 12 0;
+#X connect 16 0 0 0;
+#X connect 17 0 0 0;
+#X connect 22 0 29 0;
+#X connect 23 0 28 0;
+#X connect 24 0 27 0;
+#X connect 25 0 26 0;
+#X connect 26 0 21 0;
+#X connect 27 0 20 0;
+#X connect 28 0 19 0;
+#X connect 29 0 18 0;
+#X restore 371 -4 pd saves;
+#N canvas 569 61 450 300 cnv.ctl 0;
+#X obj 90 188 s \$0-background-cnv;
+#X floatatom 108 59 5 100 1000 0 width - -;
+#X floatatom 112 83 4 50 500 0 height - -;
+#X obj 92 132 pack 0 0;
+#X msg 92 159 vis_size \$1 \$2;
+#X obj 110 106 t b f;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X restore 296 -4 pd cnv.ctl;
+#X obj 117 34 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -225271
+-1 -1;
+#X obj 117 62 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -257472
+-1 -1;
+#X text 184 -4 look! ==>;
+#X obj 371 17 outlet OSC;
+#X obj 10 37 vsl 8 64 0 100 0 0 \$0-a \$0-ain a 0 -8 1 8 -355 -260818
+-143491 0 1;
+#X obj 29 37 vsl 8 64 0 127 0 0 \$0-d \$0-din d 0 -8 1 8 -355 -260818
+-143491 0 1;
+#X obj 49 37 vsl 8 64 0 127 0 0 \$0-s \$0-sin s 0 -8 1 8 -355 -260818
+-143491 0 1;
+#X obj 69 37 vsl 8 64 0 127 0 0 \$0-r \$0-rin r 0 -8 1 8 -355 -260818
+-143491 0 1;
+#X obj 189 21 inlet;
+#X obj 189 72 outlet~;
+#N canvas 0 0 600 400 envelope 0;
+#X obj 173 134 r \$0-level;
+#X obj 252 35 r \$0-a;
+#X obj 293 85 r \$0-d;
+#X obj 315 139 r \$0-s;
+#X obj 413 132 r \$0-r;
+#X obj 25 119 inlet;
+#X obj 174 346 outlet~;
+#N canvas 231 224 600 400 adsr 0;
+#X text 52 50 This patch is used as an abstraction in 25.envelope.pd
+;
+#X obj 95 108 inlet;
+#X obj 298 111 inlet;
+#X text 91 79 trigger;
+#X obj 95 138 sel 0;
+#X obj 144 138 t b;
+#X obj 104 359 pack 0 \$2;
+#X obj 362 112 inlet;
+#X obj 309 301 del \$2;
+#X obj 338 324 f \$4;
+#X obj 371 369 pack 0 \$3;
+#X obj 410 112 inlet;
+#X obj 459 111 inlet;
+#X obj 504 111 inlet;
+#X msg 95 191 stop;
+#X obj 517 360 pack 0 \$5;
+#X text 378 86 Traditional A \, D \, S \, R;
+#X text 296 88 level;
+#X text 32 302 ATTACK;
+#X obj 371 449 outlet~;
+#X text 7 325 recall level;
+#X text 7 345 and pack with;
+#X text 8 365 attack time;
+#X text 28 124 if zero;
+#X text 29 141 release;
+#X text 17 183 and cancel;
+#X text 17 199 decay;
+#X text 148 120 bang if attack;
+#X text 183 294 on attack \, set a;
+#X text 147 307 delay to go to sustain;
+#X text 189 324 recall sustain value;
+#X text 185 347 multiply by overall level;
+#X text 220 370 pack with decay time;
+#X text 510 386 on release ramp;
+#X text 511 403 back to zero;
+#X text 63 12 adsr - arguments: level \, attack time \, decay time
+\, sustain level \, release time;
+#X text 17 487 When you send this patch a nonzero trigger it schedules
+a line~ to do an attack and decay \, and if zero \, it starts the release
+ramp.;
+#X text 18 533 Objects such as f and pack can be given dollar sign
+arguments to initialize their contents from adsr's creation arguments.
+Inlets are supplied to update them on the fly.;
+#X obj 104 334 f;
+#X obj 371 422 vline~;
+#X obj 364 346 * 1;
+#X connect 1 0 4 0;
+#X connect 2 0 38 0;
+#X connect 2 0 40 1;
+#X connect 4 0 14 0;
+#X connect 4 0 15 0;
+#X connect 4 1 5 0;
+#X connect 5 0 8 0;
+#X connect 6 0 39 0;
+#X connect 7 0 6 1;
+#X connect 7 0 8 1;
+#X connect 8 0 9 0;
+#X connect 9 0 40 0;
+#X connect 10 0 39 0;
+#X connect 11 0 10 1;
+#X connect 12 0 9 1;
+#X connect 13 0 15 1;
+#X connect 14 0 8 0;
+#X connect 15 0 39 0;
+#X connect 38 0 6 0;
+#X connect 39 0 19 0;
+#X connect 40 0 10 0;
+#X restore 174 292 pd adsr -----------;
+#X obj 100 181 s \$0-level;
+#X obj 253 62 scale 0 127 0 200;
+#X obj 308 164 scale 0 127 0 1;
+#X obj 289 119 scale 0 127 0 200;
+#X obj 172 168 scale 0 127 0 1;
+#X obj 366 202 scale 0 127 0 1000;
+#X obj 74 149 select 0;
+#X connect 0 0 12 0;
+#X connect 1 0 9 0;
+#X connect 2 0 11 0;
+#X connect 3 0 10 0;
+#X connect 4 0 13 0;
+#X connect 5 0 14 0;
+#X connect 5 0 7 0;
+#X connect 7 0 6 0;
+#X connect 9 0 7 2;
+#X connect 10 0 7 4;
+#X connect 11 0 7 3;
+#X connect 12 0 7 1;
+#X connect 13 0 7 5;
+#X connect 14 1 8 0;
+#X restore 189 47 pd envelope;
+#X text 23 -1 Graphical ADSR;
+#X obj 95 37 vsl 8 64 0 127 0 0 empty \$0-level lvl 0 -8 1 8 -62784
+-262144 -258699 5361 1;
+#X obj 116 90 nbx 2 14 -1e+37 1e+37 0 0 \$0-substate \$0-parentstate
+preset 0 -6 0 8 -261681 -1 -1 0 256;
+#X connect 1 0 2 1;
+#X connect 2 0 7 0;
+#X connect 12 0 14 0;
+#X connect 14 0 13 0;
+#X coords 0 0 1 1 152 115 1;
diff --git a/effects/rrad.delay~.pd b/effects/rrad.delay~.pd
new file mode 100644
index 0000000..375fb4d
--- /dev/null
+++ b/effects/rrad.delay~.pd
@@ -0,0 +1,174 @@
+#N canvas 269 340 167 101 10;
+#X obj 2 20 cnv 15 160 75 empty \$0-background-cnv empty 20 12 1 14
+-233017 -66577 0;
+#X obj 434 3 inlet OSC;
+#N canvas 261 108 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 29 261 r \$0-RRADICAL-OSC;
+#X obj 29 285 OSCroute /bpm;
+#X obj 29 304 s \$0-bpm;
+#X obj 385 228 r \$0-bpm;
+#X obj 385 286 expr 60000/$f1;
+#X obj 385 315 s \$0-beatdur;
+#X obj 507 110 commun /divider \$0;
+#X obj 507 86 r \$0-divider;
+#X obj 507 133 s \$0-divider;
+#X obj 507 160 r \$0-lop;
+#X obj 507 207 s \$0-lop;
+#X obj 507 184 commun /lop \$0;
+#X obj 617 159 r \$0-damp;
+#X obj 617 183 commun /damp \$0;
+#X obj 617 207 s \$0-damp;
+#X obj 30 354 OSCroute /preset;
+#X obj 30 330 r \$0-RRADICAL-OSC;
+#X obj 30 384 s \$0-substate;
+#X obj 528 287 r \$0-bypass;
+#X obj 528 334 s \$0-bypass;
+#X obj 528 311 commun /bypass \$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 15 0;
+#X connect 15 0 16 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 20 0 22 0;
+#X connect 21 0 20 0;
+#X connect 23 0 25 0;
+#X connect 25 0 24 0;
+#X connect 26 0 27 0;
+#X connect 27 0 28 0;
+#X connect 29 0 31 0;
+#X connect 30 0 29 0;
+#X connect 32 0 34 0;
+#X connect 34 0 33 0;
+#X restore 372 2 pd saves;
+#N canvas 569 61 450 300 cnv.ctl 0;
+#X obj 90 188 s \$0-background-cnv;
+#X floatatom 108 59 5 100 1000 0 width - -;
+#X floatatom 112 83 4 50 500 0 height - -;
+#X obj 92 132 pack 0 0;
+#X msg 92 159 vis_size \$1 \$2;
+#X obj 110 106 t b f;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X restore 297 2 pd cnv.ctl;
+#X obj 98 76 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -225271 -1
+-1;
+#X obj 132 76 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -257472
+-1 -1;
+#X text 93 0 look! ==>;
+#N canvas 381 136 597 481 engine 0;
+#X obj 367 423 outlet~;
+#X msg 255 102 0.25;
+#X msg 299 102 0.333;
+#X msg 395 102 1;
+#X obj 422 125 t b f;
+#X msg 218 105 0;
+#X obj 329 29 loadbang;
+#X msg 347 103 0.666;
+#X obj 305 258 lop~ 500;
+#X obj 367 237 sig~;
+#X obj 256 258 *~ 0.3;
+#X obj 367 215 *;
+#X obj 69 216 inlet~;
+#X obj 367 259 vd~ \$0-del;
+#X obj 69 328 delwrite~ \$0-del 5000;
+#X obj 450 103 r \$0-beatdur;
+#X obj 459 263 r \$0-bypass;
+#X obj 400 43 select 0 1 2 3 4;
+#X msg 397 25 \$1;
+#X obj 397 5 r \$0-divider;
+#X obj 443 193 f;
+#X obj 492 221 t b;
+#X obj 249 211 r \$0-lop;
+#X obj 178 224 r \$0-damp;
+#X obj 369 372 gpan~;
+#X obj 206 154 s \$0-div;
+#X msg 163 127 label \$1|;
+#X obj 506 410 outlet~;
+#X connect 1 0 11 0;
+#X connect 1 0 26 0;
+#X connect 2 0 11 0;
+#X connect 2 0 26 0;
+#X connect 3 0 11 0;
+#X connect 3 0 26 0;
+#X connect 4 0 11 0;
+#X connect 4 1 11 1;
+#X connect 4 1 20 1;
+#X connect 5 0 11 0;
+#X connect 5 0 26 0;
+#X connect 6 0 3 0;
+#X connect 7 0 11 0;
+#X connect 7 0 26 0;
+#X connect 8 0 10 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 9 0;
+#X connect 12 0 14 0;
+#X connect 12 0 24 1;
+#X connect 13 0 8 0;
+#X connect 13 0 24 0;
+#X connect 15 0 4 0;
+#X connect 16 0 24 2;
+#X connect 17 0 5 0;
+#X connect 17 1 1 0;
+#X connect 17 2 2 0;
+#X connect 17 3 7 0;
+#X connect 17 4 3 0;
+#X connect 18 0 17 0;
+#X connect 19 0 18 0;
+#X connect 19 0 21 0;
+#X connect 20 0 11 1;
+#X connect 21 0 20 0;
+#X connect 22 0 8 1;
+#X connect 23 0 10 1;
+#X connect 24 0 0 0;
+#X connect 24 1 0 0;
+#X connect 26 0 25 0;
+#X restore 251 32 pd engine;
+#X obj 252 3 inlet~;
+#X obj 252 58 outlet~;
+#X obj 131 32 tgl 15 0 \$0-bypass \$0-bypass bypass -5 -6 0 8 -24198
+-258699 -1 1 1;
+#X obj 7 33 hradio 15 1 0 5 \$0-divider \$0-divider divider 0 -6 0
+8 -261681 -1 -1 0;
+#X obj 11 58 hsl 64 12 10 22050 0 0 \$0-lop \$0-lop lop 0 6 0 8 -257472
+-1 -1 2000 1;
+#X obj 10 77 hsl 64 12 0 0.99 0 0 \$0-damp \$0-damp damp 0 6 0 8 -262131
+-1 -1 3700 1;
+#X obj 85 33 cnv 15 35 15 empty \$0-div 0| 2 9 0 8 -261681 -66577 0
+;
+#X obj 326 60 outlet~;
+#X connect 1 0 2 1;
+#X connect 7 0 9 0;
+#X connect 8 0 7 0;
+#X coords 0 0 1 1 162 95 1;
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;
diff --git a/effects/rrad.filt~.pd b/effects/rrad.filt~.pd
new file mode 100644
index 0000000..a591d4f
--- /dev/null
+++ b/effects/rrad.filt~.pd
@@ -0,0 +1,233 @@
+#N canvas 415 35 191 107 10;
+#N canvas 757 353 450 300 noise 0;
+#X obj 215 52 == 1;
+#X obj 151 51 == 0;
+#X obj 106 228 outlet~;
+#X obj 257 79 inlet;
+#X obj 214 4 r \$0-filt_type;
+#X obj 33 52 inlet~;
+#N canvas 358 389 450 300 hip 0;
+#X obj 130 69 inlet~;
+#X obj 130 207 outlet~;
+#X obj 251 70 inlet;
+#X obj 251 119 switch~ 0;
+#X obj 130 114 hip~ 4000;
+#X obj 188 70 inlet;
+#X obj 352 74 r \$0-Q;
+#X obj 225 157 hp2~ 4000 0.707 10;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 3 0;
+#X connect 5 0 4 1;
+#X connect 5 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 91 146 pd hip;
+#N canvas 358 389 450 300 lop 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 251 120 switch~ 1;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 lp2~ 4000 0.707 20;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 3 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 158 145 pd lop;
+#N canvas 201 195 450 300 bap 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 bpq2~ 400 0.707 20;
+#X obj 251 120 switch~ 0;
+#X connect 0 0 4 0;
+#X connect 0 0 6 0;
+#X connect 2 0 7 0;
+#X connect 3 0 4 1;
+#X connect 3 0 6 1;
+#X connect 5 0 6 2;
+#X connect 6 0 1 0;
+#X restore 245 147 pd bap;
+#X obj 262 52 == 2;
+#X obj 215 24 unpack 0 0;
+#N canvas 0 0 450 300 off 0;
+#X obj 251 70 inlet~;
+#X obj 247 170 outlet~;
+#X obj 318 66 r \$0-wet;
+#X obj 308 120 line~;
+#X obj 260 118 *~;
+#X msg 312 93 \$1 100;
+#X connect 0 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X restore 38 146 pd off;
+#X obj 311 206 s \$0-wet;
+#X obj 313 152 f;
+#X obj 313 80 select 0 1;
+#X obj 311 183 f;
+#X obj 347 132 r \$0-wet;
+#X connect 0 0 7 2;
+#X connect 1 0 6 2;
+#X connect 3 0 6 1;
+#X connect 3 0 7 1;
+#X connect 3 0 8 1;
+#X connect 4 0 10 0;
+#X connect 5 0 7 0;
+#X connect 5 0 6 0;
+#X connect 5 0 8 0;
+#X connect 5 0 11 0;
+#X connect 6 0 2 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 8 2;
+#X connect 10 0 1 0;
+#X connect 10 0 0 0;
+#X connect 10 0 9 0;
+#X connect 11 0 2 0;
+#X connect 13 0 15 1;
+#X connect 14 0 13 0;
+#X connect 14 1 15 0;
+#X connect 15 0 12 0;
+#X connect 16 0 13 1;
+#X restore 199 133 pd noise;
+#X obj 250 110 r \$0-filt_freq;
+#X obj 144 101 inlet~;
+#X obj 163 170 outlet~;
+#X obj 232 77 s \$0-filt_type;
+#X obj 42 76 hradio 15 1 0 3 \$0-filt_type \$0-filt_type hip/lop/bp
+0 -6 0 8 -262144 -1 -1 2;
+#X obj 232 36 loadbang;
+#X obj 14 40 hsl 64 15 0 127 0 0 \$0-freq \$0-freq freq -2 -6 0 8 -262144
+-1 -1 5100 1;
+#X obj 317 -4 r \$0-freq;
+#X obj 317 21 mtof;
+#X obj 317 43 s \$0-filt_freq;
+#X obj 353 68 inlet;
+#X obj 356 89 s \$0-freq;
+#X obj 102 40 hsl 64 15 0 1 0 0 \$0-wet \$0-wet dry-level -2 -6 0 8
+-262144 -1 -1 6300 1;
+#N canvas 803 359 450 300 noise 0;
+#X obj 215 52 == 1;
+#X obj 151 51 == 0;
+#X obj 106 228 outlet~;
+#X obj 257 79 inlet;
+#X obj 214 4 r \$0-filt_type;
+#X obj 33 52 inlet~;
+#N canvas 358 389 450 300 hip 0;
+#X obj 130 69 inlet~;
+#X obj 130 207 outlet~;
+#X obj 251 70 inlet;
+#X obj 251 119 switch~ 0;
+#X obj 130 114 hip~ 4000;
+#X obj 188 70 inlet;
+#X obj 352 74 r \$0-Q;
+#X obj 225 157 hp2~ 4000 0.707 10;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 3 0;
+#X connect 5 0 4 1;
+#X connect 5 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 91 146 pd hip;
+#N canvas 358 389 450 300 lop 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 251 120 switch~ 1;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 lp2~ 4000 0.707 20;
+#X connect 0 0 4 0;
+#X connect 0 0 7 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 3 0 7 1;
+#X connect 6 0 7 2;
+#X connect 7 0 1 0;
+#X restore 158 145 pd lop;
+#N canvas 201 195 450 300 bap 0;
+#X obj 130 69 inlet~;
+#X obj 130 168 outlet~;
+#X obj 251 70 inlet;
+#X obj 188 70 inlet;
+#X obj 130 114 lop~ 4000;
+#X obj 350 83 r \$0-Q;
+#X obj 172 146 bpq2~ 400 0.707 20;
+#X obj 251 120 switch~ 0;
+#X connect 0 0 4 0;
+#X connect 0 0 6 0;
+#X connect 2 0 7 0;
+#X connect 3 0 4 1;
+#X connect 3 0 6 1;
+#X connect 5 0 6 2;
+#X connect 6 0 1 0;
+#X restore 245 147 pd bap;
+#X obj 262 52 == 2;
+#X obj 215 24 unpack 0 0;
+#N canvas 0 0 450 300 off 0;
+#X obj 251 70 inlet~;
+#X obj 247 170 outlet~;
+#X obj 318 66 r \$0-wet;
+#X obj 308 120 line~;
+#X obj 260 118 *~;
+#X msg 312 93 \$1 100;
+#X connect 0 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 3 0;
+#X restore 38 146 pd off;
+#X connect 0 0 7 2;
+#X connect 1 0 6 2;
+#X connect 3 0 6 1;
+#X connect 3 0 7 1;
+#X connect 3 0 8 1;
+#X connect 4 0 10 0;
+#X connect 5 0 7 0;
+#X connect 5 0 6 0;
+#X connect 5 0 8 0;
+#X connect 5 0 11 0;
+#X connect 6 0 2 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 8 2;
+#X connect 10 0 1 0;
+#X connect 10 0 0 0;
+#X connect 10 0 9 0;
+#X connect 11 0 2 0;
+#X restore 339 170 pd noise;
+#X obj 390 147 r \$0-filt_freq;
+#X obj 284 138 inlet~;
+#X obj 303 207 outlet~;
+#X msg 232 57 3;
+#X msg 186 52 1;
+#X obj 181 78 s \$0-wet;
+#X obj 111 76 tgl 15 0 \$0-filt-on empty filter-on? 0 -6 0 8 -262144
+-1 -1 0 1;
+#X connect 0 0 3 0;
+#X connect 1 0 0 1;
+#X connect 2 0 0 0;
+#X connect 6 0 18 0;
+#X connect 6 0 19 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 11 0 12 0;
+#X connect 14 0 17 0;
+#X connect 15 0 14 1;
+#X connect 16 0 14 0;
+#X connect 18 0 4 0;
+#X connect 19 0 20 0;
+#X coords 0 0 1 1 180 80 1;
diff --git a/effects/rrad.lop~.pd b/effects/rrad.lop~.pd
new file mode 100644
index 0000000..881a20b
--- /dev/null
+++ b/effects/rrad.lop~.pd
@@ -0,0 +1,124 @@
+#N canvas 398 161 164 112 10;
+#X obj 2 19 cnv 15 160 89 empty \$0-background-cnv empty 20 12 1 14
+-228992 -66577 0;
+#X obj 352 1 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 541 22 Put your commun sends here \, if you like.;
+#X obj 437 84 r \$0-freq;
+#X obj 437 108 commun /freq \$0;
+#X obj 437 131 s \$0-freq;
+#X obj 552 43 r \$0-Q;
+#X obj 554 111 commun /Q \$0;
+#X obj 555 164 s \$0-Q;
+#X obj 648 87 r \$0-interp;
+#X obj 648 112 commun /interp \$0;
+#X obj 648 134 s \$0-interp;
+#X obj 238 187 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -225271
+-1 -1;
+#X obj 238 215 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -257472
+-1 -1;
+#X obj 152 190 outlet OSC;
+#X obj 556 80 moses 0.01;
+#X obj 554 136 moses 0.01;
+#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 3 2 25 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 15 0;
+#X connect 15 0 16 0;
+#X connect 17 0 26 0;
+#X connect 18 0 27 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 26 0 18 0;
+#X connect 27 1 19 0;
+#X restore 290 0 pd saves;
+#N canvas 609 68 450 300 cnv.ctl 0;
+#X obj 90 188 s \$0-background-cnv;
+#X floatatom 108 59 5 100 1000 0 width - -;
+#X floatatom 112 83 4 50 500 0 height - -;
+#X obj 92 132 pack 0 0;
+#X msg 92 159 vis_size \$1 \$2;
+#X obj 110 106 t b f;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X restore 215 0 pd cnv.ctl;
+#X obj 23 30 hsl 80 15 0 127 0 0 \$0-freq \$0-freq freq -2 -6 0 8 -261689
+-1 -1 4914 1;
+#X text 94 -1 look! ==>;
+#N canvas 547 322 450 300 effect 0;
+#X obj 66 206 outlet~;
+#X obj 70 154 lp2~ 440 0.707 200;
+#X obj 61 48 inlet~;
+#X obj 110 97 r \$0-freq;
+#X obj 188 99 r \$0-Q;
+#X obj 240 97 r \$0-interp;
+#X obj 110 125 mtof;
+#X obj 172 198 s \$0-realQ;
+#X obj 262 199 s \$0-realint;
+#X text 279 122 scale;
+#X obj 239 124 * 5;
+#X obj 173 130 * 0.3;
+#X obj 148 250 s \$0-realfreq;
+#X obj 141 220 int;
+#X connect 1 0 0 0;
+#X connect 2 0 1 0;
+#X connect 3 0 6 0;
+#X connect 4 0 11 0;
+#X connect 5 0 10 0;
+#X connect 6 0 1 1;
+#X connect 6 0 13 0;
+#X connect 10 0 1 3;
+#X connect 10 0 8 0;
+#X connect 11 0 1 2;
+#X connect 11 0 7 0;
+#X connect 13 0 12 0;
+#X restore 173 40 pd effect;
+#X obj 172 66 outlet~;
+#X obj 173 1 inlet~;
+#X obj 290 22 outlet OSC;
+#X obj 22 60 vsl 15 32 0.01 127 0 0 \$0-Q \$0-Q Q 0 -8 0 8 -195568
+-258699 -1 400 1;
+#X obj 121 61 vsl 15 32 0 127 0 0 \$0-interp \$0-interp interp 0 -8
+0 8 -195568 -355 -1 0 1;
+#X obj 46 57 nbx 5 14 0 1e+37 0 0 \$0-substate \$0-parentstate preset
+0 -6 0 8 -233017 -1 -1 0 256;
+#X obj 47 84 nbx 3 12 -1e+37 1e+37 0 0 empty \$0-realQ Q 0 -6 0 8 -233017
+-258699 -1 4.91874 256;
+#X obj 81 84 nbx 3 12 -1e+37 1e+37 0 0 empty \$0-realint interp 0 -6
+0 8 -233017 -355 -1 0 256;
+#X obj 113 31 nbx 5 12 -1e+37 1e+37 0 0 empty \$0-realfreq freq 0 -6
+0 8 -261689 -258699 -1 783 256;
+#X connect 1 0 2 1;
+#X connect 2 0 9 0;
+#X connect 6 0 7 0;
+#X connect 8 0 6 0;
+#X coords 0 0 1 1 162 110 1;
diff --git a/effects/rrad.ms.pd b/effects/rrad.ms.pd
new file mode 100644
index 0000000..81b725f
--- /dev/null
+++ b/effects/rrad.ms.pd
@@ -0,0 +1,176 @@
+#N canvas 499 433 106 229 10;
+#X obj 2 19 cnv 15 100 200 empty \$0-background-cnv empty 20 12 1 14
+-225271 -66577 0;
+#X obj 303 -4 inlet OSC;
+#N canvas 0 0 981 424 saves 0;
+#X obj 45 160 originator \$1 \$0;
+#X obj 152 132 inlet OSC;
+#X obj 507 86 r \$0-s1;
+#X obj 507 110 commun /s1 \$0;
+#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 msg 15 91 setsub \$1;
+#X msg 295 127 svdir \$1;
+#X obj 296 82 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 296 106 savepanel;
+#X msg 108 214 svdir /tmp/svdir.dat;
+#X msg 78 241 lddir /tmp/svdir.dat;
+#X obj 152 189 outlet OSC;
+#X obj 506 184 commun /throw \$0;
+#X obj 506 233 s \$0-throw-r;
+#X obj 506 159 r \$0-throw-s;
+#X obj 506 210 symbol;
+#X obj 507 135 s \$0-s1;
+#X obj 376 93 loadbang;
+#X msg 376 122 1;
+#X obj 376 145 s \$0-s2;
+#X obj 638 84 r \$0-s2;
+#X obj 742 109 commun /s3 \$0;
+#X obj 849 109 commun /s4 \$0;
+#X obj 639 107 commun /s2 \$0;
+#X obj 639 130 s \$0-s2;
+#X obj 849 85 r \$0-s4;
+#X obj 850 131 s \$0-s4;
+#X obj 742 85 r \$0-s3;
+#X obj 742 132 s \$0-s3;
+#X obj 428 183 loadbang;
+#X obj 428 215 symbol \$2;
+#X obj 240 266 OSCroute \$1;
+#X obj 203 333 s \$0-s1;
+#X obj 260 335 s \$0-s2;
+#X obj 406 338 s \$0-s4;
+#X obj 329 334 s \$0-s3;
+#X obj 415 274 loadbang;
+#X msg 412 296 64;
+#X obj 244 290 route /7 /13 /12 /10;
+#X connect 0 2 19 0;
+#X connect 1 0 0 1;
+#X connect 1 0 39 0;
+#X connect 2 0 3 0;
+#X connect 3 0 24 0;
+#X connect 4 0 13 0;
+#X connect 5 0 6 0;
+#X connect 6 0 13 0;
+#X connect 6 1 0 0;
+#X connect 7 0 8 0;
+#X connect 8 0 0 0;
+#X connect 9 0 10 0;
+#X connect 10 0 0 0;
+#X connect 13 0 0 0;
+#X connect 14 0 0 0;
+#X connect 15 0 16 0;
+#X connect 16 0 14 0;
+#X connect 17 0 0 0;
+#X connect 18 0 0 0;
+#X connect 20 0 23 0;
+#X connect 22 0 20 0;
+#X connect 23 0 21 0;
+#X connect 25 0 26 0;
+#X connect 26 0 27 0;
+#X connect 28 0 31 0;
+#X connect 29 0 36 0;
+#X connect 30 0 34 0;
+#X connect 31 0 32 0;
+#X connect 33 0 30 0;
+#X connect 35 0 29 0;
+#X connect 37 0 38 0;
+#X connect 39 0 46 0;
+#X connect 44 0 45 0;
+#X connect 45 0 42 0;
+#X connect 46 0 40 0;
+#X connect 46 1 41 0;
+#X connect 46 2 43 0;
+#X connect 46 3 42 0;
+#X restore 241 -5 pd saves;
+#N canvas 569 61 450 300 cnv.ctl 0;
+#X obj 90 188 s \$0-background-cnv;
+#X floatatom 108 59 5 100 1000 0 width - -;
+#X floatatom 112 83 4 50 500 0 height - -;
+#X obj 92 132 pack 0 0;
+#X msg 92 159 vis_size \$1 \$2;
+#X obj 110 106 t b f;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X restore 166 -5 pd cnv.ctl;
+#X obj 37 50 hsl 48 15 0 127 0 0 \$0-s2 \$0-s2 s2 -2 -6 0 8 -228992
+-1 -1 2146 1;
+#X obj 12 188 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -262144
+-1 -1;
+#X obj 40 188 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -262144
+-1 -1;
+#X text 26 0 look! ==>;
+#X obj 241 16 outlet OSC;
+#X obj 120 -5 inlet~;
+#X obj 123 135 outlet~;
+#X symbolatom 11 128 10 0 0 0 - #0-throw-r #0-throw-s;
+#N canvas 0 0 450 300 routing 0;
+#X obj 86 50 inlet~;
+#X obj 102 269 outlet~;
+#X obj 213 82 line~;
+#X obj 177 99 *~;
+#X msg 213 58 \$1 5;
+#X obj 162 222 line~;
+#X obj 100 227 *~;
+#X msg 162 198 \$1 5;
+#X msg 297 89 set \$1;
+#X obj 330 66 r \$0-throw-r;
+#X obj 294 54 r \$0-throw-s;
+#X obj 177 124 throw~ \$1;
+#X obj 161 156 r \$0-s1;
+#X obj 217 20 r \$0-s2;
+#X obj 216 207 r \$0-s4;
+#X obj 159 271 outlet~;
+#X obj 104 248 gpans~;
+#X floatatom 295 151 5 0 0 0 - - -;
+#X obj 165 175 / 127;
+#X obj 218 38 / 127;
+#X obj 223 227 / 127;
+#X connect 0 0 3 0;
+#X connect 0 0 6 0;
+#X connect 2 0 3 1;
+#X connect 3 0 11 0;
+#X connect 4 0 2 0;
+#X connect 5 0 6 1;
+#X connect 6 0 16 0;
+#X connect 6 0 16 1;
+#X connect 7 0 5 0;
+#X connect 9 0 8 0;
+#X connect 10 0 8 0;
+#X connect 12 0 18 0;
+#X connect 13 0 19 0;
+#X connect 14 0 20 0;
+#X connect 16 0 1 0;
+#X connect 16 1 15 0;
+#X connect 18 0 7 0;
+#X connect 18 0 17 0;
+#X connect 19 0 4 0;
+#X connect 20 0 16 2;
+#X restore 123 29 pd routing;
+#X obj 11 52 vsl 15 64 0 127 0 0 \$0-s1 \$0-s1 s1 0 -8 0 8 -262131
+-1 -1 6300 1;
+#X obj 37 77 hsl 48 15 0 127 0 0 \$0-s3 \$0-s3 s3 -2 -6 0 8 -228992
+-1 -1 3035 1;
+#X obj 37 104 hsl 48 15 0 127 0 0 \$0-s4 \$0-s4 s4 -2 -6 0 8 -228992
+-1 -1 2443 1;
+#X obj 12 160 nbx 3 12 0 1e+37 0 0 \$0-substate \$0-substate-r preset
+0 -6 0 8 -261681 -1 -1 0 256;
+#X obj 181 135 outlet~;
+#X connect 1 0 2 1;
+#X connect 2 0 8 0;
+#X connect 9 0 12 0;
+#X connect 12 0 10 0;
+#X connect 12 1 17 0;
+#X coords 0 0 1 1 102 220 1;
diff --git a/effects/rrad.reverb~.pd b/effects/rrad.reverb~.pd
new file mode 100644
index 0000000..db07e91
--- /dev/null
+++ b/effects/rrad.reverb~.pd
@@ -0,0 +1,93 @@
+#N canvas 206 337 543 94 10;
+#X obj 170 172 plugin~ tap_reverb;
+#X msg 208 114 control #8 \$1;
+#X obj 231 149 inlet~;
+#X obj 282 147 inlet~;
+#X obj 226 204 outlet~;
+#X obj 285 206 outlet~;
+#X obj 118 205 print tap.rev;
+#X obj 398 149 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 507 86 r \$0-s1;
+#X obj 507 135 s \$0-s1-r;
+#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 107 commun /reverb \$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 16 0;
+#X connect 7 0 2 0;
+#X connect 8 0 9 0;
+#X connect 9 0 2 0;
+#X connect 9 1 3 0;
+#X connect 10 0 11 0;
+#X connect 11 0 3 0;
+#X connect 12 0 13 0;
+#X connect 13 0 3 0;
+#X connect 16 0 6 0;
+#X restore 336 148 pd saves;
+#X obj 202 94 r \$0-reverb;
+#X msg 125 124 print;
+#X msg 5 95 control #2 \$1;
+#X msg 324 101 control #3 \$1;
+#X obj 43 71 hsl 128 15 -70 10 0 0 \$0-dry \$0-dry dry -2 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 328 70 hsl 128 15 -70 10 0 0 \$0-wet \$0-wet wet -2 -6 0 8 -262144
+-1 -1 12100 1;
+#X obj 220 69 nbx 5 14 0 37 0 0 \$0-reverb \$0-reverb reverb 0 -6 0
+10 -262144 -1 -1 23 256;
+#X msg 372 206 control #1 \$1;
+#X msg 369 229 control #4 \$1;
+#X msg 371 252 control #5 \$1;
+#X msg 375 277 control #6 \$1;
+#X msg 372 299 control #7 \$1;
+#X obj 46 42 nbx 5 14 0 100 0 0 empty empty decay 0 -6 0 10 -262144
+-1 -1 0 256;
+#X obj 108 40 nbx 5 14 0 20 0 0 empty empty combs 0 -6 0 10 -262144
+-1 -1 0 256;
+#X obj 174 40 nbx 5 14 0 20 0 0 empty empty allpass 0 -6 0 10 -262144
+-1 -1 6 256;
+#X obj 248 42 nbx 5 14 0 20 0 0 empty empty bandpass 0 -6 0 10 -262144
+-1 -1 0 256;
+#X obj 327 43 tgl 15 0 empty empty stereo-enhance 0 -6 0 8 -262144
+-1 -1 0 1;
+#X connect 0 0 6 0;
+#X connect 0 1 4 0;
+#X connect 0 2 5 0;
+#X connect 1 0 0 0;
+#X connect 2 0 0 1;
+#X connect 3 0 0 2;
+#X connect 7 0 8 1;
+#X connect 9 0 1 0;
+#X connect 10 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
+#X connect 13 0 11 0;
+#X connect 14 0 12 0;
+#X connect 16 0 0 0;
+#X connect 17 0 0 0;
+#X connect 18 0 0 0;
+#X connect 19 0 0 0;
+#X connect 20 0 0 0;
+#X connect 21 0 16 0;
+#X connect 22 0 17 0;
+#X connect 23 0 18 0;
+#X connect 24 0 19 0;
+#X connect 25 0 20 0;
+#X coords 0 0 1 1 530 100 1;
diff --git a/effects/rrad.rev~.pd b/effects/rrad.rev~.pd
new file mode 100644
index 0000000..69155e4
--- /dev/null
+++ b/effects/rrad.rev~.pd
@@ -0,0 +1,115 @@
+#N canvas 449 368 336 140 10;
+#X obj 165 235 plugin~ tap_reverb;
+#X msg 43 78 control #1 \$1;
+#X msg 83 99 control #2 \$1;
+#X msg 125 139 control #3 \$1;
+#X msg 166 161 control #8 \$1;
+#X floatatom 170 59 5 0 37 2 preset - -;
+#X floatatom 21 59 5 0 10000 2 decay - -;
+#X floatatom 69 59 5 -70 10 2 dry - -;
+#X floatatom 118 59 5 -70 10 2 wet - -;
+#X msg 218 80 control #4 \$1;
+#X msg 235 100 control #5 \$1;
+#X msg 252 121 control #6 \$1;
+#X msg 269 141 control #7 \$1;
+#X obj 217 57 tgl 15 0 empty empty c 0 -6 0 8 -262144 -1 -1 1 1;
+#X obj 243 57 tgl 15 0 empty empty a 0 -6 0 8 -262144 -1 -1 1 1;
+#X obj 268 57 tgl 15 0 empty empty b 0 -6 0 8 -262144 -1 -1 1 1;
+#X obj 295 57 tgl 15 0 empty empty stereo 0 -6 0 8 -262144 -1 -1 0
+1;
+#X msg 116 31 8;
+#X text 216 28 aet these to on:;
+#X symbolatom 105 113 25 0 0 0 preset #0-reverb-preset -;
+#N canvas 0 0 450 300 names 0;
+#X obj 32 176 pool tap_reverb;
+#X msg 65 154 get \$1;
+#X obj 32 205 l2s;
+#X obj 65 130 r \$0-p;
+#X msg 32 94 load tap_reverb.dat;
+#X obj 32 70 loadbang;
+#X obj 32 231 s \$0-reverb-preset;
+#X text 162 173 Pool is in the externals cvs.;
+#X text 66 206 list2symbol is from zexy. you can bypass it.;
+#X connect 0 0 2 0;
+#X connect 1 0 0 0;
+#X connect 2 0 6 0;
+#X connect 3 0 1 0;
+#X connect 4 0 0 0;
+#X connect 5 0 4 0;
+#X restore 161 263 pd names;
+#X obj 169 80 s \$0-p;
+#X msg 84 31 10;
+#X msg 43 23 10000;
+#X msg 47 144 print;
+#X obj 226 204 inlet~;
+#X obj 287 265 outlet~;
+#X obj 225 263 outlet~;
+#X obj 287 203 inlet~;
+#X obj 401 24 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 507 86 r \$0-s1;
+#X obj 507 110 commun /s1 \$0;
+#X obj 606 86 r \$0-s2;
+#X obj 606 110 commun /s2 \$0;
+#X obj 507 135 s \$0-s1-r;
+#X obj 606 135 s \$0-s2-r;
+#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 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 6 0;
+#X connect 6 0 9 0;
+#X connect 7 0 8 0;
+#X connect 8 0 10 0;
+#X connect 11 0 2 0;
+#X connect 12 0 13 0;
+#X connect 13 0 2 0;
+#X connect 13 1 3 0;
+#X connect 14 0 15 0;
+#X connect 15 0 3 0;
+#X connect 16 0 17 0;
+#X connect 17 0 3 0;
+#X restore 339 23 pd saves;
+#X connect 0 1 27 0;
+#X connect 0 2 26 0;
+#X connect 1 0 0 0;
+#X connect 2 0 0 0;
+#X connect 3 0 0 0;
+#X connect 4 0 0 0;
+#X connect 5 0 4 0;
+#X connect 5 0 21 0;
+#X connect 6 0 1 0;
+#X connect 7 0 2 0;
+#X connect 8 0 3 0;
+#X connect 9 0 0 0;
+#X connect 10 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
+#X connect 13 0 9 0;
+#X connect 14 0 10 0;
+#X connect 15 0 11 0;
+#X connect 16 0 12 0;
+#X connect 17 0 8 0;
+#X connect 22 0 7 0;
+#X connect 23 0 6 0;
+#X connect 24 0 0 0;
+#X connect 25 0 0 1;
+#X connect 28 0 0 2;
+#X connect 29 0 30 1;
+#X coords 0 0 1 1 300 90 1;
diff --git a/effects/rrad.send.pd b/effects/rrad.send.pd
new file mode 100644
index 0000000..40f54d8
--- /dev/null
+++ b/effects/rrad.send.pd
@@ -0,0 +1,94 @@
+#N canvas 310 367 255 162 10;
+#X obj 3 21 cnv 15 219 38 empty \$0-background-cnv empty 20 12 1 10
+-225271 -66577 0;
+#X obj 434 3 inlet OSC;
+#N canvas 96 554 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 506 191 commun /throw \$0;
+#X obj 506 167 r \$0-throw;
+#X obj 506 216 s \$0-throw-r;
+#X obj 507 110 commun /level \$0;
+#X obj 507 86 r \$0-level;
+#X obj 507 135 s \$0-level;
+#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 18 0 17 0;
+#X restore 372 2 pd saves;
+#N canvas 646 240 450 300 cnv.ctl 0;
+#X obj 90 188 s \$0-background-cnv;
+#X floatatom 108 59 5 100 1000 0 width - -;
+#X floatatom 112 83 4 0 500 0 height - -;
+#X obj 92 132 pack 0 0;
+#X msg 92 159 vis_size \$1 \$2;
+#X obj 110 106 t b f;
+#X connect 1 0 3 0;
+#X connect 2 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 0 0;
+#X connect 5 0 3 0;
+#X connect 5 1 3 1;
+#X restore 298 2 pd cnv.ctl;
+#X obj 83 39 hsl 128 15 0 1 0 0 \$0-level \$0-level level -2 -6 0 8
+-262144 -1 -1 5700 1;
+#X obj 202 94 vradio 15 1 0 3 \$0-substate \$0-substate-r empty 0 -6
+0 8 -262144 -1 -1 0;
+#X obj 34 121 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -262144
+-1 -1;
+#X obj 141 123 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -262144
+-1 -1;
+#X text 185 2 look! ==>;
+#X obj 408 141 throw~ \$2;
+#X symbolatom 4 40 10 0 0 2 throw #0-throw #0-throw-r;
+#X msg 408 116 set \$1;
+#X obj 412 30 loadbang;
+#X obj 413 50 symbol \$2;
+#X obj 413 70 s \$0-throw;
+#X obj 255 3 inlet~;
+#X obj 328 91 r \$0-throw;
+#X obj 410 91 r \$0-throw-r;
+#X obj 273 35 r \$0-level;
+#X obj 273 84 line~;
+#X obj 256 110 *~;
+#X msg 273 60 \$1 15;
+#X obj 118 78 nbx 5 14 0 1e+37 0 0 \$0-preset \$0-preset preset 0 -6
+0 10 -262144 -1 -1 0 256;
+#X connect 1 0 2 1;
+#X connect 11 0 9 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 15 0 20 0;
+#X connect 16 0 11 0;
+#X connect 17 0 11 0;
+#X connect 18 0 21 0;
+#X connect 19 0 20 1;
+#X connect 20 0 9 0;
+#X connect 21 0 19 0;
+#X coords 0 0 1 1 250 160 1;
diff --git a/effects/tap_reverb.dat b/effects/tap_reverb.dat
new file mode 100644
index 0000000..7b8e581
--- /dev/null
+++ b/effects/tap_reverb.dat
@@ -0,0 +1,38 @@
+, 0 , AfterBurn (Short)
+, 1 , AfterBurn (Long) 
+, 2 , Drum Chamber
+, 3 , Garage               
+, 4 , Garage (Bright)
+, 5 , Gymnasium      
+, 6 , Gymnasium (Bright)
+, 7 , Gymnasium (Bright) - HD  
+, 8 , Hall (Small)
+, 9 ,  Hall (Medium)
+, 10 , Hall (Large)
+, 11 , Hall (Large) - HD 
+, 12 , Plate (Small)
+, 13 , Plate (Medium)
+, 14 , Plate (Large)
+, 15 , Plate (Large) - HD
+, 16 , Pulse Chamber
+, 17 , Pulse Chamber (Reverse)
+, 18 , Resonator (96 ms)
+, 19 , Resonator (152 ms)                           
+, 20 , Resonator (208 ms)
+, 21 , Room (Small)           
+, 22 , Room (Medium)
+, 23 , Room (Large)     
+, 24 , Room (Large) - HD
+, 25 , Slap Chamber        
+, 26 , Slap Chamber - HD
+, 27 , Slap Chamber (Bright) 
+, 28 , Slap Chamber (Bright) - HD
+, 29 , Smooth Hall (Small)             
+, 30 , Smooth Hall (Medium)
+, 31 , Smooth Hall (Large)     
+, 32 , Smooth Hall (Large) - HD
+, 33 , Vocal Plate                       
+, 34 , Vocal Plate - HD
+, 35 , Warble Chamber 
+, 36 , Warehouse
+, 37 , Warehouse - HD