aboutsummaryrefslogtreecommitdiff
path: root/instruments/rrad.angriff~.pd
blob: 19f89eb4db2aed2cacf6fedd5ada9011c281c370 (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
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
#N canvas 54 514 304 148 10;
#X obj 470 181 outlet~;
#N canvas 0 0 472 437 hiddendrums 0;
#X obj 36 302 inlet;
#X obj 64 374 outlet~;
#X obj 73 52 r \$0-fromfr;
#X obj 103 94 r \$0-tofr;
#X obj 89 74 r \$0-frtime;
#X obj 133 133 r \$0-att_time;
#X obj 148 155 r \$0-rel_time;
#X obj 163 182 r \$0-nlevel;
#X obj 180 204 r \$0-nattack;
#X obj 197 227 r \$0-nrelease;
#X obj 215 249 r \$0-filt;
#X obj 118 112 r \$0-olevel;
#X obj 224 271 r \$0-filt_freq;
#X obj 234 293 r \$0-detune;
#X obj 242 315 r \$0-filt_Q;
#X obj 65 340 d-drumcenter _____________;
#X connect 0 0 15 0;
#X connect 2 0 15 1;
#X connect 3 0 15 3;
#X connect 4 0 15 2;
#X connect 5 0 15 5;
#X connect 6 0 15 6;
#X connect 7 0 15 7;
#X connect 8 0 15 8;
#X connect 9 0 15 9;
#X connect 10 0 15 10;
#X connect 11 0 15 4;
#X connect 12 0 15 11;
#X connect 13 0 15 12;
#X connect 14 0 15 13;
#X connect 15 0 1 0;
#X restore 470 96 pd hiddendrums;
#X obj 419 48 inlet;
#X obj 1 16 cnv 15 150 130 empty empty OSCILLATOR 20 12 1 8 -66577
-233017 0;
#X obj 152 16 cnv 15 150 100 empty empty NOISE 20 12 1 8 -195568 -33289
0;
#X obj 493 122 / 128;
#X obj 470 148 *~ 1;
#X obj 419 69 select 0;
#N canvas 689 185 334 138 1228-labelling 0;
#X obj 11 90 s \$0-filt_r;
#X obj 11 37 sel 0 1 2;
#X msg 11 65 label hip;
#X msg 72 66 label lop;
#X msg 137 66 label bp;
#X obj 11 14 r \$0-filt;
#X obj 229 87 s \$0-label_r;
#X obj 229 47 symbol \$1;
#X obj 229 27 loadbang;
#X msg 229 66 label \$1;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 1 2 4 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 1 0;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X connect 9 0 6 0;
#X restore 575 91 pd \$0-labelling;
#X obj 164 64 hsl 128 11 0 127 0 0 \$0-nrelease \$0-nrelease release
45 6 1 8 -262144 -1 -1 3800 0;
#X obj 164 51 hsl 128 11 0 127 0 0 \$0-nattack \$0-nattack attack 45
6 1 8 -262144 -1 -1 2200 0;
#X obj 164 38 hsl 128 11 0 1 0 0 \$0-nlevel \$0-nlevel nlevel 45 6
1 8 -262144 -1 -1 8001 0;
#X obj 164 95 hsl 128 11 0 6000 0 0 \$0-filt_freq \$0-filt_freq filt_freq
45 6 1 8 -262144 -1 -1 3600 0;
#X obj 164 79 hsl 48 12 0 6 0 0 \$0-filt_Q \$0-filt_Q filt_Q 14 6 1
8 -262144 -1 -1 500 1;
#X obj 237 79 hdl 12 0 0 3 \$0-filt \$0-filt_r hip 40 6 1729 8 -262144
-1 -1 0;
#X obj 12 123 hsl 128 11 0 1000 0 0 \$0-rel_time \$0-rel_time rel_time
45 6 1 8 -262144 -1 -1 1500 0;
#X obj 12 110 hsl 128 11 0 40 0 0 \$0-att_time \$0-att_time att_time
45 6 1 8 -262144 -1 -1 900 0;
#X obj 12 97 hsl 128 11 0 127 0 0 \$0-tofr \$0-tofr to_freq 45 6 1
8 -262144 -1 -1 6300 0;
#X obj 12 84 hsl 128 11 0 127 0 0 \$0-frtime \$0-frtime freq_time 45
6 1 8 -262144 -1 -1 0 0;
#X obj 12 71 hsl 128 11 0 127 0 0 \$0-fromfr \$0-fromfr from_freq 45
6 1 8 -262144 -1 -1 0 0;
#X obj 12 58 hsl 128 11 0 1 0 0 \$0-olevel \$0-olevel olevel 45 6 1
8 -262144 -1 -1 12700 0;
#X obj 50 43 hsl 48 12 0 30 0 0 \$0-detune \$0-detune detune 6 7 1
8 -262144 -1 -1 2000 1;
#N canvas 0 0 246 189 1228-settings 0;
#N canvas 165 199 970 635 settings 0;
#X obj 689 456 table \$0-settings;
#X obj 52 11 r \$0-fromfr;
#X obj 52 103 r \$0-tofr;
#X obj 52 57 r \$0-frtime;
#X obj 52 195 r \$0-att_time;
#X obj 52 241 r \$0-rel_time;
#X obj 52 287 r \$0-nlevel;
#X obj 52 333 r \$0-nattack;
#X obj 52 379 r \$0-nrelease;
#X obj 52 425 r \$0-filt;
#X obj 52 149 r \$0-olevel;
#X obj 52 471 r \$0-filt_freq;
#X obj 52 34 named_writer \$0-settings 1;
#X obj 52 356 named_writer \$0-settings 8;
#X obj 52 80 named_writer \$0-settings 2;
#X obj 52 172 named_writer \$0-settings 4;
#X obj 52 126 named_writer \$0-settings 3;
#X obj 52 218 named_writer \$0-settings 5;
#X obj 52 264 named_writer \$0-settings 6;
#X obj 52 310 named_writer \$0-settings 7;
#X obj 52 402 named_writer \$0-settings 9;
#X obj 52 448 named_writer \$0-settings 10;
#X obj 52 494 named_writer \$0-settings 11;
#X obj 315 305 named_sender \$0-settings \$0-fromfr 1;
#X obj 315 328 named_sender \$0-settings \$0-frtime 2;
#X obj 315 351 named_sender \$0-settings \$0-tofr 3;
#X obj 315 374 named_sender \$0-settings \$0-olevel 4;
#X obj 315 397 named_sender \$0-settings \$0-att_time 5;
#X obj 315 420 named_sender \$0-settings \$0-rel_time 6;
#X obj 315 443 named_sender \$0-settings \$0-nlevel 7;
#X obj 315 466 named_sender \$0-settings \$0-nattack 8;
#X obj 315 489 named_sender \$0-settings \$0-nrelease 9;
#X obj 315 534 named_sender \$0-settings \$0-filt_freq 11;
#X obj 315 179 until;
#X obj 345 234 + 1;
#X obj 271 179 bang;
#X msg 271 200 0;
#X obj 315 234 f 0;
#X obj 418 11 inlet;
#X obj 418 57 select load save;
#X obj 418 85 openpanel;
#X obj 628 106 savepanel;
#X msg 702 180 \; \$2-settings write \$1;
#X obj 702 157 pack s \$0;
#X obj 418 34 symbol;
#X obj 418 168 pack s \$0;
#X obj 536 118 loadbang;
#X msg 418 237 \; \$2-settings read \$1;
#X obj 565 227 del 2;
#X obj 565 204 t b;
#X obj 565 250 s \$0-sender;
#X obj 315 121 r \$0-sender;
#X msg 315 144 15;
#X obj 652 23 inlet;
#X obj 652 46 route load save;
#X obj 315 558 named_sender \$0-settings \$0-detune 12;
#X obj 52 517 r \$0-detune;
#X obj 52 540 named_writer \$0-settings 12;
#X obj 315 583 named_sender \$0-settings \$0-filt_Q 13;
#X obj 54 584 named_writer \$0-settings 13;
#X obj 54 561 r \$0-filt_Q;
#X obj 315 512 named_sender \$0-settings \$0-filt_r 10;
#X obj 536 141 symbol \$2;
#X connect 1 0 12 0;
#X connect 2 0 16 0;
#X connect 3 0 14 0;
#X connect 4 0 17 0;
#X connect 5 0 18 0;
#X connect 6 0 19 0;
#X connect 7 0 13 0;
#X connect 8 0 20 0;
#X connect 9 0 21 0;
#X connect 10 0 15 0;
#X connect 11 0 22 0;
#X connect 33 0 37 0;
#X connect 34 0 37 1;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 34 0;
#X connect 37 0 23 0;
#X connect 37 0 24 0;
#X connect 37 0 25 0;
#X connect 37 0 26 0;
#X connect 37 0 27 0;
#X connect 37 0 28 0;
#X connect 37 0 29 0;
#X connect 37 0 30 0;
#X connect 37 0 31 0;
#X connect 37 0 32 0;
#X connect 37 0 55 0;
#X connect 37 0 58 0;
#X connect 37 0 61 0;
#X connect 38 0 44 0;
#X connect 39 0 40 0;
#X connect 39 1 41 0;
#X connect 40 0 45 0;
#X connect 41 0 43 0;
#X connect 43 0 42 0;
#X connect 44 0 39 0;
#X connect 45 0 47 0;
#X connect 45 0 49 0;
#X connect 46 0 62 0;
#X connect 48 0 50 0;
#X connect 49 0 48 0;
#X connect 51 0 52 0;
#X connect 52 0 33 0;
#X connect 52 0 35 0;
#X connect 53 0 54 0;
#X connect 54 0 45 0;
#X connect 54 1 43 0;
#X connect 56 0 57 0;
#X connect 60 0 59 0;
#X connect 62 0 45 0;
#X restore 28 108 pd settings;
#X msg 28 39 save;
#X msg 39 83 load;
#X obj 89 86 inlet;
#X obj 39 62 r \$0-load_s;
#X obj 28 18 r \$0-save_s;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 0 1;
#X connect 4 0 2 0;
#X connect 5 0 1 0;
#X restore 575 71 pd \$0-settings;
#X obj 575 51 inlet;
#X text 8 150 All code (99%) by Frank Barknecht at www.footils.org
;
#X text 6 164 Given a makeover by David McCallum \, 2003 - http//mentalfloss.ca/sintheta
;
#X obj 152 117 cnv 15 150 29 empty \$0-label_r /snare 10 14 1 14 -166441
-1 0;
#X obj 265 125 bng 15 250 50 0 \$0-load_s empty L 5 8 1 8 -24198 -1
-1;
#X obj 284 125 bng 15 250 50 0 \$0-save_s empty s 5 7 1 8 -258699 -1
-1;
#X obj 281 19 bng 15 250 50 0 \$0-random_s empty ? 5 8 1 8 -1 -262144
-262144;
#N canvas 796 213 505 528 1228-random! 0;
#X obj 375 72 s \$0-fromfr;
#X obj 198 70 s \$0-tofr;
#X obj 287 71 s \$0-frtime;
#X obj 208 234 s \$0-att_time;
#X obj 17 236 s \$0-rel_time;
#X obj 243 480 s \$0-nlevel;
#X obj 110 69 s \$0-nattack;
#X obj 22 69 s \$0-nrelease;
#X obj 143 478 s \$0-olevel;
#X obj 293 141 s \$0-filt_freq;
#X obj 22 138 s \$0-detune;
#X obj 314 254 s \$0-filt_Q;
#X obj 22 30 r \$0-random_s;
#X obj 22 50 random 128;
#X obj 110 30 r \$0-random_s;
#X obj 110 50 random 128;
#X obj 198 30 r \$0-random_s;
#X obj 198 50 random 128;
#X obj 287 32 r \$0-random_s;
#X obj 287 52 random 128;
#X obj 375 30 r \$0-random_s;
#X obj 375 50 random 128;
#X obj 22 98 r \$0-random_s;
#X obj 22 118 random 30;
#X obj 143 270 r \$0-random_s;
#X obj 143 294 random 101;
#X obj 293 99 r \$0-random_s;
#X obj 293 119 random 6000;
#X obj 17 194 r \$0-random_s;
#X obj 17 214 random 1000;
#X obj 118 193 r \$0-random_s;
#X obj 118 213 random 3;
#X obj 208 193 r \$0-random_s;
#X obj 208 213 random 40;
#X obj 314 195 r \$0-random_s;
#X obj 314 215 random 100;
#X obj 314 235 * 0.06;
#X obj 118 234 s \$0-filt_r;
#X obj 15 307 s \$0-label_r;
#X obj 15 268 r \$0-random_s;
#X msg 15 288 label random!;
#X obj 143 314 moses 50;
#X obj 209 342 expr $f1/$f1;
#X obj 186 368 expr (100-$f1)/$f1;
#X obj 159 416 expr $f1/(100-$f1);
#X obj 143 440 expr $f1/$f1;
#X connect 12 0 13 0;
#X connect 13 0 7 0;
#X connect 14 0 15 0;
#X connect 15 0 6 0;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X connect 18 0 19 0;
#X connect 19 0 2 0;
#X connect 20 0 21 0;
#X connect 21 0 0 0;
#X connect 22 0 23 0;
#X connect 23 0 10 0;
#X connect 24 0 25 0;
#X connect 25 0 41 0;
#X connect 26 0 27 0;
#X connect 27 0 9 0;
#X connect 28 0 29 0;
#X connect 29 0 4 0;
#X connect 30 0 31 0;
#X connect 31 0 37 0;
#X connect 32 0 33 0;
#X connect 33 0 3 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 11 0;
#X connect 39 0 40 0;
#X connect 40 0 38 0;
#X connect 41 0 44 0;
#X connect 41 0 45 0;
#X connect 41 1 42 0;
#X connect 41 1 43 0;
#X connect 42 0 5 0;
#X connect 43 0 8 0;
#X connect 44 0 5 0;
#X connect 45 0 8 0;
#X restore 576 111 pd \$0-random!;
#X obj 746 67 inlet;
#N canvas 317 0 923 817 memento 0;
#X obj 63 176 originator \$1 \$0;
#X obj 170 148 inlet OSC;
#X obj 65 71 r \$0-substate;
#X obj 33 29 inlet substate;
#X obj 33 51 route substate;
#X obj 177 71 r \$0-copy;
#X msg 177 92 copy;
#X obj 261 66 r \$0-paste;
#X msg 259 87 paste;
#X text 172 31 This is the originator \, including some ready to use
standard functionality.;
#X text 525 72 Put your commun sends here \, if you like.;
#X msg 33 107 setsub \$1;
#X msg 267 200 svdir \$1;
#X obj 268 155 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 268 179 savepanel;
#X obj 170 205 outlet OSC;
#X msg 126 230 svxdir /tmp/svdir.xml;
#X msg 96 257 ldxdir /tmp/svdir.xml;
#X obj 723 96 r \$0-fromfr;
#X obj 723 188 r \$0-tofr;
#X obj 723 142 r \$0-frtime;
#X obj 723 280 r \$0-att_time;
#X obj 723 326 r \$0-rel_time;
#X obj 723 372 r \$0-nlevel;
#X obj 723 464 r \$0-nrelease;
#X obj 723 510 r \$0-filt;
#X obj 723 234 r \$0-olevel;
#X obj 723 556 r \$0-filt_freq;
#X obj 723 602 r \$0-detune;
#X obj 725 646 r \$0-filt_Q;
#X obj 597 165 s \$0-fromfr;
#X obj 597 211 s \$0-frtime;
#X obj 597 256 s \$0-tofr;
#X obj 597 303 s \$0-olevel;
#X obj 597 349 s \$0-att_time;
#X obj 597 395 s \$0-rel_time;
#X obj 597 441 s \$0-nlevel;
#X obj 597 487 s \$0-nattack;
#X obj 597 533 s \$0-nrelease;
#X obj 597 579 s \$0-filt;
#X obj 597 625 s \$0-filt_freq;
#X obj 598 672 s \$0-detune;
#X obj 599 715 s \$0-filt_Q;
#X obj 722 256 commun /olevel \$0;
#X obj 724 301 commun /att_time \$0;
#X obj 723 348 commun /rel_time \$0;
#X obj 724 532 commun /filt \$0;
#X obj 723 577 commun /filt_freq \$0;
#X obj 726 622 commun /detune \$0;
#X obj 723 665 commun /filt_Q \$0;
#X obj 723 120 commun /from_freq \$0;
#X obj 723 165 commun /freq_time \$0;
#X obj 721 209 commun /to_freq \$0;
#X obj 723 418 r \$0-nattack;
#X obj 725 440 commun /attack \$0;
#X obj 724 485 commun /release \$0;
#X obj 723 394 commun /nlevel \$0;
#X connect 0 2 15 0;
#X connect 1 0 0 1;
#X connect 2 0 11 0;
#X connect 3 0 4 0;
#X connect 4 0 11 0;
#X connect 4 1 0 0;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 7 0 8 0;
#X connect 8 0 0 0;
#X connect 11 0 0 0;
#X connect 12 0 0 0;
#X connect 13 0 14 0;
#X connect 14 0 12 0;
#X connect 16 0 0 0;
#X connect 17 0 0 0;
#X connect 18 0 50 0;
#X connect 19 0 52 0;
#X connect 20 0 51 0;
#X connect 21 0 44 0;
#X connect 22 0 45 0;
#X connect 23 0 56 0;
#X connect 24 0 55 0;
#X connect 25 0 46 0;
#X connect 26 0 43 0;
#X connect 27 0 47 0;
#X connect 28 0 48 0;
#X connect 29 0 49 0;
#X connect 43 0 33 0;
#X connect 44 0 34 0;
#X connect 45 0 35 0;
#X connect 46 0 39 0;
#X connect 47 0 40 0;
#X connect 48 0 41 0;
#X connect 49 0 42 0;
#X connect 50 0 30 0;
#X connect 51 0 31 0;
#X connect 52 0 32 0;
#X connect 53 0 54 0;
#X connect 54 0 37 0;
#X connect 55 0 38 0;
#X connect 56 0 36 0;
#X restore 691 93 pd memento;
#X obj 691 115 outlet;
#X obj 695 66 inlet;
#X connect 1 0 6 0;
#X connect 2 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 0 0;
#X connect 7 1 1 0;
#X connect 7 1 5 0;
#X connect 23 0 22 0;
#X connect 31 0 32 1;
#X connect 32 0 33 0;
#X connect 34 0 32 0;
#X coords 0 0 1 1 304 147 1;