/
fluteelectronics_control.pd
executable file
·1456 lines (1456 loc) · 37.1 KB
/
fluteelectronics_control.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
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
#N canvas 90 22 1038 704 10;
#X text 288 5 This is the control window;
#N canvas 419 22 540 640 core_components 0;
#N canvas 130 100 554 582 delay 0;
#X obj 408 49 inlet;
#X obj 74 39 inlet~;
#X obj 253 38 inlet~;
#X obj 75 517 outlet~;
#X obj 151 517 outlet~;
#X obj 70 477 freeverb~;
#X msg 403 332 freeze 0;
#X msg 404 384 freeze 1;
#X obj 146 477 freeverb~;
#X obj 122 217 loadbang;
#X obj 366 257 spigot;
#X floatatom 431 130 5 0 0 0 - - -;
#X obj 417 257 spigot;
#X floatatom 471 245 5 0 0 0 - - -;
#X floatatom 342 221 5 0 0 0 - - -;
#X obj 453 194 < 40;
#X obj 405 297 delay 3000;
#X obj 402 194 >= 130;
#X obj 20 88 delwrite~ delay_left 2500;
#X obj 18 128 delread~ delay_left 2500;
#X obj 253 89 delwrite~ delay_right 2750;
#X obj 256 129 delread~ delay_right 2750;
#X msg 137 316 roomsize 0.8;
#X msg 93 279 width 0.6;
#X connect 0 0 11 0;
#X connect 0 0 15 0;
#X connect 0 0 17 0;
#X connect 1 0 18 0;
#X connect 2 0 20 0;
#X connect 5 0 3 0;
#X connect 6 0 5 0;
#X connect 6 0 8 0;
#X connect 7 0 5 0;
#X connect 7 0 8 0;
#X connect 8 1 4 0;
#X connect 9 0 23 0;
#X connect 9 0 22 0;
#X connect 10 0 7 0;
#X connect 12 0 16 0;
#X connect 15 0 12 1;
#X connect 15 0 12 0;
#X connect 15 0 13 0;
#X connect 16 0 6 0;
#X connect 17 0 10 1;
#X connect 17 0 10 0;
#X connect 17 0 14 0;
#X connect 19 0 5 0;
#X connect 21 0 8 1;
#X connect 22 0 5 0;
#X connect 22 0 8 0;
#X connect 23 0 5 0;
#X connect 23 0 8 0;
#X restore 92 330 pd delay;
#N canvas 0 139 1276 496 synths 0;
#X obj 61 19 inlet;
#X obj 115 19 inlet;
#X obj 165 20 inlet;
#X obj 215 18 inlet;
#X obj 268 15 inlet;
#X obj 21 299 tabwrite~ oscillator;
#N canvas 0 22 450 300 (subpatch) 0;
#X array oscillator 100 float 5;
#A 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0;
#X coords 0 1 99 -1 200 140 1;
#X restore 20 330 graph;
#X obj 27 110 tgl 15 0 empty r_START Switches_oscillators_on 17 7 0
10 -262144 -1 -1 0 1;
#X obj 259 334 line~;
#X msg 285 305 0 100;
#X msg 268 284 0.1 100;
#X obj 1119 98 vsl 15 128 0 1 0 1 empty r_ampline1 Master_Amplitude
0 0 0 10 -262144 -3 -66577 6350 0;
#X obj 267 403 outlet~;
#X obj 209 43 mtof;
#X obj 251 39 mtof;
#X floatatom 198 110 5 0 0 0 - - -;
#X obj 199 151 clip 0 1;
#X floatatom 196 180 5 0 0 0 - - -;
#X obj 306 36 mtof;
#X obj 346 37 mtof;
#X obj 391 38 mtof;
#X obj 324 16 inlet;
#X obj 436 39 mtof;
#X obj 265 140 osc~;
#X obj 306 144 phasor~;
#X obj 397 137 phasor~;
#X obj 482 133 noise~;
#X obj 529 133 pink~;
#X obj 567 133 cos~;
#X obj 398 332 line~;
#X msg 424 303 0 100;
#X msg 407 282 0.1 100;
#X obj 352 316 *~;
#X obj 873 282 vsl 15 128 0 100 0 0 empty r_oscline1 osc1 0 -9 0 10
-262144 -1 -1 0 1;
#X obj 413 373 / 100;
#X obj 484 333 line~;
#X msg 510 304 0 100;
#X msg 493 283 0.1 100;
#X obj 908 281 vsl 15 128 0 100 0 0 empty r_sawline1 saw1 0 -9 0 10
-262144 -1 -1 0 1;
#X obj 499 374 / 100;
#X obj 574 334 line~;
#X msg 600 305 0 100;
#X msg 583 284 0.1 100;
#X obj 945 282 vsl 15 128 0 100 0 0 empty r_oscline2 osc2 0 -9 0 10
-262144 -1 -1 0 1;
#X obj 589 375 / 100;
#X obj 661 334 line~;
#X msg 687 305 0 100;
#X msg 670 284 0.1 100;
#X obj 982 282 vsl 15 128 0 100 0 0 empty r_sawline2 saw2 0 -9 0 10
-262144 -1 -1 0 1;
#X obj 676 375 / 100;
#X obj 461 375 *~;
#X obj 548 377 *~;
#X obj 630 375 *~;
#X obj 747 333 line~;
#X msg 773 304 0 100;
#X msg 756 283 0.1 100;
#X obj 1018 282 vsl 15 128 0 100 0 0 empty r_cosline1 cos1 0 -9 0 10
-262144 -1 -1 0 1;
#X obj 762 374 / 100;
#X obj 716 374 *~;
#X obj 699 135 line~;
#X msg 725 106 0 100;
#X msg 708 85 0.1 100;
#X obj 1057 284 vsl 15 128 0 100 0 0 empty r_noiseline1 noise1 0 -9
0 10 -262144 -1 -1 0 1;
#X obj 714 176 / 100;
#X obj 668 176 *~;
#X obj 851 132 line~;
#X msg 877 103 0 100;
#X msg 860 82 0.1 100;
#X obj 1096 283 vsl 15 128 0 100 0 0 empty r_pinkline1 pink1 0 -9 0
10 -262144 -1 -1 0 1;
#X obj 866 173 / 100;
#X obj 820 173 *~;
#X obj 998 127 line~;
#X msg 1024 98 0 100;
#X msg 1007 77 0.1 100;
#X obj 1135 283 vsl 15 128 0 100 0 0 empty r_cosline2 cosine2 0 -9
0 10 -262144 -1 -1 0 1;
#X obj 1013 168 / 100;
#X obj 967 168 *~;
#X obj 359 134 osc~;
#X obj 448 133 cos~;
#X obj 198 86 / 10000;
#X obj 368 13 inlet~;
#X obj 56 216 *~;
#X obj 27 190 metro 1000;
#X text 57 3 tonic;
#X text 111 4 amp;
#X text 160 5 harm1;
#X text 215 1 harm2;
#X text 263 -2 harm3;
#X text 318 0 harm4;
#X text 366 -4 audio;
#N canvas 354 402 450 300 matrix1 0;
#X obj 21 -9 inlet;
#X obj 95 -10 inlet;
#X obj 176 -9 inlet;
#X obj 251 -9 inlet;
#X obj 326 -8 inlet;
#X obj 20 238 outlet;
#X obj 69 237 outlet;
#X obj 120 237 outlet;
#X obj 171 237 outlet;
#X obj 220 238 outlet;
#X obj 270 239 outlet;
#X obj 328 236 outlet;
#X obj 387 237 outlet;
#N canvas 1086 555 364 264 route... 0;
#X obj 46 31 inlet;
#X obj 15 194 outlet;
#X obj 55 194 outlet;
#X obj 96 194 outlet;
#X obj 137 194 outlet;
#X obj 178 194 outlet;
#X obj 218 194 outlet;
#X obj 259 194 outlet;
#X obj 300 194 outlet;
#X obj 60 80 tgl 15 0 empty tonosc1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 90 80 tgl 15 0 empty tonsaw1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 119 80 tgl 15 0 empty tonosc2 empty 17 7 0 10 -262144 -1 -1
0 1;
#X obj 146 80 tgl 15 0 empty tonsaw2 empty 17 7 0 10 -262144 -1 -1
0 1;
#X obj 176 80 tgl 15 0 empty toncos1 empty 17 7 0 10 -262144 -1 -1
0 1;
#X obj 207 81 tgl 15 0 empty tonbp1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 233 80 tgl 15 0 empty tonbp2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 262 80 tgl 15 0 empty toncos2 empty 17 7 0 10 -262144 -1 -1
0 1;
#X obj 8 116 spigot;
#X obj 50 115 spigot;
#X obj 91 115 spigot;
#X obj 130 116 spigot;
#X obj 169 116 spigot;
#X obj 210 117 spigot;
#X obj 252 117 spigot;
#X obj 295 116 spigot;
#X connect 0 0 17 0;
#X connect 0 0 18 0;
#X connect 0 0 19 0;
#X connect 0 0 20 0;
#X connect 0 0 21 0;
#X connect 0 0 22 0;
#X connect 0 0 23 0;
#X connect 0 0 24 0;
#X connect 9 0 17 1;
#X connect 10 0 18 1;
#X connect 11 0 19 1;
#X connect 12 0 20 1;
#X connect 13 0 21 1;
#X connect 14 0 22 1;
#X connect 15 0 23 1;
#X connect 16 0 24 1;
#X connect 17 0 1 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 21 0 5 0;
#X connect 22 0 6 0;
#X connect 23 0 7 0;
#X connect 24 0 8 0;
#X restore 22 67 pd route...;
#N canvas 1069 405 364 264 route... 0;
#X obj 46 31 inlet;
#X obj 15 194 outlet;
#X obj 55 194 outlet;
#X obj 96 194 outlet;
#X obj 137 194 outlet;
#X obj 178 194 outlet;
#X obj 218 194 outlet;
#X obj 259 194 outlet;
#X obj 300 194 outlet;
#X obj 60 80 tgl 15 0 empty h1osc1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 90 80 tgl 15 0 empty h1saw1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 119 80 tgl 15 0 empty h1osc2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 146 80 tgl 15 0 empty h1saw2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 176 80 tgl 15 0 empty h1cos1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 205 80 tgl 15 0 empty h1bp1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 233 80 tgl 15 0 empty h1bp2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 262 80 tgl 15 0 empty h1cos2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 7 116 spigot;
#X obj 50 115 spigot;
#X obj 92 115 spigot;
#X obj 135 115 spigot;
#X obj 177 116 spigot;
#X obj 218 117 spigot;
#X obj 259 116 spigot;
#X obj 300 118 spigot;
#X floatatom 10 32 5 0 0 0 - - -;
#X connect 0 0 17 0;
#X connect 0 0 18 0;
#X connect 0 0 19 0;
#X connect 0 0 20 0;
#X connect 0 0 21 0;
#X connect 0 0 22 0;
#X connect 0 0 23 0;
#X connect 0 0 24 0;
#X connect 9 0 17 1;
#X connect 10 0 18 1;
#X connect 11 0 19 1;
#X connect 12 0 20 1;
#X connect 13 0 21 1;
#X connect 14 0 22 1;
#X connect 15 0 23 1;
#X connect 16 0 24 1;
#X connect 17 0 1 0;
#X connect 17 0 25 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 21 0 5 0;
#X connect 22 0 6 0;
#X connect 23 0 7 0;
#X connect 24 0 8 0;
#X restore 97 68 pd route...;
#N canvas 1116 367 364 264 route... 0;
#X obj 46 31 inlet;
#X obj 15 194 outlet;
#X obj 55 194 outlet;
#X obj 96 194 outlet;
#X obj 137 194 outlet;
#X obj 178 194 outlet;
#X obj 218 194 outlet;
#X obj 259 194 outlet;
#X obj 300 194 outlet;
#X obj 93 60 tgl 15 0 empty h2osc1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 123 60 tgl 15 0 empty h2saw1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 152 60 tgl 15 0 empty h2osc2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 179 60 tgl 15 0 empty h2saw2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 209 60 tgl 15 0 empty h2cos1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 238 60 tgl 15 0 empty h2bp1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 266 60 tgl 15 0 empty h2bp2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 295 60 tgl 15 0 empty h2cos2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 20 117 spigot;
#X obj 64 116 spigot;
#X obj 107 117 spigot;
#X obj 149 117 spigot;
#X obj 191 116 spigot;
#X obj 228 116 spigot;
#X obj 263 116 spigot;
#X obj 303 117 spigot;
#X connect 0 0 17 0;
#X connect 0 0 18 0;
#X connect 0 0 19 0;
#X connect 0 0 20 0;
#X connect 0 0 21 0;
#X connect 0 0 22 0;
#X connect 0 0 23 0;
#X connect 0 0 24 0;
#X connect 9 0 17 1;
#X connect 10 0 18 1;
#X connect 11 0 19 1;
#X connect 12 0 20 1;
#X connect 13 0 21 1;
#X connect 14 0 22 1;
#X connect 15 0 23 1;
#X connect 16 0 24 1;
#X connect 17 0 1 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 21 0 5 0;
#X connect 22 0 6 0;
#X connect 23 0 7 0;
#X connect 24 0 8 0;
#X restore 176 67 pd route...;
#N canvas 1086 555 364 264 route... 0;
#X obj 46 31 inlet;
#X obj 15 194 outlet;
#X obj 55 194 outlet;
#X obj 96 194 outlet;
#X obj 137 194 outlet;
#X obj 178 194 outlet;
#X obj 218 194 outlet;
#X obj 259 194 outlet;
#X obj 300 194 outlet;
#X obj 60 85 tgl 15 0 empty h3osc1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 90 85 tgl 15 0 empty h3saw1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 119 85 tgl 15 0 empty h3osc2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 146 85 tgl 15 0 empty h3saw2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 176 85 tgl 15 0 empty h3cos1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 205 85 tgl 15 0 empty h3bp1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 233 85 tgl 15 0 empty h3bp2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 262 85 tgl 15 0 empty h3cos2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 13 119 spigot;
#X obj 58 117 spigot;
#X obj 103 115 spigot;
#X obj 147 115 spigot;
#X obj 190 116 spigot;
#X obj 231 117 spigot;
#X obj 273 117 spigot;
#X obj 316 117 spigot;
#X connect 0 0 17 0;
#X connect 0 0 18 0;
#X connect 0 0 19 0;
#X connect 0 0 20 0;
#X connect 0 0 21 0;
#X connect 0 0 22 0;
#X connect 0 0 23 0;
#X connect 0 0 24 0;
#X connect 9 0 17 1;
#X connect 10 0 18 1;
#X connect 11 0 19 1;
#X connect 12 0 20 1;
#X connect 13 0 21 1;
#X connect 14 0 22 1;
#X connect 15 0 23 1;
#X connect 16 0 24 1;
#X connect 17 0 1 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 21 0 5 0;
#X connect 22 0 6 0;
#X connect 23 0 7 0;
#X connect 24 0 8 0;
#X restore 252 67 pd route...;
#N canvas 1106 406 364 264 route... 0;
#X obj 46 31 inlet;
#X obj 15 194 outlet;
#X obj 55 194 outlet;
#X obj 96 194 outlet;
#X obj 137 194 outlet;
#X obj 178 194 outlet;
#X obj 218 194 outlet;
#X obj 259 194 outlet;
#X obj 300 194 outlet;
#X obj 59 77 tgl 15 0 empty h4osc1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 89 77 tgl 15 0 empty h4saw1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 118 77 tgl 15 0 empty h4osc2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 145 77 tgl 15 0 empty h4saw2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 175 77 tgl 15 0 empty h4cos1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 204 77 tgl 15 0 empty h4bp1 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 232 77 tgl 15 0 empty h4bp2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 261 77 tgl 15 0 empty h4cos2 empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 10 116 spigot;
#X obj 51 115 spigot;
#X obj 89 116 spigot;
#X obj 131 116 spigot;
#X obj 169 115 spigot;
#X obj 213 117 spigot;
#X obj 257 114 spigot;
#X obj 301 115 spigot;
#X connect 0 0 17 0;
#X connect 0 0 18 0;
#X connect 0 0 19 0;
#X connect 0 0 20 0;
#X connect 0 0 21 0;
#X connect 0 0 22 0;
#X connect 0 0 23 0;
#X connect 0 0 24 0;
#X connect 9 0 17 1;
#X connect 10 0 18 1;
#X connect 11 0 19 1;
#X connect 12 0 20 1;
#X connect 13 0 21 1;
#X connect 14 0 22 1;
#X connect 15 0 23 1;
#X connect 16 0 24 1;
#X connect 17 0 1 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 21 0 5 0;
#X connect 22 0 6 0;
#X connect 23 0 7 0;
#X connect 24 0 8 0;
#X restore 326 67 pd route...;
#X text 19 48 tonic;
#X text 100 47 harm1;
#X text 173 46 harm2;
#X text 249 48 harm3;
#X text 324 50 harm4;
#X connect 0 0 13 0;
#X connect 1 0 14 0;
#X connect 2 0 15 0;
#X connect 3 0 16 0;
#X connect 4 0 17 0;
#X connect 13 0 5 0;
#X connect 13 1 6 0;
#X connect 13 2 7 0;
#X connect 13 3 8 0;
#X connect 13 4 9 0;
#X connect 13 5 10 0;
#X connect 13 6 11 0;
#X connect 13 7 12 0;
#X connect 14 0 5 0;
#X connect 14 1 6 0;
#X connect 14 2 7 0;
#X connect 14 3 8 0;
#X connect 14 4 9 0;
#X connect 14 5 10 0;
#X connect 14 6 11 0;
#X connect 14 7 12 0;
#X connect 15 0 5 0;
#X connect 15 1 6 0;
#X connect 15 2 7 0;
#X connect 15 3 8 0;
#X connect 15 4 9 0;
#X connect 15 5 10 0;
#X connect 15 6 11 0;
#X connect 15 7 12 0;
#X connect 16 0 5 0;
#X connect 16 1 6 0;
#X connect 16 2 7 0;
#X connect 16 3 8 0;
#X connect 16 4 9 0;
#X connect 16 5 10 0;
#X connect 16 6 11 0;
#X connect 16 7 12 0;
#X connect 17 0 5 0;
#X connect 17 1 6 0;
#X connect 17 2 7 0;
#X connect 17 3 8 0;
#X connect 17 4 9 0;
#X connect 17 5 10 0;
#X connect 17 6 11 0;
#X connect 17 7 12 0;
#X restore 428 77 pd matrix1;
#X floatatom 482 28 5 0 0 0 - - -;
#X floatatom 492 38 5 0 0 0 - - -;
#X floatatom 502 48 5 0 0 0 - - -;
#X floatatom 512 58 5 0 0 0 - - -;
#X floatatom 522 68 5 0 0 0 - - -;
#X floatatom 532 78 5 0 0 0 - - -;
#X floatatom 542 88 5 0 0 0 - - -;
#X obj 441 164 vcf~;
#X obj 478 162 vcf~;
#X obj 338 430 s~ synthscope;
#X obj 146 207 *~ 0.175;
#X obj 265 182 *~;
#X obj 306 183 *~;
#X obj 355 184 *~;
#X obj 396 181 *~;
#X connect 0 0 13 0;
#X connect 1 0 14 0;
#X connect 2 0 18 0;
#X connect 3 0 19 0;
#X connect 4 0 20 0;
#X connect 7 0 82 0;
#X connect 7 0 102 1;
#X connect 7 0 103 1;
#X connect 7 0 104 1;
#X connect 7 0 105 1;
#X connect 8 0 81 1;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#X connect 11 0 8 0;
#X connect 13 0 90 0;
#X connect 14 0 79 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 18 0 90 1;
#X connect 19 0 90 2;
#X connect 20 0 90 3;
#X connect 21 0 22 0;
#X connect 22 0 90 4;
#X connect 23 0 102 0;
#X connect 24 0 103 0;
#X connect 25 0 105 0;
#X connect 26 0 98 0;
#X connect 27 0 99 0;
#X connect 28 0 76 0;
#X connect 29 0 32 1;
#X connect 30 0 29 0;
#X connect 31 0 29 0;
#X connect 32 0 101 0;
#X connect 33 0 34 0;
#X connect 34 0 29 0;
#X connect 35 0 50 1;
#X connect 36 0 35 0;
#X connect 37 0 35 0;
#X connect 38 0 39 0;
#X connect 39 0 35 0;
#X connect 40 0 51 1;
#X connect 41 0 40 0;
#X connect 42 0 40 0;
#X connect 43 0 44 0;
#X connect 44 0 40 0;
#X connect 45 0 52 1;
#X connect 46 0 45 0;
#X connect 47 0 45 0;
#X connect 48 0 49 0;
#X connect 49 0 45 0;
#X connect 50 0 101 0;
#X connect 51 0 101 0;
#X connect 52 0 101 0;
#X connect 53 0 58 1;
#X connect 54 0 53 0;
#X connect 55 0 53 0;
#X connect 56 0 57 0;
#X connect 57 0 53 0;
#X connect 58 0 101 0;
#X connect 59 0 64 1;
#X connect 60 0 59 0;
#X connect 61 0 59 0;
#X connect 62 0 63 0;
#X connect 63 0 59 0;
#X connect 64 0 101 0;
#X connect 65 0 70 1;
#X connect 66 0 65 0;
#X connect 67 0 65 0;
#X connect 68 0 69 0;
#X connect 69 0 65 0;
#X connect 70 0 101 0;
#X connect 71 0 76 1;
#X connect 72 0 71 0;
#X connect 73 0 71 0;
#X connect 74 0 75 0;
#X connect 75 0 71 0;
#X connect 76 0 101 0;
#X connect 77 0 104 0;
#X connect 78 0 58 0;
#X connect 79 0 15 0;
#X connect 80 0 81 0;
#X connect 81 0 5 0;
#X connect 81 0 12 0;
#X connect 81 0 100 0;
#X connect 82 0 5 0;
#X connect 90 0 91 0;
#X connect 90 0 23 0;
#X connect 90 1 92 0;
#X connect 90 1 24 0;
#X connect 90 2 93 0;
#X connect 90 2 77 0;
#X connect 90 3 94 0;
#X connect 90 3 25 0;
#X connect 90 4 95 0;
#X connect 90 4 78 0;
#X connect 90 5 98 1;
#X connect 90 6 96 0;
#X connect 90 6 99 1;
#X connect 90 7 97 0;
#X connect 90 7 28 0;
#X connect 98 0 64 0;
#X connect 99 0 70 0;
#X connect 101 0 81 1;
#X connect 102 0 32 0;
#X connect 103 0 50 0;
#X connect 104 0 51 0;
#X connect 105 0 52 0;
#X restore 258 333 pd synths;
#X obj 134 229 unpack;
#X floatatom 168 266 5 0 0 2 amplitude - -;
#X floatatom 117 269 5 0 0 2 pitch - -;
#X obj 213 107 tgl 15 0 r_START s_synthbegin begin_synths 17 7 0 10
-262144 -1 -1 0 1;
#X obj 95 195 fiddle~ 1024 1 5 5;
#X obj 224 222 route 1 2 3 4;
#X obj 228 258 unpack;
#X obj 276 258 unpack;
#X obj 319 261 unpack;
#X obj 366 261 unpack;
#X floatatom 240 287 5 0 0 0 - - -;
#X floatatom 278 286 5 0 0 0 - - -;
#X floatatom 321 292 5 0 0 0 - - -;
#X floatatom 365 292 5 0 0 0 - - -;
#X obj 186 359 freeverb~;
#X obj 181 166 delay 10000;
#X obj 189 66 bng 30 250 50 0 s_synthbegin begin BEGIN -5 -17 0 20
-162280 -86277 -258113;
#X obj 146 575 dac~ 1;
#X obj 217 575 dac~ 2;
#N canvas 47 336 439 594 transposeL 0;
#X obj 92 368 *~;
#X obj 215 305 line~;
#X obj 215 279 pack 0 200;
#X obj 247 96 r window;
#X obj 29 153 exp;
#X floatatom 29 179 6 0 0 0 - - -;
#X obj 29 269 /;
#X obj 156 199 * 0.001;
#X obj 324 375 line~;
#X obj 324 350 pack 0 200;
#X obj 92 394 +~;
#X obj 29 420 cos~;
#X obj 29 447 *~;
#X obj 29 476 +~;
#X obj 116 327 wrap~;
#X obj 261 370 *~;
#X obj 261 403 +~;
#X obj 198 430 cos~;
#X obj 198 457 *~;
#X obj 156 226 t b f;
#X floatatom 29 295 6 0 0 0 - - -;
#X obj 116 300 +~ 0.5;
#X obj 29 368 -~ 0.5;
#X obj 29 394 *~ 0.5;
#X obj 198 369 -~ 0.5;
#X obj 198 402 *~ 0.5;
#X obj 29 206 - 1;
#X obj 29 127 * 0.05776;
#X obj 29 232 * -1;
#X text 63 96 <-- transposition;
#X text 106 109 (halftones);
#X text 92 173 speed;
#X text 91 187 change;
#X text 291 121 <--window (msec);
#X text 64 262 tape head;
#X obj 29 326 phasor~;
#X obj 324 326 max 1.5;
#X text 327 232 delay;
#X text 324 250 (msec);
#X obj 247 149 max 1;
#X text 65 275 rotation freq;
#X msg 246 123 100;
#X obj 92 420 vd~ delay_left;
#X obj 46 515 outlet~;
#X obj 127 518 outlet~;
#X obj 261 432 vd~ delay_left;
#X obj 29 71 r transposeL;
#X floatatom 29 100 5 0 0 0 - - -;
#X obj 324 273 r delayL;
#X floatatom 323 302 5 0 0 0 - - -;
#X connect 0 0 10 0;
#X connect 1 0 0 1;
#X connect 1 0 15 1;
#X connect 2 0 1 0;
#X connect 3 0 41 0;
#X connect 4 0 5 0;
#X connect 5 0 26 0;
#X connect 6 0 20 0;
#X connect 7 0 19 0;
#X connect 8 0 10 1;
#X connect 8 0 16 1;
#X connect 9 0 8 0;
#X connect 10 0 42 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 43 0;
#X connect 13 0 44 0;
#X connect 14 0 15 0;
#X connect 14 0 24 0;
#X connect 15 0 16 0;
#X connect 16 0 45 0;
#X connect 17 0 18 0;
#X connect 18 0 13 1;
#X connect 19 0 6 0;
#X connect 19 1 6 1;
#X connect 20 0 35 0;
#X connect 21 0 14 0;
#X connect 22 0 23 0;
#X connect 23 0 11 0;
#X connect 24 0 25 0;
#X connect 25 0 17 0;
#X connect 26 0 28 0;
#X connect 27 0 4 0;
#X connect 28 0 6 0;
#X connect 35 0 0 0;
#X connect 35 0 22 0;
#X connect 35 0 21 0;
#X connect 36 0 9 0;
#X connect 39 0 7 0;
#X connect 39 0 2 0;
#X connect 41 0 39 0;
#X connect 42 0 12 1;
#X connect 45 0 18 1;
#X connect 46 0 47 0;
#X connect 47 0 27 0;
#X connect 48 0 49 0;
#X connect 49 0 36 0;
#X restore 5 396 pd transposeL;
#N canvas 1027 331 428 582 transposeR 0;
#X obj 92 368 *~;
#X obj 215 305 line~;
#X obj 215 279 pack 0 200;
#X obj 247 96 r window;
#X obj 29 153 exp;
#X floatatom 29 179 6 0 0 0 - - -;
#X obj 29 269 /;
#X obj 156 199 * 0.001;
#X obj 324 375 line~;
#X obj 324 350 pack 0 200;
#X obj 92 394 +~;
#X obj 29 420 cos~;
#X obj 29 447 *~;
#X obj 29 476 +~;
#X obj 116 327 wrap~;
#X obj 261 370 *~;
#X obj 261 403 +~;
#X obj 198 430 cos~;
#X obj 198 457 *~;
#X obj 156 226 t b f;
#X floatatom 29 295 6 0 0 0 - - -;
#X obj 116 300 +~ 0.5;
#X obj 29 368 -~ 0.5;
#X obj 29 394 *~ 0.5;
#X obj 198 369 -~ 0.5;
#X obj 198 402 *~ 0.5;
#X obj 29 206 - 1;
#X obj 29 127 * 0.05776;
#X obj 29 232 * -1;
#X text 63 96 <-- transposition;
#X text 106 109 (halftones);
#X text 92 173 speed;
#X text 91 187 change;
#X text 291 121 <--window (msec);
#X text 64 262 tape head;
#X obj 29 326 phasor~;
#X obj 324 326 max 1.5;
#X text 327 232 delay;
#X text 324 250 (msec);
#X obj 247 149 max 1;
#X text 65 275 rotation freq;
#X obj 261 432 vd~ delay_right;
#X obj 46 515 outlet~;
#X obj 127 518 outlet~;
#X obj 92 420 vd~ delay_right;
#X msg 246 123 500;
#X obj 29 71 r transposeR;
#X floatatom 27 100 5 0 0 0 - - -;
#X obj 324 273 r delayR;
#X floatatom 324 302 5 0 0 0 - - -;
#X connect 0 0 10 0;
#X connect 1 0 0 1;
#X connect 1 0 15 1;
#X connect 2 0 1 0;
#X connect 3 0 45 0;
#X connect 4 0 5 0;
#X connect 5 0 26 0;
#X connect 6 0 20 0;
#X connect 7 0 19 0;
#X connect 8 0 10 1;
#X connect 8 0 16 1;
#X connect 9 0 8 0;
#X connect 10 0 44 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 42 0;
#X connect 13 0 43 0;
#X connect 14 0 15 0;
#X connect 14 0 24 0;
#X connect 15 0 16 0;
#X connect 16 0 41 0;
#X connect 17 0 18 0;
#X connect 18 0 13 1;
#X connect 19 0 6 0;
#X connect 19 1 6 1;
#X connect 20 0 35 0;
#X connect 21 0 14 0;
#X connect 22 0 23 0;
#X connect 23 0 11 0;
#X connect 24 0 25 0;
#X connect 25 0 17 0;
#X connect 26 0 28 0;
#X connect 27 0 4 0;
#X connect 28 0 6 0;
#X connect 35 0 0 0;
#X connect 35 0 22 0;
#X connect 35 0 21 0;
#X connect 36 0 9 0;
#X connect 39 0 7 0;
#X connect 39 0 2 0;
#X connect 41 0 18 1;
#X connect 44 0 12 1;
#X connect 45 0 39 0;
#X connect 46 0 47 0;
#X connect 47 0 27 0;
#X connect 48 0 49 0;
#X connect 49 0 36 0;
#X restore 341 401 pd transposeR;
#X msg 326 88 \; pd dsp 1 \; r_START \; transposeR 1 \; transposeL
1 \; delayL 0 \; delayR 0 \; window 0 \;;
#X obj 216 410 *~;
#X obj 144 407 *~;
#X obj 299 373 line~;
#X obj 111 364 line~;
#X obj -30 298 r feedbackvolL;
#X obj 395 347 r feedbackvolR;
#X floatatom 0 168 5 0 0 0 - - -;
#X obj 177 302 int;
#X msg 28 102 vibrato 3000 5;
#X floatatom 29 265 5 0 0 0 - - -;
#X obj 228 433 *~;
#X obj 156 430 *~;
#X obj 387 376 r feedbackvolR2;
#X obj -33 396 line~;
#X obj 433 403 line~;
#X obj -30 366 r feedbackvolL2;
#X obj 238 458 *~;
#X obj 166 455 *~;
#X obj -25 470 line~;
#X obj -22 440 r feedbackvolL3;
#X obj 391 461 line~;
#X obj 345 434 r feedbackvolR3;
#X obj 261 508 *~;
#X obj 414 511 line~;
#X obj 368 484 r feedbackvolR4;
#X obj 166 510 *~;
#X obj -25 525 line~;
#X obj -22 495 r feedbackvolL4;
#X msg 68 125 amp-range 60 70;
#X obj 283 552 rvu~;
#X obj 283 586 s rmsvu;
#X obj -20 77 readsf~;
#X msg -20 19 open timelapse.wav;
#X obj 42 71 delay 4000;
#X msg 0 46 1;
#X msg 29 47 0;
#X obj 114 17 r recdur;
#X obj 114 44 + 10000;
#X obj 232 83 delay;
#N canvas 383 229 450 300 record 0;
#X obj 130 164 writesf~;
#X msg 147 112 start;
#X msg 157 137 stop;
#X obj 103 49 * 1000;
#X floatatom 102 14 5 0 0 0 - - -;
#X obj 85 121 delay;
#X obj 105 223 s recdur;
#X msg 79 94 bang;
#X msg 129 71 open test1.wav;
#X obj 218 17 inlet~;
#X obj 274 16 inlet~;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 5 1;
#X connect 3 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 7 0 1 0;
#X connect 7 0 5 0;
#X connect 8 0 0 0;
#X connect 9 0 0 0;
#X connect 10 0 0 0;
#X restore 152 606 pd record;
#X obj 96 153 adc~ 1 2;
#X connect 0 0 25 0;
#X connect 0 1 24 0;
#X connect 1 0 16 0;
#X connect 1 0 16 1;
#X connect 1 0 0 0;
#X connect 1 0 0 1;
#X connect 1 0 49 0;
#X connect 1 0 46 0;
#X connect 2 0 4 0;
#X connect 2 1 3 0;
#X connect 3 0 1 1;
#X connect 3 0 0 2;
#X connect 4 0 31 0;
#X connect 6 2 2 0;
#X connect 6 4 7 0;
#X connect 7 0 8 0;
#X connect 7 1 9 0;
#X connect 7 2 10 0;
#X connect 7 3 11 0;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 10 0 14 0;
#X connect 11 0 15 0;
#X connect 12 0 1 5;
#X connect 13 0 1 2;
#X connect 14 0 1 3;
#X connect 15 0 1 4;
#X connect 16 0 41 0;
#X connect 16 1 40 0;
#X connect 17 0 23 0;
#X connect 18 0 17 0;
#X connect 18 0 32 0;
#X connect 18 0 52 0;
#X connect 18 0 57 0;
#X connect 18 0 56 0;
#X connect 18 0 62 0;
#X connect 21 0 35 0;
#X connect 21 1 35 0;
#X connect 22 0 34 0;
#X connect 22 1 34 0;
#X connect 24 0 20 0;
#X connect 24 0 53 0;
#X connect 24 0 63 1;
#X connect 25 0 19 0;
#X connect 25 0 53 0;
#X connect 25 0 63 0;
#X connect 26 0 24 1;
#X connect 27 0 25 1;
#X connect 28 0 33 0;
#X connect 28 0 27 0;
#X connect 29 0 26 0;
#X connect 31 0 30 0;
#X connect 31 0 1 0;
#X connect 32 0 6 0;
#X connect 34 0 20 0;
#X connect 34 0 53 0;
#X connect 34 0 63 1;
#X connect 35 0 19 0;
#X connect 35 0 53 0;
#X connect 35 0 63 0;
#X connect 36 0 38 0;
#X connect 37 0 35 1;
#X connect 38 0 34 1;
#X connect 39 0 37 0;
#X connect 40 0 20 0;