"BorisW37" <Bor### [at] yahoocom> schreef in bericht
news:web.3f0dde6738f0fa473c07ae1f0@news.povray.org...
> Lets say i have a sphere centered <x1,y1,z1> then i rotate it
> <ang_x,ang_y,ang_z>
> How do i find the new coordinates of the sphere's center <x2,y2,z3> ?

#declare NewCoordinates = vrotate(<x1,y1,z1>,<ang_x,ang_y,ang_z>);

cu!
--
camera{location-z*3}#macro G(b,e)b+(e-b)*(C/50)#end#macro L(b,e,k,l)#local C=0
;#while(C<50)sphere{G(b,e),.1pigment{rgb G(k,l)}finish{ambient 1}}#local C=C+1
;#end#end L(y-x,y,x,x+y)L(y,-x-y,x+y,y)L(-x-y,-y,y,y+z)L(-y,y,y+z,x+y)L(0,x+y,
<.5,1,.5>,x)L(0,x-y,<.5,1,.5>,x)               // ZK http://www.povplace.be.tf

Post a reply to this message