home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / scripts / pov / watertap.pov < prev   
Encoding:
Text File  |  1993-07-03  |  4.4 KB  |  281 lines
  1.  
  2. #include "colors.inc"
  3. #include "textures.inc"
  4. #include "shapes.inc"
  5.  
  6. #declare gold2 = 
  7. texture {  
  8.         0.02  
  9.         ambient 0.3 
  10.         diffuse 0.5 
  11.         colour red 0.64 green 0.51 blue 0.05
  12.         reflection 0.6 
  13.         brilliance 8 
  14.         specular 0.5 
  15. }
  16.  
  17. #declare mytext= texture {gold2}
  18.  
  19.  
  20.  /* Unterteil */
  21.  
  22.  object {
  23. union {
  24. intersection {
  25. Disk_Y
  26. scale < 3.000 1.000 3.000 >
  27. }
  28. intersection {
  29. Disk_Y
  30. scale < 2.750 0.250 2.750 >
  31. translate < 0 1.250 0 >
  32. }
  33. intersection {
  34. Disk_Y
  35. scale < 2.750 0.250 2.750 >
  36. translate < 0 -1.250 0 >
  37. }
  38. quartic {
  39. < 1 0 0 0 2 0 0 2 0
  40. -13.000 0 0 0 0 0 0 0 0 
  41. 0 0 1 0 0 2 0 12.000 0 
  42. 0 0 0 1 0 -13.000 0 36.000 > 
  43. translate < 0 1.000 0 >}
  44. quartic {
  45. < 1 0 0 0 2 0 0 2 0
  46. -13.000 0 0 0 0 0 0 0 0 
  47. 0 0 1 0 0 2 0 12.000 0 
  48. 0 0 0 1 0 -13.000 0 36.000 > 
  49. translate < 0 -1.000 0 >
  50. }}
  51. bounded_by {sphere {<0 0 0> 7 }}
  52. translate < -4 -0.4 0> 
  53. texture {
  54.     mytext }
  55. no_shadow  
  56. } 
  57.  
  58.  
  59.  
  60. object {        /* Krümmung */
  61. intersection {
  62.    quartic {
  63.       < 1.0 0.0 0.0 0.0 2.0
  64.         0.0 0.0 2.0 0.0 -44.5000
  65.         0.0 0.0 0.0 0.0 0.0
  66.         0.0 0.0 0.0 0.0 0.0
  67.         1.0 0.0 0.0 2.0 0.0
  68.         19.5000 0.0 0.0 0.0 0.0
  69.         1.0 0.0 -44.5000 0.0 95.0625>
  70.       rotate <0 0 -90>
  71.     }
  72.  
  73.     plane {<0 0 1 > 0 }
  74.     plane {<0 1 0 > -0 } }
  75.     bounded_by {sphere {<0 0 0> 10 }}
  76.      
  77.    rotate <-180.000000 270.000000 0>
  78. texture {
  79.     mytext }
  80. no_shadow  
  81.  
  82. } 
  83.  
  84.  
  85. object {
  86. intersection {
  87. Disk_Y
  88. scale <1 3 1>
  89. translate < 7 7  0> }
  90. texture {
  91.     mytext }
  92. no_shadow  
  93.  
  94. }
  95. object {
  96. intersection {
  97. Disk_X
  98. scale <9 2.5 2.5>
  99. translate < 9 4 0> }
  100. texture {
  101.     mytext }
  102. no_shadow  
  103. }
  104.   
  105.    /* Wandabschluss */
  106. object {
  107.     union {
  108. intersection {
  109. Disk_Y
  110. scale < 5.000 0.500 5.000 >
  111. }
  112. intersection {
  113. Disk_Y
  114. scale < 4.750 0.250 4.750 >
  115. translate < 0 0.750 0 >
  116. }
  117. intersection {
  118. Disk_Y
  119. scale < 4.750 0.250 4.750 >
  120. translate < 0 -0.750 0 >
  121. }
  122. quartic {
  123. < 1 0 0 0 2 0 0 2 0
  124. -41.000 0 0 0 0 0 0 0 0 
  125. 0 0 1 0 0 2 0 40.000 0 
  126. 0 0 0 1 0 -41.000 0 400.000 >
  127. translate < 0 0.500 0 >}
  128. quartic {
  129. < 1 0 0 0 2 0 0 2 0
  130. -41.000 0 0 0 0 0 0 0 0 
  131. 0 0 1 0 0 2 0 40.000 0 
  132. 0 0 0 1 0 -41.000 0 400.000 > }
  133. translate < 0 -0.500 0 >
  134. } 
  135. bounded_by { sphere {< 0 0 0 > 10.000 } }
  136. rotate < 0 0 90>
  137. translate < 18 4 0> 
  138. texture {
  139.     mytext }
  140. no_shadow  
  141. } 
  142.  
  143.  
  144.  
  145.  
  146.  
  147.  
  148. object {
  149. quadric {
  150. Ellipsoid
  151. scale <5 3.5 3.5>
  152. translate <7 4 0>}
  153. texture {
  154.     mytext }
  155. no_shadow  
  156. }    
  157.   
  158. camera {
  159.    location <-8.0000000 15.000000 -28.000000>
  160.    look_at <4 0 0>
  161.    up <0.000000 1.000000 0.000000>
  162.    right <1.333333 0.000000 0.000000>
  163.  }
  164.  
  165.  
  166. object {
  167.    light_source { <-10.0  15.0  -50.0>
  168.       colour White
  169.    }
  170. } 
  171. /* 
  172. object {
  173.    light_source { <-100.0  230.0  -300.0>
  174.       colour White
  175.    }
  176. } 
  177.   */
  178. object {
  179.    light_source { <-30.0  50.0  -50.0>
  180.       colour White
  181.    }
  182. }
  183.  
  184.  
  185.     
  186.  
  187.  
  188. object  { // wand
  189. intersection {
  190. Cube
  191. scale <0.001 12500.000 10000.000>
  192. translate <18.000 0.000 0.000>  }
  193. texture {
  194. checker color White color Gray60 scale <10 10 10> reflection 0.1
  195.  }
  196. }
  197.  
  198. object  { // wand
  199. intersection {
  200. Cube
  201. scale <10000.001 12500.000 0.001>
  202. translate <0.000 0.000 100.000>  }
  203. texture {
  204. checker color White color Gray90 scale <10 10 10> reflection 0.1
  205.  }
  206. }
  207.  
  208.  
  209.  
  210.  
  211.  
  212. object {
  213.    quartic {
  214.       < 1.0 0.0 0.0 0.0 2.0
  215.         0.0 0.0 2.0 0.0 -72.5000
  216.         0.0 0.0 0.0 0.0 0.0
  217.         0.0 0.0 0.0 0.0 0.0
  218.         1.0 0.0 0.0 2.0 0.0
  219.         71.5000 0.0 0.0 0.0 0.0
  220.         1.0 0.0 -72.5000 0.0 1278.0625>
  221.       rotate <0 0 -90>
  222.     }
  223.    bounded_by { quadric { 
  224.            <1.0 1.0 1.0>
  225.            <0.0 0.0 0.0>
  226.            <0.0 0.0 0.0>
  227.            -43.559998
  228.        }
  229.     } 
  230.    rotate <0 0 90.000000>
  231.    rotate <0.000000 -90.000000 0>
  232.    texture {
  233.     mytext}
  234.     no_shadow 
  235.     translate < 7 10  0>
  236.  }
  237.  
  238.  
  239. object {
  240. intersection {
  241. Disk_X
  242. scale <6 0.5 0.5>
  243. rotate <0 45 0>
  244. translate < 7 10 0> }
  245.    texture {
  246.     mytext }
  247.     no_shadow 
  248. }
  249.  
  250.  
  251. object {
  252. intersection {
  253. Disk_Z
  254. scale <0.5 0.5 6>
  255. rotate <0 45 0>
  256. translate < 7 10 0> }
  257.    texture {
  258.     mytext }
  259.     no_shadow 
  260. }
  261.   
  262.   
  263.  
  264. #include "shapesq.inc"
  265.  
  266. object {
  267.    quartic { Piriform sturm }
  268.    rotate <0 0 -90>
  269.    translate <-1 -1.5 0>
  270.    scale <2 3 2>
  271.    bounded_by {sphere { < -1 -1.5 0 > 6 }} 
  272.    texture {
  273.       color SteelBlue
  274.       phong 1.0
  275.       phong_size 20
  276.       ambient 0.2
  277.       diffuse 0.8
  278.    }
  279. }
  280.  
  281.