home *** CD-ROM | disk | FTP | other *** search
/ Ray Tracing Box / RAY_CD.mdf / raytrace / _pov_dat / shelte / shelte.pov < prev   
Text File  |  1994-04-07  |  9KB  |  284 lines
  1. //                Shelter.pov by FREDERIC MOLL   ( 100350,1766 )
  2. //
  3. //  A plasma globe seeks shelter from the sun 
  4. //
  5. //  uses the plasma globe object created by Dan Farmer
  6. //       a glass texture created by Norm Bowler
  7. //
  8. //  rendering time : 640 x 480       43 minutes on a 486DX2 / 66
  9. //
  10.  
  11. include "colors.inc"
  12. #include "shapes.inc"
  13. #include "textures.inc"
  14. #include "stones.inc"
  15.  
  16.  
  17. //  Glass texture by 
  18.  
  19. #declare NBglass=
  20.   texture {
  21.     pigment {color green 1 blue .99 red .98 filter .75}
  22.     finish{
  23.       ambient 0.1
  24.       diffuse 0.1
  25.       reflection .25
  26.       refraction 1
  27.       ior 1.5
  28.       specular 1
  29.       roughness .001
  30.     }
  31.   }
  32.  
  33.  
  34. #declare NBwinebottle=
  35.   texture { NBglass
  36.     pigment {color red .4 green .72 blue .4 filter .6}
  37.   }
  38.  
  39.  
  40. //  declare for the plasma globe   (by Dan Farmer)
  41.  
  42. #declare DMF_Med_Purple =  colour red 0.73 green 0.16 blue 0.96 filter 0.95
  43. #declare DMF_Light_Purple = colour red 0.87 green 0.58 blue 0.98 filter 0.85
  44. #declare DMF_Very_DMF_Light_Purple = colour red 0.94 green 0.81 blue 0.99 filter 0.65                                         
  45.                                                                    
  46. #declare DMF_Lightening_CMap1 =  color_map {                                                                                    
  47.     [0.00 0.15 color White color DMF_Very_DMF_Light_Purple]
  48.     [0.15 0.25 color DMF_Very_DMF_Light_Purple color DMF_Very_DMF_Light_Purple  ]                                               
  49.     [0.25 0.30 color DMF_Very_DMF_Light_Purple  color DMF_Light_Purple ]
  50.     [0.30 0.40 color DMF_Light_Purple  color DMF_Light_Purple ]
  51.     [0.40 0.45 color DMF_Light_Purple  color DMF_Med_Purple ]                                                                   
  52.     [0.50 1.00 color DMF_Med_Purple  color DMF_Med_Purple ]                                                                     
  53. }                                                                                                                                 
  54.                                                                    
  55. #declare DMF_Lightening1 = texture {                                                                                                 
  56.     pigment {
  57.     marble                                                                                                                     
  58.     color_map { DMF_Lightening_CMap1 }                                                                                         
  59.     turbulence <0.5, 0.5, 0.5>                                                                                                    
  60.     }
  61.     finish { ambient 1 }                                                                                                          
  62. }                                                                                                                              
  63. #declare DMF_Lightening_CMap2 =  color_map {
  64.     [0.00 0.10 color White color DMF_Very_DMF_Light_Purple]                                                                    
  65.     [0.10 0.20 color DMF_Very_DMF_Light_Purple color DMF_Very_DMF_Light_Purple  ]                                              
  66.     [0.20 0.30 color DMF_Very_DMF_Light_Purple  color DMF_Light_Purple ]                                                         
  67.     [0.30 0.45 color DMF_Light_Purple  color DMF_Light_Purple ]                                                                   
  68.     [0.45 0.65 color DMF_Light_Purple  color DMF_Med_Purple ]                                                                 
  69.     [0.65 1.00 color DMF_Med_Purple  color DMF_Med_Purple ]
  70. }                                                                                                                             
  71.                                                                  
  72. #declare DMF_Lightening2 = texture {                                                                                            
  73.     pigment {                                                                                                                   
  74.     granite                                                                                                                  
  75.     color_map { DMF_Lightening_CMap2 }                                                                                     
  76.     turbulence <0.5, 0.5, 0.5>
  77.     }
  78.     finish { ambient 1 }                                                                                                       
  79. }
  80.                                                                   
  81.                                                                   
  82. #declare DMF_Brushed_Aluminum = texture {                                                                                        
  83.     Chrome_Metal                                                                                                               
  84.     normal {                                                                                                                   
  85.     bumps -0.5                                                                                                           
  86.     scale <1, 0.001, 0.001>
  87.     }
  88. }
  89.  
  90.  
  91. #declare DMF_Globe =
  92.     sphere { <0,0,0>, 1.2
  93.     texture { Glass3 
  94.           pigment { DMF_Light_Purple filter 0.975 } 
  95.           finish { ior 1 }
  96.          }
  97.     }
  98.  
  99.  
  100. // Two concentric inner globes textured with the lightening storm texture
  101. #declare DMF_Plasma =
  102.     union {
  103.     sphere { <0,0,0>, 1.15
  104.     texture { DMF_Lightening2 scale 1.5 }
  105.  
  106.        }
  107.     sphere { <0,0,0>, 0.75
  108.     texture { DMF_Lightening1 rotate <45, 90, 30> }
  109.        }
  110. }
  111.  
  112. // A shiny sphere, concentric to the globes
  113. #declare DMF_Electrode =
  114.     sphere { <0,0,0>, 0.35
  115.     texture { Polished_Brass }
  116.         }
  117.  
  118. #declare DMF_Globe_Asm = union {
  119.     object { DMF_Globe }
  120.     object { DMF_Plasma }
  121.     object { DMF_Electrode }
  122.     bounded_by { sphere { <0,0,0>, 1.2 } }
  123. }
  124.  
  125.  
  126.  
  127. //************************************************
  128. camera {
  129.     location <-70, 100, -170>
  130.     look_at  <100, 60, 100 >
  131.     }
  132. // the lights
  133. light_source { <-500, 800, -500> color White }
  134. light_source { <-500, 800, -500> color White }
  135. light_source { <-500, 800, -500> color White }
  136.  
  137.  
  138. // the sky
  139. plane { 
  140.     y,1000 
  141.     pigment { 
  142.         Blue_Sky 
  143.         scale <2000, 800, 800> 
  144.         }
  145.     finish {
  146.         ambient 0.7
  147.         } 
  148.     rotate <1,0,0> 
  149.     }
  150.  
  151.  
  152. // A strange ground...
  153. plane { 
  154.     y,0
  155.     texture { NBwinebottle }
  156.     normal {
  157.         wrinkles 0.5
  158.         }
  159.     scale <10, 100, 10>
  160.     }
  161.  
  162. #declare size = 109.5
  163.  
  164. #declare T1 = difference {
  165.     difference {
  166.         union {
  167.             cylinder { <-size, 0, 0>, <size, 0, 0>, size }
  168.             cylinder { <0, 0, -size>, <0, 0, size>, size }
  169.             }
  170.         union {
  171.             cylinder { <-size-1, 0, 0>, <size+1, 0, 0>, size-10 }
  172.             cylinder { <0, 0, -size-1>, <0, 0, size+1>, size-10 }
  173.             }
  174.         }
  175.     plane { y,0 }
  176. }
  177.  
  178.  
  179. //   the roof of the shelter
  180. object { 
  181.     T1 
  182.     translate <size, 59, size>
  183.         texture {
  184.             Stone23   scale < 5 , 5 , 5>
  185.         }
  186.  
  187.     }
  188.  
  189. #declare Brique = 
  190. union {
  191.     box { <0,0,0> <20,5,10> 
  192.         texture {
  193.             pigment { color Pink }  
  194.             normal { bumps 0.6 }
  195.             }
  196.     }
  197.     box { <-.5, -.5, .5> <20.5, 5.5, 9.5> 
  198.         texture {
  199.             pigment { color Gray70 }
  200.         }
  201.     }
  202. }
  203. #declare Rang = union {
  204.     object { Brique translate <  0,0,0> }
  205.     object { Brique translate < 21,0,0> }
  206.     object { Brique translate < 42,0,0> }
  207.     object { Brique translate < 63,0,0> }
  208.     object { Brique translate < 84,0,0> }
  209.     object { Brique translate <105,0,0> }
  210.     object { Brique translate <126,0,0> }
  211.     object { Brique translate <147,0,0> }
  212.     object { Brique translate <168,0,0> }
  213.     object { Brique translate <189,0,0> }
  214.     }
  215. #declare Mur = union {
  216.     object { Rang translate < 0, 0,0>  }
  217.     object { Rang translate <10, 6,0>  }
  218.     object { Rang translate < 0,12,0>  }
  219.     object { Rang translate <10,18,0>  }
  220.     object { Rang translate < 0,24,0>  }
  221.     object { Rang translate <10,30,0>  }
  222.     object { Rang translate < 0,36,0>  }
  223.     object { Rang translate <10,42,0>  }
  224.     object { Rang translate < 0,48,0>  }
  225.     object { Rang translate <10,54,0>  }
  226.     }
  227.  
  228. //  a little wall of bricks.... (not from Pink Floyd)
  229.  
  230. object { Mur       
  231.  
  232.     }
  233.  
  234. object { Mur       
  235.     translate <-219,0,0>
  236.     rotate <0,90,0>
  237.     }
  238. object { Mur       
  239.     rotate <0,-90,0>
  240.     translate <219,0,0>
  241.     }
  242. object { Mur       
  243.     rotate <0,180,0>
  244.     translate <219,0,219>
  245.        }
  246.  
  247. // A pillar
  248.  
  249. #declare T2 = union {
  250.     cylinder { 
  251.         <5.5, 0, 5.5> <5.5, 100 ,5.5>  8
  252.         texture { Stone11 scale <5 , 5 , 5> }
  253.         }
  254.     box { 
  255.         <-3, 100, -3> <13, 105 ,13> 
  256.         texture { pigment { color Gray60 } }
  257.         }
  258.     sphere { 
  259.         <5, 110, 5> , 8
  260.         texture { pigment { Jade }  scale <6 , 6, 6 > }
  261.         }
  262.     finish {
  263.         ambient 0.2
  264.         } 
  265.     }
  266.  
  267. object { T2 }
  268. object { T2 
  269.     translate <209,0,0>
  270.     }
  271. object { T2 
  272.     translate <0,0,209>
  273.     }
  274. object { T2 
  275.     translate <209,0,209>
  276.     }
  277.  
  278. //     The plasma Glob   (original object by Dan Farmer)
  279.  
  280. object { DMF_Globe_Asm
  281.      scale <30 , 30 , 30>
  282.      translate < 105 , 118 , 105>
  283.     }
  284.