Metropoli BBS
VIEWER: lpops2.pov MODE: TEXT (ASCII)
// Persistence Of Vision raytracer version 2.0 sample file.

// By Tom Price


#include "shapes.inc"
#include "colors.inc"
#include "textures.inc"

camera {
   location <0.0, 35.0, -150.0>
   up <0.0, 1.0, 0.0>
   right <4/3, 0.0, 0.0>
   look_at <0.0, 0.0, 0.0>
}

fog {
   colour red 0.5 green 0.5 blue 0.5 distance 1000.0
}

/*The floor*/
plane { y, -60.0
   pigment {
      checker colour Brown colour LightGray
      quick_colour Gray40
      scale 40.0
      translate -5.0*x
   }
   finish {
      crand 0.05 
      ambient 0.2
      diffuse 0.7
      reflection 0.3
      phong 1.0
      phong_size 20.0
   }
}

/*The Sky*/
sphere { <0.0, -40000.0, 0.0>, 50000.0
   pigment {
      Bright_Blue_Sky
      quick_colour Blue
      scale <6000.0, 3000.0, 3000.0>
      rotate -30*y
   }
   finish {
      crand 0.05 
      ambient 0.7
      diffuse 0.0
   }
}

union {
   intersection {
      sphere { <0.0, 0.0, 0.0>, 40.0 }
      object { Cylinder_Z scale <20.0, 20.0, 1.0> inverse }

      pigment { colour red 0.6 green 0.6 blue 0.0 }
      finish {
         crand 0.05
         ambient 0.1
         diffuse 0.7
         reflection 0.7
         brilliance 6.0
         specular 0.5
      }
   }

   union {
      triangle {
         <-1.0, 0.0, -0.5773502>
         < 1.0, 0.0, -0.5773502>
         < 0.0, 0.0,  1.1547005>

         pigment { Gold }
         finish {
            crand 0.05
            ambient 0.1
            diffuse 0.7
            reflection 0.4
            brilliance 6.0
            specular 0.5
         }
      }

      triangle {
         <-1.0, 0.0, -0.5773502>
         < 0.0, 0.0,  1.1547005>
         < 0.0, 1.6329931,  0.0>

         pigment { Gold }
         finish {
            crand 0.05
            ambient 0.1
            diffuse 0.7
            reflection 0.4
            brilliance 6.0
            specular 0.5
         }
      }

      triangle {
         <1.0, 0.0, -0.5773502>
         <0.0, 0.0, 1.1547005>
         <0.0, 1.6329931,  0.0>

         pigment { Gold }
         finish {
            crand 0.05
            ambient 0.1
            diffuse 0.7
            reflection 0.4
            brilliance 6.0
            specular 0.5
         }
      }

      triangle {
         <-1.0, 0.0, -0.5773502>
         < 1.0, 0.0, -0.5773502>
         < 0.0, 1.6329931,  0.0>

         pigment { colour red 0.5 green 0.4 blue 0.0 }
         finish {
            crand 0.05
            ambient 0.4
            diffuse 0.6
            reflection 0.2
            brilliance 6.0
         }
      }

      translate -0.4082886*y
      scale 15.0
      rotate <-45.0, -50.0, 10.0>
   }

   intersection {
      object { Cylinder_Y scale <7.0, 1.0, 7.0> }
      plane { y, -20.0 }

      pigment {
         Pine_Wood
         scale <10.0, 100.0, 10.0> 
      }
      finish {
         crand 0.05
         ambient 0.1
         diffuse 0.7
         reflection 0.5
         specular 0.5
      }
   }

   translate <10.0, 20.0, 60.0>
}

union {
   sphere {
      <0.0, 0.0, 0.0>, 20.0
      texture {
         Glass
         finish { crand 0.05 }
      }
   }          

   intersection {
      object { Cylinder_Y scale <3.0, 1.0, 3.0> }
      plane { y, 0.0 }

      pigment {
         Pine_Wood
         scale <10.0, 50.0, 10.0>
      }
      finish {
         crand 0.05
         ambient 0.1
         diffuse 0.7
         reflection 0.5
         specular 0.5
      }
   }

   translate <-40.0, -5.0, -0.0>
}

union {
   sphere { <0.0, 0.0, 0.0>, 15.0
      pigment { colour red 0.0 green 0.6 blue 0.3 }
      finish {
         crand 0.05
         ambient 0.1
         diffuse 0.5
         reflection 0.5
         brilliance 3.0
         specular 0.1
      }
   }

   intersection {
      object { Cylinder_Y scale <3.0, 1.0, 3.0> }
      plane { y, 0.0 }

      pigment {
         Pine_Wood
         scale <10.0, 100.0, 10.0>
      }
      finish {
         crand 0.05
         ambient 0.1
         diffuse 0.7
         reflection 0.5
         specular 0.5
      }
   }

   translate <50.0, 10.0, -30>
}

sphere { <250.0, 25.0, 350.0>, 30.0
   texture {
      Glass
      finish { crand 0.05 }
   }
}      

union {
   sphere { <0.0, 0.0, 0.0>, 40.0
      pigment {
         /* imagemap <1.0 -1.0 0.0> gif "city01.gif" once */
         Gray40
         scale 75
         translate <-127.5, -7.5, 100.0> 
      }
      finish {
         ambient 0.1
         diffuse 0.5
         reflection 0.2
         /* refraction 0.4*/
         /* ior 1.2       */
         phong 0.1
         phong_size 10
      }
   }          

   intersection {
      object { Cylinder_Y scale <6.0, 1.0, 6.0> }
      plane { y, -20.0 }

      pigment {
         Pine_Wood
         scale <10.0, 50.0, 10.0>
      }
      finish {
         crand 0.05
         ambient 0.1
         diffuse 0.7
         reflection 0.5
         specular 0.5
      }
   }
   translate <-100.0, 30.0, 100.0>
}

light_source { <-100.0, 100.0, -200.0> colour White }
[ RETURN TO DIRECTORY ]