import ddf.minim.analysis.*;
import ddf.minim.*;
import ddf.minim.signals.*;
import ddf.minim.effects.*;

Minim minim;
AudioOutput out;
AudioInput in;
int bufferSize = 256;
float rate = 8192f*2f;
int totalBuzzers = 5;
FFT inputFFT;
float tableWidth  = 10;
float tableHeight = 10;
Buzzer[] buzzers;
InputOutputBind ambientSignal;
PFont font;

void setup()
{
  size(1000,600);
  frameRate(30);
  background(0);
  fill(100);

  font = loadFont("Ziggurat-HTF-Black-32.vlw");  
  textFont(font, 12);

  minim = new Minim(this); 
  in  = minim.getLineIn(Minim.MONO, bufferSize, rate);
  out = minim.getLineOut(Minim.STEREO, bufferSize, rate);
  ambientSignal = new InputOutputBind(bufferSize);
  in.addListener(ambientSignal);

  inputFFT = new FFT(bufferSize, rate);
  buzzers = new Buzzer[totalBuzzers];
  for (int i=0; i<totalBuzzers; i++){
    buzzers[i] = new Buzzer(this);
  }

  for (int i=0; i<totalBuzzers; i++){
    buzzers[i].init();
    out.addSignal(buzzers[i].voice);
  }
}

void draw() {
//  in  = minim.getLineIn(Minim.MONO, bufferSize, rate);
//  out = minim.getLineOut(Minim.STEREO, bufferSize, rate);
//  ambientSignal = new InputOutputBind(bufferSize);
//  in.addListener(ambientSignal);
  
  out.clearSignals();
  for (int i=0; i<totalBuzzers; i++){
    out.addSignal(buzzers[i].voice);
//    out.addSignal(new SquareWave(buzzers[i].freq, buzzers[i].ampli, rate));
  }

  inputFFT.forward(in.mix);
  float unitWidth = width;
  float unitHeight = (float)height / (float)(totalBuzzers+1);
  drawEnvironment(0,0,(int)unitWidth, (int)unitHeight);
  for (int i =0; i<totalBuzzers; i++){
    drawBuzzer(buzzers[i], 0, (int)(unitHeight*(i+1)), (int)unitWidth, (int)unitHeight);
  }
}

void drawEnvironment(int x, int y, int unitWidth, int unitHeight){
  float bufferScale = 100;
  fill(0,0,0,100);
  stroke(255);
  rect(x, y, unitWidth, unitHeight);
  for (int i=20 ; i<unitWidth/2 -21 ; i++) {
    int buffIndex = (int)map(i, 20, unitWidth/2 - 20, 0, bufferSize);
    int nextBuffIndex = (int)map(i+1, 20, unitWidth/2 - 20, 0, bufferSize);
    line(i ,unitHeight/2 - bufferScale*in.mix.get(buffIndex), i+1, unitHeight/2 - bufferScale*in.mix.get(nextBuffIndex));
  }   

  float fftScale = 10000;
  for (int i=unitWidth/2 + 20; i<unitWidth -21 ; i++) {
    int bandIndex     = (int)map(i, 20, unitWidth/2 + 20, 0, inputFFT.specSize());
    int nextBandIndex = (int)map(i+1, 20, unitWidth - 20, 0, inputFFT.specSize());
    line(i ,unitHeight/2 - fftScale*inputFFT.getBand(bandIndex), i+1, unitHeight/2 - fftScale*inputFFT.getBand(nextBandIndex));
  }   
}


void drawBuzzer(Buzzer b, int x, int y, int unitWidth, int unitHeight){
  b.calc();

  fill(0,0,0,50);
  rect(x, y, unitWidth, unitHeight);
  stroke(200);
  line(10, y+unitHeight/2, unitWidth/3 -20, y + unitHeight/2);
  fill(0, 255, 0);
  text("freq  = " + b.freq, 20, y+20);
  text("ampli = " + b.ampli, 20, y+40);
  text("multiplier = " + b.freqMultiplier, 20, y+60);

  float bufferScale = 3000;
  for (int i=10 ; i<unitWidth/3 -11 ; i++) {
    int buffIndex = (int)map(i, 10, unitWidth/3 - 10, 0, bufferSize);
    int nextBuffIndex = (int)map(i+1, 10, unitWidth/3 - 10, 0, bufferSize);
    line(i ,y + unitHeight/2 - bufferScale*b.world.mix.get(buffIndex), i+1, y + unitHeight/2 - bufferScale*b.world.mix.get(nextBuffIndex));
  }   

  stroke(200);
  float fftScale = 300;
  for (int i=unitWidth/3 + 10; i<2*unitWidth/3 -11 ; i++) {
    int bandIndex     = (int)map(i  , unitWidth/3 +10, 2*unitWidth/3 - 11, 0, inputFFT.specSize());
    int nextBandIndex = (int)map(i+1, unitWidth/3 +10, 2*unitWidth/3 - 11, 0, inputFFT.specSize());
    line(i ,y + unitHeight-10 - fftScale*b.fft.getBand(bandIndex), i+1, y + unitHeight-10 - fftScale*b.fft.getBand(nextBandIndex));
  }
  stroke(0,255,0);  
  int freqIndex = (int)(b.freq*(float)bufferSize/rate);
  int pix = (int)map(freqIndex, 0, inputFFT.specSize(), unitWidth/3 + 10, 2*unitWidth/3 - 11);
  line(pix, y + unitHeight-10, pix, y + unitHeight - 10 - (unitHeight-20)*b.ampli);

  float freqScale  = 50;
  float ampliScale = unitHeight - 10;
  for (int i=2*unitWidth/3 + 10; i<unitWidth -11 ; i++) {
    int historyIndex     = (int)map(i  , 2*unitWidth/3 + 10, unitWidth - 11, b.freqHistory.length-1, 0);
    int nextHistoryIndex = (int)map(i+1, 2*unitWidth/3 + 10, unitWidth - 11, b.freqHistory.length-1, 0);

    stroke(0, 255, 0);
    line(i ,y + unitHeight -10 - freqScale*(log(b.freqHistory[historyIndex])-6),   i+1, y + unitHeight - 10 - freqScale*(log(b.freqHistory[nextHistoryIndex]) -6));
    stroke(255, 0, 0);
    line(i ,y + unitHeight -10 - freqScale*(log(b.avgFreqHistory[historyIndex])-6),   i+1, y + unitHeight - 10 - freqScale*(log(b.avgFreqHistory[nextHistoryIndex]) -6));
    stroke(0, 0, 255);
    line(i ,y + unitHeight -10 - ampliScale*b.ampliHistory[historyIndex], i+1, y + unitHeight -10 - ampliScale*b.ampliHistory[nextHistoryIndex]);
  }   
}

void stop()
{
  out.close();
  minim.stop();
  super.stop();
}