processing

import processing.pdf.*;

void setup() {
  size(600, 600);                                        instrucion de tamaño, coordenadas en x y dado en
  background(190, 678, 800);                    color de fondo, canales( rojo, verde, azul)
  smooth();                                                 suaviza linea no smooth endurece las lineas

beginrecord(pdf, "espiral.pdf");

  translate(300, 300);
  for (float i=0; i<360; i +=0.5) {
    pushMatrix();
    rotate(radians(i));
    translate(0, 200);
    rotate(radians(i*3));
    scale(map(sin(radians(i*6)), -1, 1, .5, 1), map(sin(radians(i*3)), -1, 1, .5, 1));
    drawEllipse();
    popMatrix();
  }
}
void drawEllipse() {
 
  noFill();
  stroke(0, 0, 0, 128);
  ellipse(0, 0, 500, 900);
}