aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/dyn/pd/dyn~.pd
blob: f34cc2189c3d0e73223ed70ba7531fe27eedd833 (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 195 68 753 579 12;
#N canvas 41 57 572 671 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 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 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 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 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 570 426 dsp-ex 0;
#X obj 73 380 dac~;
#X obj 144 258 hsl 128 15 0 1000 0 0 empty empty empty -2 -6 0 8 -261681
-1 -1 2800 1;
#X obj 155 283 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0
10 -262144 -1 -1 220.472 256;
#X msg 66 78 reset;
#X obj 482 19 loadbang;
#X msg 481 43 \; 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 112 341 *~ 0.2;
#X obj 140 314 hsl 128 15 0.001 1 1 0 empty empty empty -2 -6 0 8 -262131
-1 -1 9100 1;
#X text 277 310 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;