blob: fb6730d244a6ea4284bc9aebe112638d91540360 (
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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
#N canvas 370 65 588 508 10;
#X msg 147 208 reset;
#X obj 21 50 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
#X obj 297 54 adc~;
#X obj 38 170 tabread4 array1;
#X obj 21 69 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
;
#X obj 332 55 table array1 1024;
#X obj 208 212 loadbang;
#X obj 191 214 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#N canvas 0 0 306 167 analysis 0;
#X obj 24 -205 inlet~;
#X obj 26 -135 tabsend~ array1;
#X obj 24 -184 rfft~;
#X obj 25 -157 expr~ sqrt($v1*$v1+$v2*$v2)/64;
#X obj 148 -198 block~ 1024;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 3 1;
#X connect 3 0 1 0;
#X restore 298 77 pd analysis;
#X obj 284 256 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
-1 0;
#X obj 190 291 loadbang;
#X obj 173 293 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 38 68 for 0 320 1;
#X obj 38 189 * 2000;
#X text 303 257 black stripes;
#X text 302 270 graph;
#X obj 38 117 / 2;
#X text 83 189 <-- adding some extra gain;
#X obj 81 138 exp;
#X obj 194 136 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
-1 0;
#X text 216 136 linear;
#X text 214 150 logarithmic;
#X obj 82 117 / 51;
#X obj 38 395 #fade;
#X obj 130 396 loadbang;
#X msg 79 395 16 4 1;
#X obj 38 49 metro 23.22;
#X text 115 117 = 1000*1024/44100;
#X obj 38 208 #import ( 320 );
#X obj 38 227 # *>>8;
#X obj 38 246 #fade 2;
#X obj 38 309 # inv+ 255;
#X obj 113 292 #outer <;
#X obj 113 311 # * 255;
#X obj 113 330 #transpose;
#X obj 38 357 #redim (120 320 1);
#X obj 38 376 #greyscale_to_rgb;
#X obj 38 414 #clip;
#X obj 38 433 #scale_by 2;
#X obj 38 452 #out window;
#X obj 6 476 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
0;
#X text 14 483 GridFlow 0.8.0;
#X text 14 483 GridFlow 0.8.0;
#X obj 6 5 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
0;
#X text 19 5 spectrogram.pd;
#X obj 173 310 #for 120 0 -1;
#X obj 191 231 #for 0 320 1;
#X obj 191 250 # + 10;
#X text 19 18 Copyright 2004 Mathieu Bouchard;
#X obj 38 91 shunt 2;
#X obj 38 265 shunt 2;
#X connect 0 0 28 0;
#X connect 1 0 26 0;
#X connect 2 0 8 0;
#X connect 2 1 8 0;
#X connect 3 0 13 0;
#X connect 4 0 12 0;
#X connect 6 0 7 0;
#X connect 7 0 46 0;
#X connect 9 0 50 1;
#X connect 10 0 11 0;
#X connect 11 0 45 0;
#X connect 12 0 49 0;
#X connect 13 0 28 0;
#X connect 16 0 3 0;
#X connect 18 0 3 0;
#X connect 19 0 49 1;
#X connect 22 0 18 0;
#X connect 23 0 37 0;
#X connect 24 0 25 0;
#X connect 25 0 23 1;
#X connect 26 0 12 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 50 0;
#X connect 31 0 35 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 23 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 45 0 32 1;
#X connect 46 0 47 0;
#X connect 47 0 29 1;
#X connect 49 0 16 0;
#X connect 49 1 22 0;
#X connect 50 0 31 0;
#X connect 50 1 32 0;
|
