-
Notifications
You must be signed in to change notification settings - Fork 0
/
Test Karplus2.pd
247 lines (247 loc) · 6.69 KB
/
Test Karplus2.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
#N canvas 827 239 527 327 12;
#X obj 99 499 delwrite~ karplus1 250;
#X obj 139 619 delread4~ karplus1;
#X obj 319 719 *~;
#X obj 99 1019 dac~;
#X obj 139 519 mtof;
#X msg 139 559 \$1 10;
#X obj 139 579 line~;
#X obj 99 659 *~;
#X msg 239 779 \$1 10;
#X obj 239 799 line~;
#X obj 99 859 *~;
#X msg 235 889 \$1 10;
#X obj 235 909 line~;
#N canvas 733 172 450 300 ftop~ 1;
#X obj 528 330 /~;
#X obj 528 272 sig~ 1000;
#X obj 539 219 inlet~ freq;
#X obj 528 379 outlet~;
#X connect 0 0 3 0 empty;
#X connect 1 0 0 0 empty;
#X connect 2 0 0 1 empty;
#X restore 139 599 pd ftop~;
#X obj 2 179 hsl 128 17 0 127 0 1 empty empty Notes -2 -8 0 10 #191919 #e1e1e1 #e1e1e1 1200 0;
#X obj 139 399 int;
#X obj 142 179 hsl 128 17 0.01 1 1 1 KarplusFactor empty Karplus\ factor -2 -8 0 10 #191919 #e1e1e1 #e1e1e1 12409 0;
#X obj 282 179 hsl 128 17 0 0.9 0 1 Volume empty Volume -2 -8 0 10 #191919 #e1e1e1 #e1e1e1 12700 0;
#X obj 239 759 r KarplusFactor;
#X obj 239 859 r Volume;
#X obj 439 599 delwrite~ amplitude 250;
#X obj 439 639 delread4~ amplitude;
#X msg 579 659 \$1 10;
#X obj 579 679 line~;
#X obj 439 659 *~;
#X obj 579 639 r Tail;
#X obj 422 179 hsl 128 17 0 1 0 1 Tail empty Tail -2 -8 0 10 #191919 #e1e1e1 #e1e1e1 11430 0;
#X msg 99 59 C;
#X msg 139 59 D;
#X msg 179 59 E;
#X msg 219 59 F;
#X msg 259 59 G;
#X msg 299 59 A;
#X msg 339 59 B;
#X msg 379 59 C';
#X msg 119 -1 C#;
#X msg 159 -1 D#;
#X msg 239 -1 F#;
#X msg 279 -1 G#;
#X msg 319 -1 A#;
#X msg 79 119 octave 2;
#X msg 159 119 octave 3;
#X msg 239 119 octave 4;
#X msg -1 119 octave 1;
#X obj -1 79 loadbang;
#X obj 139 219 b;
#X obj 79 139 b;
#X obj 159 139 b;
#X obj 239 139 b;
#X obj 319 19 b;
#X obj 279 19 b;
#X obj 239 19 b;
#X obj 159 19 b;
#X obj 119 19 b;
#X obj 99 77 b;
#X obj 139 77 b;
#X obj 179 77 b;
#X obj 219 77 b;
#X obj 259 77 b;
#X obj 299 77 b;
#X obj 339 77 b;
#X obj 379 77 b;
#X obj 159 139 +;
#X msg 319 119 octave 5;
#X obj 319 139 b;
#X obj 399 139 b;
#X msg 399 119 octave 6;
#X obj 479 139 b;
#X msg 479 119 octave 7;
#X obj 239 199 * 12;
#X obj 79 439 clip~ -0.9 0.9;
#X obj 99 879 clip~ -0.9 0.9;
#X obj 119 39 float 13;
#X obj 159 39 float 15;
#X obj 239 39 float 18;
#X obj 279 39 float 20;
#X obj 319 39 float 22;
#X obj 99 99 float 12;
#X obj 139 99 float 14;
#X obj 179 99 float 16;
#X obj 219 99 float 17;
#X obj 259 99 float 19;
#X obj 299 99 float 21;
#X obj 339 99 float 23;
#X obj 379 99 float 24;
#X obj 79 159 float 2;
#X obj 159 159 float 3;
#X obj 239 159 float 4;
#X obj 319 159 float 5;
#X obj 399 159 float 6;
#X obj 479 159 float 7;
#X obj -1 159 float 1;
#X obj 239 119 t b f;
#X obj 439 619 sig~ 10;
#X obj 79 399 adc~ 1;
#X obj 579 719 -~ 1;
#X obj 459 739 abs~;
#X obj 279 639 *~;
#X obj 195 677 *~ 2;
#X obj 219 259 loadbang;
#X obj 219 288 float 0.9;
#N canvas 733 172 450 300 ampTrack 1;
#X obj 79 77 pow~ 2;
#X obj 79 117 sqrt~;
#X obj 99 39 clip 1 22;
#X obj 59 -1 inlet~;
#X obj 79 179 outlet~;
#X obj 99 -1 inlet (float) tracking accuracy (from 0 to 22);
#N canvas 733 172 450 300 ampTrack 0;
#X obj 299 479 pow~ 2;
#X obj 299 519 sqrt~;
#X obj 299 499 lop~ 12;
#X obj 319 459 clip 1 22;
#X obj -1445 -1125 inlet~;
#X obj -1105 -945 outlet~;
#X obj -1225 -1125 inlet (float) tracking accuracy (from 0 to 22);
#X connect 0 0 2 0 empty;
#X connect 1 0 5 0 empty;
#X connect 2 0 1 0 empty;
#X connect 3 0 2 1 empty;
#X connect 4 0 0 0 empty;
#X connect 6 0 3 0 empty;
#X restore 199 57 pd ampTrack;
#X obj 79 97 lop~ 22;
#X connect 0 0 7 0 empty;
#X connect 1 0 4 0 empty;
#X connect 2 0 7 1 empty;
#X connect 3 0 0 0 empty;
#X connect 5 0 2 0 empty;
#X connect 7 0 1 0 empty;
#X restore 339 499 pd ampTrack;
#X obj 499 679 *~ 0.999;
#X obj 195 727 *~ 0.996;
#X connect 1 0 7 0 empty;
#X connect 4 0 5 0 empty;
#X connect 5 0 6 0 empty;
#X connect 6 0 13 0 empty;
#X connect 7 0 0 0 empty;
#X connect 7 0 10 0 empty;
#X connect 8 0 9 0 empty;
#X connect 9 0 103 0 empty;
#X connect 10 0 71 0 empty;
#X connect 11 0 12 0 empty;
#X connect 12 0 10 1 empty;
#X connect 13 0 1 0 empty;
#X connect 14 0 15 0 empty;
#X connect 15 0 4 0 empty;
#X connect 18 0 8 0 empty;
#X connect 19 0 11 0 empty;
#X connect 21 0 24 0 empty;
#X connect 22 0 23 0 empty;
#X connect 23 0 95 0 empty;
#X connect 23 0 102 0 empty;
#X connect 24 0 20 0 empty;
#X connect 24 0 2 0 empty;
#X connect 25 0 22 0 empty;
#X connect 27 0 54 0 empty;
#X connect 28 0 55 0 empty;
#X connect 29 0 56 0 empty;
#X connect 30 0 57 0 empty;
#X connect 31 0 58 0 empty;
#X connect 32 0 59 0 empty;
#X connect 33 0 60 0 empty;
#X connect 34 0 61 0 empty;
#X connect 35 0 53 0 empty;
#X connect 36 0 52 0 empty;
#X connect 37 0 51 0 empty;
#X connect 38 0 50 0 empty;
#X connect 39 0 49 0 empty;
#X connect 40 0 46 0 empty;
#X connect 41 0 47 0 empty;
#X connect 42 0 48 0 empty;
#X connect 43 0 45 0 empty;
#X connect 44 0 43 0 empty;
#X connect 45 0 91 0 empty;
#X connect 46 0 85 0 empty;
#X connect 47 0 86 0 empty;
#X connect 48 0 87 0 empty;
#X connect 49 0 76 0 empty;
#X connect 50 0 75 0 empty;
#X connect 51 0 74 0 empty;
#X connect 52 0 73 0 empty;
#X connect 53 0 72 0 empty;
#X connect 54 0 77 0 empty;
#X connect 55 0 78 0 empty;
#X connect 56 0 79 0 empty;
#X connect 57 0 80 0 empty;
#X connect 58 0 81 0 empty;
#X connect 59 0 82 0 empty;
#X connect 60 0 83 0 empty;
#X connect 61 0 84 0 empty;
#X connect 62 0 14 0 empty;
#X connect 63 0 64 0 empty;
#X connect 64 0 88 0 empty;
#X connect 65 0 89 0 empty;
#X connect 66 0 65 0 empty;
#X connect 67 0 90 0 empty;
#X connect 68 0 67 0 empty;
#X connect 69 0 92 0 empty;
#X connect 70 0 0 0 empty;
#X connect 71 0 3 0 empty;
#X connect 71 0 3 1 empty;
#X connect 72 0 62 0 empty;
#X connect 73 0 62 0 empty;
#X connect 74 0 62 0 empty;
#X connect 75 0 62 0 empty;
#X connect 76 0 62 0 empty;
#X connect 77 0 62 0 empty;
#X connect 78 0 62 0 empty;
#X connect 79 0 62 0 empty;
#X connect 80 0 62 0 empty;
#X connect 81 0 62 0 empty;
#X connect 82 0 62 0 empty;
#X connect 83 0 62 0 empty;
#X connect 84 0 62 0 empty;
#X connect 85 0 69 0 empty;
#X connect 86 0 69 0 empty;
#X connect 87 0 69 0 empty;
#X connect 88 0 69 0 empty;
#X connect 89 0 69 0 empty;
#X connect 90 0 69 0 empty;
#X connect 91 0 69 0 empty;
#X connect 92 0 62 0 empty;
#X connect 92 1 62 1 empty;
#X connect 93 0 21 0 empty;
#X connect 94 0 70 0 empty;
#X connect 94 0 101 0 empty;
#X connect 95 0 96 0 empty;
#X connect 96 0 97 1 empty;
#X connect 97 0 98 0 empty;
#X connect 98 0 2 1 empty;
#X connect 99 0 100 0 empty;
#X connect 100 0 16 0 empty;
#X connect 100 0 17 0 empty;
#X connect 100 0 26 0 empty;
#X connect 101 0 20 0 empty;
#X connect 102 0 24 1 empty;
#X connect 103 0 7 1 empty;