Print Page - Simple 3D IFS in POV-Ray

I've put online a sample source for POV-Ray, describing, how to make IFS systems in this great software.
You can learn from it, how to design recurrent macros in POV-Ray.
You can download it from deviantArt (http://utak3r.deviantart.com/art/Simple-3D-IFS-system-in-povray-157536019).

(http://img7.imageshack.us/img7/5707/simple3difs.jpg)

Usage:

The main core code is following:

Code:

#macro OBJ_atom(srodek, obrot, promien)
    union {
        torus { 
            promien, promien*0.2             
            rotate obrot
            translate srodek
        }
        sphere {
            srodek promien*0.4
        }             
    }  
#end
      
#macro OBJ_punkty(srodek, R, obrot, iter)
    #if (iter > 0)                                 
        OBJ_punkty(<srodek.x + R, srodek.y, srodek.z>, R*0.8, z*90, iter-1)
        OBJ_punkty(<srodek.x - R, srodek.y, srodek.z>, R*0.8, z*-90, iter-1)
        OBJ_punkty(<srodek.x, srodek.y + R, srodek.z>, R*0.8, y*90, iter-1)
        OBJ_punkty(<srodek.x, srodek.y - R, srodek.z>, R*0.8, y*-90, iter-1)
        OBJ_punkty(<srodek.x, srodek.y, srodek.z + R>, R*0.8, x*90, iter-1)
        OBJ_punkty(<srodek.x, srodek.y, srodek.z - R>, R*0.8, x*-90, iter-1)
        OBJ_atom(srodek, obrot, R*0.7)
    #else                        
        OBJ_atom(srodek, obrot, R*0.7)
    #end    
#end

What you will put in OBJ_atom, is the smallest shape (an atom). It can be a sphere or anything you like, it can be even a sophisticated object - it doesn't matter. OBJ_punkty defines the procedure of creating IFS system, you can change it as you like, it's really simple.

The image above shows the sample effect, rendered at the first, second, and the fifth iteration.
If you have any questions, don't hesitate to ask :)

Welcome to Fractal Forums

Fractal Math, Chaos Theory & Research => IFS - Iterated Function Systems => Topic started by: utak3r on March 17, 2010, 11:30:37 AM