Paulina Martínez IE2012 Tarea 11
Título | Paulina Martínez IE2012 Tarea 11 |
---|---|
Tipo de Proyecto | Proyecto de Curso |
Palabras Clave | tarea 11 |
Período | 2012-2012 |
Asignatura | Imagen Escrita 2012, |
Carreras | Diseño Gráfico"Diseño Gráfico" is not in the list (Arquitectura, Diseño, Magíster, Otra) of allowed values for the "Carreras Relacionadas" property., Diseño Industrial"Diseño Industrial" is not in the list (Arquitectura, Diseño, Magíster, Otra) of allowed values for the "Carreras Relacionadas" property. |
Alumno(s) | Paulina Martínez |
Profesor | Herbert 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++; } }