-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathgrano~.pd
277 lines (277 loc) · 6.2 KB
/
grano~.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
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
#N canvas 0 56 1366 671 12;
#X obj 12 12 inlet;
#X obj 354 12 inlet;
#X obj 12 42 unpack;
#X obj 12 72 spigot;
#X obj 354 132 s \$0-id;
#X obj 738 373 tabread4~;
#X obj 748 315 r \$0-id;
#X msg 748 344 set \$1-hann;
#X obj 12 283 line~;
#X obj 58 193 +, f 13;
#X obj 410 132 s \$0-samplerate;
#X obj 467 102 s \$0-duration;
#X obj 146 33 r \$0-duration;
#X obj 156 103 r \$0-samplerate;
#X obj 12 223 pack f f f;
#X msg 12 253 \$1 \, \$2 \$3;
#X obj 156 133 t b f;
#X obj 738 286 line~;
#X msg 738 257 1 \, 128 \$1;
#X obj 738 228 f;
#X obj 12 373 tabread4~;
#X obj 136 303 r \$0-id;
#X obj 12 593 *~;
#X obj 12 623 outlet~;
#X obj 146 163 *;
#X obj 126 373 tabread4~;
#X obj 12 563 *~;
#X obj 126 563 *~;
#X obj 523 132 s \$0-switch;
#X obj 30 533 line~;
#X obj 144 533 line~;
#X obj 12 193 f;
#X obj 580 102 s \$0-time;
#X obj 636 132 s \$0-pitch;
#X msg 833 62 0;
#X obj 833 32 loadbang;
#X obj 693 102 s \$0-pitch-random;
#N canvas 0 56 1366 671 pitch 0;
#X obj 149 389 inlet;
#X obj 208 479 *;
#X obj 234 449 pow, f 4;
#X obj 226 299 r \$0-pitch;
#X obj 259 419 / 12;
#X msg 234 419 2;
#X obj 208 389 t b b f, f 8;
#X obj 208 179 random, f 9;
#X obj 208 239 * 0.001;
#X obj 208 519 outlet;
#X obj 268 89 r \$0-pitch-random;
#X obj 208 359 +, f 5;
#X obj 268 119 * 1000;
#X obj 268 149 * 2;
#X obj 208 149 r \$0-on;
#X obj 208 209 -;
#X obj 208 269 t b f;
#X obj 208 329 f;
#X connect 0 0 1 0;
#X connect 1 0 9 0;
#X connect 2 0 1 1;
#X connect 3 0 17 1;
#X connect 4 0 2 1;
#X connect 5 0 2 0;
#X connect 6 0 1 0;
#X connect 6 1 5 0;
#X connect 6 2 4 0;
#X connect 7 0 15 0;
#X connect 8 0 16 0;
#X connect 10 0 12 0;
#X connect 11 0 6 0;
#X connect 12 0 13 0;
#X connect 12 0 15 1;
#X connect 13 0 7 1;
#X connect 14 0 7 0;
#X connect 15 0 8 0;
#X connect 16 0 17 0;
#X connect 16 1 11 1;
#X connect 17 0 11 0;
#X restore 146 73 pd pitch;
#X obj 12 102 t f b;
#X obj 82 132 s \$0-on;
#X obj 12 162 t b f f;
#N canvas 5 61 450 300 spray 0;
#X obj 152 34 r \$0-spray;
#X obj 152 124 *;
#X obj 106 154 random, f 7;
#X obj 162 64 r \$0-samplerate;
#X obj 162 94 t b f;
#X obj 74 94 inlet;
#X obj 74 214 outlet;
#X obj 74 124 t f b;
#X obj 74 184 -, f 5;
#X connect 0 0 1 0;
#X connect 1 0 2 1;
#X connect 2 0 8 1;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 4 1 1 1;
#X connect 5 0 7 0;
#X connect 7 0 8 0;
#X connect 7 1 2 0;
#X connect 8 0 6 0;
#X restore 12 132 pd spray;
#X obj 354 42 route id samplerate duration switch time pitch pitch-random
spray, f 65;
#X obj 749 132 s \$0-spray;
#X obj 1017 326 r \$0-samplerate;
#X obj 918 386 expr $f1>$f2;
#X obj 873 199 sel 0;
#X obj 905 229 - 1;
#X obj 918 446 f;
#X obj 236 373 tabread4~;
#X obj 236 563 *~;
#X obj 254 533 line~;
#X obj 117 269 expr~ $v1%$f2;
#X obj 62 433 sel 0 1 2, f 33;
#X obj 918 471 + 1;
#X obj 918 496 % 3;
#X obj 918 611 delay, f 9;
#X obj 918 641 f, f 5;
#X msg 22 343 set \$1-bufferL0;
#X msg 136 343 set \$1-bufferL1;
#X msg 246 343 set \$1-bufferL2;
#X obj 811 511 f;
#X obj 918 416 sel 1 0;
#X obj 286 463 delay 5;
#X msg 286 503 1 5;
#X msg 254 503 0 5;
#X msg 176 503 1 5;
#X msg 144 503 0 5;
#X msg 62 503 1 5;
#X msg 30 503 0 5;
#X obj 62 463 delay 5;
#X obj 176 463 delay 5;
#X obj 918 521 t b f b, f 9;
#X obj 1045 554 /;
#X obj 978 581 expr $f1-($f2-$f3);
#X obj 918 326 t f f;
#X msg 978 551 4000;
#X obj 1017 356 * 4000;
#X obj 365 373 tabread4~;
#X obj 489 303 r \$0-id;
#X obj 479 373 tabread4~;
#X obj 365 563 *~;
#X obj 479 563 *~;
#X obj 589 373 tabread4~;
#X obj 589 563 *~;
#X obj 365 593 *~;
#X obj 365 623 outlet~;
#X msg 375 343 set \$1-bufferR0;
#X msg 489 343 set \$1-bufferR1;
#X msg 599 343 set \$1-bufferR2;
#X connect 0 0 2 0;
#X connect 1 0 42 0;
#X connect 2 0 3 0;
#X connect 2 1 3 1;
#X connect 2 1 46 0;
#X connect 3 0 38 0;
#X connect 5 0 22 1;
#X connect 5 0 85 1;
#X connect 6 0 7 0;
#X connect 7 0 5 0;
#X connect 8 0 52 0;
#X connect 9 0 14 1;
#X connect 9 0 75 0;
#X connect 12 0 19 1;
#X connect 12 0 14 2;
#X connect 12 0 37 0;
#X connect 12 0 74 2;
#X connect 13 0 16 0;
#X connect 14 0 15 0;
#X connect 15 0 8 0;
#X connect 16 0 24 0;
#X connect 16 1 24 1;
#X connect 17 0 5 0;
#X connect 18 0 17 0;
#X connect 19 0 18 0;
#X connect 20 0 26 0;
#X connect 21 0 58 0;
#X connect 21 0 59 0;
#X connect 21 0 60 0;
#X connect 22 0 23 0;
#X connect 24 0 9 1;
#X connect 25 0 27 0;
#X connect 26 0 22 0;
#X connect 27 0 22 0;
#X connect 29 0 26 1;
#X connect 29 0 81 1;
#X connect 30 0 27 1;
#X connect 30 0 82 1;
#X connect 31 0 14 0;
#X connect 34 0 33 0;
#X connect 35 0 34 0;
#X connect 37 0 24 0;
#X connect 38 0 41 0;
#X connect 38 1 39 0;
#X connect 40 0 19 0;
#X connect 40 0 31 0;
#X connect 40 1 31 1;
#X connect 40 2 9 0;
#X connect 41 0 40 0;
#X connect 42 0 4 0;
#X connect 42 1 10 0;
#X connect 42 2 11 0;
#X connect 42 3 28 0;
#X connect 42 4 32 0;
#X connect 42 5 33 0;
#X connect 42 6 36 0;
#X connect 42 7 43 0;
#X connect 44 0 73 1;
#X connect 44 0 77 0;
#X connect 45 0 62 0;
#X connect 46 1 47 0;
#X connect 47 0 48 1;
#X connect 47 0 61 1;
#X connect 48 0 54 0;
#X connect 49 0 50 0;
#X connect 50 0 22 0;
#X connect 51 0 50 1;
#X connect 51 0 84 1;
#X connect 52 0 25 0;
#X connect 52 0 20 0;
#X connect 52 0 49 0;
#X connect 52 0 78 0;
#X connect 52 0 80 0;
#X connect 52 0 83 0;
#X connect 53 0 67 0;
#X connect 53 0 65 0;
#X connect 53 0 70 0;
#X connect 53 1 69 0;
#X connect 53 1 65 0;
#X connect 53 1 71 0;
#X connect 53 2 67 0;
#X connect 53 2 69 0;
#X connect 53 2 63 0;
#X connect 54 0 55 0;
#X connect 55 0 72 0;
#X connect 56 0 57 0;
#X connect 57 0 53 0;
#X connect 58 0 20 0;
#X connect 59 0 25 0;
#X connect 60 0 49 0;
#X connect 61 0 53 0;
#X connect 62 0 48 0;
#X connect 62 1 61 0;
#X connect 63 0 64 0;
#X connect 64 0 51 0;
#X connect 65 0 51 0;
#X connect 66 0 30 0;
#X connect 67 0 30 0;
#X connect 68 0 29 0;
#X connect 69 0 29 0;
#X connect 70 0 68 0;
#X connect 71 0 66 0;
#X connect 72 0 56 0;
#X connect 72 1 57 1;
#X connect 72 2 76 0;
#X connect 73 0 74 1;
#X connect 74 0 56 1;
#X connect 75 0 45 0;
#X connect 75 1 73 0;
#X connect 76 0 74 0;
#X connect 77 0 45 1;
#X connect 77 0 52 1;
#X connect 78 0 81 0;
#X connect 79 0 87 0;
#X connect 79 0 88 0;
#X connect 79 0 89 0;
#X connect 80 0 82 0;
#X connect 81 0 85 0;
#X connect 82 0 85 0;
#X connect 83 0 84 0;
#X connect 84 0 85 0;
#X connect 85 0 86 0;
#X connect 87 0 78 0;
#X connect 88 0 80 0;
#X connect 89 0 83 0;