wanderer[] tracers; 
int numberOfTracers = 1000;
int tracerSteps=100;
float tracerEndurance=1.0f/tracerSteps;

grid intensityGrid;
grid velocityGrid;
grid accelerationGrid;
int drawX, drawY, maxX, maxY;
float sqrthalf=sqrt(2.0f)/2.0f;
float[] parameters=new float[9];
int shiftX, shiftY;
float range=4.0f;
float drawingScale=200.0f;
float maxValue;
int colorPalette;
boolean SAVING;
float mouseStartDragX;
float mouseStartDragY;
float mouseEndDragX;
float mouseEndDragY;

framePoster fPost = new framePoster("strangeSymmetry","strangeSymmetry");


void setup(){
  size(800,800);
  background(255);
  reset();
  SAVING=false;
  colorPalette=0;
}

void reset(){
  background(255);
  tracers= new wanderer[numberOfTracers];
  initParameters();
  for(int w=0;w<numberOfTracers;w++) tracers[w]=new wanderer(random(-range,range), random(-range,range),parameters);
  shiftX=shiftY=0;
  intensityGrid=new grid(width, height);
  velocityGrid=new grid(width, height);
  accelerationGrid=new grid(width, height);
  determineShift();
}

void initParameters(){
  for(int i=0;i<8;i++){
    parameters[i]= random(-2.0f,2.0f);
  }
  parameters[8]=random(0.0f,1.0f);
}

void determineShift(){
  for(int t=0;t<numberOfTracers;t++){
    for (int s=0;s<5*tracerSteps;s++){
      tracers[t].update();
      drawX=int(sqrthalf*drawingScale* tracers[t].currentX+sqrthalf*drawingScale* tracers[t].currentY);
      drawY=int(sqrthalf*drawingScale* tracers[t].currentY-sqrthalf*drawingScale* tracers[t].currentX);
      if((drawX>=0)&&(drawX<width)&&(drawY>=0)&&(drawY<height)){
        intensityGrid.addValue(drawX,drawY,1.0f);
      }
      if(random(1.0f)<tracerEndurance) tracers[t]=new wanderer(random(-range,range), random(-range,range),parameters);
    }
  }
  intensityGrid.update(); 
  shiftX=width/2-int(intensityGrid.cogX);
  shiftY=height/2-int(intensityGrid.cogY);
  intensityGrid=new grid(width, height);
}


void draw(){
  if(!SAVING){
    for(int t=0;t<numberOfTracers;t++){
      for (int s=0;s<tracerSteps;s++){
        tracers[t].update();
        drawX=int(shiftX+sqrthalf*drawingScale* tracers[t].currentX+sqrthalf*drawingScale* tracers[t].currentY);
        drawY=int(shiftY+sqrthalf*drawingScale* tracers[t].currentY-sqrthalf*drawingScale* tracers[t].currentX);
        if((drawX>=0)&&(drawX<width)&&(drawY>=0)&&(drawY<height)){
          intensityGrid.addValue(drawX,drawY,1.0f);
          velocityGrid.addValue(drawX,drawY,tracers[t].velocity);
          accelerationGrid.addValue(drawX,drawY,tracers[t].acceleration);

        }
        if(random(1.0f)<tracerEndurance) tracers[t]=new wanderer(random(-range,range), random(-range,range),parameters);
      }
    }

    intensityGrid.update();
    velocityGrid.update();
    accelerationGrid.update();

    loadPixels();
    for(int i=0;i<width*height;i++){
      pixels[i]=colorGrid(i);
    }
    updatePixels();
  }
}

