int mw = 792;
int mh = 1050;

linea [] lineasArr;
int currentLinea = 0;
lineaGris [] lineasArrGris;
int currentLineaGris = 0;
int cuantasLineasGris = mw;

int contador, contadorGris;

BImage c;
float xLogo, yLogo;

void setup() {
  size(mw, mh);
  background(255, 255, 255);
  lineasArr = new linea[10000];

  c = loadImage("logo2.jpg");
  xLogo = (mw/2)-(c.width/2);
  yLogo = (mh/2)-(c.height/2);
  image(c, xLogo, yLogo);

  int cuantasColumnas = c.width;
  int cuantasFilas = c.height;
  int currentCol = 0;
  int currentFila = 0;

  for (int i=0; i<c.width*c.height; i++) {

    if (red(c.pixels[i])<50 && green(c.pixels[i])<50 && blue(c.pixels[i])<50) {

      lineasArr[currentLinea] = new linea(currentLinea, currentFila, currentCol);
      currentLinea++;
    } 
    currentCol++;
    if (currentCol==cuantasColumnas) {
      currentCol=0;
      currentFila++;
    }
  }
  
  lineasArrGris = new lineaGris[cuantasLineasGris];

  for (int i=0; i<cuantasLineasGris; i++) {
    lineasArrGris[currentLineaGris] = new lineaGris(i);
    currentLineaGris++;
  }
}

void loop() {
  contador++;
  contadorGris++;
  if (contador<500) pintarLineas();
  if (contadorGris<400) pintarLineasGris();
}

void pintarLineas() {
  for (int i=0; i<currentLinea; i++){
    lineasArr[i].pintar();
  }
}

void pintarLineasGris() {
  for (int i=0; i<currentLineaGris; i++){
    lineasArrGris[i].pintar();
  }
}

class linea {
  int id;

  float r;
  float d;
  int dir;
  int vel= 5;
  float x, xInit;
  float y, yInit;
  float oldX = -500;
  float oldY = -500;
  float cx;
  float cy;
  float fd;
  float oldFd;
  int counter;
  float rojo;
  int currF;
  int currC;
  boolean pintar = (random(20)<1)? true : false;
  int count = 200;
 
  linea(int i, int cF, int cC) {
    id = i;
    currF = cF;
    currC = cC;
    
    r = getRadio();
    d = 0;
    //dir = (random(2)<1)? 1 : -1;
    dir = (currF<c.height/2)? -1 : 1;
    //dir = -1;

    x = xInit = xLogo + currC;
    y = yInit = yLogo + currF;

    cx = x-r;
    cy = y;

    counter = 0;
    fd = int(random(10));
    rojo = int(random(105))+150;
    
  }

  void pintar() {
    pintarLogo();
    
    if(!pintar) return;
    
    d += (vel*dir);
    d = d%360;

    x = cx+r*cos(radians(d));
    y = cy+r*sin(radians(d));
    
    stroke(rojo, 0, 0);
    if (oldX==-500)oldX = x;
    if (oldY==-500)oldY = y;

    line(oldX, oldY, x, y);
    oldX = x;
    oldY = y;

    counter++;
    if (counter==fd){
      if (x<0 || x>mw || y<0 || y>mh) fd++;
      else change();
    }
  }

  void pintarLogo() {
    stroke(0,0,0);
    point(xInit, yInit);
  }
  
  
  void change() {
    
    r = getRadio();
    dir = dir*-1;
    d = d-180;
    cx = x-(r*cos(radians(d)));
    cy = y-(r*sin(radians(d)));

    fd = int(random(90));
    counter = 0;
    
    if (count>20) count-=10;
  }

  float getRadio() {
    float currentDist = distance(x, y, xLogo+(c.width/2), yInit+(c.height/2));
    r = 5000;
    return r;
  }
  
  float distance(float x1, float y1, float x2, float y2) {
    return sqrt(sq(x1-x2) + sq(y1-y2));
  }
}

class lineaGris {
  int id;
  float x;
  float xOld;
  float y, yOld;
  int r;
  int c = int(150);
  boolean pintar;

  lineaGris(int i) {
    id = i;
    
    x = random(mw);
    y = random(mh);
    
    xOld = x;
    yOld = y;
    
  }

  void pintar() {
    r= int(random(20)+10);
    if (id!=50 && id!=51) return;

    float r1 = random(360);
    float r2 = random(360);

    x = xOld+r*cos(r1);
    y = yOld+r*cos(r2);

    stroke(c, c, c);
    line(xOld, yOld, x, y);

    xOld = x;
    yOld = y;

  }
}