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;