This repository has been archived by the owner on Oct 13, 2023. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 18
/
hv.flanger2.pd
172 lines (172 loc) · 3.8 KB
/
hv.flanger2.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
#N canvas 399 74 678 650 10;
#X obj 35 615 outlet~;
#X obj 35 25 inlet~;
#X obj 322 614 outlet~;
#X obj 487 26 inlet;
#X obj 144 25 r \$0-speed;
#X obj 213 190 r \$0-feedback;
#X obj 144 45 clip 0 20;
#X obj 75 199 vd~ \$0-flanger-l;
#X obj 337 197 vd~ \$0-flanger-r;
#X obj 75 308 *~;
#X obj 254 364 clip 0 1;
#X msg 287 414 \$1 100;
#X obj 287 434 line~;
#X msg 50 495 \$1 100;
#X obj 50 515 line~;
#X obj 399 25 inlet~;
#X obj 35 555 *~;
#X obj 254 344 r \$0-mix;
#X obj 337 554 *~;
#X obj 272 483 *~;
#X obj 322 483 *~;
#X obj 413 314 *~;
#X obj 177 75 r \$0-intensity;
#N canvas 0 22 250 374 mix 0;
#X obj 50 80 * 2;
#X obj 50 110 - 1;
#X obj 50 140 t f f;
#X obj 101 200 + 1;
#X msg 50 170 1 \$1;
#X obj 50 200 -;
#X obj 101 230 * 0.5;
#X obj 50 230 * 0.5;
#X obj 101 260 sqrt;
#X obj 50 260 sqrt;
#X obj 50 290 outlet;
#X obj 101 290 outlet;
#X obj 50 50 inlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 2 1 3 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 10 0;
#X connect 12 0 0 0;
#X restore 254 384 pd mix;
#X obj 177 95 clip 0 1;
#X obj 35 585 +~;
#X obj 322 584 +~;
#X obj 398 374 delwrite~ \$0-flanger-r \$1;
#X obj 398 344 +~;
#X obj 60 368 delwrite~ \$0-flanger-l \$1;
#X obj 60 338 +~;
#N canvas 130 607 615 409 lfo 0;
#X obj 160 126 -~ 0.5;
#X obj 161 155 abs~;
#X obj 160 104 phasor~ 2;
#X obj 162 181 *~ 4;
#X obj 162 203 -~ 1;
#X obj 290 265 *~ -1;
#X obj 307 185 sig~ \$1;
#X obj 307 207 *~ 0.5;
#X obj 171 275 +~;
#X obj 290 287 +~;
#X obj 162 232 *~;
#X obj 228 200 *~;
#X obj 249 139 line~;
#X obj 290 317 lop~ 14;
#X obj 162 308 lop~ 14;
#X obj 161 75 inlet speed;
#X msg 261 105 \$1 100;
#X obj 261 74 inlet intensity;
#X obj 290 339 outlet~;
#X obj 162 330 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X connect 3 0 4 0;
#X connect 4 0 10 0;
#X connect 5 0 9 0;
#X connect 6 0 7 0;
#X connect 7 0 8 1;
#X connect 7 0 9 1;
#X connect 7 0 11 1;
#X connect 8 0 14 0;
#X connect 9 0 13 0;
#X connect 10 0 5 0;
#X connect 10 0 8 0;
#X connect 11 0 10 1;
#X connect 12 0 11 0;
#X connect 13 0 18 0;
#X connect 14 0 19 0;
#X connect 15 0 2 0;
#X connect 16 0 12 0;
#X connect 17 0 16 0;
#X restore 144 125 pd lfo;
#N canvas 0 22 206 338 feedback 0;
#X obj 51 71 t f f;
#X obj 51 101 abs;
#X obj 111 131 * 2;
#X obj 111 161 - 1;
#X obj 111 101 > 0;
#X obj 51 191 *;
#X obj 51 33 inlet;
#X obj 51 131 max 0.01;
#X msg 51 221 \$1 100;
#X obj 51 251 line~;
#X obj 51 281 outlet~;
#X connect 0 0 1 0;
#X connect 0 1 4 0;
#X connect 1 0 7 0;
#X connect 2 0 3 0;
#X connect 3 0 5 1;
#X connect 4 0 2 0;
#X connect 5 0 8 0;
#X connect 6 0 0 0;
#X connect 7 0 5 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X restore 213 231 pd feedback;
#X obj 213 211 clip -1 1;
#X obj 487 47 hv.dispatch \$0 intensity 0.2;
#X obj 487 69 hv.dispatch \$0 feedback 0;
#X obj 487 91 hv.dispatch \$0 speed 2;
#X obj 487 113 hv.dispatch \$0 mix 0.5;
#X connect 1 0 16 0;
#X connect 1 0 30 0;
#X connect 3 0 34 0;
#X connect 4 0 6 0;
#X connect 5 0 33 0;
#X connect 6 0 31 0;
#X connect 7 0 9 0;
#X connect 7 0 19 0;
#X connect 8 0 20 1;
#X connect 8 0 21 1;
#X connect 9 0 30 1;
#X connect 10 0 23 0;
#X connect 11 0 12 0;
#X connect 12 0 20 0;
#X connect 12 0 19 1;
#X connect 13 0 14 0;
#X connect 14 0 16 1;
#X connect 14 0 18 0;
#X connect 15 0 18 1;
#X connect 15 0 28 0;
#X connect 16 0 25 0;
#X connect 17 0 10 0;
#X connect 18 0 26 1;
#X connect 19 0 25 1;
#X connect 20 0 26 0;
#X connect 21 0 28 1;
#X connect 22 0 24 0;
#X connect 23 0 13 0;
#X connect 23 1 11 0;
#X connect 24 0 31 1;
#X connect 25 0 0 0;
#X connect 26 0 2 0;
#X connect 28 0 27 0;
#X connect 30 0 29 0;
#X connect 31 0 7 0;
#X connect 31 1 8 0;
#X connect 32 0 9 1;
#X connect 32 0 21 0;
#X connect 33 0 32 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;