/**
 * based on shodo by Martin Schneider
 * http://www.openprocessing.org/visuals/?visualID=4523
 * Copyright (C) 2010 LAFKON/Christoph Haag 
 */

import geomerative.*;
import processing.pdf.*;

int i, k, howmanyframes, step, countframe;
float startx, starty,xoffset,yoffset,scalefactor;
float[] a = new float[18];
RGroup grp;
RPoint[] points;
PShape grafik;
String outputdir = "i/tmp/";
boolean recording = false;
String[]vektorlist;
String filename;


void setup() {
  //size(454, 325, P3D);
  size(1816, 1300, P3D); // change size for thinner lines

  frameRate(500);   
  stroke(0);
  smooth();  
  background(255);

  vektorlist = loadStrings("i/tmp/vektor.list");
  String file = vektorlist[0];
  
  filename = nf(hour(),2) + nf(minute(),2) + nf(second(),2);
  
  grp = vektorDB(file);
  grafik = loadShape(file);

  countframe = -1;
  //howmanyframes = int(loadStrings("tmp/gridsize.i")[0]);
  howmanyframes = 10;
  points = grp.getPoints();
  startx = points[0].x;
  starty = points[0].y;  
  //initialize with startpoint
  for(int x=0; x<a.length/2; x++) {
    a[x]   = startx;
    a[x+9] = starty;
  }
  step = points.length / howmanyframes;
  int k = 0;
  scalefactor = 4;
  xoffset= -25;
  yoffset= -30; 

}




void draw() {


  if (frameCount == 1) {
    countframe++;
    beginRecord(PDF, outputdir + filename + "--" + nf(countframe,5) + ".pdf");
    recording = true; 
  }

  if(k < points.length) {
    if(frameCount%step == 0 && frameCount != 0 && frameCount != 1) {
      countframe++;
      beginRecord(PDF, outputdir + filename + "--" + nf(countframe,5) + ".pdf");
      recording = true;
    }

    //background(255);
    for(int m=0; m<=k ; m++) {

      a[9]=points[m].y;
      a[0]=points[m].x;

      pushMatrix();

      scale(scalefactor);
      translate(xoffset,yoffset);

      stroke(0,0,0,150);
      strokeWeight(0.1);

      if (frameCount == 1) { 
        //grp.draw();
        shape(grafik);
        endRecord();
      }     
      else {

        for(i=0;++i<9;) {
          if (m == 0) {
            line(0 - xoffset, random(0,height)/10, a[i] += (a[i-1]-a[i])/i, a[i+9] += (a[i+8]-a[i+9])/i);
          }
          else if (m == k) {
            line(a[i], a[i+9], random(0,width)*scalefactor, random(0,height));
          }
          else {
            line(a[i], a[i+9], a[i] += (a[i-1]-a[i])/i, a[i+9] += (a[i+8]-a[i+9])/i);
          }
        }
        popMatrix();
      }
    }

    if(recording) {
      endRecord();
    }

    //reset to startpoints
    for(int x=0; x<a.length/2; x++) {
      a[x]   = startx;
      a[x+9] = starty;
    }
    k++;
  } 
  else {
    exit();
  }
}


RGroup vektorDB(String svgpath){

  RGroup grp,svg;
  RShape svgload;
  int pathnumber;

  // VERY IMPORTANT: Allways initialize the library in the setup
  RG.init(this);
  RG.ignoreStyles(false);

  svgload = RG.loadShape(svgpath); 
  grp = new RGroup();

  pathnumber = int(split(loadStrings(svgpath)[1],' ')[1]);

  for(int i=1; i<=pathnumber; i++){
    grp.addElement(svgload.getChild(str(int(i))));
  }
  return grp;
}