-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathdl_fbf~.pd
841 lines (841 loc) · 19.5 KB
/
dl_fbf~.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
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
#N canvas 46 115 1077 541 10;
#X declare -lib zexy -lib iemlib;
#X obj 294 109 inlet~;
#X obj 294 319 outlet~;
#N canvas 38 420 1240 408 init 0;
#X msg 99 90 0;
#X msg 77 90 100;
#X obj 84 28 loadbang;
#X obj 34 230 r \$0-delay_coarse;
#X obj 143 230 r \$0-delay_fine;
#X obj 66 247 t b f;
#X obj 74 270 +;
#X obj 74 364 s \$0-delay_real;
#X obj 281 249 r \$0-feedback;
#X obj 299 298 s \$0-feedback_pol;
#X obj 369 202 r \$0-fb_pol;
#X obj 369 253 t b f;
#X obj 369 219 sel 0 1;
#X msg 369 236 -1;
#X msg 391 236 1;
#X obj 342 277 * 1;
#X msg 121 90 1;
#X obj 495 212 r \$0-hpf;
#X obj 495 234 t b f;
#X obj 554 212 r \$0-lpf;
#X obj 522 258 >;
#X obj 495 279 spigot;
#X obj 527 303 f;
#X obj 574 234 t b f;
#X obj 574 279 spigot;
#X obj 606 303 f;
#X obj 601 258 <;
#X obj 541 70 t b f;
#X obj 580 70 t b f;
#X obj 505 119 s \$0-filters;
#X msg 217 89 20000;
#X msg 260 89 20;
#X msg 291 89 0.707;
#X obj 869 157 t f f;
#X obj 869 100 mtof;
#X obj 869 120 expr 1000/$f1;
#X obj 896 197 i;
#X obj 869 244 -;
#X obj 896 218 * 10;
#X obj 896 177 * 0.1;
#X obj 1050 11 r \$0-delay_real;
#X obj 1050 178 ftom;
#X msg 1050 202 set \$1;
#X obj 1052 239 t a a;
#X obj 1049 304 s \$0-delay_pitch;
#X obj 1050 34 spigot;
#X obj 1050 151 expr 1000/$f1;
#X obj 1048 74 moses 1e-07;
#X msg 986 121 -1500;
#X obj 505 98 pack f f f f;
#X obj 623 70 t b f;
#X msg 376 50 1;
#X obj 121 113 s \$0-fb_pol;
#X obj 93 134 s \$0-delay_fine;
#X obj 77 151 s \$0-delay_coarse;
#X obj 38 182 s \$0-limit_thresh;
#X obj 217 153 s \$0-lpf;
#X obj 293 153 s \$0-hpf;
#X obj 369 153 s \$0-lpf_q;
#X obj 457 153 s \$0-hpf_q;
#X obj 376 72 s \$0-gang;
#X obj 505 44 r \$0-hpf;
#X obj 589 44 r \$0-lpf;
#X obj 672 44 r \$0-hpf_q;
#X obj 765 44 r \$0-lpf_q;
#X obj 869 12 r \$0-delay_pitch;
#X obj 904 255 s \$0-delay_coarse;
#X obj 869 275 s \$0-delay_fine;
#X obj 1077 273 s \$0-delay_pitch;
#X obj 527 323 s \$0-lpf;
#X obj 606 323 s \$0-hpf;
#X obj 10 113 s \$0-porta;
#X connect 0 0 53 0;
#X connect 1 0 54 0;
#X connect 1 0 71 0;
#X connect 2 0 0 0;
#X connect 2 0 1 0;
#X connect 2 0 16 0;
#X connect 2 0 30 0;
#X connect 2 0 31 0;
#X connect 2 0 32 0;
#X connect 2 0 51 0;
#X connect 3 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 7 0;
#X connect 8 0 15 0;
#X connect 10 0 12 0;
#X connect 11 0 15 0;
#X connect 11 1 15 1;
#X connect 12 0 13 0;
#X connect 12 1 14 0;
#X connect 13 0 11 0;
#X connect 14 0 11 0;
#X connect 15 0 9 0;
#X connect 16 0 52 0;
#X connect 17 0 18 0;
#X connect 17 0 26 1;
#X connect 18 0 21 0;
#X connect 18 1 20 0;
#X connect 18 1 22 1;
#X connect 19 0 20 1;
#X connect 19 0 23 0;
#X connect 20 0 21 1;
#X connect 21 0 22 0;
#X connect 22 0 69 0;
#X connect 23 0 24 0;
#X connect 23 1 25 1;
#X connect 23 1 26 0;
#X connect 24 0 25 0;
#X connect 25 0 70 0;
#X connect 26 0 24 1;
#X connect 27 0 49 0;
#X connect 27 1 49 1;
#X connect 28 0 49 0;
#X connect 28 1 49 2;
#X connect 30 0 56 0;
#X connect 31 0 57 0;
#X connect 32 0 58 0;
#X connect 32 0 59 0;
#X connect 33 0 37 0;
#X connect 33 1 39 0;
#X connect 34 0 35 0;
#X connect 35 0 33 0;
#X connect 36 0 38 0;
#X connect 37 0 67 0;
#X connect 38 0 37 1;
#X connect 38 0 66 0;
#X connect 39 0 36 0;
#X connect 40 0 45 0;
#X connect 41 0 42 0;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 1 68 0;
#X connect 45 0 47 0;
#X connect 46 0 41 0;
#X connect 47 0 48 0;
#X connect 47 1 46 0;
#X connect 48 0 42 0;
#X connect 49 0 29 0;
#X connect 50 0 49 0;
#X connect 50 1 49 3;
#X connect 51 0 60 0;
#X connect 61 0 49 0;
#X connect 62 0 27 0;
#X connect 63 0 28 0;
#X connect 64 0 50 0;
#X connect 65 0 34 0;
#X restore 458 127 pd init;
#X obj 372 179 r \$0-filters;
#X obj 692 17 inlet~;
#X obj 722 432 r \$0-patch_on;
#N canvas 130 185 1149 655 patches 0;
#X obj 24 140 f;
#X obj 21 97 r \$0-store_patch;
#X obj 22 199 prepend add;
#X obj 19 232 t b a;
#X obj 89 321 msgfile;
#X obj 356 382 spigot;
#X msg 400 381 0;
#X msg 401 364 1;
#X msg 172 289 add patches 0;
#X obj 169 251 loadbang;
#X obj 80 551 route patches;
#X msg 106 238 goto 0;
#X obj 34 297 + 1;
#X obj 18 314 f;
#X msg 18 367 replace patches \$1;
#X msg 69 288 this;
#X obj 18 262 t b b b;
#X msg 573 327 range 1 \$1;
#X obj 346 217 t b f;
#X msg 361 241 goto \$1;
#X msg 326 240 this;
#X obj 453 251 r \$0-patches_load;
#X obj 453 268 openpanel;
#X msg 527 302 read \$1;
#X msg 483 302 goto 0;
#X msg 453 302 this;
#X obj 633 181 r \$0-patches_save;
#X obj 633 209 savepanel;
#X obj 632 238 makesymbol %s.txt;
#X msg 630 282 write \$1;
#X msg 226 222 print;
#X obj 81 521 route list;
#X obj 453 285 t b b a b;
#X msg 469 362 clear;
#X obj 281 171 r \$0-patches_clear;
#X obj 279 197 t b b;
#X obj 846 125 inlet;
#X obj 849 373 outlet;
#X obj 813 170 symbol;
#X obj 910 161 inlet;
#X obj 963 418 random;
#X obj 981 510 outlet;
#X obj 356 399 s \$0-patches-num;
#X obj 573 344 s \$0-patch-set;
#X obj 36 33 r \$0-delay_fine;
#X obj 50 52 r \$0-delay_coarse;
#X obj 158 52 r \$0-feedback;
#X obj 169 71 r \$0-fb_pol;
#X obj 154 448 s \$0-porta;
#X obj 329 622 s \$0-hpf;
#X obj 345 550 s \$0-lpf;
#X obj 365 480 s \$0-lpf_q;
#X obj 732 544 s \$0-delay_pitch;
#X obj 305 106 r \$0-mix_pc;
#X obj 321 127 r \$0-gang;
#X obj 243 331 unpack f f f f f f f f f f f f;
#X obj 493 606 s \$0-hpf_q;
#X obj 672 384 r \$0-store_plus;
#X obj 556 384 r \$0-store_minus;
#X obj 672 408 f;
#X obj 556 418 f;
#X obj 556 438 +;
#X obj 601 435 %;
#X obj 601 455 + 1;
#X obj 534 353 - 1;
#X obj 556 459 - 1;
#X obj 672 429 + 1;
#X obj 31 451 s \$0-delay_fine;
#X obj 79 472 s \$0-delay_coarse;
#X obj 220 469 s \$0-feedback;
#X obj 228 493 s \$0-fb_pol;
#X obj 559 496 s \$0-gang;
#X obj 543 516 s \$0-mix_pc;
#X obj 134 33 r \$0-porta;
#X obj 178 90 r \$0-hpf;
#X obj 191 109 r \$0-lpf;
#X obj 200 128 r \$0-lpf_q;
#X obj 296 86 r \$0-hpf_q;
#X obj 387 130 r \$0-delay_pitch;
#X obj 24 177 pack f f f f f f f f f f f f;
#X obj 595 476 s \$0-patch-set;
#X obj 885 125 inlet;
#X connect 0 0 79 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 16 0;
#X connect 3 1 4 0;
#X connect 4 0 31 0;
#X connect 5 0 6 0;
#X connect 5 0 17 0;
#X connect 5 0 42 0;
#X connect 6 0 5 1;
#X connect 7 0 5 1;
#X connect 8 0 4 0;
#X connect 9 0 8 0;
#X connect 10 0 12 0;
#X connect 10 0 5 0;
#X connect 10 0 40 1;
#X connect 10 0 62 1;
#X connect 10 0 61 1;
#X connect 10 1 55 0;
#X connect 11 0 4 0;
#X connect 12 0 13 1;
#X connect 13 0 14 0;
#X connect 13 0 17 0;
#X connect 13 0 40 1;
#X connect 13 0 42 0;
#X connect 13 0 61 1;
#X connect 13 0 62 1;
#X connect 14 0 4 0;
#X connect 15 0 4 0;
#X connect 16 0 13 0;
#X connect 16 1 15 0;
#X connect 16 2 11 0;
#X connect 17 0 43 0;
#X connect 18 0 20 0;
#X connect 18 1 19 0;
#X connect 18 1 64 0;
#X connect 19 0 4 0;
#X connect 20 0 4 0;
#X connect 21 0 22 0;
#X connect 22 0 32 0;
#X connect 22 0 37 0;
#X connect 23 0 4 0;
#X connect 24 0 4 0;
#X connect 25 0 4 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 28 0 37 0;
#X connect 29 0 4 0;
#X connect 30 0 4 0;
#X connect 31 0 10 0;
#X connect 32 0 25 0;
#X connect 32 1 24 0;
#X connect 32 1 7 0;
#X connect 32 2 23 0;
#X connect 32 3 33 0;
#X connect 33 0 4 0;
#X connect 34 0 35 0;
#X connect 35 0 8 0;
#X connect 35 1 33 0;
#X connect 36 0 38 0;
#X connect 38 0 32 0;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 44 0 0 1;
#X connect 45 0 79 1;
#X connect 46 0 79 3;
#X connect 47 0 79 4;
#X connect 53 0 79 9;
#X connect 54 0 79 10;
#X connect 55 0 67 0;
#X connect 55 1 68 0;
#X connect 55 2 48 0;
#X connect 55 3 69 0;
#X connect 55 4 70 0;
#X connect 55 5 49 0;
#X connect 55 6 50 0;
#X connect 55 7 51 0;
#X connect 55 8 56 0;
#X connect 55 9 72 0;
#X connect 55 10 71 0;
#X connect 55 11 52 0;
#X connect 57 0 59 0;
#X connect 58 0 60 0;
#X connect 59 0 66 0;
#X connect 60 0 61 0;
#X connect 61 0 65 0;
#X connect 62 0 63 0;
#X connect 63 0 80 0;
#X connect 64 0 60 1;
#X connect 64 0 59 1;
#X connect 65 0 62 0;
#X connect 66 0 62 0;
#X connect 73 0 79 2;
#X connect 74 0 79 5;
#X connect 75 0 79 6;
#X connect 76 0 79 7;
#X connect 77 0 79 8;
#X connect 78 0 79 11;
#X connect 79 0 2 0;
#X connect 81 0 18 0;
#X restore 611 290 pd patches;
#X obj 612 339 outlet;
#X obj 571 179 route patch file;
#X obj 571 312 s \$0-patch-set;
#X msg 678 290 patch \$1;
#X obj 554 11 inlet;
#N canvas 572 432 967 585 automation 0;
#X obj 62 1 inlet;
#X obj 323 266 s \$0-hpf;
#X obj 345 240 s \$0-lpf;
#X obj 118 99 t f f;
#X obj 145 120 > 0;
#X obj 118 120 abs;
#X obj 90 209 s \$0-porta;
#X obj 558 137 outlet;
#X obj 463 202 s \$0-delay_pitch;
#X obj 439 131 outlet;
#X obj 628 94 outlet;
#X obj 250 156 s \$0-hpf_q;
#X obj 310 116 s \$0-lpf_q;
#X obj 68 250 s \$0-delay_coarse;
#X obj 209 247 s \$0-feedback;
#X obj 217 271 s \$0-fb_pol;
#X obj 431 478 s \$0-delay_fine;
#X obj 689 84 s \$0-gang;
#X obj 407 161 s \$0-mix_pc;
#X obj 51 21 route delcoarse porta fb hpf lpf hq randpat delfine delpitch
on lq gang mix delay;
#X obj 213 314 t f f;
#X obj 240 344 > 10;
#X obj 240 367 == 0;
#X obj 211 393 spigot;
#X obj 281 393 spigot;
#X obj 298 449 - 10;
#X obj 295 417 t f b;
#X msg 339 439 10;
#X msg 161 452 0;
#X obj 420 -6 route all;
#X obj 418 15 unpack f f f f f f f f f f f f;
#X connect 0 0 19 0;
#X connect 3 0 5 0;
#X connect 3 1 4 0;
#X connect 4 0 15 0;
#X connect 5 0 14 0;
#X connect 19 0 13 0;
#X connect 19 1 6 0;
#X connect 19 2 3 0;
#X connect 19 3 1 0;
#X connect 19 4 2 0;
#X connect 19 5 11 0;
#X connect 19 6 7 0;
#X connect 19 7 16 0;
#X connect 19 8 8 0;
#X connect 19 9 10 0;
#X connect 19 10 12 0;
#X connect 19 11 17 0;
#X connect 19 12 18 0;
#X connect 19 13 20 0;
#X connect 19 14 9 0;
#X connect 19 14 29 0;
#X connect 20 0 23 0;
#X connect 20 0 24 0;
#X connect 20 1 21 0;
#X connect 21 0 22 0;
#X connect 21 0 24 1;
#X connect 22 0 23 1;
#X connect 23 0 16 0;
#X connect 23 0 28 0;
#X connect 24 0 26 0;
#X connect 25 0 13 0;
#X connect 26 0 25 0;
#X connect 26 1 27 0;
#X connect 27 0 16 0;
#X connect 28 0 13 0;
#X connect 29 0 30 0;
#X connect 30 0 13 0;
#X connect 30 1 16 0;
#X connect 30 2 8 0;
#X connect 30 3 14 0;
#X connect 30 4 15 0;
#X connect 30 5 1 0;
#X connect 30 6 2 0;
#X connect 30 7 12 0;
#X connect 30 8 11 0;
#X connect 30 9 18 0;
#X connect 30 10 17 0;
#X connect 30 11 6 0;
#X restore 554 41 pd automation;
#X obj 330 224 / 100;
#X obj 722 452 switch~;
#N canvas 691 352 640 488 delay~ 0;
#X obj 26 195 inlet~;
#X obj 75 403 outlet~;
#X obj 23 303 +~;
#X obj 92 57 inlet;
#X obj 278 87 inlet;
#X obj 92 131 pack f 10;
#X obj 278 104 moses 0;
#X obj 480 54 inlet;
#X obj 540 89 inlet~;
#N canvas 176 371 245 251 random 0;
#X obj 19 136 outlet;
#X obj 19 4 inlet;
#X obj 115 2 inlet;
#X obj 95 72 random 0;
#X obj 19 50 +;
#X obj 19 20 t f b b;
#X obj 145 72 random 0;
#X obj 95 104 -;
#X obj 113 20 t b b b f;
#X floatatom 115 143 5 0 0 0 - - -;
#X obj 13 79 moses 1;
#X obj 145 88 / 200;
#X obj 95 88 / 200;
#X connect 1 0 5 0;
#X connect 2 0 8 0;
#X connect 3 0 12 0;
#X connect 4 0 10 0;
#X connect 5 0 4 0;
#X connect 5 1 3 0;
#X connect 5 2 6 0;
#X connect 6 0 11 0;
#X connect 7 0 4 1;
#X connect 7 0 9 0;
#X connect 8 0 4 0;
#X connect 8 1 3 0;
#X connect 8 2 6 0;
#X connect 8 3 6 1;
#X connect 8 3 3 1;
#X connect 10 1 0 0;
#X connect 11 0 7 1;
#X connect 12 0 7 0;
#X restore 92 74 pd random;
#X obj 92 168 +~;
#X msg 312 164 20000;
#X obj 312 147 loadbang;
#X msg 158 91 bang;
#X obj 92 91 moses 2000;
#X obj 158 108 2000;
#X obj 92 148 line~;
#X obj 75 219 vd~ \$0-delfbf;
#X obj 92 187 clip~ 0.01 2000;
#X obj 23 377 delwrite~ \$0-delfbf 2000;
#X text 24 30 inlets: sig~ time fb porta [hfc lfc hq lq] limit[dB multiplier
decay attack] randomize;
#X obj 209 151 inlet;
#X obj 260 190 moses 1;
#X obj 209 171 moses -1;
#X obj 91 332 *~;
#X obj 219 297 pack f 10;
#X obj 219 320 line~;
#X obj 165 213 unpack f f f f;
#X obj 91 308 vcf_filter~ lp2;
#X obj 349 195 inlet;
#X obj 432 154 block~ 4;
#X obj 225 368 envrms~;
#X floatatom 230 405 0 0 0 0 - - -;
#X obj 91 283 vcf_filter~ hp2;
#X obj 96 239 sig~;
#X obj 96 258 iem_cot4~;
#X obj 156 239 sig~;
#X obj 156 258 iem_cot4~;
#X connect 0 0 2 0;
#X connect 2 0 19 0;
#X connect 3 0 9 0;
#X connect 4 0 6 0;
#X connect 5 0 16 0;
#X connect 6 1 5 1;
#X connect 7 0 9 1;
#X connect 8 0 10 1;
#X connect 9 0 14 0;
#X connect 10 0 18 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 15 0;
#X connect 14 0 5 0;
#X connect 14 1 13 0;
#X connect 15 0 5 0;
#X connect 16 0 10 0;
#X connect 17 0 1 0;
#X connect 17 0 33 0;
#X connect 18 0 17 0;
#X connect 21 0 23 0;
#X connect 22 0 25 0;
#X connect 23 1 22 0;
#X connect 24 0 2 1;
#X connect 25 0 26 0;
#X connect 26 0 24 1;
#X connect 26 0 31 0;
#X connect 27 0 34 0;
#X connect 27 1 36 0;
#X connect 27 2 33 2;
#X connect 27 3 28 2;
#X connect 28 0 24 0;
#X connect 29 0 27 0;
#X connect 31 0 32 0;
#X connect 33 0 28 0;
#X connect 34 0 35 0;
#X connect 35 0 33 1;
#X connect 36 0 37 0;
#X connect 37 0 28 1;
#X restore 295 282 pd delay~ -----------;
#X msg 368 356 100;
#X obj 368 377 -;
#X obj 368 335 t b f;
#X obj 368 315 r \$0-mix_pc;
#X floatatom 368 398 5 0 0 0 - - -;
#X obj 368 418 clip 0 100;
#X obj 368 439 t b f;
#X msg 368 460 100;
#X obj 368 481 -;
#X obj 263 245 *~ 0;
#X obj 295 249 *~ 1;
#X floatatom 368 502 5 0 0 0 - - -;
#X obj 279 378 / 100;
#X obj 318 377 / 100;
#X obj 391 197 r \$0-random;
#X obj 825 236 >;
#X obj 823 203 t f f;
#X obj 820 286 f;
#X obj 818 261 select 1;
#X obj 815 179 spigot;
#X obj 899 154 tgl 15 0 empty \$0-gang empty 0 -6 0 10 -262144 -1 -1
1 1;
#X obj 956 206 t f f;
#X obj 953 289 f;
#X obj 951 264 select 1;
#X obj 948 182 spigot;
#X obj 958 239 <;
#X obj 884 178 sel 1;
#X obj 883 202 delay 0;
#X msg 866 335 20000;
#X msg 993 334 20;
#X obj 884 300 loadbang;
#X msg 563 405 20;
#X obj 565 382 loadbang;
#X msg 823 66 0.127092;
#X obj 793 43 samplerate~;
#X obj 795 17 t b b;
#X obj 803 93 *;
#X obj 853 14 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X floatatom 802 120 5 0 0 0 - - -;
#X obj 748 22 t b f;
#X obj 751 68 / 1000;
#X text 31 138 delay_fbf;
#X msg 693 176 1;
#X obj 691 149 loadbang;
#X obj 311 126 r \$0-delay;
#X obj 330 143 r \$0-feedback;
#X obj 346 161 r \$0-porta;
#X obj 820 368 s \$0-lpf;
#X obj 953 371 s \$0-hpf;
#X obj 808 148 r \$0-hpf;
#X obj 940 139 r \$0-lpf;
#X obj 687 206 s \$0-patch_on;
#X obj 560 438 s \$0-mix_pc;
#X obj 176 168 nbx 3 12 0 120 0 0 empty empty empty -2 -6 0 7 -257472
-1109 -90133 0 256;
#X obj 218 168 nbx 3 12 1 2 0 0 \$0-patch-num \$0-patch-set select
0 -5 0 7 -17235 -261234 -17235 1 256;
#X obj 176 168 nbx 3 12 0 120 0 0 \$0-patches-dummy \$0-patches-num
patches 0 -5 0 7 -17235 -203904 -17235 0 256;
#N canvas 11 0 849 459 auto_out 0;
#X obj 14 28 r \$0-delay_fine;
#X obj 82 48 r \$0-delay_coarse;
#X obj 197 89 r \$0-feedback;
#X obj 248 109 r \$0-fb_pol;
#X obj 510 210 r \$0-mix_pc;
#X obj 574 229 r \$0-gang;
#X obj 14 432 outlet;
#X obj 701 272 r \$0-patch-num;
#X obj 105 396 inlet;
#X obj 14 48 change;
#X msg 14 68 delfine \$1;
#X obj 82 68 change;
#X obj 630 307 change;
#X obj 197 109 change;
#X obj 248 130 change;
#X obj 312 150 change;
#X obj 362 170 change;
#X obj 412 190 change;
#X obj 461 210 change;
#X obj 510 230 change;
#X obj 574 250 change;
#X obj 106 142 change;
#X msg 701 293 patch \$1;
#X msg 630 328 porta \$1;
#X msg 197 130 fb \$1;
#X msg 248 150 fb_pol \$1;
#X msg 312 170 hpf \$1;
#X msg 362 190 lpf \$1;
#X msg 412 210 lq \$1;
#X msg 461 230 hq \$1;
#X msg 510 250 mix_pc \$1;
#X msg 574 270 gang \$1;
#X msg 106 163 delpitch \$1;
#X obj 15 397 spigot;
#X obj 105 417 prepend file;
#X obj 558 38 inlet;
#X obj 642 36 inlet;
#X msg 559 69 1;
#X msg 637 68 0;
#X obj 483 34 loadbang;
#X obj 630 287 r \$0-porta;
#X obj 312 129 r \$0-hpf;
#X obj 362 150 r \$0-lpf;
#X obj 412 170 r \$0-lpf_q;
#X obj 461 190 r \$0-hpf_q;
#X obj 106 121 r \$0-delay_pitch;
#X obj 33 138 t b f;
#X obj 44 176 +;
#X msg 33 203 delay \$1;
#X msg 55 90 delcoarse \$1;
#X obj 105 185 t b f;
#X obj 186 200 t b f;
#X obj 240 214 t b f;
#X obj 299 222 t b f;
#X obj 364 253 t b f;
#X obj 410 274 t b f;
#X obj 455 299 t b f;
#X obj 505 318 t b f;
#X obj 551 335 t b f;
#X obj 593 341 t b f;
#X obj 295 386 pack f f f f f f f f f f f f;
#X obj 295 427 prepend all;
#X connect 0 0 9 0;
#X connect 1 0 11 0;
#X connect 2 0 13 0;
#X connect 3 0 14 0;
#X connect 4 0 19 0;
#X connect 5 0 20 0;
#X connect 7 0 22 0;
#X connect 8 0 34 0;
#X connect 9 0 10 0;
#X connect 9 0 47 0;
#X connect 9 0 60 0;
#X connect 10 0 33 0;
#X connect 11 0 49 0;
#X connect 11 0 46 0;
#X connect 12 0 23 0;
#X connect 12 0 59 0;
#X connect 13 0 24 0;
#X connect 13 0 51 0;
#X connect 14 0 25 0;
#X connect 14 0 52 0;
#X connect 15 0 26 0;
#X connect 15 0 53 0;
#X connect 16 0 27 0;
#X connect 16 0 54 0;
#X connect 17 0 28 0;
#X connect 17 0 55 0;
#X connect 18 0 29 0;
#X connect 18 0 56 0;
#X connect 19 0 30 0;
#X connect 19 0 57 0;
#X connect 20 0 31 0;
#X connect 20 0 58 0;
#X connect 21 0 32 0;
#X connect 21 0 50 0;
#X connect 22 0 6 0;
#X connect 23 0 33 0;
#X connect 24 0 33 0;
#X connect 25 0 33 0;
#X connect 26 0 33 0;
#X connect 27 0 33 0;
#X connect 28 0 33 0;
#X connect 29 0 33 0;
#X connect 30 0 33 0;
#X connect 31 0 33 0;
#X connect 32 0 33 0;
#X connect 33 0 6 0;
#X connect 34 0 6 0;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 33 1;
#X connect 38 0 33 1;
#X connect 39 0 37 0;
#X connect 40 0 12 0;
#X connect 41 0 15 0;
#X connect 42 0 16 0;
#X connect 43 0 17 0;
#X connect 44 0 18 0;
#X connect 45 0 21 0;
#X connect 46 0 47 0;
#X connect 46 0 60 0;
#X connect 46 1 47 1;
#X connect 46 1 60 1;
#X connect 47 0 48 0;
#X connect 48 0 33 0;
#X connect 49 0 33 0;
#X connect 50 0 60 0;
#X connect 50 1 60 2;
#X connect 51 0 60 0;
#X connect 51 1 60 3;
#X connect 52 0 60 0;
#X connect 52 1 60 4;
#X connect 53 0 60 0;
#X connect 53 1 60 5;
#X connect 54 0 60 0;
#X connect 54 1 60 6;
#X connect 55 0 60 0;
#X connect 55 1 60 7;
#X connect 56 0 60 0;
#X connect 56 1 60 8;
#X connect 57 0 60 0;
#X connect 57 1 60 9;
#X connect 58 0 60 0;
#X connect 58 1 60 10;
#X connect 59 0 60 0;
#X connect 59 1 60 11;
#X connect 60 0 61 0;
#X connect 61 0 6 0;
#X restore 666 315 pd auto_out;
#X obj 668 244 r \$0-patch-num;
#X obj 658 266 t b f b;
#X obj 887 25 declare -lib zexy -lib iemlib;
#X connect 0 0 25 0;
#X connect 0 0 26 0;
#X connect 3 0 15 4;
#X connect 4 0 15 6;
#X connect 5 0 14 0;
#X connect 6 0 72 0;
#X connect 6 1 10 0;
#X connect 8 0 9 0;
#X connect 8 1 6 0;
#X connect 10 0 8 0;
#X connect 11 0 12 0;
#X connect 12 0 8 0;
#X connect 12 1 6 2;
#X connect 12 2 67 0;
#X connect 13 0 15 2;
#X connect 15 0 1 0;
#X connect 16 0 17 0;
#X connect 17 0 20 0;
#X connect 18 0 16 0;
#X connect 18 1 17 1;
#X connect 19 0 18 0;
#X connect 20 0 21 0;
#X connect 20 0 28 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 22 1 24 1;
#X connect 23 0 24 0;
#X connect 24 0 27 0;
#X connect 25 0 1 0;
#X connect 26 0 15 0;
#X connect 27 0 29 0;
#X connect 28 0 25 1;
#X connect 29 0 26 1;
#X connect 30 0 15 5;
#X connect 31 0 34 0;
#X connect 32 0 31 0;
#X connect 32 1 33 1;
#X connect 33 0 63 0;
#X connect 34 0 33 0;
#X connect 35 0 32 0;
#X connect 36 0 35 1;
#X connect 36 0 40 1;
#X connect 36 0 42 0;
#X connect 37 0 41 0;
#X connect 37 1 38 1;
#X connect 38 0 64 0;
#X connect 39 0 38 0;
#X connect 40 0 37 0;
#X connect 41 0 39 0;
#X connect 42 0 43 0;
#X connect 43 0 63 0;
#X connect 43 0 64 0;
#X connect 44 0 63 0;
#X connect 45 0 64 0;
#X connect 46 0 44 0;
#X connect 46 0 45 0;
#X connect 47 0 68 0;
#X connect 48 0 47 0;
#X connect 49 0 52 1;
#X connect 50 0 56 0;
#X connect 51 0 50 0;
#X connect 51 1 49 0;
#X connect 52 0 54 0;
#X connect 53 0 51 0;
#X connect 55 0 50 0;
#X connect 55 1 52 1;
#X connect 56 0 52 0;
#X connect 58 0 67 0;
#X connect 59 0 58 0;
#X connect 60 0 15 1;
#X connect 61 0 13 0;
#X connect 62 0 15 3;
#X connect 65 0 35 0;
#X connect 65 0 41 1;
#X connect 66 0 31 1;
#X connect 66 0 40 0;
#X connect 72 0 7 0;
#X connect 73 0 74 0;
#X connect 74 0 72 1;
#X connect 74 1 6 1;
#X connect 74 2 72 2;
#X coords 0 0 1 1 212 162 0;