blob: 7e2e5ba370108da79f7f6a5d98c2a026c54e7ea4 (
plain)
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
|
#N canvas 191 230 938 537 10;
#X obj 60 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 31 331 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 200 306 1.arg: <symbol> source-name;
#X floatatom 94 372 5 0 0 0 - - -;
#X floatatom 143 373 5 0 0 0 - - -;
#X msg 88 78 src src;
#X msg 118 102 amp_sort;
#X msg 120 124 freq_sort;
#X obj 60 302 tab_find_peaks src;
#X floatatom 198 371 5 0 0 0 - - -;
#X obj 263 369 pack 0 0 0;
#X obj 263 392 print;
#X msg 233 173 abs_min_height_diff 10;
#X text 69 385 sort_index;
#X text 204 382 amp;
#X text 147 387 index;
#N canvas 0 22 450 300 (subpatch) 0;
#X array src 100 float 1;
#A 0 9.99997 9.28569 9.28569 10.7143 7.14284 7.85712 8.5714 39 10 11
38 8.5714 7.85712 8.5714 9.28569 8.5714 9.99997 39 40 41 38 12.8571
12.8571 14.2857 12.8571 11.4285 12.1428 11.4285 9.99997 10.7143 11.4285
9.99997 9.28569 9.28569 9.99997 10.7143 10.7143 45 9.99997 9.99997
10.7143 11.4285 12.1428 10.7143 11.4285 12.1428 11.4285 46 11.4285
11.4285 11.4285 12.1428 12.8571 11.4285 11.4285 12.1428 12.8571 12.1428
12.1428 12.1428 12.1428 12.1428 11.4285 11.4285 11.4285 11.4285 10.7143
48 49 43 11.4285 12.1428 13.5714 15 13.5714 13.5714 14.2857 14.2857
15 15 14.2857 14.2857 14.2857 15 15 15.7142 15.7142 51 53 15 15 15
15 15 14.2857 14.2857 15 15.7142 16.4285 16.4285;
#X coords 0 100 99 0 200 140 1;
#X restore 638 93 graph;
#X msg 171 149 max_peaks 9;
#X text 20 347 ready;
#X msg 289 194 width_range 1 4;
#X text 21 6 tab_find_peaks;
#X msg 289 216 width_range 1 1;
#N canvas 0 22 470 320 (subpatch) 0;
#X msg 355 125 \; src const 0;
#X msg 303 175 \; src 37 45;
#X msg 310 223 \; src 47 46;
#X msg 187 177 \; src 67 48 49 43;
#X msg 180 218 \; src 87 51 53;
#X msg 44 223 \; src 7 39 10 11 38;
#X msg 50 181 \; src 17 39 40 41 38;
#X obj 65 25 loadbang;
#X msg 33 50 \; src xticks 0 1 5;
#X msg 34 84 \; src xlabel -5.15 0 10 20 30 40 50 60 70 80 90;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X restore 696 289 pd;
#X obj 311 69 loadbang;
#X text 89 50 <bang> calculate all peaks (index bin amplitude);
#X text 218 61 of an array;
#X text 78 442 IEM KUG;
#X text 57 430 musil;
#X text 92 430 @;
#X text 100 430 iem.at;
#X text 61 452 Graz \, Austria;
#X text 218 296 initial arguments:;
#X text 190 111 kind of order;
#X text 257 148 maximum number of peaks detected;
#X text 395 171 vertical difference between peak;
#X text 397 180 and noise;
#X text 413 205 width range of peak in bins;
#X text 13 419 (c) Thomas Musil 2000 - 2009;
#X connect 0 0 8 0;
#X connect 5 0 8 0;
#X connect 6 0 8 0;
#X connect 7 0 8 0;
#X connect 8 0 1 0;
#X connect 8 1 3 0;
#X connect 8 1 10 0;
#X connect 8 2 4 0;
#X connect 8 2 10 1;
#X connect 8 3 9 0;
#X connect 8 3 10 2;
#X connect 10 0 11 0;
#X connect 12 0 8 0;
#X connect 17 0 8 0;
#X connect 19 0 8 0;
#X connect 21 0 8 0;
#X connect 23 0 6 0;
#X connect 23 0 17 0;
#X connect 23 0 12 0;
#X connect 23 0 19 0;
|
