-
Notifications
You must be signed in to change notification settings - Fork 4
/
karmaFiddle.pd
266 lines (266 loc) · 7.64 KB
/
karmaFiddle.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
#N canvas 0 22 1223 669 10;
#X obj 367 252 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 422 402 unpack;
#X obj 422 437 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 555 419 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 422 461 route 0;
#X obj 450 241 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 691 433 > 50;
#X obj 691 456 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 691 476 sel 1 0;
#X obj 691 501 timer;
#X floatatom 691 527 5 0 0 0 - - -, f 5;
#X obj 691 593 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 352 302 Attack;
#X text 479 438 Raw Pitch;
#X text 554 402 Raw Amplitude;
#X text 105 199 1024 = FFT window size;
#X msg 108 221 npoints 1024;
#X msg 108 247 npoints 2048;
#X obj 691 549 > 2000;
#X text 260 34 Uses the fiddle object to extract FFT and some other
information.;
#X obj 830 559 unpack;
#X obj 830 582 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 863 582 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 845 480 unpack;
#X text 827 43 5 EQUALIZER BANDS WITH THEIR PITCH (Hz) AND AMPLITUDE
(rms);
#X obj 845 500 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 878 500 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 861 401 unpack;
#X obj 861 421 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 894 421 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 877 322 unpack;
#X obj 877 342 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 910 342 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 893 244 unpack;
#X obj 893 264 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 926 264 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 260 89 inlet~ LeftAudio;
#X obj 367 89 inlet~ RightAudio;
#X text 500 639 (potentially end of track/set);
#X text 737 548 ms;
#X obj 830 619 s fft1p;
#X obj 863 599 s fft1a;
#X obj 878 516 s fft2a;
#X obj 861 457 s fft3p;
#X obj 894 438 s fft3a;
#X obj 877 378 s fft4p;
#X obj 910 359 s fft4a;
#X obj 893 300 s fft5p;
#X obj 926 281 s fft5a;
#X text 289 251 Cooked Pitch;
#X text 507 241 Amplitude (db);
#X obj 909 165 unpack;
#X obj 909 185 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 942 185 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 942 202 s fft6a;
#X obj 909 221 s fft6p;
#X obj 925 87 unpack;
#X obj 925 107 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 958 107 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 0 256;
#X obj 830 63 route 1 2 3 4 5 6 7;
#X obj 367 218 fiddle~ 1024 1 50 7;
#X obj 925 143 s fft7p;
#X obj 958 124 s fft7a;
#X obj 845 535 s fft2p;
#X obj 480 89 inlet on_off_switch;
#X obj 480 119 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 394 302 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 25 437 r karma-fiddle-off;
#X obj 480 147 s karma-fiddle-off;
#X obj 25 503 i 0;
#X text 25 420 Reset all values;
#X obj 25 460 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 25 528 s fiddler_reset;
#X obj 1017 90 r fiddler_reset;
#X obj 1002 168 r fiddler_reset;
#X obj 989 247 r fiddler_reset;
#X obj 974 325 r fiddler_reset;
#X obj 956 404 r fiddler_reset;
#X obj 941 483 r fiddler_reset;
#X obj 932 565 r fiddler_reset;
#X msg 439 171 auto \$1;
#X obj 25 480 delay 50;
#X text 27 551 TODO;
#X text 25 565 http://stackoverflow.com/questions/20408388/how-to-filter-fft-data-for-audio-visualisation
, f 41;
#X obj 260 164 *~ 1;
#X obj 367 164 *~ 1;
#X text 260 13 :: karmaFiddle ::;
#X text 726 434 Treshold;
#X obj 21 95 cnv 15 198 88 empty empty empty 20 12 0 14 -191407 -66577
0;
#X obj 422 488 km_resample_avg 150;
#X text 470 625 Silence detects 2 sec non-variation;
#X obj 326 341 s \$0-f-attack;
#X obj 326 364 outlet attack;
#X obj 21 168 bng 15 250 50 0 empty \$0-f-attack Attack 0 -7 0 8 -262144
-1 -1;
#X obj 56 169 nbx 4 14 0 1e+37 0 0 empty \$0-f-pitch Pitch 0 -8 0 8
-262144 -1 -1 0 256;
#X text 486 514 Round INT;
#X obj 422 536 change;
#X obj 555 509 change;
#X obj 248 311 s \$0-f-pitch;
#X obj 241 334 outlet pitch;
#X obj 241 288 change;
#X obj 429 559 s \$0-f-pitchRaw;
#X obj 422 582 outlet pitchRaw;
#X obj 555 440 km_resample_avg 150;
#X obj 140 155 vsl 8 25 0 1 0 0 empty \$0-f-amp Amplitude 0 -7 0 8
-262144 -1 -1 0 1;
#X obj 555 464 dbtorms;
#X obj 555 486 min 1;
#X text 693 413 Silence;
#X obj 96 169 nbx 4 14 0 1e+37 0 0 empty \$0-f-pitchRaw RawPitch 0
-8 0 8 -262144 -1 -1 0 256;
#X obj 422 513 expr $i1;
#X obj 241 266 expr $i1;
#X obj 699 614 s \$0-f-silence;
#X obj 203 168 tgl 15 0 empty \$0-f-silence Silence -17 -7 0 8 -262144
-1 -1 0 1;
#X obj 691 636 outlet silence;
#X obj 691 571 change;
#X obj 450 280 dbtorms;
#X obj 450 259 km_resample_avg 150;
#X obj 450 323 change;
#X obj 458 345 s \$0-f-amp;
#X obj 450 302 min 1;
#X obj 450 367 outlet amplitude;
#X obj 555 552 outlet amplitudeRaw;
#X obj 562 530 s \$0-f-ampRaw;
#X obj 172 155 vsl 8 25 0 1 0 0 empty \$0-f-ampRaw RawAmplitude 0 -15
0 8 -262144 -1 -1 0 1;
#X connect 0 0 110 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 4 0;
#X connect 3 0 103 0;
#X connect 3 0 6 0;
#X connect 4 1 89 0;
#X connect 5 0 116 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 1 9 1;
#X connect 9 0 10 0;
#X connect 10 0 18 0;
#X connect 11 0 111 0;
#X connect 11 0 113 0;
#X connect 16 0 60 0;
#X connect 17 0 60 0;
#X connect 18 0 114 0;
#X connect 20 0 21 0;
#X connect 20 1 22 0;
#X connect 21 0 40 0;
#X connect 22 0 41 0;
#X connect 23 0 25 0;
#X connect 23 1 26 0;
#X connect 25 0 63 0;
#X connect 26 0 42 0;
#X connect 27 0 28 0;
#X connect 27 1 29 0;
#X connect 28 0 43 0;
#X connect 29 0 44 0;
#X connect 30 0 31 0;
#X connect 30 1 32 0;
#X connect 31 0 45 0;
#X connect 32 0 46 0;
#X connect 33 0 34 0;
#X connect 33 1 35 0;
#X connect 34 0 47 0;
#X connect 35 0 48 0;
#X connect 36 0 84 0;
#X connect 37 0 85 0;
#X connect 51 0 52 0;
#X connect 51 1 53 0;
#X connect 52 0 55 0;
#X connect 53 0 54 0;
#X connect 56 0 57 0;
#X connect 56 1 58 0;
#X connect 57 0 61 0;
#X connect 58 0 62 0;
#X connect 59 0 20 0;
#X connect 59 1 23 0;
#X connect 59 2 27 0;
#X connect 59 3 30 0;
#X connect 59 4 33 0;
#X connect 59 5 51 0;
#X connect 59 6 56 0;
#X connect 60 0 0 0;
#X connect 60 1 66 0;
#X connect 60 2 1 0;
#X connect 60 3 5 0;
#X connect 60 4 59 0;
#X connect 64 0 65 0;
#X connect 65 0 68 0;
#X connect 65 0 80 0;
#X connect 65 0 84 1;
#X connect 65 0 85 1;
#X connect 66 0 91 0;
#X connect 66 0 92 0;
#X connect 67 0 71 0;
#X connect 69 0 72 0;
#X connect 71 0 81 0;
#X connect 73 0 58 0;
#X connect 73 0 57 0;
#X connect 74 0 53 0;
#X connect 74 0 52 0;
#X connect 75 0 35 0;
#X connect 75 0 34 0;
#X connect 76 0 32 0;
#X connect 76 0 31 0;
#X connect 77 0 29 0;
#X connect 77 0 28 0;
#X connect 78 0 26 0;
#X connect 78 0 25 0;
#X connect 79 0 22 0;
#X connect 79 0 21 0;
#X connect 80 0 60 0;
#X connect 81 0 69 0;
#X connect 84 0 60 0;
#X connect 85 0 60 0;
#X connect 89 0 109 0;
#X connect 96 0 101 0;
#X connect 96 0 102 0;
#X connect 97 0 121 0;
#X connect 97 0 122 0;
#X connect 100 0 99 0;
#X connect 100 0 98 0;
#X connect 103 0 105 0;
#X connect 105 0 106 0;
#X connect 106 0 97 0;
#X connect 109 0 96 0;
#X connect 110 0 100 0;
#X connect 114 0 11 0;
#X connect 115 0 119 0;
#X connect 116 0 115 0;
#X connect 117 0 118 0;
#X connect 117 0 120 0;
#X connect 119 0 117 0;
#X coords 0 -1 1 1 200 105 1 20 80;