Achuralógrafo:Ignacio Oliva

Título	Achuralógrafo
Asignatura	Imagen Escrita
Del Curso	Imagen Escrita 2013 - ARQ
Carreras	Arquitectura
Alumno(s)	Ignacio Oliva

float tam;

void setup() {
  size(500, 500);
  background(255);
  stroke(0, 50);
}

void draw() {
  
  tam = dist(mouseX, mouseY, pmouseX, pmouseY);
  if (mousePressed) {
    achurado(mouseX, mouseY, tam);
  }
}

void achurado(float x, float y, float mag) {
  
  int num = round((float(mouseX)/float(width)) * 25);
  
  pushMatrix();
  translate(x, y);
  for (int i = 0; i < 50; i ++) {
    
    float var = random(-300,500);
    
    stroke(-170 + var, 60 + var, 150 + var);
    line(random(-mag), random(mag), random(mag), random(-mag));
    rect(random(mag), random(-mag), random(-mag), random(mag));
   
  }
  popMatrix();
}

void keyPressed() {
  String filename = "img/retrato-"+year()+"_"+month()+"_"+day()+"___"+hour()+"-"+minute()+"-"+second()+".png";
  if (key == 's' || key == 'S') {
    saveFrame(filename);
    println("se ha grabado exitosamente el archivo "+filename);
  }
  if (key == ' ') {
    background(255);
  }
}