Oops, forgot the last absent image.  Sphere over checkered plane.



#version 3.6;

#include "metals.inc"

#declare arealight_on = true;

// ----------------------------------------

global_settings {
 assumed_gamma 1.0
}

#default {
 texture {
  pigment {
   color rgb 1
  }
  finish {
   ambient 0
   diffuse 1
  }
 }
}

// ----------------------------------------

camera {
  location  <-1.0, 1.0, -2.0>
  direction 1.5*z
  right     x*image_width/image_height
  look_at   <0.0, 0.0,  0.0>
}

light_source {
  <1, 2, -1>
  color rgb 0.5

  fade_distance 4
  fade_power 10

  #if (arealight_on = true)
    area_light
    <0.3, 0, 0>, <0, 0, 0.3>
    10, 10
    circular
    orient
  #end

}

// ----------------------------------------

#declare tile=
superellipsoid {
 <0.5, 0.5>
 scale <0.12, 0.1, 0.12>
 translate <0, -0.1, 0>
}

#declare i = -5;
#while (i < 40)
 #declare j = -7;
 #while (j < 40)
  object {
   tile
   translate <0.2*i, 0, 0.2*j>
   #if (mod( i+j,2 ) = 0)
    texture {
     pigment {
      color rgb <0.9, 0.9, 0.9>
     }

     finish {
      phong 1
      phong_size 10
     }
    }
   #else
    texture {
     pigment {
      color rgb <0.0, 0.0, 0.0>
     }

     finish {
      phong 1
      phong_size 20
     }
    }
   #end
  }

  #declare j = j+1;
 #end

 #declare i = i+1;
#end

// ----------------------------------------

#declare t2 =
texture {
 pigment {
  color rgbft <1.0, 1.0, 1.0, 0.0, 1.0>
 }
}

sphere {
 <-0.1, 0.4, -0.2>, 0.2

 texture {
  gradient y
  scale 0.4
  translate 0.2

  texture_map {
   [0.0 T_Silver_1A]
   [0.2 T_Silver_1A]
   [0.4 t2]
   [1.0 t2]
  }
 }
}

Post a reply to this message

Attachments:
Download 'missing_sphere.jpg' (153 KB)

Preview of image 'missing_sphere.jpg'