ok, the weather is good, and flower turning to the Sun

Here is my lines with array_point



#include "point.inc"

#declare Dim_Camp =dimension_size( camp,1 );

 //Use of Point_At_Trans:
#declare obj_var =
box{<-1.5,0,-.5>,<1.5,1,.5> pigment{Red} scale 2
}

#declare TargetObj =  sphere {0, 2 pigment {rgb <.5, 0, 1>}} //sun



//loop

 #declare Nrloop = 1;  // start loop

 #while (Nrloop< Dim_Camp)

//points at Target
#declare Target = <3,0,54>;   //sun center
#declare obj_varPos = camp[Nrloop];
#declare YAxis  = Target - obj_varPos;

object {obj_var

        // rotate <0,0,90>
   Point_At_Trans(YAxis)
   translate obj_varPos
}

//object {TargetObj translate Target}

#declare Nrloop = Nrloop + 1;  // next Nr loop
 #end // --------------- end of loop
// end of outer loop


Thanks  a lot...

Post a reply to this message