PGraphics canvas;
PImage blurredCanvas;
square[][][] grid;
float[][][] values;
int res=40;
float halfres=20.5;
float scale;
float noiseScale;
float noiseChange;
int inc;
boolean lores;


void setup(){
  size(800,800);
  background(0);
  noFill();

  canvas=createGraphics(800,800,P3D);
  canvas.beginDraw();
  canvas.background(0);
  canvas.noFill();
  canvas.endDraw();
  
  blurredCanvas=createImage(800,800, RGB);

  lores=true;
  scale=18.0f; 
  inc=200;
  noiseDetail(8,0.5f);
  grid = new square[res][res][2*inc+1];
  values = new float[res+1][res+1][2*inc+1];
  noiseScale=20.0f;
  noiseChange=200.0f;
  for(int i=0;i<res+1;i++){
    for(int j=0;j<res+1;j++){
      for(int k=0;k<2*inc+1;k++){
        values[i][j][k]=noise(i/noiseScale,j/noiseScale,k/noiseChange);
      }
    }
  }
  for(int i=0;i<res;i++){
    for(int j=0;j<res;j++){
      for(int k=0;k<2*inc+1;k++){
        grid[i][j][k]=new square(values[i][j][k],values[i+1][j][k],values[i+1][j+1][k],values[i][j+1][k]);    
      }
    }
  }


}


void draw(){

   canvas.beginDraw();
   canvas.translate(400,400,-100);  
  canvas.background(0);
  if (lores){   
    noTint();
    canvas.stroke(255,150);
    for(int i=0;i<res;i++){
      for(int j=0;j<res;j++){
        for(int k=0;k<2*inc+1;k+=20){

          grid[i][j][k].draw((i-halfres)*scale,(j-halfres)*scale,scale,mouseY/800.0f,k-inc,canvas);
        }
      }
    }
    image(canvas,0,0);
  }
  else{
    
    canvas.stroke(255,255,180,40);
    for(int i=0;i<res;i++){
      for(int j=0;j<res;j++){
        for(int k=0;k<2*inc+1;k++){

          grid[i][j][k].draw((i-halfres)*scale,(j-halfres)*scale,scale,mouseY/800.0f,k-inc,canvas);
        }
      }
    }
    blurredCanvas.copy(canvas,0,0,800,800,0,0,800,800);
    blurredCanvas.filter(BLUR,8);
    tint(255,0,0);
    image(blurredCanvas,0,0);      
    blend(canvas,0,0,800,800,0,0,800,800,ADD);
  }
  noLoop();
canvas.endDraw();


}

void keyReleased(){


  background(0);

  canvas.beginDraw();
  canvas.background(0);
  canvas.endDraw();

  grid = new square[res][res][2*inc+1];
  values = new float[res+1][res+1][2*inc+1]; 
  for(int i=0;i<res+1;i++){
    for(int j=0;j<res+1;j++){
      for(int k=0;k<2*inc+1;k++){
        values[i][j][k]=noise(i/noiseScale,j/noiseScale,k/noiseChange);
      }
    }
  }
  for(int i=0;i<res;i++){
    for(int j=0;j<res;j++){
      for(int k=0;k<2*inc+1;k++){
        grid[i][j][k]=new square(values[i][j][k],values[i+1][j][k],values[i+1][j+1][k],values[i][j+1][k]);    
      }
    }
  }
  lores=true;
  loop();
}

void mouseReleased(){
  lores=!lores;
  loop();
}

void mouseMoved(){
  if (lores) loop();
}