int s=1;
int IDcount=0;
float shadeStart=0;
static int shadeWidth=8;
static int bord=5;

static int backCol=#F0f0f0;
static int borCol=#000000;//#EF7639;
static int terCol=0xFFf0f0f0;
static int inCol=0xCCFFFFFF;
static int shadeCol=0xFFEF7639;

class unit {
  int nodeloc;
  int dest;
  int force;
  int prog;
  int tot;
}


class node {
  int x, y;
  int allegiance;
  int count;
  int ID;
  ArrayList<node> connected;

  node(int xi, int yi, int all) {
    x=xi;
    y=yi;
    connected=new ArrayList<node>(0);
    count=0;
    allegiance=all;
    ID=IDcount++;
  }


  void connect(node n) {


    float linedist=dist(x, y, n.x, n.y);

    println("distance:"+linedist);

    for (int i=0; i<connected.size(); i++) {
      if (connected.get(i).ID==n.ID)return;
    }

    if (linedist>101) {
      float angle=atan2(n.y-y, n.x-x);
      linedist=min(linedist/2, 100);
      if (newNode(x+floor(linedist*cos(angle)), y+floor(linedist*sin(angle)), 0)) { 
        connect(nodes.get(nodes.size()-1));

        sel=nodes.size()-1;
        println("new node");
      }
      return;
    }
    connected.add(n);
    n.connected.add(this);
  }
}

boolean newNode(int x, int y, int all) {
  if (x<0||x>width||y<0||y>height)return false;
  for (int i=0; i<nodes.size(); i++) {
    if (within(x, y, nodes.get(i).x, nodes.get(i).y, 49)) {
      println("too close");
      return false;
    }
  }
  nodes.add(new node(x, y, all));
  return true;
}

boolean within(int x1, int y1, int x2, int y2, float rad) {
  int dx=abs(x1-x2);
  int dy=abs(y1-y2);

  if (dx>rad||dy>rad)return false;

  return dist(0, 0, dx, dy)<rad;
}


void doDiamond(int x, int y, int ow, int iw) {
  //g.fill(255,255,255);
  /*
  g.beginShape();
   
   g.vertex(x*s-ow+1,y*s);
   g.vertex(x*s,y*s-ow+1);
   g.vertex(x*s+ow-1,y*s);
   g.vertex(x*s,y*s+ow-1);
   g.vertex(x*s-ow+1,y*s);
   
   g.endShape();
   */

  //g.fill(0);
  beginShape();

  vertex(x*s-ow, y*s);
  vertex(x*s, y*s-ow);
  vertex(x*s+ow, y*s);
  vertex(x*s, y*s+ow);
  vertex(x*s-ow, y*s);

  vertex(x*s-iw, y*s);
  vertex(x*s, y*s+iw);
  vertex(x*s+iw, y*s);
  vertex(x*s, y*s-iw);
  vertex(x*s-iw, y*s);

  g.endShape();
}

ArrayList<node> nodes=new ArrayList<node>();

boolean clicked=false;

int sel=-1;
int numSel=-1;

void setup() {
  size(600, 600);
  noStroke();
  fill(0);
  strokeWeight(5);
  newNode(300, 300, 0);

  newNode(50, 50, 1);

  //newNode(50,0,1);

  newNode(120, 10, 1);

  newNode(160, 95, 0);
  noCursor();
}

