Tarea 11: Espiral difuminada

Título	Espiral difuminada
Tipo de Proyecto	Proyecto de Curso
Palabras Clave	tarea 11
Período	2012-
Asignatura	Taller Inicial Común 1ª y 2ª Etapa,
Del Curso	Imagen Escrita 2012,
Carreras	Arquitectura
Alumno(s)	Nicole Valdivia Accardi
Profesor	Herbert Spencer

Espiral que se difumina en período de 4 segundos y reaparece gradualmente

void setup() {
size(611, 378);
smooth();
frameRate(30);
}
int[] s = new int[3];
int tmp, phase;
float speed;
void draw() {
background(#9B1F40, 236, 215);
   s[0] = 0;
   s[1] = 0; 
   s[2] = 1; 
   phase = 0; 
   speed = 0.035; 
translate(442, 272);
scale(1.0, -1.0);
rotate(PI);
while (s[1] < 611) {
float wave = sin((frameCount + phase*20) * speed) + 1.0;
fill(0, 0, wave * 64, 10); 
stroke(255, wave * 236); 

if (phase % 4 == 0) strokeWeight(2); else strokeWeight(1);
arc(s[2], s[2], 2*s[2], 2*s[2], PI, 3*PI/2.0);
if (phase % 4 == 1) strokeWeight(2); else strokeWeight(1);
arc(0, s[2], 2*s[2], 2*s[2], -PI/2.0, 0);
if (phase % 4 == 2) strokeWeight(2); else strokeWeight(1);
arc(0, 0, 2*s[2], 2*s[2], 0, PI/2.0);
if (phase % 4 == 3) strokeWeight(2); else strokeWeight(1);
arc(s[2], 0, 2*s[2], 2*s[2], PI/2.0, PI);
noFill();
stroke(255, 255, 255, 255);
strokeWeight(1);
   tmp = s[2];
   s[2] += s[1];
   s[0] = s[1];
   s[1] = tmp;

switch(phase % 4) {
case 0:
translate(s[1], 0);
break;
case 1:
translate(-s[0], s[1]);
break;
case 2:
translate(-s[2], -s[0]);
break;
case 3:
translate(0, -s[2]);
break;
}
phase++;
}
}