I'm still playing with macros and tying to understand 'em better :) Here is
a quick one I came up with that generates padded walls.

#macro paddedWall (X,Y)
  merge {
  #declare J=1;
  #while (J<=Y)
    #declare I =1;
    #while(I<=X)
      sphere {<I,J,0>,1}
      sphere {<I+.5,J+.5,-.7>,.1}
      sphere {<I+.5,J+.5, .7>,.1}
      #declare I=I+1;
    #end
  #declare J=J+1;
  #end
  pigment {color rgb <.3,.3,.3>}
  }
#end

Corey

Post a reply to this message