design/analysis/fc-1b-auto.ck

   1 Noise n => FFT fft =^ UAnaOp oper =^ IFFT ifft => dac;
   2
   3 // do multiply
   4 3 => oper.op;
   5 // something to multiply
   6 Spectrum spec => oper;
   7
   8 // set the spec to arbitrary complex buffer
   9 spec.set( rspectrum );
  10
  11 // set window and size
  12 Window.hamming(512) => fft.window;
  13 // set FFT size (implicit zero padding)
  14 2048 => fft.size;
  15
  16 // set window and size
  17 Window.hamming(512) => ifft.window;
  18
  19 // go
  20 while( true )
  21 {
  22     // process ifft, overlap add result to buffer
  23     // will return samples to UGen's downstream, possibly
  24     // 0's if ifft not recently taken and data has been
  25     // consumed...
  26     ifft.upchuck();
  27
  28     // advance time (implicit hop size)
  29     128::samp => now;
  30 }