anim.tex

\documentclass{article}
\usepackage{pst-solides3d}
\usepackage[a4paper,dvips]{geometry}
\pagestyle{empty}
\begin{document}
 
\multido{\iTheta=0+5,\iPhi=0+5}{72}{%
\begin{center}
\begin{pspicture}(-7,-7)(7,7)
\psframe[fillstyle=hlines*,hatchangle=\iTheta,hatchwidth=0.1](-7,-7)(7,7)
\psset{SphericalCoor=true,viewpoint=1000 \iTheta\space \iPhi\space,Decran=2000}
\pstVerb{/xlightsrc 1000 \iTheta\space cos \iPhi\space cos mul mul def
          /ylightsrc 1000 \iTheta\space sin \iPhi\space cos mul mul def
          /zlightsrc 1000 \iPhi\space sin mul def}%
\psset{lightsrc=xlightsrc ylightsrc zlightsrc}
\psSolid[object=datfile,file=Faujasitesolide,hue=0 0.1 0.5 1](0,0,0)
\end{pspicture}
\end{center}
\newpage}
\end{document}