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
|
// fft.ck: taking FFT via upchcuk, printing the spectrum
// authors: Rebecca Fiebrink and Ge Wang
// our patch
SinOsc g => FFT fft => blackhole;
// set srate
second / samp => float srate;
// set parameters
8 => fft.size;
// divide
int div;
// control loop
while( true )
{
// set freq
srate / fft.size() * div++ => g.freq;
fft.size()/2 %=> div;
// take fft
fft.upchuck();
// examine contents
<<< fft.cval(0)$polar, fft.cval(1)$polar,
fft.cval(2)$polar, fft.cval(3)$polar >>>;
// advance time
100::ms => now;
}
|
