///////////////////////////////////////////////////////
///////////////////////programming by ANGELO SANTUCCI//////////////////////////////////////
///////////////////////////////////////////////////////


//import processing.opengl.*;
import proxml.*;

PImage b;
PFont font;
XMLElement datas;
XMLInOut xmlInOut;

int[] ox = {};
int[] oy = {};
int[] fx = {};
int[] fy = {};
String[] nomi = {};
String[] descriptions = {};
Trip[] trips = {};
Info[] poveragente= {};

int count = 1;
float last,rad;
int maxalpha = 40; //*****max alpha of line
int maxlenght = 700;//****need this one to check the max alpha of lines  -- small lenght less max alpha --
float interval = 100; //****delay of call
boolean active = false; //****for checkmouse 
boolean displayInfo;
boolean pressed = false;
boolean firstTime = true;
int items, current, casual;

void setup(){
  size(800, 700);//, OPENGL);
  background(0);
  colorMode(RGB,255);
  font = loadFont("TrebuchetMS-24.vlw");
  textAlign(CENTER);
  b = loadImage("map.gif");
  image(b, 0, 100);

  try{
    xmlInOut = new XMLInOut(this);
    datas = xmlInOut.loadElementFrom("morti.xml");
    items = datas.countChildren();
    trips = new Trip[items]; //****initialize array of Trip
    poveragente = new Info[items];
    initData();
  }
  catch(InvalidDocumentException ide){
    println("File does not exist");
  }

  last=millis();
  trips[0] = new Trip(count-1,ox[0],oy[0],fx[0],fy[0],450+random(150));
  poveragente[0] = new Info(nomi[0]+descriptions[0]);
}

void initData(){
  XMLElement data;
  for(int i=0; i<items; i++){
    data = datas.getChild(i);
    String coord =  data.getAttribute("p");
    int coords[] = int(split(coord));
    assignCoord(coords[0], 0); // assigning the origin positions
    assignCoord(coords[1], 1); // assigning the final positions
    nomi = append(nomi, data.getAttribute("n"));
    descriptions = append(descriptions, data.getAttribute("d"));
  }
}


void draw(){
  
  if(count<items){
    if(millis()-last>interval) {    
      last=millis();
      trips[count] = new Trip(count,ox[count],oy[count],fx[count],fy[count],450+random(150));
      poveragente[count] = new Info(nomi[count]+descriptions[count]);
      count++;
    }
    //display a random info at random call
    casual = int(random(1000));
    if(casual==3 && displayInfo == false){
      current = count-2;
      displayInfo = true;
    }
  }
  
  //reset and start everything again
  if(count==items){
    if(millis()-last>25000) {
      image(b, 0, 100);
      noStroke();
      fill(0);
      rect(0, 0, 800, 100);
      count = 0;
    }
  }

  for(int i=0;i<count;i++){
    trips[i].move();
    if(mousePressed == true){
      if(!active){
        trips[i].checkMouse();
      }
    }
  }
  
  if(displayInfo){
    poveragente[current].display();
  }
}

void mouseReleased(){
  active = false;
}

//******************************************************** TRIP ************************************
//********************************************************      ************************************

class Trip{
  int id, x1, y1, percentage;
  float x, y, t, dx, dy, dis, _alpha, max_alpha;
  boolean disegnata;

  Trip(int i, float ax, float ay, int bx, int by, float fr){
    id = i;
    x = ax;
    y = ay;
    x1 = bx;
    y1 = by;
    t = fr;
    dx = x1-x;
    dy = y1-y;
    dis = dist(x1, y1, x, y);
    //println(dis);
    percentage = int((dis*100)/ maxlenght);
    max_alpha = maxalpha * percentage / 100;
    _alpha = 7;
    disegnata = false;
  }

