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

// ripples in 3D
// by Steven Kay
 
Minim minim;
AudioOutput out;
SineWave wave;
PinkNoise beat;
SawWave beatEnv;

HighPassSP filter1;
FFT fft;

int RIPPLES=3;
color to=color(0); // bg color cycling extreme colours
color from=color(77,0,77);
float CYCLEPERIOD=100.0; // bg color cycling speed
float DAMPING=0.998; // speed ripples fade at, low value=faster

float currentx, currenty;

float[][] points = new float[100][2]; 

int separation;

class source{
  public float x;
  public float y;
  public float amp;
  public float wavelength;
   
  public source(float _x,float _y, float _amp,float _wave) {
    x=_x;y=_y;amp=_amp;wavelength=_wave;
  }
   
  public float getPart(float xx,float yy,float time) {
    float distt=mag(xx-x,yy-y);
    return amp*(float)Math.cos(((time-distt)/wavelength));
  }
 
  public void fade() {
    amp*=DAMPING; // damping factor
  } 
}
 
ArrayList ripples;
 
void setup() {
  size(400,400,P3D);
  sphereDetail(15);
  frameRate(30);
  for(int i=0;i<points.length; i++){
    points[i][0] = (float)Math.random()*100-50;
    points[i][1] = (float)Math.random()*100-50;
  }
  reset();
  minim = new Minim(this);
  filter1 = new HighPassSP(85, 44100);
  out=minim.getLineOut(Minim.STEREO, 512);
  wave = new SineWave(1000, 1, 44100);
  wave.setPan(-1.0);
  wave.portamento(100);
  out.addSignal(wave);
  beat = new PinkNoise();
  beat.setPan(-1.0);
  out.addSignal(beat);
  beatEnv = new SawWave(2, 1, 44100);
  beatEnv.setPan(1.0);
  out.addSignal(beatEnv);
  fft = new FFT(out.bufferSize(), out.sampleRate());
  currentx = 0.0;
  currenty = 0.0;
  separation = 10;
  out.mute();
  noLoop();
}
 
void reset() {
  ripples=new ArrayList();
  for (int i=0;i<RIPPLES;i++) {
    addNewRipple(); 
  }
}
 
void mousePressed() {
  loop();
  out.unmute();
  reset();
}
 
//void keyPressed() {
//  addNewRipple();
//}
 
void addNewRipple() {
  ripples.add(new source(random(-100,100),random(-100,100),random(2,60),random(12,24)));
}
 
void draw() {
  beat.setAmp(out.right.get(0));
  //if (frameCount%10==0) print(""+frameRate+"fps\n");
  //background(lerpColor(from,to,.5+.5*(float)Math.cos(frameCount/CYCLEPERIOD)));
  background(0);
  fft.forward(out.mix);
 
  stroke(255, 0, 0, 128);
  // draw the spectrum as a series of vertical lines
  // I multiple the value of getBand by 4 
  // so that we can see the lines better
  for(int i = 0; i < fft.specSize(); i++)
  {
    line(i, height, i, height - fft.getBand(i)*4);
  }
  stroke(255);
  for(int i = 0; i < out.bufferSize() - 1; i++)
  {
    line(i, 50 + out.left.get(i)*50, i+1, 50 + out.left.get(i+1)*50);
    line(i, 50 + out.right.get(i)*50, i+1, 50 + out.right.get(i+1)*50);  
  }
  noStroke();
   
  // fade waves out over time
  for (int i=0;i<ripples.size();i++) {
    source s=(source)ripples.get(i);
    s.fade();
  }
   
  translate(200,200, 100);
  rotateX(mouseY/300.0);
   
  float totalAmp=0.0;
   
  //float x, y; 
  float xrange = 100.0;
  float yrange = 100.0;
  for (float y=-yrange;y<yrange;y+=separation) {
    for (float x=-xrange;x<xrange;x+=separation) {
  //for(int j=0; j<points.length; j++){
      
      //x= points[j][0];   
      //y= points[j][1]; 
      // sum of waves from different sources at this point
      float hite=50;
      for (int i=0;i<ripples.size();i++) {
        source s=(source)ripples.get(i);
        hite+=s.getPart(x,y,(float)frameCount);
      }
      
        float h=hite;
      if(y==currenty && x==currentx){
      
      //if(j==0){
        wave.setFreq((hite+40)*5);
        //print(wave.frequency() + "\n");
        fill(h+25,0,0);
        stroke(h+25,0,0);
      } else {
        // brightness level
        // NORMALIZE THIS;
        fill(h+100);
        stroke(h+100);
      }
      totalAmp+=Math.abs(hite); // has to be abs() or settles far too fast ;-)
       
     if(y==currenty && x==currentx){
      //if (h>100) {
        // don't bother unless cube bright enough to see :)
        pushMatrix();
        translate(x,y,hite/4);
        sphere(5);
        popMatrix();
      } else {
        point(x, y, hite/4);
      }
      //}
       
    }
  }
  // once settled down to a calm sea, start again
  if (totalAmp<2000.0) {
    print ("Settled down, start again");
    reset();
  } else {
    //if (frameCount%10==0) print ("TotalAmp="+totalAmp+"\n");
    ;
  }
}

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

void keyPressed() {
  if(key == 'w'){
      currenty-=separation;
  } else if(key == 's'){
      currenty+=separation;
  } else if(key == 'a'){
    currentx-=separation;
  } else if(key == 'd'){
    currentx+=separation;
  }
}