• fullscreen
  • poema_visual.pde
  • import geomerative.*;
    import org.apache.batik.svggen.font.table.*;
    import org.apache.batik.svggen.font.*;
    
    RShape koch_island;
    RPoint punt;
    PFont font;
    float i=0;
    int j=0;
    String text_poema="quodestinferiusestsicutquodestsuperiusetquodestsuperiusestsicutquodestinferiuset";
    
    void setup(){
      size(800,900);
      background(255);
      RG.init(this);  
      font = loadFont("ArialMT-10.vlw"); 
      textFont(font); 
      fill(0);
      koch_island=RG.loadShape("koch-island-order-2-B.svg");
    }
    
    void draw(){
      translate(35,-100);
      //koch_island.draw();
      if(i<=1){
        RPoint punt=koch_island.getPoint(i);  
        if(text_poema.length()==j+1){
          j=0;
        }
        text(text_poema.charAt(j), punt.x, punt.y);
        j++;    
      }
      i=i+0.00105;
    }
    
    

    code

    tweaks (0)

    about this sketch

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

    license

    advertisement

    Roger Olivella Pujol

    Fractal visual poem

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

    Second order Koch Island L-System drawn using

    "QUOD EST INFERIUS EST SICUT QUOD EST SUPERIUS ET

    QUOD EST SUPERIUS EST SICUT QUOD EST INFERIUS ET"

    and Geomerative library (R. Marxer).

    More at:

    http://rogerolivella.net/insula/en/descripcio.htm

    You need to login/register to comment.