-
Notifications
You must be signed in to change notification settings - Fork 9
/
Copy pathpp.grainer~-help.pd
285 lines (285 loc) · 8.99 KB
/
pp.grainer~-help.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
278
279
280
281
282
283
284
285
#N struct 1699-template float x float y float c float s float th float
stretch array 1699-plus 1699-template-y array 1699-minus 1699-template-y
;
#N struct 1699-template-y float y;
#N canvas 148 230 807 360 10;
#X obj 397 293 pp.out~;
#A saved;
#X obj 2 2 cnv 15 380 350 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 12 15 cnv 15 10 10 empty empty pp.grainer~ 0 0 2 16 -233017
-262144 0;
#X obj 570 107 cnv 15 118 17 empty empty empty 20 12 0 14 -260097 -66577
0;
#N canvas 394 33 696 708 control-messages 0;
#X obj 71 684 outlet;
#X msg 130 235 play \$1;
#X obj 130 215 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 135 274 playback-speed \$1;
#X floatatom 135 255 5 0 0 0 - - -;
#X obj 69 13 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 69 33 openpanel;
#X msg 69 53 open \$1;
#X msg 121 194 record \$1;
#X obj 121 175 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 122 55 load a soundfile into the buffer;
#X text 189 195 record into the buffer;
#X text 183 235 play / pause;
#X text 250 274 playback-speed in %;
#X obj 96 78 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X obj 96 99 metro 100;
#X obj 96 120 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X text 118 118 bang to trigger the next grain;
#X obj 149 617 cnv 15 45 17 empty empty empty 20 12 0 14 -260097 -66577
0;
#N canvas 517 70 580 657 more 0;
#X obj 69 636 outlet;
#X msg 69 38 position \$1;
#X floatatom 75 20 5 0 1e+21 0 - - -;
#X floatatom 76 94 5 0 100 0 - - -;
#X msg 69 112 position% \$1;
#X text 149 38 position in ms;
#X text 153 113 position in %;
#X floatatom 75 131 5 0 100 0 - - -;
#X msg 69 148 random-position% \$1;
#X floatatom 77 57 5 0 1e+36 0 - - -;
#X msg 69 75 random-position \$1;
#X floatatom 76 170 5 0 1e+37 0 - - -;
#X floatatom 75 207 5 0 1e+33 0 - - -;
#X msg 69 188 grainsize \$1;
#X text 153 189 grainsize in msec.;
#X msg 69 224 random-grainsize \$1;
#X floatatom 76 244 5 -1e+07 1e+10 0 - - -;
#X floatatom 75 281 5 0 1e+20 0 - - -;
#X msg 69 298 random-pitch \$1;
#X msg 69 262 pitch \$1;
#X floatatom 76 320 5 -100 100 0 - - -;
#X floatatom 75 357 5 0 100 0 - - -;
#X msg 69 338 panorama \$1;
#X msg 69 374 random-panorama \$1;
#X text 130 261 grain-pitch in cents;
#X floatatom 75 394 5 -100 0 0 - - -;
#X msg 69 413 amplitude \$1;
#X floatatom 75 434 5 0 100 0 - - -;
#X msg 69 452 random-amplitude \$1;
#X obj 340 441 cnv 15 200 200 empty empty empty 20 12 0 14 -233017
-66577 0;
#X floatatom 352 487 5 0 20000 0 - - -;
#X obj 344 448 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 344 467 filter-bypass \$1;
#X msg 352 506 frequency \$1;
#X floatatom 354 564 5 0 100000 0 - - -;
#X msg 354 582 q \$1;
#X floatatom 353 525 5 0 100 0 - - -;
#X msg 353 544 random-frequency \$1;
#X floatatom 355 602 5 0 100000 0 - - -;
#X msg 355 620 random-q \$1;
#X obj 341 216 cnv 15 200 200 empty empty empty 20 12 0 14 -233017
-66577 0;
#X obj 348 224 hradio 15 1 0 5 empty empty empty 0 -8 0 10 -262144
-1 -1 2;
#X floatatom 348 245 5 0 4 0 - - -;
#X msg 348 265 env-type \$1;
#X floatatom 347 307 5 0 1 0 - - -;
#X msg 347 325 env-bias \$1;
#X obj 350 288 hsl 100 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 346 366 5 0 1 0 - - -;
#X obj 349 347 hsl 100 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X msg 346 384 env-shape \$1;
#X text 445 222 grain-envelope;
#X text 456 447 grain-filter;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 7 0 8 0;
#X connect 8 0 0 0;
#X connect 9 0 10 0;
#X connect 10 0 0 0;
#X connect 11 0 13 0;
#X connect 12 0 15 0;
#X connect 13 0 0 0;
#X connect 15 0 0 0;
#X connect 16 0 19 0;
#X connect 17 0 18 0;
#X connect 18 0 0 0;
#X connect 19 0 0 0;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 0 0;
#X connect 23 0 0 0;
#X connect 25 0 26 0;
#X connect 26 0 0 0;
#X connect 27 0 28 0;
#X connect 28 0 0 0;
#X connect 30 0 33 0;
#X connect 31 0 32 0;
#X connect 32 0 0 0;
#X connect 33 0 0 0;
#X connect 34 0 35 0;
#X connect 35 0 0 0;
#X connect 36 0 37 0;
#X connect 37 0 0 0;
#X connect 38 0 39 0;
#X connect 39 0 0 0;
#X connect 41 0 42 0;
#X connect 42 0 43 0;
#X connect 43 0 0 0;
#X connect 44 0 45 0;
#X connect 45 0 0 0;
#X connect 46 0 44 0;
#X connect 47 0 49 0;
#X connect 48 0 47 0;
#X connect 49 0 0 0;
#X restore 149 617 pd more;
#X obj 157 298 cnv 15 250 150 empty empty empty 20 12 0 14 -233017
-66577 0;
#X obj 165 306 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 165 327 int.grain-trigger \$1;
#X floatatom 166 349 5 0 1e+13 0 - - -;
#X msg 166 369 grain-distance \$1;
#X floatatom 166 393 5 0 1e+16 0 - - -;
#X msg 166 412 random-grain-distance \$1;
#X text 193 309 internal trigger metro on/off;
#X text 204 350 internal trigger speed;
#N canvas 3 52 450 250 (subpatch) 0;
#X array mysoundfile 998865 float 2;
#X coords 0 1 998865 -1 200 140 1 0 0;
#X restore 385 471 graph;
#N canvas 3 52 450 300 source 0;
#X obj 71 113 soundfiler;
#X obj 71 53 loadbang;
#X msg 71 76 read -resize ./Examples/audio/MusicBox.wav mysoundfile
;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 385 616 pd source;
#X msg 183 507 set-env myenv;
#N canvas 0 50 450 250 (subpatch) 0;
#X array myenv 100 float 5;
#A 0 -2.08616e-06 -2.08616e-06 0.0299986 0.0399988 0.0599993 0.0899826
0.109983 0.159984 0.179985 0.219986 0.239986 0.439991 0.529993 0.549993
0.599994 0.629995 0.649995 0.689996 0.709997 0.739998 0.759998 0.769998
0.819999 0.83 0.85 0.85 0.85 0.85 0.840017 0.830016 0.810016 0.780015
0.760015 0.740014 0.730014 0.720014 0.710014 0.690013 0.690013 0.650012
0.630012 0.580011 0.55001 0.520009 0.440008 0.410007 0.380006 0.370006
0.360006 0.330005 0.320005 0.320005 0.310005 0.310005 0.310005 0.300004
0.300004 0.300004 0.300004 0.330005 0.340005 0.360006 0.380006 0.390006
0.430007 0.450008 0.500009 0.510009 0.520009 0.55001 0.56001 0.580011
0.590011 0.610011 0.610011 0.620012 0.630012 0.630012 0.630012 0.630012
0.630012 0.630012 0.610011 0.610011 0.600011 0.56001 0.55001 0.490009
0.470008 0.460008 0.41 0.389999 0.369999 0.349998 0.299997 0.249996
0.0599975 0.00999635 0.00999635 -0.0100041;
#X coords 0 1 99 0 140 100 1 0 0;
#X restore 224 545 graph;
#X msg 185 468 set mysoundfile;
#X obj 148 661 cnv 16 87 16 empty empty empty 20 12 0 14 -260097 -66577
0;
#N canvas 864 246 634 307 save&recall 0;
#X obj 93 233 outlet;
#X msg 93 60 0;
#X msg 125 60 1;
#X msg 158 60 2;
#X msg 93 99 save \$1;
#X text 185 63 ...;
#X msg 207 60 20;
#X msg 149 154 0;
#X msg 181 154 1;
#X msg 214 154 2;
#X text 241 157 ...;
#X msg 263 154 20;
#X msg 149 193 recall \$1;
#X text 249 93 save & recall up to 20 presets \, presets will be saved
with the parrent patch;
#X connect 1 0 4 0;
#X connect 2 0 4 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 6 0 4 0;
#X connect 7 0 12 0;
#X connect 8 0 12 0;
#X connect 9 0 12 0;
#X connect 11 0 12 0;
#X connect 12 0 0 0;
#X restore 148 660 pd save&recall;
#X floatatom 110 146 5 0 127 0 - - -;
#X text 147 145 float to trigger grain instance n;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 0 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 19 0 0 0;
#X connect 21 0 22 0;
#X connect 22 0 0 0;
#X connect 23 0 24 0;
#X connect 24 0 0 0;
#X connect 25 0 26 0;
#X connect 26 0 0 0;
#X connect 31 0 0 0;
#X connect 33 0 0 0;
#X connect 35 0 0 0;
#X connect 36 0 0 0;
#X restore 570 107 pd control-messages;
#X obj 397 24 adc~;
#X text 579 153 <-- click to open GUI;
#X text 10 97 Inlets:;
#X text 11 137 Outlets:;
#X text 67 137 1:(~)left out;
#X text 67 150 2:(~)right out;
#X text 67 162 3:message;
#X text 11 61 Creation arguments: none;
#X obj 397 137 pp.grainer~;
#A saved;
#X text 67 96 1:(~)record-in;
#X text 10 29 granular sampler for mono soundfiles;
#X text 67 109 2:control-messages;
#N canvas 639 454 447 220 message-out 0;
#X obj 30 25 inlet;
#X msg 30 60 open /home/philipp/Documents/Pd/AudioLab/Examples/audio/Trumpet.wav
\, grain-distance 50 \, position 43015 \, grainsize 100 \, pitch 0
\, panorama 0 \, amplitude 0 \, filter-bypass 1 \, frequency 100 \,
q 1 \, playback-speed 100 \, play 0 \, env-type 0 \, env-bias 0.5 \,
env-shape 0.5 \, random-grain-distance 0 \, random-position 0 \, random-grainsize
0 \, random-pitch 0 \, random-panorama 0 \, random-amplitude 0 \, random-frequency
5000 \, random-q 0 \, position% 25.155 \, random-position% 0 \, int.grain-trigger
0 \,;
#X connect 0 0 1 0;
#X restore 570 189 pd message-out;
#X obj 676 3 cnv 15 120 30 empty empty empty 20 12 0 14 -260097 -66577
0;
#X obj 682 11 bng 15 250 50 0 \$0-example1 \$0-example1r empty 17 7
0 10 -262144 -1 -1;
#X text 701 9 open example-1;
#N canvas 102 154 450 300 examples 0;
#X obj 94 103 s pd;
#X obj 94 11 r \$0-example1;
#X msg 94 34 dir;
#X obj 94 57 pdcontrol;
#X msg 94 80 open 06-time-stretching.pd \$1/Examples;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X restore 308 331 pd examples;
#X connect 4 0 13 1;
#X connect 5 0 13 0;
#X connect 13 0 0 0;
#X connect 13 1 0 1;
#X connect 13 2 17 0;