POV-Ray : Newsgroups : povray.text.scene-files : Cable/String : Re: Cable/String Server Time
29 Jul 2024 02:20:15 EDT (-0400)
  Re: Cable/String  
From: JK
Date: 14 Jul 1998 18:59:33
Message: <35ABD439.82B82FC2@hotmail.com>
K. Tyler wrote:

> > K. Tyler wrote:
> >
> > > *******************************
> > >   #include "colors.inc"
> > >   #include "textures.inc"
> > >
> > >   camera{location<0,0,-500>look_at<0,0,0>}
> > >   light_source{<0,200,-300>color White}
> > >
> > >   #declare AA = union{
> > >   sphere{< 0,0, 0>,5 pigment{Black   }finish{Shiny}}
> > >   sphere{<-4,0, 4>,5 pigment{Red     }finish{Shiny}}
> > >   sphere{<-4,0,-4>,5 pigment{Yellow}finish{Shiny}}
> > >   sphere{< 4,0, 4>,5 pigment{Green  }finish{Shiny}}
> > >   sphere{< 4,0,-4>,5 pigment{Blue
> > > }finish{Shiny}}scale<1,2,1>}
> > >
> > >   #declare BB = union{
> > >   sphere{< 0,0, 0>,15}sphere{<-14,0,
> > > 14>,15}sphere{<-14,0,-14>,15}
> > >   sphere{<14,0,14>,15}sphere{< 14,0,-14>,15}scale<1,2,1>}
> > >
> > >   union{
> > >   #declare CC = 0
> > >   #while (CC<500)
> > >   #declare X1 = x*.001*CC
> > >   #declare Y1 = y*1*CC
> > >   object{AA translate y*-200 translate X1+Y1 rotate X1+Y1}
> > >   #declare CC = CC+3 #end scale 1 translate 100*x}
> > >
> > >   union{
> > >   #declare CC = 0
> > >   #while (CC<500)
> > >   #declare X1 = x*.001*CC
> > >   #declare Y1 = y*1*CC
> > >   object{BB translate y*-200 translate X1+Y1 rotate X1+Y1
> > >   texture{pigment{gradient x color_map{[.15 Wheat][.3
> > > LightWood][.45 Straw]
> > >   [.6 LightWood][.75 Straw][.9 LightWood][1 Straw]}rotate
> > > X1+Y1}
> > >   finish{ambient .4 diffuse .2}normal{gradient x rotate
> > > X1+Y1}scale 15}}
> > >   #declare CC = CC+3 #end scale 1 translate 100*-x}
> >
>
> JK wrote:
>
> > I honestly think a much simpler way is
> > translating and rotating spheres with a high density, so the string
> > looks solid.
> > CU around,
> > JK
>
>     That's exactly what the above script does. Albeit I'm only
> using a small quantity of spheres for the group.
> If I remember correctly the Script  produces somewhere around
> 20,000 objects but don't quote me on it
> KT

  I know that's what the script does :)
I just think you could do a much simpler rotation with just one loop per
string of spheres...
I'll look up a nice example and send it to you...

JK


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.