|
|
I'm currently experimenting with refraction through crystal.
Unfortunately, I'm unable to post an image because my computer keeps
freezing up about two thirds of the way through the render. Since it
seems to freeze at the same point every time, I'm thinking the problem
must be in the code.
/*
Persistence of Vision Ray Tracer Scene Description File
File: Crystal.pov
Vers: 3.1
Desc:
Date: 10/19/01
Auth: Anthony D. Baye
*/
#include "colors.inc"
#include "textures.inc"
/* Global Switches */
#declare RAD = on ;
#declare PHO = on ;
#declare Use_Camera = 2 ;
/* --------------- */
global_settings {
#if(RAD)
radiosity {
pretrace_start 0.01
pretrace_end 0.01
count 200
nearest_count 10
error_bound 0.02
recursion_limit 2
low_error_factor 0.2
gray_threshold 0.2
minimum_reuse 0.015
brightness 0.5
adc_bailout 0.01/2
}
#end
#if (PHO)
photons {
count 20000
autostop 0
jitter 0.4
media 50, 30
}
#end
}
#declare ft = 12 ;
#if (Use_Camera = 1)
camera {
location <0.0, 0.0, -5.0*ft>
look_at 0.0
}
#end
#if (Use_Camera = 2)
camera {
location <6.0, 6.0, -6.0>
look_at 0.0
}
#end
light_source { <30.0*ft, 25.0*ft, -25.0*ft> color rgb 1
media_interaction off photons { reflection on refraction on } }
object {
plane { <0 1 0> 1 }
pigment { White*0.625 }
translate -1.0
}
#declare Crystal =
union {
difference {
cylinder { <0.0, -1.0, 0.0> <0.0, 0.2125, 0.0> 0.25 }
#declare A = 0 ;
#while ( A < 360 )
box { <-2.0, 0.0, -2.0> <2.0, 1.75, 2.0> rotate 45.0*z translate
<-0.25, 0.0, 0.0> rotate A*y }
box { <-2.0, 0.0, -2.0> <1.75, -1.75, 2.0> rotate -80.0*z translate
<-0.25, 0.0, 0.0> rotate A*y }
#declare A = A + 36.0 ;
#end
translate 1.125*y
rotate 180*z
}
difference {
cylinder { <0.0, -0.5, 0.0> <0.0, 0.1875, 0.0> 0.25 }
#declare B = 0 ;
#while ( B < 360 )
box { <-2.0, 0.0, -2.0> <2.0, 1.75, 2.0> rotate 45.0*z translate
<-0.25, 0.0, 0.0> rotate B*y }
box { <-2.0, 0.0, -2.0> <1.75, -1.75, 2.0> rotate -70.0*z translate
<-0.25, 0.0, 0.0> rotate B*y }
#declare B = B + 36.0 ;
#end
translate 0.625*y
}
difference {
cylinder { <0.0, -0.5, 0.0> <0.0, 0.1875, 0.0> 0.25 }
#declare C = 0 ;
#while ( C < 360 )
box { <-2.0, 0.0, -2.0> <2.0, 1.75, 2.0> rotate 45.0*z translate
<-0.25, 0.0, 0.0> rotate C*y }
box { <-2.0, 0.0, -2.0> <1.75, -1.75, 2.0> rotate -70.0*z translate
<-0.25, 0.0, 0.0> rotate C*y }
#declare C = C + 36.0 ;
#end
translate 0.625*y
rotate 90*z
}
difference {
cylinder { <0.0, -0.5, 0.0> <0.0, 0.1875, 0.0> 0.25 }
#declare D = 0 ;
#while ( D < 360 )
box { <-2.0, 0.0, -2.0> <2.0, 1.75, 2.0> rotate 45.0*z translate
<-0.25, 0.0, 0.0> rotate D*y }
box { <-2.0, 0.0, -2.0> <1.75, -1.75, 2.0> rotate -70.0*z translate
<-0.25, 0.0, 0.0> rotate D*y }
#declare D = D + 36.0 ;
#end
translate 0.625*y
rotate 270*z
}
pigment { color rgbft <1.0, 0.03, 1.0, 1.0, 1.0> }
finish { diffuse 0.1 reflection 0.2 roughness 0.01 }
interior { ior 2.4 }
photons { target 0.75 reflection on refraction on }
}
#declare Joiner =
union {
difference {
cylinder { <0.0, -0.3125, 0.0> <0.0, 0.3125, 0.0> 0.125 }
#declare E = 0 ;
#while ( E < 360 )
box { <-0.125, -0.1875, -0.09375> <0.125, 0.1875, -0.21875> rotate E*y
}
#declare E = E + 36.0 ;
#end
cylinder { <0.0, 0.125, 0.0> <0.0, 0.375, 0.0> 0.0625 }
cylinder { <0.0, -0.125, 0.0> <0.0, -0.375, 0.0> 0.0625 }
}
pigment { Silver }
finish { SilverFinish }
photons { target 1.0 refraction off reflection on }
}
object {
union {
object { Crystal }
object { Joiner }
object { Joiner rotate 90*z }
}
translate 1.25*y
Post a reply to this message
|
|