-
Notifications
You must be signed in to change notification settings - Fork 10
/
flanger~.pd
112 lines (112 loc) · 2.63 KB
/
flanger~.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
#N canvas 296 345 682 266 10;
#X obj 21 14 inlet~;
#X obj 71 14 inlet~;
#X obj 30 126 outlet~;
#X obj 90 127 outlet~;
#X obj 29 84 tof/crossfade~ 2;
#X obj 499 -8 inlet params;
#X obj 499 38 print PARAM_NOTFOUND;
#X obj 159 -6 tof/param /wet 0 /g slider 0 1;
#X obj 167 58 line~;
#X msg 159 16 \$1 5;
#X obj 499 14 tof/param route;
#X obj 492 69 b;
#X obj 493 98 tof/param gui;
#N canvas 0 25 1272 692 flanger 1;
#X obj 546 106 inlet~;
#X obj 592 104 inlet~;
#X obj 660 250 *~;
#X obj 783 250 *~;
#X obj 852 55 * 10;
#X obj 691 146 phasor~;
#X obj 660 196 cos~;
#X obj 782 201 cos~;
#X obj 660 228 +~ 1;
#X obj 783 225 +~ 1;
#N canvas 518 513 473 213 feedback 0;
#X obj 92 18 inlet~;
#X obj 278 26 inlet~;
#X obj 19 142 outlet~;
#X obj 191 154 outlet~;
#X obj 58 88 *~;
#X obj 232 94 *~;
#X obj 58 112 delwrite~ \$0-flanger-l 1000;
#X obj 233 115 delwrite~ \$0-flanger-r 1000;
#X obj 18 49 vd~ \$0-flanger-l;
#X obj 193 55 vd~ \$0-flanger-r;
#X obj 18 22 inlet~;
#X obj 192 25 inlet~;
#X obj 300 147 block~ 4 1 1;
#X obj 374 28 inlet~;
#X connect 0 0 6 0;
#X connect 1 0 7 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 8 0 4 0;
#X connect 8 0 2 0;
#X connect 9 0 5 0;
#X connect 9 0 3 0;
#X connect 10 0 8 0;
#X connect 11 0 9 0;
#X connect 13 0 5 1;
#X connect 13 0 4 1;
#X restore 678 318 pd feedback;
#X obj 781 178 +~ 0.06;
#X obj 661 274 +~ 0.12;
#X obj 784 273 +~ 0.12;
#X obj 634 367 outlet~;
#X obj 726 383 outlet~;
#X msg 949 209 \$1 20;
#X obj 951 232 line~;
#X obj 949 167 * 0.9;
#X obj 950 187 + 0.05;
#X obj 687 89 expr pow($f1 \, 2);
#X obj 689 117 + 0.1;
#X obj 945 134 tof/param /feedback 0 /g slider 0 50;
#X obj 863 27 tof/param /width 0 /g slider 0 100;
#X obj 748 -12 tof/param /frequence 20 /g slider 0 100;
#X obj 848 115 line~;
#X msg 846 86 \$1 5;
#X connect 0 0 10 1;
#X connect 1 0 10 3;
#X connect 2 0 12 0;
#X connect 3 0 13 0;
#X connect 4 0 26 0;
#X connect 5 0 6 0;
#X connect 5 0 11 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 2 0;
#X connect 9 0 3 0;
#X connect 10 0 14 0;
#X connect 10 1 15 0;
#X connect 11 0 7 0;
#X connect 12 0 10 0;
#X connect 13 0 10 2;
#X connect 16 0 17 0;
#X connect 17 0 10 4;
#X connect 18 0 19 0;
#X connect 19 0 16 0;
#X connect 20 0 21 0;
#X connect 21 0 5 0;
#X connect 22 0 18 0;
#X connect 23 0 4 0;
#X connect 24 0 20 0;
#X connect 25 0 3 1;
#X connect 25 0 2 1;
#X connect 26 0 25 0;
#X restore 76 50 pd flanger;
#X connect 0 0 4 0;
#X connect 0 0 13 0;
#X connect 1 0 4 1;
#X connect 1 0 13 1;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 7 0 9 0;
#X connect 8 0 4 4;
#X connect 9 0 8 0;
#X connect 10 0 6 0;
#X connect 11 0 12 0;
#X connect 13 0 4 2;
#X connect 13 1 4 3;