AudioLab/pp.grainer-mc~-onegrain.pd at master · solipd/AudioLab · GitHub

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
#N canvas 668 92 1019 688 10;
#X msg 77 372 0 \, \$1 \$2;
#X obj 77 277 pack;
#X obj 77 137 / 1000;
#X obj 77 159 * 44100;
#X obj 320 301 / 1000;
#X obj 320 323 * 44100;
#X obj 77 252 * 1;
#X obj 75 527 *~;
#X obj 302 346 f;
#X obj 77 82 f 50;
#N canvas 779 288 280 225 cents 0;
#X obj 52 57 inlet;
#X obj 52 168 outlet;
#X obj 52 115 / 100;
#X obj 52 88 i;
#X obj 52 142 expr pow(2 \, $f1/12);
#X connect 0 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X restore 137 235 pd cents;
#X obj 137 214 f;
#X obj 77 648 outlet~;
#X obj 113 62 r \$2-grainsize;
#X obj 320 278 r \$2-grainposition;
#X obj 377 322 r \$2-samplerate;
#X obj 76 471 tabread4~ \$2-sf;
#X obj 155 194 r \$2-grainpitch;
#X obj 387 135 switch~ 0;
#X msg 387 113 1;
#X obj 476 64 r \$2-grainsize;
#X msg 426 111 0;
#X obj 426 87 del 50;
#X obj 158 284 < 0;
#X obj 77 304 list prepend 0;
#X obj 77 325 route 0 1;
#X msg 136 373 \$1 \, 0 \$2;
#X obj 476 86 abs;
#X obj 158 263 r \$2-grainsize;
#X obj 302 368 mod;
#X obj 113 82 abs;
#X obj 332 368 r \$2-samplelength;
#X obj 76 582 *~;
#X obj 273 518 r \$2-grainamp;
#X obj 258 538 f;
#N canvas 3 52 450 300 filter 0;
#X obj 143 88 inlet~;
#X obj 142 198 outlet~;
#X obj 168 130 r \$2-filter-bypass;
#N canvas 337 195 450 300 sub 0;
#X obj 246 28 inlet~;
#X obj 246 186 outlet~;
#X obj 260 85 f;
#X obj 317 113 f;
#X obj 278 66 r \$2-freq;
#X obj 335 92 r \$2-q;
#X obj 247 130 vcf~;
#X obj 260 105 sig~;
#X obj 355 11 inlet;
#X obj 81 77 switch~ 0;
#X obj 81 28 r \$2-filter-bypass;
#X obj 81 50 == 0;
#X connect 0 0 6 0;
#X connect 2 0 7 0;
#X connect 3 0 6 2;
#X connect 4 0 2 1;
#X connect 5 0 3 1;
#X connect 6 0 1 0;
#X connect 7 0 6 1;
#X connect 8 0 3 0;
#X connect 8 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 9 0;
#X restore 203 157 pd sub;
#X obj 305 90 inlet;
#X obj 143 151 *~ 1;
#X connect 0 0 3 0;
#X connect 0 0 5 0;
#X connect 2 0 5 1;
#X connect 3 0 1 0;
#X connect 4 0 3 1;
#X connect 5 0 1 0;
#X restore 75 549 pd filter;
#X obj 214 39 t b b b b b b b;
#X obj 21 396 r \$2-set;
#X msg 21 419 set \$1;
#X obj 89 506 clip~ 0 1;
#X obj 77 437 vline~;
#X obj 214 17 inlet;
#X text 253 14 trigger;
#N canvas 1297 549 450 412 read-window 0;
#X obj 68 36 inlet;
#X obj 131 109 array size \$2-window;
#X obj 221 33 r \$2-env-set;
#X obj 248 81 symbol;
#X obj 221 54 t b a;
#X msg 188 194 set \$1;
#X obj 66 271 tabread4~ \$2-window;
#X obj 131 130 - 2;
#X msg 67 149 0 \, 1 \$1;
#X obj 67 172 vline~;
#X obj 67 209 *~ 1022;
#X obj 67 232 +~ 1;
#X obj 66 294 outlet~;
#X obj 215 290 outlet~;
#X connect 0 0 8 0;
#X connect 1 0 7 0;
#X connect 2 0 4 0;
#X connect 3 0 1 1;
#X connect 3 0 5 0;
#X connect 4 0 1 0;
#X connect 4 1 3 0;
#X connect 5 0 6 0;
#X connect 6 0 12 0;
#X connect 7 0 10 1;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 13 0;
#X connect 10 0 11 0;
#X connect 11 0 6 0;
#X restore 291 471 pd read-window;
#X obj 372 648 outlet~;
#X text 377 618 ramp 0-1;
#X obj 127 158 r \$2-samplerate;
#X obj 77 104 t f f f;
#X connect 0 0 40 0;
#X connect 1 0 24 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 8 1;
#X connect 6 0 1 0;
#X connect 7 0 35 0;
#X connect 8 0 29 0;
#X connect 9 0 47 0;
#X connect 10 0 6 1;
#X connect 11 0 10 0;
#X connect 13 0 30 0;
#X connect 14 0 4 0;
#X connect 15 0 5 1;
#X connect 16 0 7 0;
#X connect 17 0 11 1;
#X connect 19 0 18 0;
#X connect 20 0 27 0;
#X connect 21 0 18 0;
#X connect 22 0 21 0;
#X connect 23 0 24 1;
#X connect 24 0 25 0;
#X connect 25 0 0 0;
#X connect 25 1 26 0;
#X connect 26 0 40 0;
#X connect 27 0 22 1;
#X connect 28 0 23 0;
#X connect 29 0 16 1;
#X connect 30 0 9 1;
#X connect 31 0 29 1;
#X connect 32 0 12 0;
#X connect 33 0 34 1;
#X connect 34 0 32 1;
#X connect 35 0 32 0;
#X connect 36 0 9 0;
#X connect 36 1 11 0;
#X connect 36 2 35 1;
#X connect 36 3 34 0;
#X connect 36 4 8 0;
#X connect 36 6 19 0;
#X connect 36 6 22 0;
#X connect 37 0 38 0;
#X connect 38 0 16 0;
#X connect 39 0 7 1;
#X connect 40 0 16 0;
#X connect 41 0 36 0;
#X connect 43 0 39 0;
#X connect 43 1 44 0;
#X connect 46 0 3 1;
#X connect 47 0 2 0;
#X connect 47 1 1 1;
#X connect 47 2 43 0;