-
Notifications
You must be signed in to change notification settings - Fork 4
/
lilacid.pd
449 lines (449 loc) · 12 KB
/
lilacid.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
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
#N canvas 629 542 248 272 10;
#N canvas 0 76 623 696 dsp 0;
#X obj 22 561 *~;
#X obj 22 237 peakfilter~;
#N canvas 835 399 450 300 bl_clip~ 0;
#X obj 24 83 clip~ -1 1;
#X obj 25 47 inlet~ lin;
#X obj 23 202 outlet~ lin;
#X obj 24 109 lop~ 17000;
#X obj 24 132 lop~ 17000;
#X obj 24 155 lop~ 17000;
#X obj 24 177 lop~ 17000;
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X restore 22 324 pd bl_clip~;
#N canvas 278 303 322 154 square 0;
#X obj 24 65 nblsquare~ 60;
#X obj 24 37 inlet~;
#X obj 24 89 outlet~;
#X obj 110 39 inlet;
#X obj 171 56 inlet;
#X obj 171 84 switch~;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X restore 22 157 pd square;
#N canvas 278 303 322 154 saw 0;
#X obj 24 37 inlet~;
#X obj 24 89 outlet~;
#X obj 110 39 inlet;
#X obj 171 56 inlet;
#X obj 171 84 switch~;
#X obj 24 65 nblsaw~ 100;
#X connect 0 0 5 0;
#X connect 2 0 5 1;
#X connect 3 0 4 0;
#X connect 5 0 1 0;
#X restore 125 160 pd saw;
#X obj 157 110 ==;
#X obj 80 530 dbtorms~;
#X obj 345 389 mtof~;
#X obj 22 292 *~;
#X obj 94 89 spigot;
#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 80 498 pd trg_amp_flr_att_hld_rel;
#N canvas 608 601 546 259 trg_amp_flr_att_hld_rel 0;
#X obj 28 207 vline~;
#X msg 28 182 \$1 \$2 \, \$3 \$4 \$5;
#X obj 28 154 pack f f f f f;
#X obj 27 234 outlet~;
#X obj 28 17 inlet;
#X obj 28 74 f;
#X obj 105 16 inlet;
#X text 145 17 amp;
#X text 66 17 trg;
#X obj 175 17 inlet;
#X text 215 18 flr;
#X obj 247 17 inlet;
#X text 287 18 att(ms);
#X obj 340 18 inlet;
#X text 380 19 hld(ms);
#X obj 435 17 inlet;
#X text 474 19 rel(ms);
#X obj 225 71 +;
#X obj 245 48 t b f;
#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 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 17 0 2 4;
#X connect 18 0 17 0;
#X connect 18 1 17 1;
#X restore 346 365 pd trg_amp_flr_att_hld_rel;
#X obj 94 110 0;
#X obj 213 140 - 20;
#X obj 21 624 switch~;
#X obj 279 172 rh_scalelog 0.1 2;
#X obj 213 115 rh_scalelog 20 110;
#X obj 22 100 mtof;
#X obj 131 17 netpd_f \$1 syncphase 0;
#X obj 179 54 netpd_f \$1 waveform 0;
#X obj 213 89 netpd_f \$1 filterq 0.6;
#X obj 279 146 netpd_f \$1 overdrive 0.51;
#X obj 356 440 loadbang;
#X obj 356 462 t b b;
#X obj 383 485 delay 1000;
#X msg 383 507 0;
#X msg 356 492 1;
#N canvas 382 346 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 115 413 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 51 r \$0-lilacid;
#X obj 173 73 route a_att;
#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 8 0;
#X connect 8 0 5 0;
#X restore 186 430 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 51 r \$0-lilacid;
#X obj 187 73 route a_hold;
#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 8 0;
#X connect 8 0 5 0;
#X restore 221 452 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 51 r \$0-lilacid;
#X obj 191 73 route a_rel;
#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 8 0;
#X connect 8 0 5 0;
#X restore 257 474 pd a-release;
#N canvas 22 68 329 276 f-ceil 0;
#X obj 35 227 outlet;
#X obj 35 142 +;
#X obj 46 121 t b f;
#X obj 35 199 min 130;
#X obj 35 171 rh_scalelin 40 120;
#X obj 35 22 netpd_f \$1 f-ceil 0.8;
#X obj 164 50 r \$0-lilacid;
#X obj 164 72 route f_ceil;
#X connect 1 0 4 0;
#X connect 2 0 1 0;
#X connect 2 1 1 1;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X restore 381 255 pd f-ceil;
#N canvas 22 68 344 195 f-floor 0;
#X obj 35 135 outlet;
#X obj 35 110 min 130;
#X obj 35 66 rh_scalelin 20 110;
#X obj 35 22 netpd_f \$1 f-floor 0.2;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X restore 416 278 pd f-floor;
#N canvas 22 68 342 234 f-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 100 rh_scalelog 20 300;
#X obj 177 99 rh_scalelog 20 300;
#X obj 35 22 netpd_f \$1 f-attack 0.01;
#X obj 177 49 r \$0-lilacid;
#X obj 177 71 route f_att;
#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 8 0;
#X connect 8 0 5 0;
#X restore 452 298 pd f-attack;
#N canvas 22 68 342 234 f-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 100 rh_scalelog 100 1000;
#X obj 35 22 netpd_f \$1 f-hold 0.01;
#X obj 187 50 r \$0-lilacid;
#X obj 187 72 route f_hold;
#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 8 0;
#X connect 8 0 5 0;
#X restore 487 318 pd f-hold;
#N canvas 22 68 342 234 f-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 189 100 rh_scalelog 100 3000;
#X obj 35 22 netpd_f \$1 f-release 0.51;
#X obj 189 50 r \$0-lilacid;
#X obj 189 72 route f_rel;
#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 8 0;
#X connect 8 0 5 0;
#X restore 523 339 pd f-release;
#X obj 21 596 i2mx \$1 lilacid;
#X obj 22 18 r \$0-lilacid;
#X obj 22 42 route note;
#X obj 22 64 t a b;
#X connect 0 0 36 0;
#X connect 0 0 36 1;
#X connect 1 0 8 0;
#X connect 2 0 0 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 3 2;
#X connect 6 0 0 1;
#X connect 7 0 1 1;
#X connect 8 0 2 0;
#X connect 9 0 12 0;
#X connect 10 0 6 0;
#X connect 10 1 36 2;
#X connect 11 0 7 0;
#X connect 12 0 3 1;
#X connect 12 0 4 1;
#X connect 13 0 1 2;
#X connect 15 0 8 1;
#X connect 16 0 13 0;
#X connect 17 0 3 0;
#X connect 17 0 4 0;
#X connect 18 0 9 1;
#X connect 19 0 5 0;
#X connect 19 0 4 2;
#X connect 20 0 16 0;
#X connect 21 0 15 0;
#X connect 22 0 23 0;
#X connect 23 0 26 0;
#X connect 23 1 24 0;
#X connect 24 0 25 0;
#X connect 25 0 36 2;
#X connect 26 0 36 2;
#X connect 27 0 10 1;
#X connect 28 0 10 3;
#X connect 29 0 10 4;
#X connect 30 0 10 5;
#X connect 31 0 11 1;
#X connect 32 0 11 2;
#X connect 33 0 11 3;
#X connect 34 0 11 4;
#X connect 35 0 11 5;
#X connect 36 0 14 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 17 0;
#X connect 39 1 9 0;
#X connect 39 1 11 0;
#X connect 39 1 10 0;
#X restore 7 26 pd dsp;
#N canvas 155 241 690 346 guistuff 0;
#X msg 402 71 range \$1 \$1;
#X obj 402 51 ==;
#X obj 396 28 r \$0-wf;
#X obj 402 93 s \$0-wf-r;
#X obj 397 199 sel 0 1;
#X obj 397 244 symbol square;
#X obj 419 224 symbol saw;
#X msg 397 266 label \$1;
#X obj 397 299 s \$0-display-wf;
#X msg 529 73 range \$1 \$1;
#X obj 529 53 ==;
#X obj 524 201 sel 0 1;
#X msg 524 268 label \$1;
#X obj 523 30 r \$0-syph;
#X obj 529 95 s \$0-syph-r;
#X obj 524 301 s \$0-display-syph;
#X obj 546 226 symbol |on;
#X obj 524 246 symbol |off;
#X obj 397 176 netpd_r \$1 waveform;
#X obj 524 178 netpd_r \$1 syncphase;
#X obj 396 132 s \$1-waveform;
#X obj 523 134 s \$1-syncphase;
#X obj 18 19 r \$0-unstep-gui;
#X msg 18 41 vis 1;
#X obj 18 65 unstep \$1 lilacid a_att a_hold a_rel f_ceil f_att f_hold f_rel;
#X obj 18 108 s \$0-lilacid;
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 2 0 20 0;
#X connect 4 0 5 0;
#X connect 4 1 6 0;
#X connect 5 0 7 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 9 0 14 0;
#X connect 10 0 9 0;
#X connect 11 0 17 0;
#X connect 11 1 16 0;
#X connect 12 0 15 0;
#X connect 13 0 10 0;
#X connect 13 0 21 0;
#X connect 16 0 12 0;
#X connect 17 0 12 0;
#X connect 18 0 4 0;
#X connect 19 0 11 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
#X restore 7 48 pd guistuff;
#X text 62 224 http://www.netpd.org/lilacid;
#X obj 103 48 netpd_head \$1 lilacid;
#N canvas 952 314 98 304 \$1-lilacid 0;
#X obj 9 20 hsl 75 15 0 1 0 0 \$1-a-level \$1-a-level volume 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 50 hsl 75 15 0 1 0 0 \$1-a-attack \$1-a-attack attack 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 65 hsl 75 15 0 1 0 0 \$1-a-hold \$1-a-hold hold 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 80 hsl 75 15 0 1 0 0 \$1-a-release \$1-a-release release 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 113 hsl 75 15 0 1 0 0 \$1-f-ceil \$1-f-ceil env_ceiling 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 128 hsl 75 15 0 1 0 0 \$1-f-floor \$1-f-floor env_floor 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 158 hsl 75 15 0 1 0 0 \$1-f-attack \$1-f-attack attack 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 173 hsl 75 15 0 1 0 0 \$1-f-hold \$1-f-hold hold 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 188 hsl 75 15 0 1 0 0 \$1-f-release \$1-f-release release 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 143 hsl 75 15 0 1 0 0 \$1-filterq \$1-filterq q 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 9 35 hsl 75 15 0 1 0 0 \$1-overdrive \$1-overdrive overdrive 3 8 0 10 #f430f0 #000000 #000000 0 1;
#X obj 6 5 cnv 15 80 15 empty empty amplitude 3 8 0 10 #000000 #f430f0 0;
#X obj 9 269 hsl 75 15 0 0 0 0 \$0-unstep-gui \$0.bli unstep 3 8 0 10 #f430f0 #f430f0 #000000 0 1;
#X obj 9 221 hsl 75 15 1 1 0 0 \$0-wf \$0-wf-r waveform 3 8 0 10 #f430f0 #f430f0 #000000 0 1;
#X obj 9 236 hsl 75 15 0 0 0 0 \$0-syph \$0-syph-r sync_phase 3 8 0 10 #f430f0 #f430f0 #000000 0 1;
#X obj 6 98 cnv 15 80 15 empty empty filter 3 8 0 10 #000000 #f430f0 0;
#X obj 6 206 cnv 15 80 15 empty empty oscillator 3 8 0 10 #000000 #f430f0 0;
#X obj 6 251 cnv 15 40 15 empty \$0-display-wf square 3 8 0 10 #000000 #f430f0 0;
#X obj 46 251 cnv 15 40 15 empty \$0-display-syph |off 3 8 0 10 #000000 #f430f0 0;
#X restore 103 25 pd \$1-lilacid;
#N canvas 702 298 178 164 NETPD 0;
#N canvas 644 305 310 195 abslist 0;
#X msg 8 46 roman_helpers;
#X msg 9 111 peakfilter~;
#X msg 9 67 netpd_bandlimited_oscillators;
#X msg 9 140 i2mx;
#X msg 9 89 unstep;
#X restore 13 29 pd abslist;
#X msg 13 56 version 0 3 1;
#X restore 103 71 pd NETPD 2 0;
#X text 116 245 2014 \, Roman Haefeli;