TUD Organische Chemie | Immel | Graphics | Povray 3.5 | pyramid | View or Print (this frame only) |
Example file (pyramid.pov):
// Persistence Of Vision Ray Tracer POV-Ray 3.5 sample Scene
// by Chris Young
// Based on a POV-Ray 3.0 file by
// Sven Hilscher * 3D-Max usergroup germany
// email: sven@rufus.central.de
// PYRAMID.POV demonstrates basic use of macros and local
// identifiers in recursive calls. Creates a fractal
// pyramid from spheres.
//
// Note some spheres are redundant. See PYRAMID2.POV
// for a version which eliminates duplicate spheres.
// Define the macro. Parameters are:
// X: position of sphere
// Y: position of sphere
// Z: position of sphere
// R: radius of sphere
// L: level of recursion
#macro Pyramid(X,Y,Z,R,L)
sphere {
#if (L > 0)
#local New_L = L - 1;
#local New_R = R / 2;
#local Pos = New_R * 3;
Pyramid(X+Pos,Y,Z,New_R,New_L)
Pyramid(X-Pos,Y,Z,New_R,New_L)
Pyramid(X,Y+Pos,Z,New_R,New_L)
Pyramid(X,Y-Pos,Z,New_R,New_L)
Pyramid(X,Y,Z+Pos,New_R,New_L)
Pyramid(X,Y,Z-Pos,New_R,New_L)
#end
#end
union {
Pyramid(0,0,0,4,6)
pigment { rgb <0,1,1> }
}
light_source { <20,200,100>, rgb 1 }
background { color rgb <.4, .3, .2> }
camera { location <5,17,19>
look_at <0,0,0>
}