  public void move(){
    stroke(235,50,50,_alpha+max_alpha/t);
    strokeWeight(.9);
    if(dx > 0 && dy > 0){
      if(x<x1 && y<y1){
        line(x, y, x+(dx/t), y+(dy/t));
        if(x>=x1-1.5 && y>=y1-1.5){
          drawCross();
          x=x1; 
          y=y1;
        }
        x+=dx/t;
        y+=dy/t;
        _alpha+=max_alpha/t;
        return;
      }
    }

    if(dx > 0 && dy < 0){
      if(x<x1 && y>y1){
        line(x, y, x+(dx/t), y+(dy/t));
        if(x>=x1-1.5 && y<=y1+1.5){
          drawCross();
          x=x1; 
          y=y1;
        }
        x+=dx/t;
        y+=dy/t;
        _alpha+=max_alpha/t;
        return;
      }
    }

    if(dx < 0 && dy > 0){
      if(x>x1 && y<y1){
        line(x, y, x+(dx/t), y+(dy/t));
        if(x<=x1+1.5 && y>=y1-1.5){
          drawCross();
          x=x1; 
          y=y1;
        }
        x+=dx/t;
        y+=dy/t;
        _alpha+=max_alpha/t;
        return;
      }
    }

    if(dx < 0 && dy < 0){
      if(x>x1 && y>y1){
        line(x, y, x+(dx/t), y+(dy/t));
        if(x<=x1+1.5 && y<=y1+1.5){
          drawCross();
          x=x1; 
          y=y1;
        }
        x+=dx/t;
        y+=dy/t;
        _alpha+=max_alpha/t;
        return;
      }
    }   
  }

  public void checkMouse(){
    if(displayInfo == false){
      if(x1-3<mouseX && mouseX<x1+3 && y1-3<mouseY && mouseY<y1+3 && disegnata){
        if(id != current){
          active = true;
          current = id;
          // INFO STUFF:
          displayInfo = true;
        }
      } 
    }
  }

  private void drawCross(){
    stroke(235,50,50,100);
    strokeWeight(1);
    //line(x1-3,y1,x1+3,y1);
    //line(x1,y1-3,x1,y1+3);
    point(x1,y1);
    point(x1-1,y1);
    point(x1-1,y1-1);
    point(x1,y1-1);
    disegnata = true;
    //println(_alpha+max_alpha/t);
  }
}

//******************************************************** INFO ************************************
//********************************************************      ************************************

class Info{
  private int a = -20;
  private String infos;
  private String words[];
  private char[] lettere;
  private int xpos = 30;
  private int ypos = 30;
  private int wordPos = 0;
  private int count = 0;
  private int word = 0;
  private boolean erasing = true;
  private boolean writing = false;

  Info(String $infos){
    infos = $infos;
  }

  public void display(){
    if(firstTime) writing = true;
    if(!firstTime){
      if(erasing){
        if(a<width){
          noStroke();
          fill(0);
          rect(a+=20%width, 0, 20, 100);
        }
        else{
          erasing = false;
          writing = true;
          a=0;
        }
      }
    }
    if(writing){
      String words[] = split(infos);
      if(word < words.length){ //n of parole nella frase
        if(int(words[word].length()*16+wordPos) <= 780){

          if(count < words[word].length()){ //n of lettere nella parola

            textFont(font);
            if(word == 0){fill(255);}else{
            fill(255);}
            text(words[word].charAt(count),xpos,ypos);
            count++;
            xpos+=16;
          }
          else{
            //println(" word = "+word+" NofLetter = "+words[word].length()+" xpos = "+int(words[word].length()*16+wordPos));
            count = 0;
            word++;
            xpos+=13;
            wordPos = xpos;
          }
        }
        else{
          xpos = 30;
          ypos +=30;
          wordPos = xpos;
        }
      }
      else{
        writing = false;
        pressed = false;
        displayInfo = false;
        firstTime = false;
      }
    }
  } 
}

//******************************************************** ASSIGN COORDINATE ************************************
//********************************************************                   ************************************

