-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathpdkl-seq.pd
103 lines (103 loc) · 2.6 KB
/
pdkl-seq.pd
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
#N canvas 304 339 1245 736 12;
#X obj 146 111 inlet;
#X text 190 112 input list;
#X obj 286 114 inlet;
#X text 334 115 num items;
#X obj 434 249 max 0;
#X obj 429 292 + 1;
#X obj 91 533 list split 1;
#X obj 122 603 outlet;
#X obj 251 618 outlet;
#X obj 639 496 spigot 0;
#X obj 556 101 inlet;
#X msg 198 254 set 0;
#X obj 146 135 t b l;
#X obj 125 196 t b b;
#X obj 596 442 t b b;
#X obj 108 372 pdkl-ddrip, f 67;
#X obj 590 631 outlet;
#X text 648 626 done;
#X obj 108 415 t l l;
#X msg 178 473 \$1;
#X obj 251 486 del;
#X obj 173 501 t f f;
#X text 32 574 items if num > 0 else bang;
#X obj 664 126 inlet;
#X msg 749 237 stop;
#N canvas 747 348 923 642 pdkl-seq1_args 0;
#X obj 268 146 loadbang;
#X obj 255 233 f \$1;
#X obj 268 170 t b b b, f 32;
#X obj 270 314 pack f f f, f 35;
#X msg 257 374 num \$1 \, loop \$2 \, sync \$3;
#X obj 257 398 outlet;
#X obj 332 232 f \$2;
#X obj 464 218 f \$3;
#X text 335 87 args: num_items \, loop (0/1) \, sync (0/1);
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 2 1 6 0;
#X connect 2 2 7 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 6 0 3 1;
#X connect 7 0 3 2;
#X restore 738 123 pd pdkl-seq1_args;
#X obj 664 151 route float num sync clear tempo loop;
#X text 654 380 args: num_items \, loop (0/1) \, sync (0/1);
#X text 309 618 cur length;
#X obj 819 228 list prepend tempo;
#X obj 819 252 list trim;
#X obj 822 305 s \$0-pdkl-seq1_msg;
#X obj 246 440 r \$0-pdkl-seq1_msg;
#X obj 730 202 t b b;
#X text 597 96 syncer;
#X text 653 403 inlets: input_list \, num_items \, syncer \, msgs;
#X text 694 445 outlets: items \, cur_length \, done;
#X obj 408 632 outlet;
#X text 472 631 elt_num;
#X text 37 17 pdkl-seq1;
#X text 42 45 variable length sequencer;
#X obj 450 112 inlet;
#X text 497 114 loop;
#X obj 101 328 util/pdkl-bangsync, f 68;
#X connect 0 0 12 0;
#X connect 2 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 15 2;
#X connect 6 1 7 0;
#X connect 9 0 13 0;
#X connect 10 0 43 1;
#X connect 11 0 15 0;
#X connect 12 0 13 0;
#X connect 12 1 15 1;
#X connect 13 0 43 0;
#X connect 13 1 11 0;
#X connect 14 0 16 0;
#X connect 14 1 9 0;
#X connect 15 0 18 0;
#X connect 15 1 37 0;
#X connect 15 2 14 0;
#X connect 18 0 6 0;
#X connect 18 1 19 0;
#X connect 19 0 21 0;
#X connect 20 0 15 0;
#X connect 21 0 8 0;
#X connect 21 1 20 0;
#X connect 23 0 26 0;
#X connect 24 0 31 0;
#X connect 25 0 26 0;
#X connect 26 1 4 0;
#X connect 26 2 43 2;
#X connect 26 3 33 0;
#X connect 26 4 29 0;
#X connect 26 5 9 1;
#X connect 26 6 31 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 32 0 20 0;
#X connect 33 0 43 3;
#X connect 33 1 24 0;
#X connect 41 0 9 1;
#X connect 43 0 15 0;