FreeCalypso > hg > tcs211-c139
comparison chipsetsw/drivers/drv_app/r2d/lcds/PC_DSAMPLE/Demo/VR.pov @ 0:509db1a7b7b8
initial import: leo2moko-r1
author | Space Falcon <falcon@ivan.Harhan.ORG> |
---|---|
date | Mon, 01 Jun 2015 03:24:05 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:509db1a7b7b8 |
---|---|
1 // Persistence Of Vision raytracer version 3.1 sample file. | |
2 // File by Dan Farmer | |
3 // Demonstrates glass textures, CGS with box primitives, one of Mike Miller's | |
4 // fabulous marble textures, modified with an "octaves" change, and doesn't | |
5 // make a half-bad image, either. Interesting lighting effect, too. | |
6 | |
7 global_settings { assumed_gamma 2.2 } | |
8 | |
9 #include "colors.inc" | |
10 #include "shapes.inc" | |
11 #include "textures.inc" | |
12 #include "glass.inc" | |
13 #include "stones.inc" | |
14 | |
15 camera { | |
16 // set viewer's position in the scene | |
17 cylinder 1 | |
18 angle 360 | |
19 location <0.75, 2.5, -6.5> | |
20 //direction <0.0, 0.0, 0.5> // "wide-angle" view | |
21 up <0.0, 1.0, 0> | |
22 right <1.5, 0.0, 0> | |
23 look_at <0, 0, -1>} | |
24 | |
25 // Light sources, two to the front, right, on from the left, rear. | |
26 light_source {<-30, 11, 20> color White} | |
27 light_source {< 31, 12, -20> color White} | |
28 light_source {< 32, 11, -20> color LightGray} | |
29 | |
30 union { | |
31 // A green glass ball inside of a box-shaped frame | |
32 sphere { <0, 0, 0>, 1.75 | |
33 interior{ | |
34 caustics 1.0 | |
35 ior 1.5 | |
36 } | |
37 texture { | |
38 T_Glass1 | |
39 pigment {color green 0.90 filter 0.85} | |
40 finish { | |
41 phong 1 phong_size 300 // Very tight highlights | |
42 reflection 0.15 // Needs a little reflection added | |
43 } | |
44 } | |
45 } | |
46 | |
47 // A box-shaped frame surrounding a green glass ball | |
48 difference { | |
49 object {UnitBox scale 1.5} // The outside dimensions | |
50 | |
51 // And some square "holes" in all sides. Note that each of | |
52 // these boxes that are going to be subtracted has one vector | |
53 // scaled just slightly larger than the outside box. The other | |
54 // two vectors determine the size of the hole. | |
55 // Clip some sqr holes in the box to make a 3D box frame | |
56 object{UnitBox scale <1.51, 1.25, 1.25> } // "clip" x | |
57 object{UnitBox scale <1.25, 1.51, 1.25> } // "clip" y | |
58 object{UnitBox scale <1.25, 1.25, 1.51> } // "clip" z | |
59 | |
60 pigment { red 0.75 green 0.75 blue 0.85 } | |
61 finish { | |
62 ambient 0.2 | |
63 diffuse 0.7 | |
64 reflection 0.15 | |
65 brilliance 8 | |
66 specular 1 | |
67 roughness 0.01 | |
68 } | |
69 | |
70 // Same as radius of glass sphere, not the box! | |
71 bounded_by {object {UnitBox scale 1.75}} | |
72 } | |
73 rotate y*45 | |
74 rotate clock*90*y | |
75 } | |
76 | |
77 plane { y, -1.5 | |
78 texture { | |
79 T_Stone1 | |
80 pigment { | |
81 octaves 3 | |
82 rotate 90*z | |
83 } | |
84 finish { reflection 0.10 } | |
85 } | |
86 } | |
87 // end of file |