-
Notifications
You must be signed in to change notification settings - Fork 4
/
voc.pd
393 lines (393 loc) · 10.8 KB
/
voc.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
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
#N canvas 152 386 512 225 10;
#N canvas 624 75 434 290 NETPD 0;
#N canvas 387 317 473 287 abslist 0;
#X text 7 13 Put a message box containing the name of the abstraction (without the .pd suffix) for each dependency.;
#X msg 116 52 unstep;
#X msg 116 74 i2mx;
#X restore 12 178 pd abslist;
#X text 111 179 <- add dependencies of your netpd instrument;
#X text 18 32 A 'version' meta tag is mandatory. unpatch uses this information to make sure that all clients load the same version of the instrument.;
#X text 19 78 Whenever you make changes to your instrument \, make sure to bump the version.;
#X text 18 118 There is no predefined meaning of the three version fields. Use them at your own will.;
#X text 16 211 The [pd abslist] tag container is optional and is used to specify dependencies (abstractions in netpd/abs) of your instrument.;
#X text 107 7 <- update the version of this netpd instrument;
#X msg 12 8 version 0 0 1;
#X restore 10 14 pd NETPD 2 0;
#X obj 10 79 netpd_head \$1 voc;
#N canvas 867 124 93 199 \$1-voc 0;
#X obj 9 59 hsl 75 15 0 1 0 0 \$1-a-level \$1-a-level volume 3 8 0 10 #fce0c4 #000000 #000000 0 1;
#X obj 9 74 hsl 75 15 0 1 0 1 \$1-a-attack \$1-a-attack attack 3 8 0 10 #fce0c4 #000000 #000000 1000 1;
#X obj 9 89 hsl 75 15 0 1 0 1 \$1-a-hold \$1-a-hold hold 3 8 0 10 #fce0c4 #000000 #000000 1600 1;
#X obj 9 104 hsl 75 15 0 1 0 0 \$1-a-release \$1-a-release release 3 8 0 10 #fce0c4 #000000 #000000 0 1;
#X obj 9 24 hsl 75 15 0 1 0 0 \$1-vow \$1-vow vowel 3 8 0 10 #fce0c4 #000000 #000000 0 1;
#X obj 9 174 hsl 75 15 0 0 0 0 \$0-unstep-gui \$0.bli unstep 3 8 0 10 #dcdcdc #dcdcdc #000000 0 1;
#X text 6 5 VOCAL VOWELS;
#X obj 9 139 hsl 75 15 0 1 0 0 \$1-lfor \$1-lfor lfo_rate 3 8 0 10 #fce0c4 #000000 #000000 0 1;
#X obj 9 154 hsl 75 15 0 1 0 1 \$1-lfod \$1-lfod lfo_depth 3 8 0 10 #fce0c4 #000000 #000000 1200 1;
#X obj 9 39 hsl 75 15 0 1 0 1 \$1-glide \$1-glide transition 3 8 0 10 #fce0c4 #000000 #000000 2800 1;
#X obj 9 124 hsl 75 15 0 1 0 0 \$1-noteglide \$1-noteglide note_glide 3 8 0 10 #fce0c4 #000000 #000000 0 1;
#X restore 10 42 pd \$1-voc;
#N canvas 100 23 837 755 dsp 0;
#X obj 31 293 phasor~;
#X obj 31 171 mtof;
#X obj 31 112 t f b;
#X obj 31 450 bp~ 800 25;
#X obj 197 431 bp~ 1200 25;
#X obj 334 432 bp~ 2500 25;
#X text 580 123 a;
#X obj 109 408 line;
#X obj 229 408 line;
#X obj 261 408 line;
#X text 585 142 i;
#X msg 382 166 220 25 1 600 25 1 2500 60 0.2;
#X text 580 165 0o;
#X msg 352 125 800 30 1 1200 25 0.7 2500 25 0.5;
#X msg 368 145 220 25 1 2200 25 0.4 3000 20 0.4;
#X obj 334 495 *~;
#X obj 125 308 unpack f f f f f f f f f;
#X obj 197 494 *~;
#X obj 314 407 line~;
#X obj 30 494 *~;
#X obj 139 408 line~;
#X text 574 186 -a-;
#X msg 395 207 500 25 1 2300 25 1 2500 60 0;
#X msg 388 186 1000 25 1 1400 25 1 2500 60 0;
#X text 585 209 e;
#X obj 352 106 sel 0 1 2 3 4;
#X text 449 448 vowel filters proof of concept;
#X text 450 464 www.timvets.net;
#X obj 30 543 lop~ 10000;
#X obj 31 62 route note;
#X obj 31 84 t a b;
#X obj 31 38 r \$0-voc;
#X obj 29 741 *~;
#X obj 87 710 dbtorms~;
#N canvas 298 255 620 253 trg_amp_flr_att_hld_rel 0;
#X obj 26 203 vline~;
#X msg 26 178 \$1 \$2 \, \$3 \$4 \$5;
#X obj 26 150 pack f f f f f;
#X obj 25 230 outlet~;
#X obj 26 13 inlet;
#X obj 26 70 f;
#X obj 103 12 inlet;
#X text 143 13 amp;
#X text 64 13 trg;
#X obj 173 13 inlet;
#X text 213 14 flr;
#X obj 245 13 inlet;
#X text 285 14 att(ms);
#X obj 338 14 inlet;
#X text 378 15 hld(ms);
#X obj 433 13 inlet;
#X text 473 13 rel(ms);
#X obj 223 67 +;
#X obj 243 44 t b f;
#X obj 250 143 +;
#X obj 266 118 t b f;
#X obj 234 189 del;
#X obj 250 166 + 2;
#X obj 234 211 0;
#X obj 199 159 b;
#X obj 199 209 1;
#X obj 201 233 outlet;
#X text 255 232 switch;
#X text 284 165 <- add at least one block because of [vline~];
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 4 0 5 0;
#X connect 4 0 24 0;
#X connect 5 0 2 0;
#X connect 6 0 5 1;
#X connect 9 0 2 2;
#X connect 11 0 2 1;
#X connect 11 0 17 0;
#X connect 13 0 18 0;
#X connect 15 0 2 3;
#X connect 15 0 20 0;
#X connect 17 0 2 4;
#X connect 17 0 19 0;
#X connect 18 0 17 0;
#X connect 18 1 17 1;
#X connect 19 0 22 0;
#X connect 20 0 19 0;
#X connect 20 1 19 1;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 26 0;
#X connect 24 0 21 0;
#X connect 24 0 25 0;
#X connect 25 0 26 0;
#X restore 87 678 pd trg_amp_flr_att_hld_rel;
#X obj 28 804 switch~;
#X obj 363 620 loadbang;
#X obj 363 642 t b b;
#X obj 390 665 delay 1000;
#X msg 390 687 0;
#X msg 363 672 1;
#N canvas 633 654 283 124 a-level 0;
#X obj 9 38 pow 2;
#X obj 9 59 rmstodb;
#X obj 9 81 outlet;
#X obj 9 17 netpd_f \$1 a-level 0.6;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 3 0 0 0;
#X restore 112 623 pd a-level;
#N canvas 22 68 342 234 a-attack 0;
#X obj 35 206 outlet;
#X obj 35 158 +;
#X obj 46 137 t b f;
#X obj 35 182 - 40;
#X obj 35 101 rh_scalelog 20 200;
#X obj 173 101 rh_scalelog 20 200;
#X obj 35 22 netpd_f \$1 a-attack 0.01;
#X obj 173 73 route a_att;
#X obj 173 51 r \$0-voc;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 2 1 1 1;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 6 0 4 0;
#X connect 7 0 5 0;
#X connect 8 0 7 0;
#X restore 193 610 pd a-attack;
#N canvas 22 68 342 234 a-hold 0;
#X obj 35 206 outlet;
#X obj 35 158 +;
#X obj 46 137 t b f;
#X obj 35 180 - 200;
#X obj 35 101 rh_scalelog 100 1000;
#X obj 187 101 rh_scalelog 100 1000;
#X obj 35 22 netpd_f \$1 a-hold 0.01;
#X obj 187 73 route a_hold;
#X obj 187 51 r \$0-voc;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 2 1 1 1;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 6 0 4 0;
#X connect 7 0 5 0;
#X connect 8 0 7 0;
#X restore 228 632 pd a-hold;
#N canvas 22 68 342 234 a-release 0;
#X obj 35 206 outlet;
#X obj 35 158 +;
#X obj 46 137 t b f;
#X obj 35 180 - 200;
#X obj 35 101 rh_scalelog 100 3000;
#X obj 191 100 rh_scalelog 100 3000;
#X obj 35 22 netpd_f \$1 a-release 0.51;
#X obj 191 73 route a_rel;
#X obj 191 51 r \$0-voc;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 2 1 1 1;
#X connect 3 0 0 0;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 6 0 4 0;
#X connect 7 0 5 0;
#X connect 8 0 7 0;
#X restore 264 654 pd a-release;
#X floatatom 112 644 5 0 0 0 - - - 0;
#X obj 28 776 i2mx \$1 voc;
#N canvas 35 69 342 234 vow 0;
#X obj 35 206 outlet;
#X obj 191 51 r \$0-voc;
#X obj 191 73 route vow;
#X obj 196 120 int;
#X obj 196 95 * 4.99;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X restore 514 4 pd vow;
#X obj 31 328 *~ 1;
#X obj 31 263 +~;
#X obj 106 203 osc~;
#X obj 114 237 *~;
#X obj 141 182 netpd_f \$1 lfod 0;
#X obj 106 157 netpd_f \$1 lfor 0;
#X msg 164 374 \$1 \$2;
#X obj 164 350 pack f f;
#X msg 110 374 \$1 \$2;
#X obj 110 350 pack f f;
#X obj 79 408 line;
#X msg 70 374 \$1 \$2;
#X obj 69 350 pack f f;
#X msg 328 374 \$1 \$2;
#X obj 328 350 pack f f;
#X msg 274 374 \$1 \$2;
#X obj 274 350 pack f f;
#X msg 219 374 \$1 \$2;
#X obj 219 350 pack f f;
#X obj 395 408 line;
#X obj 430 408 line;
#X obj 484 406 line~;
#X msg 494 374 \$1 \$2;
#X obj 494 350 pack f f;
#X msg 440 374 \$1 \$2;
#X obj 440 350 pack f f;
#X msg 385 374 \$1 \$2;
#X obj 385 350 pack f f;
#X obj 31 143 - 12;
#X obj 352 230 s \$0-vowel;
#X obj 125 289 r \$0-vowel;
#X text 143 140 LFO;
#X text 513 73 The Vowels;
#X text 285 246 Glide;
#X text 110 600 Amp Envelope;
#X obj 352 8 netpd_f \$1 vow 0;
#X obj 352 46 int;
#X obj 352 27 * 4.99;
#X obj 106 178 * 10;
#X obj 141 203 * 60;
#X obj 286 267 netpd_f \$1 glide 500;
#X obj 286 307 + 50;
#X obj 286 287 * 1000;
#X text 449 255 adapted from syn.vowels.pd;
#X text 450 289 on megrimm's github;
#X text 449 273 from the 'pd-fresh' collection;
#X obj 31 232 line;
#X obj 31 196 pack f f;
#X text 145 72 Note Glide;
#X obj 76 111 rh_scalelog 20 1000;
#X obj 76 92 netpd_f \$1 noteglide 0;
#X obj 352 67 +;
#X obj 456 35 t b f;
#X obj 352 86 mod 5;
#X text 447 571 Roman Haefeli's 'lilacid' instrument;
#X text 446 554 and most of the rest adapted from;
#X connect 0 0 48 0;
#X connect 1 0 95 0;
#X connect 2 0 76 0;
#X connect 3 0 19 0;
#X connect 4 0 17 0;
#X connect 5 0 15 0;
#X connect 7 0 3 2;
#X connect 8 0 4 1;
#X connect 9 0 4 2;
#X connect 11 0 77 0;
#X connect 13 0 77 0;
#X connect 14 0 77 0;
#X connect 15 0 28 0;
#X connect 16 0 60 0;
#X connect 16 1 57 0;
#X connect 16 2 55 0;
#X connect 16 3 66 0;
#X connect 16 4 64 0;
#X connect 16 5 62 0;
#X connect 16 6 75 0;
#X connect 16 7 73 0;
#X connect 16 8 71 0;
#X connect 17 0 28 0;
#X connect 18 0 17 1;
#X connect 19 0 28 0;
#X connect 20 0 19 1;
#X connect 22 0 77 0;
#X connect 23 0 77 0;
#X connect 25 0 13 0;
#X connect 25 1 14 0;
#X connect 25 2 11 0;
#X connect 25 3 23 0;
#X connect 25 4 22 0;
#X connect 28 0 32 0;
#X connect 29 0 30 0;
#X connect 30 0 2 0;
#X connect 30 1 34 0;
#X connect 31 0 29 0;
#X connect 32 0 46 0;
#X connect 32 0 46 1;
#X connect 33 0 32 1;
#X connect 34 0 33 0;
#X connect 34 1 46 2;
#X connect 36 0 37 0;
#X connect 37 0 40 0;
#X connect 37 1 38 0;
#X connect 38 0 39 0;
#X connect 39 0 46 2;
#X connect 40 0 46 2;
#X connect 41 0 34 1;
#X connect 41 0 45 0;
#X connect 42 0 34 3;
#X connect 43 0 34 4;
#X connect 44 0 34 5;
#X connect 46 0 35 0;
#X connect 47 0 100 0;
#X connect 48 0 3 0;
#X connect 48 0 4 0;
#X connect 48 0 5 0;
#X connect 49 0 0 0;
#X connect 50 0 51 0;
#X connect 51 0 49 1;
#X connect 52 0 87 0;
#X connect 53 0 86 0;
#X connect 54 0 20 0;
#X connect 55 0 54 0;
#X connect 56 0 7 0;
#X connect 57 0 56 0;
#X connect 58 0 3 1;
#X connect 59 0 58 0;
#X connect 60 0 59 0;
#X connect 61 0 18 0;
#X connect 62 0 61 0;
#X connect 63 0 9 0;
#X connect 64 0 63 0;
#X connect 65 0 8 0;
#X connect 66 0 65 0;
#X connect 67 0 5 1;
#X connect 68 0 5 2;
#X connect 69 0 15 1;
#X connect 70 0 69 0;
#X connect 71 0 70 0;
#X connect 72 0 68 0;
#X connect 73 0 72 0;
#X connect 74 0 67 0;
#X connect 75 0 74 0;
#X connect 76 0 1 0;
#X connect 78 0 16 0;
#X connect 83 0 85 0;
#X connect 84 0 99 0;
#X connect 85 0 84 0;
#X connect 86 0 50 0;
#X connect 87 0 51 1;
#X connect 88 0 90 0;
#X connect 89 0 55 1;
#X connect 89 0 57 1;
#X connect 89 0 60 1;
#X connect 89 0 66 1;
#X connect 89 0 64 1;
#X connect 89 0 62 1;
#X connect 89 0 75 1;
#X connect 89 0 73 1;
#X connect 89 0 71 1;
#X connect 90 0 89 0;
#X connect 94 0 49 0;
#X connect 95 0 94 0;
#X connect 97 0 95 1;
#X connect 98 0 97 0;
#X connect 99 0 101 0;
#X connect 100 0 99 0;
#X connect 100 1 99 1;
#X connect 101 0 25 0;
#X restore 10 106 pd dsp;
#N canvas 0 242 518 380 guistuff 0;
#X obj 18 19 r \$0-unstep-gui;
#X msg 18 41 vis 1;
#X obj 18 108 s \$0-voc;
#X obj 18 65 unstep \$1 voc a_att a_hold a_rel vow;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X restore 10 135 pd guistuff;
#X text 158 16 <- the instrument's meta tags here;
#X text 159 45 <- the instrument's GUI canvas;
#X text 151 78 <- this manages patch state synchorization;
#X text 154 109 <- the sound making stuff;
#X text 152 135 <- unstep seq link + set seq control parameters;
#X text 11 178 beem 2020 for NetPD;