home *** CD-ROM | disk | FTP | other *** search
- #include "colors.inc"
- #include "textures.inc"
- #include "stones.inc"
-
- #include "example.inc"
-
- camera {
- location <5, 3, -20>
- direction <0, 0, 1.5>
- up <0, 1, 0>
- right <4/3, 0, 0>
- look_at <0, 0, 0>
- }
-
- object {
- light_source { <TestMinX*1.5, 10, -10> color White }
- }
-
- object {
- light_source { <TestMaxX*1.5, 10, -10> color White }
- }
-
- #declare Width = TestMaxX - TestMinX
- #declare Height = TestMaxY - TestMinY
-
- #declare Plate = box { <Width * -0.1, Height * -0.1, 0>, <Width * 1.1, Height * 1.1, 2> }
-
- object {
- difference {
- object {Plate }
- object {Test }
- }
- // bounded_by { Plate }
- texture {
- Grnt28
- finish { Shiny }
- }
-
- translate <-(TestMaxX + TestMinX) / 2, 0, 0>
- }
-
- object {
- box { <-Width * 1.5, TestMinY - 1, -4>, <Width * 1.5, Height * -0.1, 4>}
- texture {
- pigment {
- color Violet
- }
- normal { bumps 0.5 }
- finish {Shiny}
- translate <.5,.5,.5>
- }
- }
-
-