//4 way vectoriser web demo by Aaron Steed
int w=100; //width of scan area
int h=100; //height of scan area
dstore[] pix = new dstore[600*600];
int stage=0;
memory mem = new memory (1,1,2,2,#000000);
void setup(){
  for (int ip=0;ip<600*600;ip++){
    pix[ip] = new dstore();
  }
  size (600,600);
  background (255);
  BImage scan = loadImage ("Bobo.gif"); //image to be scanned (place in data folder, must be a .gif)
  image (scan,0,0);
  //fill(0);
  //rect(0,0,10,10); // testing square for bugs
  stroke(0,0,255);
}
void loop(){
  //stage 1-----------------------------------------------
  //preliminary scan
  if (stage==0){
    println("stage:"+stage);
    for (int iy=0; iy<h; iy++){
      for (int ix=0; ix<w; ix++){
        int t=ix+iy*width;
        if (pixels[t] != #FFFFFF){
          escan(t);
          //println(ix+" "+iy);
        }//if;
      }//for ix;
    }//for iy;
    background(0,0,255);
    println("done");
    stage++;
    stroke(0);
  }//if;
  //stage 2-----------------------------------------------
  //magnification draw
  if (mousePressed && stage==1){
    background(255);
    for (int i=1; i<mem.x1.length;i++){
      float mag=0.013333*(constrain (mouseX,50,500)-49);
      float x1=mag*mem.x1[i];
      float y1=mag*mem.y1[i];
      float x2=mag*mem.x2[i];
      float y2=mag*mem.y2[i];
      stroke(mem.c[i]);
      line (x1,y1,x2,y2);
    }//for;
  }//if;
}//loop;
void escan(int pt){
  color ct = pixels[pt];
  int x1=(pt)%width;
  int y1=pt/width;
  for (int d=0; d<4; d++){
    int x2=x1;
    int y2=y1;
    pix[x2+y2*width].d[d]=true;

    while ((d==0) && (x2<w-1) && (pixels[(x2+1)+y2*width]==ct) && !(pix[(x2+1)+y2*width].d[d])){
      x2++;
    pix[x2+y2*width].d[d]=true;}

    while ((d==1) && (x2<w-1) && (y2<h-1) && (pixels[(x2+1)+(y2+1)*width]==ct) && !(pix[(x2+1)+(y2+1)*width].d[d])){
      x2++; y2++;
    pix[x2+y2*width].d[d]=true;}

    while ((d==2) && (y2<h-1) && (pixels[x2+(y2+1)*width]==ct) && !(pix[x2+(y2+1)*width].d[d])){
      y2++;
    pix[x2+y2*width].d[d]=true;}

    while ((d==3) && (x2>0) && (y2<h-1) && (pixels[(x2-1)+(y2+1)*width]==ct) && !(pix[(x2-1)+(y2+1)*width].d[d])){
      x2--; y2++;
    pix[x2+y2*width].d[d]=true;}
    if (x2 != x1 || y2 != y1) {
      //line (x1,y1,x2,y2);
      mem.stack(x1,y1,x2,y2,ct);
    }
  }//for;
}//escan;

class dstore{
  boolean [] d=new boolean [4];
  dstore (){
    for (int id=0;id<4;id++){
      d[id]=false;
    }
  }
}//class dstore;

class memory{
  int [] x1=new int[1];
  int [] y1=new int[1];
  int [] x2=new int[1];
  int [] y2=new int[1];
  color [] c=new color [1];
  memory (int x1t,int y1t,int x2t,int y2t,color c0){
    x1[0]=x1t;
    y1[0]=x1t;
    x2[0]=x2t;
    y2[0]=x2t;
    c[0]=c0;
  }
  void stack (int xa, int ya, int xb, int yb, color cs){
    int[] tempx1 = new int[x1.length + 1];
    System.arraycopy(x1, 0, tempx1, 0, x1.length);
    tempx1[x1.length] = x1[x1.length-1];
    x1 = tempx1;
    int[] tempy1 = new int[y1.length + 1];
    System.arraycopy(y1, 0, tempy1, 0, y1.length);
    tempy1[y1.length] = y1[y1.length-1];
    y1 = tempy1;
    int[] tempx2 = new int[x2.length + 1];
    System.arraycopy(x2, 0, tempx2, 0, x2.length);
    tempx2[x2.length] = x2[x2.length-1];
    x2 = tempx2;
    int[] tempy2 = new int[y2.length + 1];
    System.arraycopy(y2, 0, tempy2, 0, y2.length);
    tempy2[y2.length] = y2[y2.length-1];
    y2 = tempy2;
    color[] tempc = new color[c.length + 1];
    System.arraycopy(c, 0, tempc, 0, c.length);
    tempc[c.length] = c[c.length-1];
    c = tempc;
    //print("dfd");
    x1[x1.length-1]=xa;
    y1[y1.length-1]=ya;
    x2[x2.length-1]=xb;
    y2[y2.length-1]=yb;
    c[c.length-1]=cs;
  }//stack;
}//class memory;