void draw() {

  int w=width;
  int h=height;
  PGraphics territory=createGraphics(w, h);
   PGraphics border=createGraphics(w, h);

  PGraphics enemy=createGraphics(w, h);
  
  PGraphics white=createGraphics(w, h);
  
  PGraphics shade=createGraphics(w, h);

  //PGraphics lines=createGraphics(width,height);

  territory.beginDraw();
  border.beginDraw();
  enemy.beginDraw();
  //lines.beginDraw();

  territory.background(0);
  territory.fill(255);
  territory.noStroke();
  
  border.background(0);
  border.fill(255);
  border.noStroke();  

  enemy.background(0);
  enemy.fill(255);
  enemy.noStroke();
  /*
   lines.fill(0);
   lines.noStroke();
   lines.textAlign(CENTER, CENTER);
   textSize(15);
   lines.background(0,0);
   lines.blendMode(REPLACE);
   */
  for (int i=0; i<nodes.size(); i++) {
    if (nodes.get(i).allegiance==0) {
      territory.ellipse(nodes.get(i).x, nodes.get(i).y, 200, 200);
      border.ellipse(nodes.get(i).x, nodes.get(i).y, 200+bord, 200+bord);
    } 
    else {
      enemy.ellipse(nodes.get(i).x, nodes.get(i).y, 200, 200);
    }
  }
  
  //territory.background(255);
  //enemy.background(255);
  territory.endDraw();
  enemy.endDraw();
  border.endDraw();
  
  
  shade.noSmooth();

  shade.beginDraw();
  
  shadeStart=(shadeStart+.25)%(shadeWidth*3);
  shade.stroke(255);
  shade.strokeWeight(shadeWidth);
  for(float i=shadeWidth*3-shadeStart;i<w+h+20;i+=shadeWidth*3){
    shade.line(-10,i,w+10,i-w-20);
  }
  shade.blendMode(MULTIPLY);
  shade.image(enemy,0,0);
  shade.blendMode(MULTIPLY);
  shade.image(territory,0,0);
  shade.endDraw();
  
  white.beginDraw();
  white.background(255);
  white.endDraw();

  background(backCol);
  /*
  border.beginDraw();
  border.blendMode(SUBTRACT);
  border.image(territory,0,0);
  border.endDraw();
  */
  //background(255);
  tint(borCol);
  white.mask(border);
  image(white, 0, 0);

  tint(terCol);
  white.mask(territory);
  image(white, 0, 0);

  textAlign(CENTER, CENTER);
  textSize(15);
/*
  for (int i=0; i<nodes.size(); i++) {
    fill(0);
    doDiamond(nodes.get(i).x, nodes.get(i).y, 25, 20);
    if (nodes.get(i).allegiance==0) {

      fill(40,210,40);
      doDiamond(nodes.get(i).x, nodes.get(i).y, 16, 12);
      //lines.stroke(0);
      fill(0);
      text("99", nodes.get(i).x, nodes.get(i).y-2);
    } else {
      fill(255, 0, 0);
      doDiamond(nodes.get(i).x, nodes.get(i).y, 26, 24);
    }
  }
  */
  fill(inCol);
  for(int i=0;i<nodes.size();i++){
    if(nodes.get(i).allegiance==0){
      ellipse(nodes.get(i).x, nodes.get(i).y,100,100);
    }
  }
  
  tint(shadeCol);
  white.mask(shade);
  image(white, 0, 0);
  
  for(int i=0;i<nodes.size();i++){
    fill(0);
    doDiamond(nodes.get(i).x, nodes.get(i).y, 20, 14);
  }
  
  fill(0,255,255);
  
  rect(mouseX,0,1,h);
  rect(0,mouseY,w,1);
  



  if(width!=w||height!=h){
    background(255,255,0);
  }

  if (frameCount==1) {
    save("lines.png");
  }
  
  fill(255);
  text(frameRate,20,20);
}

void mousePressed() {
  int click=-1;
  float best=50;
  for (int i=0; i<nodes.size(); i++) {
    float d=dist(mouseX, mouseY, nodes.get(i).x, nodes.get(i).y);
    if (d<best) {
      click=i;
      best=d;
    }
  }

  sel=click;
  clicked=true;
}

void mouseReleased() {
  clicked=false;
  if (sel!=-1) {
    float dragdist=dist(mouseX, mouseY, nodes.get(sel).x, nodes.get(sel).y);
    if (dragdist>49) {
      dragdist=min(dragdist, 100);
      float angle=atan2(mouseY-nodes.get(sel).y, mouseX-nodes.get(sel).x);
      if (newNode(nodes.get(sel).x+floor(dragdist*cos(angle)), nodes.get(sel).y+floor(dragdist*sin(angle)), nodes.get(sel).allegiance)) { 
        nodes.get(sel).connect(nodes.get(nodes.size()-1));

        sel=nodes.size()-1;
        println("new node");
      } else {
        int click=-1;
        float best=30;
        for (int i=0; i<nodes.size(); i++) {
          float d=dist(mouseX, mouseY, nodes.get(i).x, nodes.get(i).y);
          if (d<best) {
            click=i;
            best=d;
          }
        }

        if (click!=-1) {
          nodes.get(sel).connect(nodes.get(click));
        }
      }
    }
  }
  /*else{
   newNode(mouseX,mouseY);
   }
   */
}