Paulina Martínez IE2012 Tarea 11

De Casiopea
Revisión del 21:35 7 ago 2012 de Pau.martinez (discusión | contribuciones) (Página creada con «{{Proyecto |Título=Paulina Martínez IE2012 Tarea 11 |Tipo de Proyecto=Proyecto de Curso |Palabras Clave=tarea 11 |Año de Inicio=2012 |Año de Término=2012 |Carreras Rel...»)
(dif) ← Revisión anterior | Revisión actual (dif) | Revisión siguiente → (dif)
Paulina Martínez IE2012 Tarea 11


TítuloPaulina Martínez IE2012 Tarea 11
Tipo de ProyectoProyecto de Curso
Palabras Clavetarea 11
Período2012-2012
AsignaturaImagen Escrita 2012,
CarrerasDiseño Gráfico, Diseño Industrial
Alumno(s)Paulina Martínez
ProfesorHerbert Spencer

Espiral: Construcción de una sección áurea.

void setup() { size(900, 600); smooth(); } int[] s = new int[15]; int tmp, phase; void draw() { background(10, 150, 300); s[0] = 0; s[1] = 0; s[2] = 1; phase = 0; translate(100, 550); rotate(PI); while (s[1] < 500) {

 if (phase % 4 == 0) strokeWeight(2); else strokeWeight(1);

arc(s[4], s[6], 2*s[2], 2*s[2], PI, 6*PI); if (phase % 8 == 3) strokeWeight(2); else strokeWeight(1); if (phase % 8 == 4) strokeWeight(2); else strokeWeight(1); if (phase % 8 == 5) strokeWeight(2); else strokeWeight(1); arc(s[2], 0, 2*s[2], 2*s[2], PI/8.0,PI); noFill(); stroke(600,300,600,300); tmp = s[2]; s[2]+= s[1]; s[0] = s[1]; s[1] = tmp; switch(phase % 100) { 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(5, -s[4]); break; } phase++; } }