From 19846b8431801f09aa6c55207a679e802b3ddf81 Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Mon, 1 Dec 2008 02:57:16 +0000 Subject: added pdoutify, a better alternative to using OSC for internal communication. also, a simple exponential adsr~ and more work on gui-spigot svn path=/trunk/abstractions/sfruit/; revision=10409 --- sfruit/exp_adsr~.pd | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 sfruit/exp_adsr~.pd (limited to 'sfruit/exp_adsr~.pd') diff --git a/sfruit/exp_adsr~.pd b/sfruit/exp_adsr~.pd new file mode 100644 index 0000000..6022d12 --- /dev/null +++ b/sfruit/exp_adsr~.pd @@ -0,0 +1,50 @@ +#N canvas 0 22 567 406 10; +#N canvas 0 22 450 300 hotpack3 0; +#X obj 10 100 pack f f f; +#X obj 10 10 inlet; +#X obj 10 160 outlet; +#X obj 50 10 inlet; +#X obj 50 30 t b a; +#X obj 90 10 inlet; +#X obj 90 30 t b a; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 4 1 0 1; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X connect 6 1 0 2; +#X restore 198 138 pd hotpack3; +#X obj 147 295 vline~; +#X obj 147 319 *~; +#X msg 147 218 1 \$1 \, \$3 \$2 \$1; +#X msg 249 248 0 \$1; +#X obj 147 189 list; +#X obj 249 219 f; +#X obj 147 138 sel 1 0; +#X obj 147 63 inlet; +#X obj 147 348 outlet~; +#X obj 198 63 inlet; +#X obj 238 63 inlet; +#X obj 278 63 inlet; +#X obj 318 63 inlet; +#X text 202 38 a; +#X text 247 39 d; +#X text 290 39 s; +#X text 328 41 r; +#X connect 0 0 5 1; +#X connect 1 0 2 1; +#X connect 1 0 2 0; +#X connect 2 0 9 0; +#X connect 3 0 1 0; +#X connect 4 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 4 0; +#X connect 7 0 5 0; +#X connect 7 1 6 0; +#X connect 8 0 7 0; +#X connect 10 0 0 0; +#X connect 11 0 0 1; +#X connect 12 0 0 2; +#X connect 13 0 6 1; -- cgit v1.2.1