-
Notifications
You must be signed in to change notification settings - Fork 9
/
Copy pathpp.grainer-mc~-help.pd
244 lines (244 loc) · 9.94 KB
/
pp.grainer-mc~-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
#N struct 1005-template float x float y float c float s float th float stretch array 1005-plus 1005-template-y array 1005-minus 1005-template-y;
#N struct 1005-template-y float y;
#N canvas 138 178 807 360 10;
#X obj 2 2 cnv 15 380 350 empty empty empty 20 12 0 14 #e0e0e0 #404040 0;
#X obj 12 15 cnv 15 10 10 empty empty pp.grainer-mc~ 0 0 2 16 #e0e0e0 #fcfcfc 0;
#X obj 594 107 cnv 15 118 17 empty empty empty 20 12 0 14 #fc8000 #404040 0;
#N canvas 856 116 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 #fcfcfc #000000 #000000 0 1;
#X msg 135 274 playback-speed \$1;
#X floatatom 135 255 5 0 0 0 - - - 0;
#X obj 69 13 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#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 #fcfcfc #000000 #000000 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 #fcfcfc #000000 #000000 0 1;
#X obj 96 99 metro 100;
#X obj 96 120 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#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 #fc8000 #404040 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 - - - 0;
#X floatatom 76 94 5 0 100 0 - - - 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 - - - 0;
#X msg 69 148 random-position% \$1;
#X floatatom 77 57 5 0 1e+36 0 - - - 0;
#X msg 69 75 random-position \$1;
#X floatatom 76 170 5 0 1e+37 0 - - - 0;
#X floatatom 75 207 5 0 1e+33 0 - - - 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 - - - 0;
#X floatatom 75 281 5 0 1e+20 0 - - - 0;
#X msg 69 298 random-pitch \$1;
#X msg 69 262 pitch \$1;
#X text 130 261 grain-pitch in cents;
#X floatatom 75 324 5 -100 0 0 - - - 0;
#X msg 69 343 amplitude \$1;
#X floatatom 75 364 5 0 100 0 - - - 0;
#X msg 69 382 random-amplitude \$1;
#X obj 340 441 cnv 15 200 200 empty empty empty 20 12 0 14 #e0e0e0 #404040 0;
#X floatatom 352 487 5 0 20000 0 - - - 0;
#X obj 344 448 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 344 467 filter-bypass \$1;
#X msg 352 506 frequency \$1;
#X floatatom 354 564 5 0 100000 0 - - - 0;
#X msg 354 582 q \$1;
#X floatatom 353 525 5 0 100 0 - - - 0;
#X msg 353 544 random-frequency \$1;
#X floatatom 355 602 5 0 100000 0 - - - 0;
#X msg 355 620 random-q \$1;
#X obj 341 216 cnv 15 200 200 empty empty empty 20 12 0 14 #e0e0e0 #404040 0;
#X obj 348 224 hradio 15 1 0 5 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0;
#X floatatom 348 245 5 0 4 0 - - - 0;
#X msg 348 265 env-type \$1;
#X floatatom 347 307 5 0 1 0 - - - 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 #fcfcfc #000000 #000000 0 1;
#X floatatom 346 366 5 0 1 0 - - - 0;
#X obj 349 347 hsl 100 15 0 1 0 0 empty empty empty -2 -8 0 10 #fcfcfc #000000 #000000 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 21 0 22 0;
#X connect 22 0 0 0;
#X connect 23 0 24 0;
#X connect 24 0 0 0;
#X connect 26 0 29 0;
#X connect 27 0 28 0;
#X connect 28 0 0 0;
#X connect 29 0 0 0;
#X connect 30 0 31 0;
#X connect 31 0 0 0;
#X connect 32 0 33 0;
#X connect 33 0 0 0;
#X connect 34 0 35 0;
#X connect 35 0 0 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 0 0;
#X connect 40 0 41 0;
#X connect 41 0 0 0;
#X connect 42 0 40 0;
#X connect 43 0 45 0;
#X connect 44 0 43 0;
#X connect 45 0 0 0;
#X restore 149 617 pd more;
#X obj 157 298 cnv 15 250 150 empty empty empty 20 12 0 14 #e0e0e0 #404040 0;
#X obj 165 306 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X msg 165 327 int.grain-trigger \$1;
#X floatatom 166 349 5 0 1e+13 0 - - - 0;
#X msg 166 369 grain-distance \$1;
#X floatatom 166 393 5 0 1e+16 0 - - - 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 #fc8000 #404040 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 - - - 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 594 107 pd control-messages;
#X obj 421 24 adc~;
#X text 603 153 <-- click to open GUI;
#X text 17 207 Inlets:;
#X text 18 265 Outlets:;
#X text 74 299 3:message;
#X text 74 206 1:(~)record-in;
#X text 74 222 2:control-messages;
#N canvas 639 454 447 220 message-out 0;
#X obj 30 25 inlet;
#X msg 30 60 open symbol \, grain-distance 50 \, position 0 \, grainsize 100 \, pitch 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-amplitude 0 \, random-frequency 5000 \, random-q 0 \, position% 0 \, random-position% 0 \, int.grain-trigger 0 \,;
#X connect 0 0 1 0;
#X restore 594 189 pd message-out;
#X obj 422 250 snake~ out 8, f 27;
#X obj 421 138 pp.grainer-mc~ 8;
#A saved empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \;;
#X obj 421 293 pp.out-8~;
#A saved empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \;;
#X text 7 40 A granular sampler with multi channel output (leftmost outlet). Each grain stream is sent to an individual output for use in a multi-channel speaker system or for individual processing.;
#X text 74 265 1:(~ mc) out;
#X text 74 282 2:(~ mc) ramp (0-1);
#X text 6 95 The second output sends multi-channel signal ramps (0-1) for each grain. These can be used to control applied effects at signal rate.;
#X obj 682 6 cnv 15 120 30 empty empty empty 20 12 0 14 #fc8000 #404040 0;
#X obj 694 14 bng 15 250 50 0 \$0-example1 \$0-example1r empty 17 7 0 10 #fcfcfc #000000 #000000;
#X text 711 12 open example;
#N canvas 213 231 450 300 examples 0;
#X obj 94 11 r \$0-example1;
#X obj 94 105 s pd;
#X msg 94 34 dir;
#X obj 94 57 pdcontrol;
#X msg 94 82 open 15-train_of_sounds.pd \$1/Examples;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X restore 307 330 pd examples;
#X text 72 174 \$1: number of channels/grains (default 8);
#X text 17 157 Creation arguments:;
#X connect 3 0 13 1;
#X connect 4 0 13 0;
#X connect 12 0 14 0;
#X connect 12 1 14 1;
#X connect 12 2 14 2;
#X connect 12 3 14 3;
#X connect 12 4 14 4;
#X connect 12 5 14 5;
#X connect 12 6 14 6;
#X connect 12 7 14 7;
#X connect 13 0 12 0;
#X connect 13 2 11 0;