import processing.pdf.*;
import proxml.*;

XMLElement xmeml;
XMLInOut xmlInOut;
String filename = "islamic-penrose.xml";

color bg = color(255);

boolean record;
ArrayList scales = new ArrayList();
ArrayList tiledraws = new ArrayList();
float W_HEXA = 340.543;
float H_HEXA = 221.445;
float W_DODECA = 579.359;
float H_DODECA = 551.007;
float W_BOWTIE = 358.575;
float H_BOWTIE = 130.196;

float scale_jump = (68.483/579.572);

Scale scale_main;

//float scale_jump = 80;

/*
{{dodecagons},
 {bowties},
 {hexagons}}
*/
 
float[][] x_d = {{110.766, 179.137, 200.318, 289.913},
                 {55.38, 144.926, 155.474, 217.421, 251.452, 234.53, 245.04, 272.613},
                 {61.87, 138.381, 196.231, 234.414, 272.569, 261.995, 227.934, 251.474, 289.628}};
float[][] y_d = {{0, 0, 64.969, 0},
                 {0, 64.975, 32.612, 117.579, 117.645, 0, 32.623, 52.708},
                 {20.047, 44.898, 117.541, 105.198, 117.633, 85.172, 20.236, 52.722, 65.108}};
float[][] t_d = {{0, 0, 0, 0},
                 {0, 0, PI/5.0, 2.0*PI/5.0, 3.0*PI/5.0, 0, -PI/5.0, -2.0*PI/5.0},
                 {PI/10.0, PI/10.0, 3.0*PI/10.0, HALF_PI, 7.0*PI/10.0, PI/10.0, -PI/10.0, 7.0*PI/10.0, HALF_PI}};


float[][] x_b = {{0, 68.637, 89.699, 89.699, 179.336, -68.637, -89.699, -89.699, -179.336},
                 { 44.85,  44.85,  -44.85,  -44.85, 123.971, -123.971, 134.563, 134.563, -134.563, -134.563, 145.08, 145.08, -145.08, -145.08},
                 {27.736, 27.736, -27.736, -27.736, 117.428, 117.428, -117.428, -117.428, 151.619, 151.619, -151.619, -151.619, 151.635, 151.635, -151.635, -151.635, 179.294, 179.294, -179.294, -179.294}};
float[][] y_b = {{0,      0,  65.23, -65.23,       0,       0,   65.23,  -65.23,        0},
                 {32.621, -32.621, 32.621, -32.621,       0,        0,  32.621, -32.621,   32.621,  -32.621, 64.855, -64.855, 64.855, -64.855},
                 {45.031, -45.031, 45.031, -45.031,  20.168,  -20.168,  20.168,  -20.168, 44.742, -44.742, 44.742, -44.742, 84.955, -84.955, 84.955, -84.955,  64.845,  -64.845,  64.845,  -64.845}};
float[][] t_b = {{0,      0,      0,      0,       0,       0,        0,      0,        0},
                 {PI/5.0, -PI/5.0, -PI/5.0, PI/5.0, 0, 0, -PI/5.0, PI/5.0, PI/5.0, -PI/5.0, 0, 0, 0, 0},
                 {PI/10.0, -PI/10.0, -PI/10.0, PI/10.0, -PI/10.0, PI/10.0, PI/10.0, -PI/10.0, -PI/10.0, PI/10.0, PI/10.0, -PI/10.0, PI/10.0, -PI/10.0, -PI/10.0, PI/10.0, HALF_PI, HALF_PI, HALF_PI, HALF_PI}};



float[][] x_h = {{0, 40.222, 40.222, -40.222, -40.222,       0,        0,  130.174, -130.174, 170.395, 170.395, -170.395, -170.395},
                 {52.651, 52.651, -52.651, -52.651,      0,      0, 52.651, 52.651, -52.651, -52.651, 117.742, 117.742, -117.742, -117.742, 117.742, 117.742, -117.742, -117.742, 182.823, 182.823, -182.823, -182.823},
                 {85.202, 85.202, -85.202, -85.202, 85.202, 85.202, -85.202, -85.202, 65.083, 65.083, 65.083, -65.083, -65.083, -65.083, 105.313, 105.313, -105.313, -105.313, 117.742, 117.742, -117.742, -117.742, 223.046, 223.046, -223.046, -223.046, 195.236, -195.236}};
float[][] y_h = {{0, 55.362, -55.362, 55.362, -55.362, 110.721, -110.721,        0,        0,  55.359, -55.359,   55.359,  -55.359},
                 {17.108, -17.108, 17.108, -17.108, 55.358, 55.358, 93.612, -93.612, 93.612, -93.612, 38.254, -38.254, 38.254, -38.254, 72.465, -72.465, 72.465, -72.465, 17.105, -17.105, 17.105, -17.105},
                 {27.681, -27.681, 27.681, -27.681, 83.038, -83.038, 83.038, -83.038, 110.721, 0, -110.721, 110.721, 0, -110.721, 55.359, -55.359, 55.359, -55.359, 93.611, -93.611, 93.611, -93.611, 17.106, -17.106, 17.106, -17.106, 0, 0}};
