import processing.opengl.*;
import anar.*;
 
 
 
 
/*
 * Example for Anar library by Guillaume LaBelle + Julien Nembrini
 * http://anar.ch
 */
 
 
Sliders   parameters;
 
Pt        a, b;
Translate t;
 
 
Obj       obj;
 
Sliders   mySlider;
 
void setup(){
    size(800,400,OPENGL);
  Anar.init(this);
  Scene.autoSeek = false;
 
  initForm();
}
 
void initForm(){
 
  // definition of shape parameters
  a = Anar.Pt( -60, -60);
  b = Anar.Pt( -60,60);
 
  t = new Translate(120,0,0);
  reset();
}
 
void reset(){
  // construction of shape
  obj = new Obj();
 
  // create square
  Face f = new Face();
  f.add(b);
  f.add(a);
  f.add(Anar.Pt(a,t));
  f.add(Anar.Pt(b,t));
  obj.add(f);
 
  // define sliders for shape
  mySlider = new Sliders(obj);
}
 
 
void draw(){
  background(153);
 
  obj.draw();
  mySlider.draw();
}
 
 
 
// interactivity related stuff
void keyPressed(){
 
  switch(key){
    case 'q':
      reset();
    break;
    case 'w':
      initForm();
    break;
    case 'e':
    break;
    case 'r':
    break;
 
    case 'a':
      Autolisp.export(obj,this);
    break;
 
  }
 
}