-
Notifications
You must be signed in to change notification settings - Fork 4
/
Copy pathkarmaAubio.pd
246 lines (246 loc) · 7.08 KB
/
karmaAubio.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
#N canvas 74 22 1248 659 10;
#X obj 39 329 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 555 286 aubiopitch~;
#X obj 555 353 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-262144 -1 -1 3126 256;
#X obj 128 330 bng 15 50 10 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 215 331 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 128 286 aubiotempo~ 0.5;
#X text 286 31 Uses lib Aubio to get several MIR information;
#X obj 409 64 inlet~ LeftAudio;
#X obj 521 64 inlet~ RightAudio;
#X obj 324 287 aubioquiet~;
#X obj 686 71 inlet on_off_switch;
#X obj 536 88 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 917 174 aubiotss~;
#X obj 917 259 vsl 15 100 0 1 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 370 1;
#X obj 917 198 env~;
#X obj 968 259 vsl 15 100 0 1 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 226 1;
#X obj 968 199 env~;
#X obj 917 151 hsl 100 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 0;
#X floatatom 988 166 5 0 0 0 - - -, f 5;
#X text 914 133 Variation Threshold;
#X obj 768 186 aubiozcr~;
#X floatatom 768 238 5 0 0 0 - - -, f 5;
#X obj 40 551 i 0;
#X text 40 463 Reset all values;
#X obj 50 505 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 50 525 delay 1000;
#X obj 40 480 r aubio-off;
#X obj 40 578 s aubio_reset;
#X floatatom 768 309 5 0 0 0 - - -, f 5;
#X obj 734 325 -;
#X obj 734 347 abs;
#X obj 713 431 sqrt;
#X text 12 172 Treshold Tempo;
#X text 13 195 Treshold OnSet;
#X text 775 221 Zcr;
#X text 804 310 Smoothed;
#X obj 771 427 hsl 100 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 967 1;
#X obj 771 448 hsl 100 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 792 1;
#X obj 687 325 hsl 40 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X floatatom 153 175 5 0 0 0 - - -, f 5;
#X obj 106 175 hsl 40 15 0 4 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 153 195 5 0 0 0 - - -, f 5;
#X obj 106 196 hsl 40 15 0 2 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 697 344 5 0 0 0 - - -, f 5;
#X text 101 153 PARAMETERS;
#X text 682 308 Treshold;
#X obj 917 397 -, f 2;
#X obj 768 350 * 5;
#X obj 669 364 -;
#X text 766 463 ZeroCross Variation;
#X obj 713 408 * 2;
#X obj 324 339 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 917 449 sqrt;
#X text 766 477 (~cymbal detection);
#X obj 858 16 aubio;
#X obj 39 284 aubioonset~;
#X obj 409 103 *~;
#X obj 521 110 *~;
#X obj 917 472 sqrt;
#X text 898 13 Loads Aubio lib on misconfigured Pd installations;
#X obj 768 258 km_smooth 10;
#X obj 917 426 km_smooth 30;
#X obj 669 386 km_smooth 3;
#X obj 968 226 dbtorms;
#X text 910 96 Transients are new sounds and unstable ones;
#X obj 917 225 dbtorms;
#X obj 920 541 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 8176 1;
#X obj 564 375 vsl 15 60 0 1200 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 5900 1;
#X obj 387 309 i 1;
#X obj 324 309 i 0;
#X obj 440 363 == 0;
#X text 900 27 (not to reload the sketch);
#X obj 1 15 cnv 15 248 53 empty empty Settings 18 8 0 14 -191407 -66577
0;
#X obj 138 382 outlet tempo;
#X obj 221 382 outlet tempoAlt;
#X obj 215 405 s \$0-a-tempoAlt;
#X obj 39 405 s \$0-a-attack;
#X obj 45 383 outlet attack;
#X obj 333 383 outlet isPlaying;
#X text 264 581 Todo: make a list of detected frequencies from aubiopitch?
;
#X obj 568 472 outlet pitch;
#X obj 555 494 s \$0-a-pitch;
#X obj 555 449 change;
#X obj 128 405 s \$0-a-tempo;
#X obj 325 406 s \$0-a-isPlaying;
#X obj 440 407 s \$0-a-isQuiet;
#X obj 450 384 outlet isQuiet;
#X text 555 518 Max 43 Hz update rate;
#X text 285 16 :: karmaAubio ::;
#X obj 774 395 s \$0-a-zcr;
#X obj 783 372 outlet zcr;
#X obj 768 328 change;
#X text 923 559 (~Sound variation indicator);
#X obj 917 494 max 0;
#X obj 917 517 min 1;
#X obj 917 579 change;
#X obj 1016 396 outlet transients;
#X obj 1052 297 outlet steadyState;
#X obj 1042 275 change;
#X obj 1 68 cnv 15 248 50 empty empty Outlets 18 8 0 14 -162280 -66577
0;
#X obj 26 103 bng 15 250 50 0 empty \$0-a-tempo Tempo 0 -15 0 8 -262144
-1 -1;
#X obj 56 103 bng 15 250 50 0 empty \$0-a-tempoAlt TempoAlt 0 -7 0
8 -262144 -1 -1;
#X obj 0 103 bng 15 250 50 0 empty \$0-a-attack Attack 2 -7 0 8 -262144
-1 -1;
#X obj 88 103 tgl 15 0 empty \$0-a-isPlaying isPlaying 0 -15 0 8 -262144
-1 -1 1 1;
#X obj 118 103 tgl 15 0 empty \$0-a-isQuiet isQuiet 0 -7 0 8 -262144
-1 -1 0 1;
#X obj 181 85 vsl 10 30 0 1 0 0 empty \$0-a-zcr Zcr 0 -9 0 8 -262144
-1 -1 283 1;
#X obj 208 85 vsl 10 30 0 1 0 0 empty \$0-a-transients Transients -10
-9 0 8 -262144 -1 -1 1031 1;
#X obj 237 85 vsl 10 30 0 1 0 0 empty \$0-a-steadyState SteadyState
-43 -16 0 8 -262144 -1 -1 382 1;
#X obj 1003 370 change;
#X obj 1003 416 s \$0-a-transients;
#X obj 1042 319 s \$0-a-steadyState;
#X obj 555 329 i;
#X text 580 329 Round;
#X obj 138 104 nbx 4 14 0 1e+37 0 0 empty \$0-a-pitch Pitch 10 -15
0 8 -262144 -1 -1 3126 256;
#X text 911 116 Steady-state indicates continuous \, similar sounds
;
#X obj 555 308 km_resample_avg 100;
#X obj 768 284 km_resample_avg 100;
#X obj 1003 347 km_resample_avg 100;
#X obj 1042 253 km_resample_avg 100;
#X connect 0 0 76 0;
#X connect 0 0 77 0;
#X connect 1 0 115 0;
#X connect 2 0 67 0;
#X connect 2 0 82 0;
#X connect 3 0 73 0;
#X connect 3 0 83 0;
#X connect 4 0 74 0;
#X connect 4 0 75 0;
#X connect 5 0 3 0;
#X connect 5 1 4 0;
#X connect 7 0 56 0;
#X connect 8 0 57 0;
#X connect 9 0 69 0;
#X connect 9 1 68 0;
#X connect 10 0 11 0;
#X connect 11 0 56 1;
#X connect 11 0 57 1;
#X connect 12 0 14 0;
#X connect 12 1 16 0;
#X connect 13 0 46 0;
#X connect 14 0 65 0;
#X connect 15 0 46 1;
#X connect 16 0 63 0;
#X connect 17 0 12 1;
#X connect 17 0 18 0;
#X connect 20 0 21 0;
#X connect 21 0 29 1;
#X connect 21 0 60 0;
#X connect 22 0 27 0;
#X connect 24 0 25 0;
#X connect 25 0 22 0;
#X connect 26 0 22 0;
#X connect 26 0 24 0;
#X connect 28 0 29 0;
#X connect 28 0 91 0;
#X connect 29 0 30 0;
#X connect 30 0 48 0;
#X connect 31 0 37 0;
#X connect 38 0 43 0;
#X connect 38 0 48 1;
#X connect 40 0 39 0;
#X connect 40 0 5 1;
#X connect 42 0 41 0;
#X connect 42 0 55 1;
#X connect 46 0 61 0;
#X connect 47 0 36 0;
#X connect 47 0 89 0;
#X connect 47 0 90 0;
#X connect 48 0 62 0;
#X connect 50 0 31 0;
#X connect 51 0 70 0;
#X connect 51 0 78 0;
#X connect 51 0 84 0;
#X connect 52 0 58 0;
#X connect 55 0 0 0;
#X connect 56 0 55 0;
#X connect 56 0 5 0;
#X connect 56 0 9 0;
#X connect 56 0 20 0;
#X connect 56 0 12 0;
#X connect 56 0 1 0;
#X connect 57 0 55 0;
#X connect 57 0 5 0;
#X connect 57 0 1 0;
#X connect 57 0 20 0;
#X connect 57 0 12 0;
#X connect 57 0 9 0;
#X connect 58 0 93 0;
#X connect 60 0 116 0;
#X connect 61 0 52 0;
#X connect 62 0 50 0;
#X connect 63 0 15 0;
#X connect 63 0 118 0;
#X connect 65 0 13 0;
#X connect 65 0 117 0;
#X connect 66 0 95 0;
#X connect 68 0 51 0;
#X connect 69 0 51 0;
#X connect 70 0 85 0;
#X connect 70 0 86 0;
#X connect 82 0 81 0;
#X connect 82 0 80 0;
#X connect 91 0 47 0;
#X connect 93 0 94 0;
#X connect 94 0 66 0;
#X connect 98 0 97 0;
#X connect 98 0 110 0;
#X connect 108 0 96 0;
#X connect 108 0 109 0;
#X connect 111 0 2 0;
#X connect 115 0 111 0;
#X connect 116 0 28 0;
#X connect 117 0 108 0;
#X connect 118 0 98 0;
#X coords 0 -1 1 1 250 120 1 0 0;