Thanks...
I managed to fiddle the code to fit in the official...
Not quite as kool w/ out the functions but it will do...
I will use it in my next post...
W/ proper credit...

"H. E. Day" wrote:

> Yeah, and here it is:
> (By the way, this requires MegaPov .4)
>
> #declare Scarring =
> texture {pigment {bozo color_map {[0 rgb .175 transmit .75][1 rgb .175
> transmit 1]}scale 2}}
> texture {pigment {bozo pigment_map {[0 bozo color_map {[0 rgb .125 transmit
> .75][1 rgb .125 transmit 1]}scale .125][.5 rgb .175 transmit 1]}scale
> 2}translate 25}
> #declare Rusting2 =
> texture {pigment {bozo color_map {[0 rgb <1,.5,.4> transmit .875][1 rgb
> <1,.5,.4> transmit 1]}scale 2}}
> texture {pigment {bozo pigment_map {[0 bozo color_map {[0 rgb <1,.5,.4>
> transmit .875][1 rgb <1,.5,.4> transmit 1]}scale .125][.5 rgb .175 transmit
> 1]}scale 2}translate 25}
> #declare Chipping =
> texture {pigment {bozo pigment_map {[.4 bozo color_map {[.2 rgb 1 transmit
> .25][.3 rgb 1 transmit 1]} turbulence 1/2 scale .125/2][.5 rgb .175
> transmit 1]}scale 8}}
>
> #declare Test =
> function {
>     (noise3d(x,y,z)^0.3)
>     *noise3d(x*5,y*5,z*5)
>     *(noise3d(x*20,y*20,z*20)^0.3)
> }
> #declare Test2 =
> function {
>     (noise3d(x,y,z)^2)
>     *noise3d(x*5,y*5,z*5)
>     *(noise3d(x*20,y*20,z*20)^0.3)
> }
>
> #declare RustedTex1 =
> texture {
> pigment { function {Test} triangle_wave
> pigment_map {
> [.7 bozo color_map {[.4 rgb 1][.5 rgb <.6,.65,.8>][.6 rgb .65]} turbulence
> 1 scale 1/2]
> [.8 bozo color_map {[0 rgb <.6,.4,.3>][1 rgb <.6,.5,.4>*1.5]} scale 1/3]
> }
> scale 1.5
> }
>
> normal { function {Test2} bump_size 1/3 scale 1/4}
> finish {ambient 0 diffuse 1 phong 1.5 metallic phong_size 10}
> }
> texture {Scarring scale 1/16}
> texture {Chipping scale 1/16}
> texture {Scarring scale 1/16 scale 4*y}
> texture {Scarring scale 1/32}
> texture {Rusting2 scale 1/5 scale 2*z}
>
> Do hope you can use it.
>
> --
> H.E. Day

Post a reply to this message