I think you want something like Reorient_Trans
from transforms.inc

//+kff360
#include "transforms.inc"
#declare P = <2*sin(clock*60),3,4*sin(clock*36)>;
sphere {P,0.05
   pigment {Red}
}
cone {<0,0,0>,0.05,<0,0,0.5>,0
   pigment {Cyan}
   Reorient_Trans(z,vnormalize(P))
}

Post a reply to this message