// Draws to Processing and Postscript simultaneously
// by replacing calls to fill(), line() etc. by
// custom functions that carry out operations in both.

boolean fileOpen=false;
SimplePostscript ps;
int filenum=0;

//storyabout@empal.com

int vine_total_ori = 5;
int vine_total = vine_total_ori;
int vine_max = 1000000;
vine [] vine_array = new vine [vine_max];

void setup(){

  size(500,500);
  background(0);
  vine_gen_ori();

  String filename="curl_and_ps_" +filenum +".ps";
  print(filename +"\n");
  ps=SimplePostscript.open(filename, 0,0, width,height);
  filenum++;

}
void loop(){

  for(int i=0;i<vine_total;i++){
    if(vine_array[i].dist>1 && !mousePressed){
      vine_array[i].grow();
    }
  }

}
void mousePressed(){

  ps.close();
  fileOpen=false;

  background(0);

  String filename="curl_and_ps_" +filenum +".ps";
  print(filename +"\n");
  ps=SimplePostscript.open(filename, 0,0, width,height);
  filenum++;

  fileOpen=true;

  vine_total = vine_total_ori;
}
void mouseReleased(){
  vine_gen_ori();
}

void vine_gen_ori(){
  for(int i=0;i<vine_total;i++){
    vine_array[i] = new vine();
    vine_array[i].name = "origin";
    vine_array[i].x = width/2;
    vine_array[i].y = height;
    vine_array[i].oldx = vine_array[i].x;
    vine_array[i].oldy = vine_array[i].y;
    vine_array[i].depth = 2.5 - random(2.4);
    vine_array[i].dist = 7.5;//////////////höhe vine_array[i].dist = 6.5;
    vine_array[i].dist_offset = 0.045;
    vine_array[i].dir = int(random(2))*2 - 1;
    vine_array[i].ceta = 0;
    vine_array[i].ceta_ori = PI/180*(-90) + random(.4) - .2;
    vine_array[i].a = 0;
    vine_array[i].r = 120;
    vine_array[i].g = random(100);
    vine_array[i].b = random(100);
  }
}
void vine_gen_curl(float x, float y, float dist, float ceta, float r, float g, float b){
  vine_array[vine_total] = new vine();
  int i = vine_total;
  vine_array[i].name = "curl";
  vine_array[i].x = x;
  vine_array[i].y = y;
  vine_array[i].oldx = vine_array[i].x;
  vine_array[i].oldy = vine_array[i].y;
  vine_array[i].depth = 0.5;
  vine_array[i].dist = dist;
  vine_array[i].dist_offset = 0.05 + random(0.04);
  vine_array[i].dir = int(random(2))*2 - 1;
  vine_array[i].ceta = 0;
  vine_array[i].ceta_ori = ceta;
  vine_array[i].a = 0;
  vine_array[i].r = r;
  vine_array[i].g = g;
  vine_array[i].b = b;
  vine_total ++;
}
void vine_gen_swirl(float x, float y, float dist, float ceta, float r, float g, float b){
  vine_array[vine_total] = new vine();
  int i = vine_total;
  vine_array[i].name = "swirl";
  vine_array[i].x = x;
  vine_array[i].y = y;
  vine_array[i].oldx = vine_array[i].x;
  vine_array[i].oldy = vine_array[i].y;
  vine_array[i].dist = dist ;
  vine_array[i].dist_offset = 0.05 + random(0.04);
  vine_array[i].dir = int(random(2))*2 - 1;
  vine_array[i].ceta = 0;
  vine_array[i].ceta_ori = ceta;
  vine_array[i].a = 0;
  vine_array[i].r = r;
  vine_array[i].g = g;
  vine_array[i].b = b;
  vine_total ++;
}

class vine{
  float x,y,oldx,oldy,depth,dist,dist_offset,dir;
  float r,g,b;
  float ceta,ceta_ori,a;
  String name;
  vine(){
  }
  void grow(){
    if(name=="curl" || name=="origin"){
      ceta = ceta_ori + depth * sin(a);
    }else if(name=="swirl"){
      ceta = ceta_ori + a ;
    }
    x += dist * cos(ceta);
    y += dist * sin(ceta);
    if(name=="curl" || name=="origin"){
      a += PI/180 * 10 * dir;
    }else if(name=="swirl"){
      a += PI/180 * 10 * dir;
    }
    dist -= dist_offset;
    doStroke(r,g,b);
    doLine(x,y,oldx,oldy);
    oldx = x;
    oldy = y;
    fill(r,g,b);
    float leaf_s = sin(x)*sin(y)*20;
    if((int)random(20)==0){
      if(name=="origin"){
        if(dist<5.5){
          vine_gen_curl(x,y,dist,ceta,r,g,b);
          doEllipse(x,y,leaf_s,leaf_s);
        }
      }else{
        vine_gen_curl(x,y,dist,ceta,r,g,b);
        doEllipse(x,y,leaf_s,leaf_s);
      }
    }
    if((int)random(20)==0 && (name=="curl")){
      vine_gen_swirl(x,y,dist,ceta,r,g,b);
      doEllipse(x,y,leaf_s,leaf_s);
    }

  }
}

void doStroke(float r,float g,float b) {
  stroke(r,g,b);
  if(fileOpen) ps.setrgb((int)r,(int)g,(int)b);
}

void doFill(float r,float g,float b) {
  fill(r,g,b);
  if(fileOpen) ps.setrgb((int)r,(int)g,(int)b);
}

void doLine(float x1,float y1,float x2,float y2) {
  line(x1,y1,x2,y2);
  if(fileOpen) {
    ps.moveto(x1,height-y1);
    ps.lineto(x2,height-y2);
    ps.stroke();
  }
}

void doEllipse(float x,float y,float xrad,float yrad) {
  ellipse(x,y, xrad,yrad);
  if(fileOpen) {
    ps.circle(x,height-y,xrad/2);
    ps.fill();
  }
}

void doRect(float x,float y,float xrad,float yrad) {
  rect(x,y, xrad,yrad);
  if(fileOpen) {
    ps.rect(x,y,xrad,yrad);
    ps.fill();
  }
}