color colorGrid(int i){
  color result;
  switch(colorPalette) {

  case 0: 
    result = color(255-intensityGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i],255-accelerationGrid.eightBitValues[i]);
    break;
  case 1: 
    result = color(255-intensityGrid.eightBitValues[i],255-accelerationGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i]);
    break;
  case 2: 
    result = color(255-accelerationGrid.eightBitValues[i],255-intensityGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i]);
    break;
  case 3: 
    result = color(255-accelerationGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i],255-intensityGrid.eightBitValues[i]);
    break;
  case 4: 
    result = color(255-velocityGrid.eightBitValues[i],255-accelerationGrid.eightBitValues[i],255-intensityGrid.eightBitValues[i]);
    break;
  case 5: 
    result = color(255-velocityGrid.eightBitValues[i],255-intensityGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i]);
    break; 
  case 6: 
    result = color(255-intensityGrid.eightBitValues[i],255-intensityGrid.eightBitValues[i],255-intensityGrid.eightBitValues[i]);
    break;
  case 7: 
    result = color(255-velocityGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i],255-velocityGrid.eightBitValues[i]);
    break;
  case 8: 
    result = color(255-accelerationGrid.eightBitValues[i],255-accelerationGrid.eightBitValues[i],255-accelerationGrid.eightBitValues[i]); 
    break;
  case 9: 
    result = color(intensityGrid.eightBitValues[i],velocityGrid.eightBitValues[i],accelerationGrid.eightBitValues[i]);
    break;
  case 10: 
    result = color(intensityGrid.eightBitValues[i],accelerationGrid.eightBitValues[i],velocityGrid.eightBitValues[i]);
    break;
  case 11: 
    result = color(accelerationGrid.eightBitValues[i],intensityGrid.eightBitValues[i],velocityGrid.eightBitValues[i]);
    break;
  case 12: 
    result = color(accelerationGrid.eightBitValues[i],velocityGrid.eightBitValues[i],intensityGrid.eightBitValues[i]);
    break;
  case 13: 
    result = color(velocityGrid.eightBitValues[i],accelerationGrid.eightBitValues[i],intensityGrid.eightBitValues[i]);
    break;
  case 14: 
    result = color(velocityGrid.eightBitValues[i],intensityGrid.eightBitValues[i],velocityGrid.eightBitValues[i]);
    break; 
  case 15: 
    result = color(intensityGrid.eightBitValues[i],intensityGrid.eightBitValues[i],intensityGrid.eightBitValues[i]);
    break;
  case 16: 
    result = color(velocityGrid.eightBitValues[i],velocityGrid.eightBitValues[i],velocityGrid.eightBitValues[i]);
    break;
  case 17: 
    result = color(accelerationGrid.eightBitValues[i],accelerationGrid.eightBitValues[i],accelerationGrid.eightBitValues[i]); 
    break;
  case 18:

  default:
    result = color(0);
    break;
  }





  return result;
}

void mousePressed(){
  mouseStartDragX=mouseX;
  mouseStartDragY=mouseY;
}

void mouseReleased(){
  boolean redrawNeeded=false;
  mouseEndDragX=mouseX;
  mouseEndDragY=mouseY;
  if (dist(mouseStartDragX, mouseStartDragY,mouseEndDragX,mouseEndDragY)>20){
      shiftX+=mouseEndDragX-mouseStartDragX;
      shiftY+=mouseEndDragY-mouseStartDragY;
    redrawNeeded=true;
  }
  if(redrawNeeded){
    intensityGrid=new grid(width, height);
    velocityGrid=new grid(width, height);
    accelerationGrid=new grid(width, height);
  }
}

void keyReleased() { 
  boolean redrawNeeded=false;
  if(key == CODED) { 
    if (keyCode == UP) { 
      shiftY-=10;
      redrawNeeded=true;
    } 
    else if (keyCode == DOWN) { 
      shiftY+=10;
      redrawNeeded=true;
    } 
    else if (keyCode == RIGHT) { 
      shiftX+=10;
      redrawNeeded=true;
    } 
    else if (keyCode == LEFT) { 
      shiftX-=10;
      redrawNeeded=true;
    } 
  } 
  else if ((key == ' ')&&(!SAVING)) {      
    SAVING=true;
    fPost.postFrame();   
  }
  else if ((key == 'c')||(key =='C')) {
    colorPalette++;
    if (colorPalette>17) colorPalette=0;
  }
  else if ((key == 'r')||(key =='R')) {
    shiftX+=width/2-mouseX;
    shiftY+=height/2-mouseY;
    redrawNeeded=true;

  }
  else if (key == '-') { 
    if (drawingScale>1.0f){
      drawingScale*=0.9f;
      shiftX=(int)(width/2-0.9f*(width/2-shiftX));
      shiftY=(int)(height/2-0.9f*(height/2-shiftY));
    }
    redrawNeeded=true;
  }
  else if (key == '+') { 
    drawingScale*=1.1f;
    shiftX=(int)(width/2-1.1f*(width/2-shiftX));
    shiftY=(int)(height/2-1.1f*(height/2-shiftY));
    redrawNeeded=true;
  }
  else{
    reset();
  } 

  if(redrawNeeded){
    intensityGrid=new grid(width, height);
    velocityGrid=new grid(width, height);
    accelerationGrid=new grid(width, height);
  }

}