""

svn path=/trunk/; revision=370

1 files changed, 117 insertions, 0 deletions

diff --git a/externals/grill/dyn/pd/dyn~.pd b/externals/grill/dyn/pd/dyn~.pd
new file mode 100644
index 00000000..dc480cb2
--- /dev/null
+++ b/externals/grill/dyn/pd/dyn~.pd
@@ -0,0 +1,117 @@
+#N canvas 65 78 628 544 12;

+#N canvas 218 20 566 665 examples 0;

+#X floatatom 153 276 5 0 0 0 - - -;

+#X floatatom 110 353 5 0 0 0 - - -;

+#X floatatom 111 576 5 0 0 0 - - -;

+#X msg 44 232 reset \, new a + \, conn 0 a 0 \, conn 1 a 1 \, conn

+a 0 0;

+#X obj 220 316 +;

+#X floatatom 221 351 5 0 0 0 - - -;

+#X floatatom 153 498 5 0 0 0 - - -;

+#X floatatom 210 498 5 0 0 0 - - -;

+#X floatatom 263 498 5 0 0 0 - - -;

+#X msg 35 443 reset \, new a * 2 \, new b + 1 \, conn 0 a 0 \, conn

+1 a 1 \, conn a 0 b 0 \, conn 2 b 1 \, conn b 0 0;

+#X obj 227 542 * 2;

+#X obj 260 545 + 1;

+#X floatatom 236 573 5 0 0 0 - - -;

+#X floatatom 225 276 5 0 0 0 - - -;

+#X floatatom 201 73 5 0 0 0 - - -;

+#X floatatom 100 155 5 0 0 0 - - -;

+#X floatatom 216 153 5 0 0 0 - - -;

+#X msg 34 34 reset \, new a f \, conn 0 a 0 \, conn a 0 0;

+#X obj 215 118 f;

+#X obj 101 117 dyn~ 0 1 0 1;

+#X obj 111 315 dyn~ 0 2 0 1;

+#X obj 111 543 dyn~ 0 3 0 1;

+#X connect 0 0 4 0;

+#X connect 0 0 20 1;

+#X connect 3 0 20 0;

+#X connect 4 0 5 0;

+#X connect 6 0 10 0;

+#X connect 6 0 21 1;

+#X connect 7 0 10 1;

+#X connect 7 0 21 2;

+#X connect 8 0 11 1;

+#X connect 8 0 21 3;

+#X connect 9 0 21 0;

+#X connect 10 0 11 0;

+#X connect 11 0 12 0;

+#X connect 13 0 4 1;

+#X connect 13 0 20 2;

+#X connect 14 0 18 0;

+#X connect 14 0 19 1;

+#X connect 17 0 19 0;

+#X connect 18 0 16 0;

+#X connect 19 0 15 0;

+#X connect 20 0 1 0;

+#X connect 21 0 2 0;

+#X restore 514 459 pd examples;

+#X msg 129 97 reset;

+#X text 186 97 clear all objects and connections;

+#X msg 129 157 new a + 1;

+#X text 221 155 make new object [+ 1] with name "a";

+#X msg 129 187 conn 0 a 0;

+#X text 224 186 connect dyn-inlet 0 to a-inlet 0;

+#X msg 129 216 conn a 0 0;

+#X text 224 215 connect a-outlet 0 to dyn-outlet 0;

+#X msg 129 249 conn x 2 y 3;

+#X text 234 248 connect x-outlet 2 to y-inlet 3;

+#X msg 129 312 del a;

+#X text 181 314 delete object "a";

+#X obj 11 10 cnv 15 600 40 empty empty dyn~ 10 22 0 24 -260818 -1 0

+;

+#X text 133 32 http://www.parasitaere-kapazitaeten.net;

+#X text 133 12 dynamic object management \, (C)2003 Thomas Grill;

+#X msg 128 343 send a message 1;

+#X text 270 343 send "message 1" to a-inlet 0;

+#X obj 54 433 dyn~ 0 1 0 2;

+#X text 156 432 dyn sig/msg inlets sig/msg outlets;

+#X msg 165 377 vis \$1;

+#X obj 129 377 tgl 20 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

+1;

+#X text 222 373 make patch visible/invisible;

+#X msg 129 279 dis x 2 y 3;

+#X text 234 280 disconnect x-outlet 2 to y-inlet 3;

+#X text 189 125 reload all objects (keep connections);

+#X msg 129 125 reload;

+#X text 218 388 (connections are not drawn at the moment!);

+#N canvas 178 192 567 381 dsp-ex 0;

+#X obj 77 345 dac~;

+#X obj 143 281 hsl 128 15 0 1000 0 1 empty empty empty -2 -6 0 8 -261681

+-1 -1 800 1;

+#X obj 155 306 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0

+10 -262144 -1 -1 62.9921 256;

+#X msg 66 101 reset;

+#X msg 64 152 new o1 osc~ \, conn 0 o1 0 \, conn o1 0 0;

+#X obj 482 19 loadbang;

+#X msg 481 43 \; pd dsp 1;

+#X text 65 79 clear all;

+#X obj 47 301 dyn~ 0 1 2 0;

+#X msg 67 210 new m * 2 \, new o2 osc~ \, conn 0 m 0 \, conn m 0 o2

+0 \, conn o2 0 1;

+#X text 70 130 make an oscillator (left);

+#X text 66 190 add an oscillator (double frq \, right);

+#X text 24 17 signals passing through dyn~ are delayed by one block

+;

+#X text 67 261 select frequency;

+#X connect 1 0 2 0;

+#X connect 1 0 8 1;

+#X connect 3 0 8 0;

+#X connect 4 0 8 0;

+#X connect 5 0 6 0;

+#X connect 8 0 0 0;

+#X connect 8 1 0 1;

+#X connect 9 0 8 0;

+#X restore 514 487 pd dsp-ex;

+#X connect 1 0 18 0;

+#X connect 3 0 18 0;

+#X connect 5 0 18 0;

+#X connect 7 0 18 0;

+#X connect 9 0 18 0;

+#X connect 11 0 18 0;

+#X connect 16 0 18 0;

+#X connect 20 0 18 0;

+#X connect 21 0 20 0;

+#X connect 23 0 18 0;

+#X connect 26 0 18 0;