void assignCoord(int country, int which){
  int[] temp = new int[2];
  switch(country){
  case 1: //sud saharian africa - gambia - sierra leone - kenia - etiopia - ivory coast 
    temp[0] = int(250+random(-235,235));
    temp[1] = int(638+random(-61,61));
    break;
  case 2: //marocco
    temp[0] = int(88+random(-43,43));
    temp[1] = int(470+random(-30,30));
    break;
  case 3: //afghanistan
    temp[0] = int(764+random(-20,20));
    temp[1] = int(462+random(-45,45));
    break;
  case 4: //iraq
    temp[0] = int(551+random(-35,35));
    temp[1] = int(450+random(-40,40));
    break;
  case 5: //mauritania
    temp[0] = int(43+random(-40,40));
    temp[1] = int(614+random(-35,35));
    break;
  case 6: //ASIA - bangladesh - china - vietnam - kurdistan - mongolia - india - sri lanka
    temp[0] = int(860+random(30));
    temp[1] = int(370+random(-185,185));
    break;
  case 7: //romania
    temp[0] = int(370+random(-33,33));
    temp[1] = int(311+random(-20,20));
    break;
  case 8: //CENTER AMERICA - dominican republic - suriname - cuba
    temp[0] = int(random(-50));
    temp[1] = int(614+random(-50,50));
    break;    
  case 9: //turky
    temp[0] = int(470+random(-75,75));
    temp[1] = int(395+random(-22,22));
    break;    
  case 10: //ukraine
    temp[0] = int(429+random(-65,65));
    temp[1] = int(262+random(-24,24));
    break;
  case 11: //bulgaria
    temp[0] = int(380+random(-27,27));
    temp[1] = int(350+random(-17,17));
    break;    
  case 12: //libia
    temp[0] = int(307+random(-66,66));
    temp[1] = int(523+random(-48,48));
    break;    
  case 13: //georgia
    temp[0] = int(547+random(-15,15));
    temp[1] = int(349+random(-11,10));
    break;    
  case 14: //algeria
    temp[0] = int(160+random(-55,55));
    temp[1] = int(506+random(-69,69));
    break;    
  case 15: //palestina
    temp[0] = int(473+random(-10,10));
    temp[1] = int(466+random(-10,10));
    break;
  case 16: //SOUTH AFRICA - angola - congo - zimbabwe - liberia - somalia - senegal - guinea - uganda - burundi - ghana - cameroon - togo - tanzania
      temp[0] = int(300+random(-280,280));
    temp[1] = int(750);
    break;    
  case 17: //eritrea
    temp[0] = int(496+random(-12,12));
    temp[1] = int(636+random(-13,14));
    break;    
  case 18: //albania
    temp[0] = int(330+random(-11,11));
    temp[1] = int(374+random(-18,18));
    break;    
  case 19: //sudan
    temp[0] = int(424+random(-55,55));
    temp[1] = int(627+random(-46,46));
    break;    
  case 20: //mali
    temp[0] = int(130+random(-43,43));
    temp[1] = int(614+random(-29,29));
    break;
  case 21: //iran
    temp[0] = int(640+random(-67,67));
    temp[1] = int(461+random(-41,41));
    break;
  case 22: //pakistan
    temp[0] = int(757+random(-30,30));
    temp[1] = int(426+random(-25,25));
    break;
  case 23: //tunisia
    temp[0] = int(229+random(-13,13));
    temp[1] = int(449+random(-32,32));
    break;
  case 24: //siria
    temp[0] = int(500+random(-20,20));
    temp[1] = int(446+random(-16,16));
    break;
  case 25: //egitto
    temp[0] = int(424+random(-45,45));
    temp[1] = int(526+random(-47,47));
    break;
  case 26: //armenia
    temp[0] = int(557+random(-13,13));
    temp[1] = int(380+random(-13,13));
    break;
  case 27: //slovakia
    temp[0] = int(324+random(-25,26));
    temp[1] = int(274+random(-10,10));
    break;
  case 28: //azerbaijan
    temp[0] = int(587+random(-18,17));
    temp[1] = int(380+random(-13,14));
    break;
  case 29: //SOUTH AMERICA - chile - bolivia
    temp[0] = int(-100);
    temp[1] = int(random(725,800));
    break;
  case 30: //giordania
    temp[0] = int(487+random(-16,17));
    temp[1] = int(487+random(-16,16));
    break;
  case 31: //russia - cecenia -
    temp[0] = int(661+random(-138,138));
    temp[1] = int(160+random(-70,70));
    break;
  case 32: //latvia
    temp[0] = int(370+random(-31,31));
    temp[1] = int(150+random(-13,13));
    break;
  case 33: //burkina faso
    temp[0] = int(131+random(-33,33));
    temp[1] = int(671+random(-16,16));
    break;
  case 34: //serbia - kosovo - yugoslavia
    temp[0] = int(333+random(-15,15));
    temp[1] = int(340+random(-22,22));
    break;
  case 35: //kazakistan
    temp[0] = int(696+random(-93,93));
    temp[1] = int(301+random(-55,55));
    break;
  case 36: //bosnia
    temp[0] = int(301+random(-15,15));
    temp[1] = int(340+random(-15,15));
    break;
  case 37: //lituania
    temp[0] = int(359+random(-29,29));
    temp[1] = int(173+random(-10,11));
    break;    
  case 38: //italy  SICILY
    temp[0] = int(271+random(-15,15));
    temp[1] = int(413+random(-10,11));
    break;
  case 39: //italy NORTH
    temp[0] = int(286+random(-15,15));
    temp[1] = int(374+random(-20,20));
    break;  
  case 40: //italy CENTER
    temp[0] = int(235+random(-25,25));
    temp[1] = int(325+random(-11,11));
    break;
  case 41: //france
    temp[0] = int(162+random(-41,42));
    temp[1] = int(309+random(-39,39));
    break;
  case 42: //UK
    temp[0] = int(109+random(-35,35));
    temp[1] = int(185+random(-58,58));
    break;
  case 43: //germany
    temp[0] = int(234+random(-35,35));
    temp[1] = int(245+random(-35,35));
    break;    
  case 44: //belgium
    temp[0] = int(185+random(-18,19));
    temp[1] = int(234+random(-17,17));
    break;    
  case 45: //holland
    temp[0] = int(193+random(-12,13));
    temp[1] = int(214+random(-13,12));
    break;
  case 46: //sweden
    temp[0] = int(275+random(-28,28));
    temp[1] = int(131+random(-31,30));
    break;
  case 47: //spain
    temp[0] = int(102+random(-41,41));
    temp[1] = int(392+random(-36,37));
    break;
  case 48: //poland
    temp[0] = int(316+random(-44,44));
    temp[1] = int(221+random(-35,34));
    break;    
  case 49: //czech republic
    temp[0] = int(287+random(-17,17));
    temp[1] = int(264+random(-13,13));
    break; 
  case 50: //austria
    temp[0] = int(236+random(-19,19));
    temp[1] = int(301+random(-18,18));
    break;
  case 51: //cyprus
    temp[0] = int(464+random(-13,13));
    temp[1] = int(452+random(-10,10));
    break;
  case 52: //greece south
    temp[0] = int(364+random(-19,19));
    temp[1] = int(414+random(-21,21));
    break;
  case 85: //malta
    temp[0] = int(383+random(-12,11));
    temp[1] = int(452+random(-7,8));
    break;
  }
  if(which == 0){
    ox = append(ox, temp[0]);
    oy = append(oy, temp[1]);
  }
  if(which == 1){
    fx = append(fx, temp[0]);
    fy = append(fy, temp[1]);
  }
}