And for those who don't want to use MegaPOV...

I've changed the semantics a bit.  The texture for the tile pattern is
passed to the macro instead of being a global variable, and I've added
a "Fade" parameter to control the size of the region between solid grout
and solid tile.  It must be between zero and the size of the grout.  See
the plane below for an example of how to invoke this macro.

#macro Kaleido_Tiles2( K_Tex, K_Grout, Fade ) 
  #local K_K=pigment {
    K_Tex
    warp {repeat x flip x} 
    translate x
    rotate 45*y    
    warp {repeat x flip x} 
    rotate 45*y    
    warp {repeat x flip x} 
    rotate 45*y    
    warp {repeat x flip x}  
  }

  gradient x pigment_map {[(K_Grout-Fade)/2 rgb 1]
     [K_Grout/2 gradient z pigment_map {[(K_Grout-Fade)/2 rgb 1]
     [K_Grout/2 K_K]}]}
  warp {repeat .5*x flip x}
  warp {repeat .5*z flip z}
#end   
   
plane { y 0
    pigment{
        Kaleido_Tiles2( pigment {bozo scale .2}, .2, .1 )
    }
}         

-- 
These are my opinions.  I do NOT speak for the POV-Team.
The superpatch: http://www2.fwi.com/~parkerr/superpatch/
My other stuff: http://www2.fwi.com/~parkerr/traces.html

Post a reply to this message