aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/dyn/pd/dyn~.pd
blob: 8ec75d9cfbeebf910659c8d87ca2f3dfae5ed5cc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
#N canvas 351 22 757 583 12;
#N canvas 41 57 576 675 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 obj 256 315 +;
#X floatatom 257 350 5 0 0 0 - - -;
#X floatatom 153 498 5 0 0 0 - - -;
#X floatatom 242 499 5 0 0 0 - - -;
#X floatatom 304 497 5 0 0 0 - - -;
#X obj 259 543 * 2;
#X obj 301 544 + 1;
#X floatatom 268 574 5 0 0 0 - - -;
#X floatatom 261 275 5 0 0 0 - - -;
#X floatatom 224 72 5 0 0 0 - - -;
#X floatatom 100 155 5 0 0 0 - - -;
#X floatatom 239 152 5 0 0 0 - - -;
#X obj 238 117 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 msg 36 34 reset \, newobj . a f \, conn 0 a 0 \, conn a 0 0;
#X msg 42 234 reset \, newobj . a + \, conn 0 a 0 \, conn 1 a 1 \,
conn a 0 0;
#X msg 35 443 reset \, newobj . a * 2 \, newobj . b + 1 \, conn 0 a
0 \, conn 1 a 1 \, conn a 0 b 0 \, conn 2 b 1 \, conn b 0 0;
#X connect 0 0 3 0;
#X connect 0 0 17 1;
#X connect 3 0 4 0;
#X connect 5 0 8 0;
#X connect 5 0 18 1;
#X connect 6 0 8 1;
#X connect 6 0 18 2;
#X connect 7 0 9 1;
#X connect 7 0 18 3;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 11 0 3 1;
#X connect 11 0 17 2;
#X connect 12 0 15 0;
#X connect 12 0 16 1;
#X connect 15 0 14 0;
#X connect 16 0 13 0;
#X connect 17 0 1 0;
#X connect 18 0 2 0;
#X connect 19 0 16 0;
#X connect 20 0 17 0;
#X connect 21 0 18 0;
#X restore 514 459 pd examples;
#X msg 127 70 reset;
#X text 184 70 clear all objects and connections;
#X msg 129 231 conn 0 a 0;
#X text 224 230 connect dyn-inlet 0 to a-inlet 0;
#X msg 129 260 conn a 0 0;
#X text 224 259 connect a-outlet 0 to dyn-outlet 0;
#X msg 129 293 conn x 2 y 3;
#X text 234 292 connect x-outlet 2 to y-inlet 3;
#X msg 129 356 del a;
#X text 181 358 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 387 send a message 1;
#X text 270 387 send "message 1" to a-inlet 0;
#X obj 54 468 dyn~ 0 1 0 2;
#X text 156 467 dyn sig/msg inlets sig/msg outlets;
#X msg 165 421 vis \$1;
#X obj 129 421 tgl 20 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X text 222 417 make patch visible/invisible;
#X msg 129 323 dis x 2 y 3;
#X text 234 324 disconnect x-outlet 2 to y-inlet 3;
#X text 187 98 reload all objects (keep connections);
#X msg 127 98 reload;
#X text 218 432 (connections are not drawn at the moment!);
#N canvas 178 192 574 430 dsp-ex 0;
#X obj 73 380 dac~;
#X obj 183 257 hsl 128 15 0 1000 0 0 empty empty empty -2 -6 0 8 -261681
-1 -1 5200 1;
#X obj 194 282 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-262144 -1 -1 409.449 256;
#X msg 66 78 reset;
#X obj 467 323 loadbang;
#X msg 466 347 \; pd dsp 1;
#X text 65 56 clear all;
#X obj 47 278 dyn~ 0 1 2 0;
#X text 70 107 make an oscillator (left);
#X text 66 167 add an oscillator (double frq \, right);
#X text 24 17 signals passing through dyn~ are delayed by one block
;
#X text 74 239 select frequency;
#X obj 57 341 *~ 0.2;
#X obj 141 340 *~ 0.2;
#X obj 179 313 hsl 128 15 0.001 1 1 0 empty empty empty -2 -6 0 8 -262131
-1 -1 8800 1;
#X text 316 309 gain;
#X msg 64 129 newobj . o1 osc~ 220 \, conn 0 o1 0 \, conn o1 0 0;
#X msg 67 187 newobj . m * 1.5 \, newobj . o2 osc~ 330 \, conn 0 m
0 \, conn m 0 o2 0 \, conn o2 0 1;
#X connect 1 0 2 0;
#X connect 1 0 7 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 7 0 12 0;
#X connect 7 1 13 0;
#X connect 12 0 0 0;
#X connect 13 0 0 1;
#X connect 14 0 12 1;
#X connect 14 0 13 1;
#X connect 16 0 7 0;
#X connect 17 0 7 0;
#X restore 514 487 pd dsp-ex;
#X msg 129 156 newmsg . b Hello;
#X msg 128 124 newobj . a + 1;
#X text 247 124 make new object [+ 1] with name "a" in root patcher
(".");
#X text 269 156 make new message object [Hello( with name "b" in root
patcher;
#X msg 128 200 newobj . c pd sub;
#X text 273 200 make sub patcher;
#X msg 425 198 newobj c d bang;
#X text 561 198 make object in sub patcher;
#X connect 1 0 16 0;
#X connect 3 0 16 0;
#X connect 5 0 16 0;
#X connect 7 0 16 0;
#X connect 9 0 16 0;
#X connect 14 0 16 0;
#X connect 18 0 16 0;
#X connect 19 0 18 0;
#X connect 21 0 16 0;
#X connect 24 0 16 0;
#X connect 27 0 16 0;
#X connect 28 0 16 0;
#X connect 31 0 16 0;
#X connect 33 0 16 0;