//-------------<<< Raster macro
#macro Raster(RScale, RLine)
pigment{
 gradient x scale RScale
 color_map{
     [0.000   color rgb<1,1,1>*0.5]
     [0+RLine color rgb<1,1,1>*0.5]
     [0+RLine color rgbt<1,1,1,1>]
     [1-RLine color rgbt<1,1,1,1>]
     [1-RLine color rgb<1,1,1>*0.5]
     [1.000   color rgb<1,1,1>*0.5]
    }}
#end// of "Raster(RScale, RLine)"
//---------------<<<< Grid macro
#macro Grid(RasterScale,
            RasterHalfLine,
            Background_pigment)
plane{<0,1,0>,0
 //layered textures!
 texture{Background_pigment}
      // 1st layer - base color
 texture{
  Raster( RasterScale,
          RasterHalfLine)}
 texture{
  Raster( RasterScale,
          RasterHalfLine)
          rotate<0,90,0>}
  }// end of plane
#end // end of "Grid(...)"-macro
// use it:
object{ Grid(0.50,0.035,
        pigment{
           color rgb<1,1,1>*1.1})}
//------------------------ end ---