float[][] t_h = {{PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0, PI/10.0},
                 {PI/10.0, -PI/10.0, -PI/10.0, PI/10.0, HALF_PI, HALF_PI, -PI/10.0, PI/10.0, PI/10.0, -PI/10.0, PI/10.0, -PI/10.0, -PI/10.0, PI/10.0, -PI/10.0, PI/10.0, PI/10.0, -PI/10.0, PI/10.0, -PI/10.0, -PI/10.0, PI/10.0},
                 {-PI/2.5, PI/2.5, PI/2.5, -PI/2.5, PI/2.5, -PI/2.5, -PI/2.5, PI/2.5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -PI/5.0, PI/5.0, PI/5.0, -PI/5.0, -PI/5.0, PI/5.0, PI/5.0, -PI/5.0, 0, 0}};
float[][] rl_d, tl_d, rl_b, tl_b, rl_h, tl_h;

void setup(){
  size(600, 600);
  smooth();
  frameRate(15);
  
  xmlInOut = new XMLInOut(this);
  try{
    xmlInOut.loadElement("data/"+filename); 
  }catch(Exception e){
    println("couldn't load xml");
    //if the xml file could not be loaded it has to be created
    xmlEvent(new XMLElement("xmeml"));
  }
  
  
  float[][] new_x_d = {new float[x_d[0].length*10 + 1],
                       new float[x_d[1].length*10],
                       new float[x_d[2].length*10]};
  float[][] new_y_d = {new float[x_d[0].length*10 + 1],
                       new float[x_d[1].length*10],
                       new float[x_d[2].length*10]};
  float[][] new_t_d = {new float[x_d[0].length*10 + 1],
                       new float[x_d[1].length*10],
                       new float[x_d[2].length*10]};
  for(int i=0; i<x_d.length; i++){
    int new_i = 0;
    for(int j=0; j < 10; j++){
      float t = j*(PI/5.0);
      for(int k=0; k<x_d[i].length; k++){
        float old_t = atan2(y_d[i][k], x_d[i][k]);
        float r = sqrt(sq(x_d[i][k]) + sq(y_d[i][k]));
        new_x_d[i][new_i] = r*cos(old_t+t);
        new_y_d[i][new_i] = r*sin(old_t+t);
        new_t_d[i][new_i] = t_d[i][k] + t;
        new_i++;
      }
    }
  }
  
  new_x_d[0][new_x_d[0].length-1] = 0;
  new_y_d[0][new_x_d[0].length-1] = 0;
  new_t_d[0][new_x_d[0].length-1] = 0;
  
  x_d = new_x_d;
  y_d = new_y_d;
  t_d = new_t_d;
  cx = width/2;
  cy = height/2;
  float[][] rl_d2 = {new float[x_d[0].length], new float[x_d[1].length], new float[x_d[2].length]}; rl_d = rl_d2;
  float[][] tl_d2 = {new float[x_d[0].length], new float[x_d[1].length], new float[x_d[2].length]}; tl_d = tl_d2;
  float[][] rl_b2 = {new float[x_b[0].length], new float[x_b[1].length], new float[x_b[2].length]}; rl_b = rl_b2;
  float[][] tl_b2 = {new float[x_b[0].length], new float[x_b[1].length], new float[x_b[2].length]}; tl_b = tl_b2;
  float[][] rl_h2 = {new float[x_h[0].length], new float[x_h[1].length], new float[x_h[2].length]}; rl_h = rl_h2;
  float[][] tl_h2 = {new float[x_h[0].length], new float[x_h[1].length], new float[x_h[2].length]}; tl_h = tl_h2;
  for(int i=0; i<x_d.length; i++){
    for(int j=0; j < x_d[i].length; j++){
      println(y_d[i].length+", "+j);
      rl_d[i][j] = sqrt(sq(x_d[i][j]) + sq(y_d[i][j]));
      tl_d[i][j] = atan2(y_d[i][j], x_d[i][j]);
    }
  }
  for(int i=0; i<x_b.length; i++){
    for(int j=0; j < x_b[i].length; j++){
      rl_b[i][j] = sqrt(sq(x_b[i][j]) + sq(y_b[i][j]));
      tl_b[i][j] = atan2(y_b[i][j], x_b[i][j]);
    }
  }
  for(int i=0; i<x_h.length; i++){
    for(int j=0; j < x_h[i].length; j++){
      rl_h[i][j] = sqrt(sq(x_h[i][j]) + sq(y_h[i][j]));
      tl_h[i][j] = atan2(y_h[i][j], x_h[i][j]);
    }
  }
}
float cx, cy;
float scaler_main = 2.0;
boolean tiledraws_loaded = false;
void draw(){
  if(loaded){  
    if(!tiledraws_loaded){
      loadScales(scaler_main);
    }
    if (record) {
      beginRecord(PDF, "frame-####.pdf"); 
    }
    pushMatrix();
    translate(cx, cy);
    background(c_bg);

    scale_main.draw();
    popMatrix();
    if (record) {
      endRecord();
      record = false;
    }
    zoom_out();
  }
}

void mousePressed() {
  println("recording");
  record = true;
}
void keyPressed(){
  if(key == '-' || key == '_'){
    zoom_out();
  } else if(key == '+' || key == '='){
    zoom_in();
  }
}

void zoom_out(){
  scaler_main *= .98;
  if(scaler_main < 1.0) scaler_main /= scale_jump;
  loadScales(scaler_main);
}
void zoom_in(){
  scaler_main *= 1.0/.98;
  if(scaler_main > 1.0/scale_jump) scaler_main *= scale_jump;
  loadScales(scaler_main);
}

void scale_tiles(float ratio){
    Iterator it = tiledraws.iterator();
    while(it.hasNext()){
      TileDraw t = (TileDraw)(it.next());
      t.draw();
    }
}