|
![](/i/fill.gif) |
"Bob H." wrote:
>
> I refuse to believe this is a 2D object or image_map until you give proof.
A Doubting Thomas, eh!
This needs MegaPov (Based on code originally posted by Ron Parker -
modified by yours truly to achieve this amazing incredible effect)
#declare P1 = pigment { rgb 0}
#declare P2 = pigment { rgb .5}
#declare P3 = pigment { rgb 1}
#declare MysteryPigmentII=
pigment{#local C=array[6]{
pigment{P1}
pigment{P1}
pigment{P2}
pigment{P2}
pigment{P3}
pigment{P3}}
#local T=sqrt(3);#local B=pigment{radial pigment_map{ #local i=0;
#while(i<6)[i/6 C[i]][(i+1)/6 C[i]]#local i=i+1;#end}}radial
pigment_map{#local i=0;#while(i<6)#local a=(i+.5)*60*y;#local G=1.5*T;[i/6
gradient x pigment_map{[1/3 B scale 1/G rotate -a][1/3 B translate vrotate(
T*x, a)rotate -a scale 1/G]}scale G rotate a][(i+1)/6 gradient x pigment_map{
[1/3 B scale 1/G rotate -a][1/3 B translate vrotate(T*x,a)rotate -a scale
1/G]}scale G rotate a]#local i=i+1;#end}translate x warp{repeat 5*x}warp{
repeat T*z}scale .5}
#declare Test = function { pigment { MysteryPigmentII } }
plane { y,0
texture {
pigment { average
pigment_map {
[.5 function {Test} rotate -90*x]
[.5 function {Test} rotate -90*x translate y*.01]
}
rotate 90*x
}
normal { average
normal_map {
[.5 granite 5 scale .25]
[.5 function { Test } 5 rotate -90*x translate .01]
}
rotate 90*x
}
finish { ambient 1 }
}
texture {
pigment { rgbt <.45,.3,.25,.5>}
}
}
camera { location<5,5,-5> look_at y*-2}
light_source { <0,100,-1000> rgb 1}
--
Ken Tyler
Post a reply to this message
|
![](/i/fill.gif) |