import processing.opengl.*;
import anar.*;
 
 
import java.util.*;
 
import lsys.Grammar;
 
 
 
/*
 * Example for Anar library by Guillaume LaBelle + Julien Nembrini
 * http://anar.ch
 */
 
 
Pts       ptsA = new Pts();
 
 
Face      f;
 
Grammar   grammar;
 
Obj       faces;
Obj       lines;
 
Transform T;
 
Translate t;
Transform r;
Scale     s;
 
Sliders   mySlider;
 
 
void setup(){
    size(800,400,OPENGL);
  Anar.init(this);
  initGrammar();
  initForm();
  interpretGrammar();
}
 
void initGrammar(){
  grammar = new Grammar("fg");
  // here define the rules
  // * means any kind of symbol
  // the example rules below are therefore non contextual
  grammar.addRule("*f*","fg[gf][hfh]");
  grammar.addRule("*g*","gg[hif]");
  grammar.addRule("*h*","ghjh");
  grammar.addRule("*j*","[gifh]");
  // this one makes it context dependant
  grammar.addRule("igh","[ghfg]");
 
  println(grammar);
 
}
 
void initForm(){
  faces = new Obj();
 
 
  Param pvRx = new Param(1.0f,0,3.14f,"rotate X");
  Param pvRy = new Param(2.0f,0,3.14f,"rotate Y");
  Param pvRz = new Param(3.0f,0,3.14f,"rotate Z");
  r = new Transform();
  RotateX rx = new RotateX(pvRx);
  RotateY ry = new RotateY(pvRy);
  RotateZ rz = new RotateZ(pvRz);
  r.add(rx);
  r.add(ry);
  r.add(rz);
 
 
  Param pvTx = new Param(00,0,100,"translate");
  Param pvTy = new Param(0,0,10,"translate");
  Param pvTz = new Param(10,0,100,"translate");
  t = new Translate(Anar.Pt(pvTx,pvTy,pvTz));
 
  Param pvSx = new Param(0.99f,0,10,"scale X");
  Param pvSy = new Param(0.99f,0,10,"scale Y");
  Param pvSz = new Param(0.99f,0,10,"scale Z");
  s = new Scale(Anar.Pt(pvSx,pvSy,pvSz));
 
  T = new Transform();
  T.add(t);
}
 
 
void interpretGrammar(){
 
  faces = new Obj();
  lines = new Obj();
 
  Face seedFace = new Star(40,50,6);
  Face currentFace = seedFace;
 
  Pts stackA = new Pts();
  int indexA = 0;
  Pt turtleA = seedFace.pt(indexA);
 
  ArrayList stackPtsA = new ArrayList();
  Pts ptsCollectorA = new Pts();
  ptsCollectorA.add(turtleA);
 
 
  Pts stackB = new Pts();
  int indexB = seedFace.numOfPts()/3;
  Pt turtleB = seedFace.pt(indexB);
 
  ArrayList stackPtsB = new ArrayList();
  Pts ptsCollectorB = new Pts();
  ptsCollectorB.add(turtleB);
 
 
  Pts stackC = new Pts();
  int indexC = (2*seedFace.numOfPts())/3;
  Pt turtleC = seedFace.pt(indexC);
 
  ArrayList stackPtsC = new ArrayList();
  Pts ptsCollectorC = new Pts();
  ptsCollectorC.add(turtleC);
 
 
  Iterator it = grammar.getSentence().iterator();
  while (it.hasNext()){
    String str = (String)it.next();
 
    switch(str.charAt(0)){
      case 'f':
        // create translated copy from current face
        Pts pts = new Pts();
        Iterator itFace = currentFace.iterator();
        while (itFace.hasNext()){
          pts.add(Anar.Pt((Pt)itFace.next(),t));
        }
        Face f = new Face(pts);
        // TODO (1) add size() method to Face
        // TODO (1) transform the face (missing methods)
        faces.add(f);
 
        // move the turtle to the next face
        currentFace = f;
        indexA %= currentFace.numOfPts();
        turtleA = currentFace.pt(indexA);
 
        indexB %= currentFace.numOfPts();
        turtleB = currentFace.pt(indexB);
 
        indexC %= currentFace.numOfPts();
        turtleC = currentFace.pt(indexC);
      case 'g':
        indexA = (indexA+1)%currentFace.numOfPts();
        turtleA = currentFace.pt(indexA);
 
        indexB = (indexB+1)%currentFace.numOfPts();
        turtleB = currentFace.pt(indexB);
 
        indexC = (indexC+1)%currentFace.numOfPts();
        turtleC = currentFace.pt(indexC);
      break;
      case 'h':
        indexA = (indexA+currentFace.numOfPts()-1)%currentFace.numOfPts();
        turtleA = currentFace.pt(indexA);
 
        indexB = (indexB+currentFace.numOfPts()-1)%currentFace.numOfPts();
        turtleB = currentFace.pt(indexB);
 
        indexC = (indexC+currentFace.numOfPts()-1)%currentFace.numOfPts();
        turtleC = currentFace.pt(indexC);
      break;
      case 'i':
        indexA = (indexA+2)%currentFace.numOfPts();
        turtleA = currentFace.pt(indexA);
 
        indexB = (indexB+2)%currentFace.numOfPts();
        turtleB = currentFace.pt(indexB);
 
        indexC = (indexC+2)%currentFace.numOfPts();
        turtleC = currentFace.pt(indexC);
      break;
      case 'j':
        indexA = (indexA+currentFace.numOfPts()-2)%currentFace.numOfPts();
        turtleA = currentFace.pt(indexA);
 
        indexB = (indexB+currentFace.numOfPts()-2)%currentFace.numOfPts();
        turtleB = currentFace.pt(indexB);
 
        indexC = (indexC+currentFace.numOfPts()-2)%currentFace.numOfPts();
        turtleC = currentFace.pt(indexC);
      break;
      case '[':
        stackA.add(turtleA);
        stackPtsA.add(ptsCollectorA);
        ptsCollectorA = new Pts();
        ptsCollectorA.add(turtleA);
 
        stackB.add(turtleB);
        stackPtsB.add(ptsCollectorB);
        ptsCollectorB = new Pts();
        ptsCollectorB.add(turtleB);
 
        stackC.add(turtleC);
        stackPtsC.add(ptsCollectorC);
        ptsCollectorC = new Pts();
        ptsCollectorC.add(turtleC);
      break;
      case ']':
        ptsCollectorA.add(turtleA);
        turtleA = stackA.remove(stackA.size()-1);
        lines.add(ptsCollectorA);
        ptsCollectorA = (Pts)stackPtsA.remove(stackPtsA.size()-1);
 
        ptsCollectorB.add(turtleB);
        turtleB = stackB.remove(stackB.size()-1);
        lines.add(ptsCollectorB);
        ptsCollectorB = (Pts)stackPtsB.remove(stackPtsB.size()-1);
 
        ptsCollectorC.add(turtleC);
        turtleC = stackC.remove(stackC.size()-1);
        lines.add(ptsCollectorC);
        ptsCollectorC = (Pts)stackPtsC.remove(stackPtsC.size()-1);
      break;
      default:
      break;
    }
  }
  lines.pts.render = new RenderPtsLine(new AColor(128));
 
  Anar.camTarget(faces);
  mySlider = new Sliders(lines);
 
}
 
void draw(){
  if(frameCount%2==0)
    background(155);
  else
    background(153);
 
  // faces.draw();
  lines.draw();
  mySlider.draw();
 
}
 
 
void keyPressed(){
  if(key=='a'){
    grammar.step();
    println(grammar);
    interpretGrammar();
  }
  if(key=='s'){
    grammar.reset();
    println(grammar);
    interpretGrammar();
 
  }
}