• fullscreen
  • _03_flor_fractal.pde
  • void setup(){
      size(400, 400);
      smooth();
      
      int numPetalos = 18;
      int talloLargo = height/3;
      int talloAncho = height/40;
      int centroAncho = height/10;
      int petaloAncho = height/30;
      
      background(0);
      translate(0, 2*talloLargo);
      
      // Tierra
      fill(#EA8111);
      stroke(0);
      strokeWeight(talloAncho);
      rect(0, 0, width, talloLargo);
    
      // Tallo
      stroke(#09A702);
      strokeCap(PROJECT);
      strokeWeight(talloAncho);
      translate(width/2, 0);
      line(0, 0, 0, -talloLargo);
      
      // Flor
      translate(0, -talloLargo);
      stroke(255);
      fill(#FFCD00);
      ellipse(0, 0, centroAncho, centroAncho);
      
      // Petalos
      strokeWeight(talloAncho/3);
      fill(#FF0095);
      stroke(#9B025B);
      pushMatrix();
      for(int i=0; i<numPetalos; i++){
        rotate(TWO_PI/numPetalos);
        ellipse(0, centroAncho, petaloAncho, centroAncho);
      }
      popMatrix();
      
      // Raiz
      translate(0, talloLargo + talloAncho);
      stroke(0);
      raiz(talloLargo / 3, PI/2, talloAncho);
      
      //saveFrame("screen.png");
    }
    
    // Función para dibujar una raiz fractal
    void raiz(float largo, float angulo, float peso){
      if(largo < 2){
         return; 
      }
     
      strokeWeight(peso);
      line(0, 0, 0, largo);
     
      // Nos posicionamos al final de la rama que hemos dibujado
      translate(0, largo);
     
      float nuevoLargo = largo / 1.6;
      float nuevoPeso = peso / 1.5;
     
      // Rama izquierda
      pushMatrix();
      rotate(angulo / 2);
      raiz(nuevoLargo, angulo, nuevoPeso);
      popMatrix(); 
    
      // Rama derecha 
      pushMatrix();
      rotate(-angulo / 2);
      raiz(nuevoLargo, angulo, nuevoPeso);
      popMatrix();
    }
    
    

    code

    tweaks (0)

    about this sketch

    This sketch is running as Java applet, exported from Processing.

    license

    advertisement

    Ricard Marxer Piñón

    FlowerPower

    Add to Faves Me Likey@!
    You must login/register to add this sketch to your favorites.

    You need to login/register to comment.