aboutsummaryrefslogtreecommitdiff
path: root/control/rrad.drumseq.pd
blob: e3fc324d72a909bf2beb9ee3d7ae0e485ba9852e (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
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
#N struct 1173-dial float x float y float w float color;
#N struct 1173-rect float x float y float w float color;
#N canvas 525 291 327 74 10;
#N canvas 342 163 727 574 guts 0;
#N canvas 639 520 450 300 rect 0;
#X obj 78 49 struct \$0-rect float x float y float w float color;
#X obj 88 154 filledpolygon color 999 1 0 0 20 0 20 w 0 w;
#X obj 89 188 drawpolygon 999 1 0 0 0 20;
#X restore 27 54 pd rect;
#X obj 410 176 symbol \$0-seqs;
#X obj 429 43 loadbang;
#X msg 410 151 bang;
#X obj 410 203 makefilename pd-%s;
#X msg 410 253 traverse \$1 \, bang;
#X obj 410 276 pointer;
#X obj 270 219 t b b;
#X msg 241 261 0;
#X obj 349 126 t b b;
#X msg 348 107 bang;
#X obj 570 252 symbol;
#X msg 570 289 \; \$1 clear;
#X msg 561 223 bang;
#X obj 114 224 until;
#X obj 110 172 t b b;
#X msg 165 207 0;
#X obj 115 255 i 0;
#X obj 148 251 + 20;
#X msg 289 262 20;
#X msg 113 199 16;
#X msg 371 261 900;
#X msg 332 264 0;
#X obj 149 276 t f f;
#X obj 203 370 pack 0 p;
#X obj 203 395 s \$0-tobang;
#N canvas 305 27 496 875 managebangs 0;
#X obj 104 9 r \$0-tobang;
#X obj 18 8 r \$0-bang0;
#X obj 108 57 r \$0-tobang;
#X obj 108 109 r \$0-tobang;
#X obj 114 163 r \$0-tobang;
#X obj 108 225 r \$0-tobang;
#X obj 119 280 r \$0-tobang;
#X obj 117 342 r \$0-tobang;
#X obj 115 406 r \$0-tobang;
#X obj 109 468 r \$0-tobang;
#X obj 113 532 r \$0-tobang;
#X obj 115 584 r \$0-tobang;
#X obj 29 583 r \$0-bang0;
#X obj 119 648 r \$0-tobang;
#X obj 22 56 r \$0-bang1;
#X obj 22 108 r \$0-bang2;
#X obj 28 164 r \$0-bang3;
#X obj 22 224 r \$0-bang4;
#X obj 33 279 r \$0-bang5;
#X obj 31 341 r \$0-bang6;
#X obj 29 405 r \$0-bang7;
#X obj 23 467 r \$0-bang8;
#X obj 27 531 r \$0-bang9;
#X obj 33 647 r \$0-bang10;
#X obj 314 60 r \$0-tobang;
#X obj 314 112 r \$0-tobang;
#X obj 320 166 r \$0-tobang;
#X obj 314 228 r \$0-tobang;
#X obj 325 283 r \$0-tobang;
#X obj 228 59 r \$0-bang11;
#X obj 228 111 r \$0-bang12;
#X obj 234 167 r \$0-bang13;
#X obj 228 227 r \$0-bang14;
#X obj 239 282 r \$0-bang15;
#X obj 22 33 _rrad.drumseq-h1 0 \$0;
#X obj 29 606 _rrad.drumseq-h1 0 \$0;
#X obj 22 79 _rrad.drumseq-h1 1 \$0;
#X obj 22 131 _rrad.drumseq-h1 2 \$0;
#X obj 28 185 _rrad.drumseq-h1 3 \$0;
#X obj 22 247 _rrad.drumseq-h1 4 \$0;
#X obj 33 302 _rrad.drumseq-h1 5 \$0;
#X obj 31 364 _rrad.drumseq-h1 6 \$0;
#X obj 29 428 _rrad.drumseq-h1 7 \$0;
#X obj 23 490 _rrad.drumseq-h1 8 \$0;
#X obj 27 554 _rrad.drumseq-h1 9 \$0;
#X obj 33 670 _rrad.drumseq-h1 10 \$0;
#X obj 228 82 _rrad.drumseq-h1 11 \$0;
#X obj 228 134 _rrad.drumseq-h1 12 \$0;
#X obj 234 188 _rrad.drumseq-h1 13 \$0;
#X obj 228 250 _rrad.drumseq-h1 14 \$0;
#X obj 239 305 _rrad.drumseq-h1 15 \$0;
#X connect 0 0 34 1;
#X connect 1 0 34 0;
#X connect 2 0 36 1;
#X connect 3 0 37 1;
#X connect 4 0 38 1;
#X connect 5 0 39 1;
#X connect 6 0 40 1;
#X connect 7 0 41 1;
#X connect 8 0 42 1;
#X connect 9 0 43 1;
#X connect 10 0 44 1;
#X connect 11 0 35 1;
#X connect 12 0 35 0;
#X connect 13 0 45 1;
#X connect 14 0 36 0;
#X connect 15 0 37 0;
#X connect 16 0 38 0;
#X connect 17 0 39 0;
#X connect 18 0 40 0;
#X connect 19 0 41 0;
#X connect 20 0 42 0;
#X connect 21 0 43 0;
#X connect 22 0 44 0;
#X connect 23 0 45 0;
#X connect 24 0 46 1;
#X connect 25 0 47 1;
#X connect 26 0 48 1;
#X connect 27 0 49 1;
#X connect 28 0 50 1;
#X connect 29 0 46 0;
#X connect 30 0 47 0;
#X connect 31 0 48 0;
#X connect 32 0 49 0;
#X connect 33 0 50 0;
#X restore 26 84 pd managebangs;
#X obj 149 301 / 20;
#X obj 149 334 int;
#X obj 275 36 inlet;
#X obj 410 224 t a a;
#X obj 254 304 append \$0-rect x y w color;
#N canvas 552 344 450 300 dial 0;
#X obj 42 56 struct \$0-dial float x float y float w float color;
#X obj 46 118 filledpolygon color 999 1 0 0 0 8 w 8 w 0;
#X restore 89 55 pd dial;
#X obj 270 346 t b b;
#X obj 321 398 append \$0-dial x y w color;
#X obj 321 372 unpack 0 0 0 900;
#X obj 307 427 set \$0-dial w;
#X obj 86 406 r \$0-location;
#X obj 91 433 * 20;
#X obj 243 167 s \$0-OSC;
#X msg 243 136 \$1/s* 0;
#X obj 238 115 symbol \$1;
#X obj 512 399 append \$0-dial x y w color;
#X obj 512 373 unpack 0 0 0 900;
#X obj 476 488 get \$0-dial w;
#X obj 476 464 pointer;
#X obj 421 419 r \$0-getmax;
#X obj 476 518 s \$0-max;
#X msg 321 351 0 0 30 111;
#X msg 508 338 0 10 320 222;
#X obj 331 493 r \$0-setmax;
#X obj 348 529 set \$0-dial w;
#X obj 282 66 t b b b;
#X obj 151 131 s \$0-setmax;
#X msg 161 102 320;
#X connect 1 0 4 0;
#X connect 2 0 10 0;
#X connect 3 0 1 0;
#X connect 4 0 30 0;
#X connect 5 0 6 0;
#X connect 6 0 31 4;
#X connect 6 0 34 4;
#X connect 6 0 42 4;
#X connect 7 0 8 0;
#X connect 7 0 15 0;
#X connect 7 0 33 0;
#X connect 7 1 21 0;
#X connect 7 1 22 0;
#X connect 7 1 19 0;
#X connect 9 0 7 0;
#X connect 9 1 3 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 13 0 11 0;
#X connect 14 0 17 0;
#X connect 15 0 20 0;
#X connect 15 1 16 0;
#X connect 16 0 17 1;
#X connect 17 0 18 0;
#X connect 17 0 23 0;
#X connect 18 0 17 1;
#X connect 19 0 31 1;
#X connect 20 0 14 0;
#X connect 21 0 31 3;
#X connect 22 0 31 2;
#X connect 23 0 27 0;
#X connect 23 1 31 0;
#X connect 24 0 25 0;
#X connect 27 0 28 0;
#X connect 28 0 24 0;
#X connect 29 0 52 0;
#X connect 30 0 5 0;
#X connect 30 1 11 0;
#X connect 31 0 24 1;
#X connect 33 0 48 0;
#X connect 33 1 49 0;
#X connect 34 0 36 1;
#X connect 35 0 34 0;
#X connect 35 1 34 1;
#X connect 35 2 34 2;
#X connect 35 3 34 3;
#X connect 37 0 38 0;
#X connect 38 0 36 0;
#X connect 40 0 39 0;
#X connect 41 0 40 0;
#X connect 42 0 45 1;
#X connect 42 0 51 1;
#X connect 43 0 42 0;
#X connect 43 1 42 1;
#X connect 43 2 42 2;
#X connect 43 3 42 3;
#X connect 44 0 47 0;
#X connect 45 0 44 0;
#X connect 46 0 45 0;
#X connect 48 0 35 0;
#X connect 49 0 43 0;
#X connect 50 0 51 0;
#X connect 52 0 54 0;
#X connect 52 1 41 0;
#X connect 52 2 10 0;
#X connect 54 0 53 0;
#X restore 328 22 pd guts;
#X obj 2 44 bng 20 250 50 0 \$0-bang0 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 22 44 bng 20 250 50 0 \$0-bang1 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 42 44 bng 20 250 50 0 \$0-bang2 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 62 44 bng 20 250 50 0 \$0-bang3 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 82 44 bng 20 250 50 0 \$0-bang4 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 102 44 bng 20 250 50 0 \$0-bang5 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 122 44 bng 20 250 50 0 \$0-bang6 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 143 44 bng 20 250 50 0 \$0-bang7 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 162 44 bng 20 250 50 0 \$0-bang8 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 182 44 bng 20 250 50 0 \$0-bang9 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 202 44 bng 20 250 50 0 \$0-bang10 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 222 44 bng 20 250 50 0 \$0-bang11 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 242 44 bng 20 250 50 0 \$0-bang12 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 262 44 bng 20 250 50 0 \$0-bang13 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 282 44 bng 20 250 50 0 \$0-bang14 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 302 44 bng 20 250 50 0 \$0-bang15 empty empty 0 -6 0 8 -262144
-1 -1;
#X obj 2 17 cnv 15 320 40 empty empty empty 20 12 0 12 -1 -66577 0
;
#N canvas 0 0 391 182 1173-seqs 0;
#X scalar 1173-dial 0 0 0 111 \;;
#X scalar 1173-dial 0 10 320 222 \;;
#X scalar 1173-rect 0 20 20 900 \;;
#X scalar 1173-rect 20 20 0 900 \;;
#X scalar 1173-rect 40 20 0 900 \;;
#X scalar 1173-rect 60 20 0 900 \;;
#X scalar 1173-rect 80 20 20 900 \;;
#X scalar 1173-rect 100 20 0 900 \;;
#X scalar 1173-rect 120 20 0 900 \;;
#X scalar 1173-rect 140 20 0 900 \;;
#X scalar 1173-rect 160 20 20 900 \;;
#X scalar 1173-rect 180 20 0 900 \;;
#X scalar 1173-rect 200 20 0 900 \;;
#X scalar 1173-rect 220 20 0 900 \;;
#X scalar 1173-rect 240 20 20 900 \;;
#X scalar 1173-rect 260 20 0 900 \;;
#X scalar 1173-rect 280 20 0 900 \;;
#X scalar 1173-rect 300 20 0 900 \;;
#X coords 0 0 320 40 320 40 1;
#X restore 1 17 pd \$0-seqs;
#X obj 396 22 inlet;
#X obj 306 2 bng 12 250 50 0 empty empty empty 0 -6 0 8 -258699 -262144
-262144;
#N canvas 0 0 547 441 saves 0;
#X obj 120 16 inlet;
#X obj 275 78 inlet;
#X obj 142 194 outlet;
#X obj 307 145 outlet;
#X obj 147 123 originator \$1 \$0;
#X obj 123 57 mod 16;
#X obj 128 80 makefilename /s%d;
#X msg 142 100 get \$1;
#N canvas 162 15 909 925 commun 0;
#X obj 46 17 r \$0-tobang-s;
#X obj 47 90 s \$0-bang0;
#X obj 47 59 commun /s0 \$0;
#X obj 46 38 route 0;
#X obj 44 111 r \$0-tobang-s;
#X obj 42 217 r \$0-tobang-s;
#X obj 37 324 r \$0-tobang-s;
#X obj 41 426 r \$0-tobang-s;
#X obj 37 516 r \$0-tobang-s;
#X obj 32 623 r \$0-tobang-s;
#X obj 28 733 r \$0-tobang-s;
#X obj 44 132 route 1;
#X obj 45 184 s \$0-bang1;
#X obj 45 153 commun /s1 \$0;
#X obj 42 238 route 2;
#X obj 43 259 commun /s2 \$0;
#X obj 41 290 s \$0-bang2;
#X obj 37 345 route 3;
#X obj 38 366 commun /s3 \$0;
#X obj 38 397 s \$0-bang3;
#X obj 41 447 route 4;
#X obj 42 468 commun /s4 \$0;
#X obj 42 492 s \$0-bang4;
#X obj 37 537 route 5;
#X obj 38 558 commun /s5 \$0;
#X obj 38 589 s \$0-bang5;
#X obj 32 644 route 6;
#X obj 33 665 commun /s6 \$0;
#X obj 33 696 s \$0-bang6;
#X obj 28 754 route 7;
#X obj 29 775 commun /s7 \$0;
#X obj 29 806 s \$0-bang7;
#X obj 186 23 r \$0-tobang-s;
#X obj 186 123 r \$0-tobang-s;
#X obj 186 44 route 8;
#X obj 187 65 commun /s8 \$0;
#X obj 187 96 s \$0-bang8;
#X obj 186 144 route 9;
#X obj 187 165 commun /s9 \$0;
#X obj 189 196 s \$0-bang9;
#X obj 347 20 r \$0-tobang-s;
#X obj 345 114 r \$0-tobang-s;
#X obj 343 220 r \$0-tobang-s;
#X obj 338 327 r \$0-tobang-s;
#X obj 342 429 r \$0-tobang-s;
#X obj 338 519 r \$0-tobang-s;
#X obj 347 41 route 10;
#X obj 348 62 commun /s10 \$0;
#X obj 348 93 s \$0-bang10;
#X obj 345 135 route 11;
#X obj 346 156 commun /s11 \$0;
#X obj 346 187 s \$0-bang11;
#X obj 343 241 route 12;
#X obj 344 262 commun /s12 \$0;
#X obj 342 293 s \$0-bang12;
#X obj 338 348 route 13;
#X obj 339 369 commun /s13 \$0;
#X obj 339 400 s \$0-bang13;
#X obj 340 450 route 14;
#X obj 343 471 commun /s14 \$0;
#X obj 343 495 s \$0-bang14;
#X obj 338 540 route 15;
#X obj 339 561 commun /s15 \$0;
#X obj 339 592 s \$0-bang15;
#X obj 653 336 commun /play \$0;
#X obj 656 306 r \$0-play;
#X obj 658 368 s \$0-play;
#X obj 634 493 commun /max \$0;
#X obj 634 467 r \$0-max;
#X obj 634 523 s \$0-setmax;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 11 0;
#X connect 5 0 14 0;
#X connect 6 0 17 0;
#X connect 7 0 20 0;
#X connect 8 0 23 0;
#X connect 9 0 26 0;
#X connect 10 0 29 0;
#X connect 11 0 13 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 32 0 34 0;
#X connect 33 0 37 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 40 0 46 0;
#X connect 41 0 49 0;
#X connect 42 0 52 0;
#X connect 43 0 55 0;
#X connect 44 0 58 0;
#X connect 45 0 61 0;
#X connect 46 0 47 0;
#X connect 47 0 48 0;
#X connect 49 0 50 0;
#X connect 50 0 51 0;
#X connect 52 0 53 0;
#X connect 53 0 54 0;
#X connect 55 0 56 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 59 0 60 0;
#X connect 61 0 62 0;
#X connect 62 0 63 0;
#X connect 64 0 66 0;
#X connect 65 0 64 0;
#X connect 67 0 69 0;
#X connect 68 0 67 0;
#X restore 55 222 pd commun;
#X obj 46 127 s \$0-location;
#X obj 273 115 r \$0-OSC;
#X obj 151 145 rrad.scale 0 4 0 127;
#X obj 148 173 int;
#X obj 198 15 r \$0-play;
#X obj 122 36 spigot;
#X obj 227 192 loadbang;
#X msg 232 213 1;
#X obj 233 234 s \$0-play;
#X obj 49 76 select 0;
#X obj 48 102 s \$0-getmax;
#X obj 415 10 r \$0-max;
#X obj 415 31 / 20;
#X obj 415 54 int;
#X obj 443 233 s \$0-setmax;
#X obj 447 164 spigot;
#X obj 482 127 > 16;
#X obj 415 126 min 16;
#X obj 363 124 min 16;
#X obj 368 100 + 1;
#X obj 447 192 * 20;
#X obj 402 185 + 1;
#X obj 142 265 r \$0-copy;
#X obj 198 303 r \$0-paste;
#X msg 142 315 copy;
#X msg 198 329 paste;
#X obj 142 358 s \$0-orig;
#X obj 196 99 r \$0-orig;
#X connect 0 0 14 0;
#X connect 1 0 4 1;
#X connect 4 0 11 0;
#X connect 4 2 3 0;
#X connect 5 0 6 0;
#X connect 5 0 9 0;
#X connect 5 0 18 0;
#X connect 6 0 7 0;
#X connect 7 0 4 0;
#X connect 10 0 4 1;
#X connect 11 0 12 0;
#X connect 12 0 2 0;
#X connect 13 0 14 1;
#X connect 14 0 5 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 18 0 19 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 25 0;
#X connect 22 0 26 0;
#X connect 22 0 28 0;
#X connect 24 0 29 0;
#X connect 25 0 24 1;
#X connect 26 0 30 0;
#X connect 26 0 24 0;
#X connect 27 0 5 1;
#X connect 28 0 27 0;
#X connect 29 0 23 0;
#X connect 31 0 33 0;
#X connect 32 0 34 0;
#X connect 33 0 35 0;
#X connect 34 0 35 0;
#X connect 36 0 4 0;
#X restore 395 43 pd saves;
#X obj 438 22 inlet;
#X obj 341 44 outlet;
#X obj 455 46 outlet;
#X obj 282 2 tgl 12 0 \$0-play \$0-play empty 0 -6 0 8 -261681 -1 -1
1 1;
#X obj 231 2 bng 12 250 50 0 \$0-copy empty cp 2 7 0 8 -225271 -1 -1
;
#X obj 254 2 bng 12 250 50 0 \$0-paste empty pst 2 7 0 8 -257472 -1
-1;
#X connect 19 0 21 0;
#X connect 20 0 0 0;
#X connect 21 0 23 0;
#X connect 21 1 24 0;
#X connect 22 0 21 1;
#X coords 0 0 1 1 322 54 1;