import processing.opengl.*;
import anar.*;





/*
 * Example for Anar library by Guillaume LaBelle + Julien Nembrini
 * http://anar.ch
 */


Obj myObj;

void setup(){
    size(800,400,OPENGL);
  Anar.init(this);
  Anar.drawAxis();

  initForm();
}

void initForm(){
  myObj = new Obj();
  Anar.slidersReset();

  // BUILDING CURVES
  Pts ctrlc1 = new Pts();
  for (int i = 0; i<10; i++)
    ctrlc1.add(Anar.Pt(i*20,random(50),0));
  ctrlc1.stroke(165);

  Pts ctrlc2 = new Pts();
  for (int i = 0; i<10; i++){
    TranslateY ty = new TranslateY(Anar.rnd(50));
    ctrlc2.add(Anar.Pt(ctrlc1.pt(i),ty));
    Anar.sliders(ty);
  }
  ctrlc2.stroke(165);

  myObj.add(ctrlc1);
  myObj.add(ctrlc2);

  // BUILDING CURVES
  // CSpline cc1 = new CSpline(ctrlc1,5);
  // CSpline cc2 = new CSpline(ctrlc2,5);
  //
  // Pts c1 = cc1.getPts(100);
  // Pts c2 = cc2.getPts(100);

  Pts c1 = ctrlc1.discretization(100);
  Pts c2 = ctrlc2.discretization(100);

  // c1.stroke(100,100,240);
  // c2.stroke(100,100,240);
  c1.stroke(240,100,100,240);
  c2.stroke(240,100,100,240);


  myObj.add(c1);
  myObj.add(c2);


  myObj.add(divideCurve(c1,c2,0,0));


  Anar.camTarget(myObj);
}


Obj divideCurve(Pts c1, Pts c2, int i1, int i2){

  Obj subResult = new Obj();

  int mx = min(c1.numOfPts()-i1,c2.numOfPts()-i2);

  // println("mx:"+mx+" c1:"+c1.numOfPts()+"/"+i1+" c2:"+c2.numOfPts()+"/"+i2);

  Pts sub = new Pts();

  for (int i = 0; i<mx; i++){
    int ii1 = i1+i;
    int ii2 = i2+i;

    Pt a1 = c1.pt(ii1);
    Pt b1 = c2.pt(ii2);

    // SUBSAMPLING BEFORE
    Pt a0, b0;

    if(ii1-1>=0)
      a0 = c1.pt(ii1-1);
    else
      a0 = c1.pt(ii1);

    if(ii2-1>=0)
      b0 = c2.pt(ii2-1);
    else
      b0 = c2.pt(ii2);

    // SUBSAMPLING AFTER
    Pt a2, b2;

    if(ii1+1<c1.numOfPts())
      a2 = c1.pt(ii1+1);
    else
      a2 = c1.pt(ii1);

    if(ii2+1<c2.numOfPts())
      b2 = c2.pt(ii2+1);
    else
      b2 = c2.pt(ii2);

    // CALCULATE THE THRESHOLD LENGTH
    // (in this case it's based on surrounding points)
    float len = (Pt.length(a0,b0)+Pt.length(a1,b1)+Pt.length(a2,b2))/3;
    // float len = Pt.length(a1,b1);

    // DISPLAY REDLINES (Sampling lines)
    if(random(1)<0.1f){
      Pts debug = new Pts();
      debug.add(a1);
      debug.add(b1);
      debug.stroke(145);
      subResult.add(debug);
    }

    // IF THE TRESHOLD IF BIGGER THAN LIMIT HERE
    // SUBDIVIDE.
    // OTHERWISE, DO THE RECURSION
    float treshold = 4;

    if(len>treshold){
      if(len>treshold*2)
        sub.add(new PtMid(a1,b1,3,1));
      else
        sub.add(new PtMid(a1,b1,2,1));
    }
    else

      if(sub.numOfPts()>0){
        // sub.reverse();

        subResult.add(sub);

        Obj recurs = new Obj();
        recurs.add(divideCurve(sub,c1,0,ii1-sub.numOfPts()));
        recurs.add(divideCurve(sub,c2,0,ii2-sub.numOfPts()));
        // recurs.add(divideCurve(c1,sub,i+i1,0));


        subResult.add(recurs);

        sub = new Pts();
        // sub.add(a1);
      }
  }

  if(sub.numOfPts()>1){
    // sub.reverse();
    subResult.add(sub);

    Obj recurs = new Obj();
    recurs.add(divideCurve(sub,c1,0,c1.numOfPts()-sub.numOfPts()));
    recurs.add(divideCurve(sub,c2,0,c2.numOfPts()-sub.numOfPts()));

    subResult.add(recurs);
    sub = new Pts();
  }


  return subResult;
}


void draw(){
  background(155);
  myObj.draw();
}

void keyPressed(){
  if(key==' ')
    initForm();
}