anim.tex

\documentclass[a4paper]{article}
\usepackage[latin1]{inputenc}
\usepackage{pstricks-add,pst-map3d}
\usepackage[charter]{mathdesign}
\renewcommand{\ttdefault}{lmtt}
\renewcommand{\sfdefault}{phv}
\pagestyle{empty}
\begin{document}
\psset{path=../../data}
 
\definecolor{BlueDark}{cmyk}{1,1,0,0.5}
\newpsstyle{Globe}{circles=true,gridmap=true,daynight=false}
\newpsstyle{night}{fillstyle=solid,fillcolor=black,linecolor=black,opacity=0.8}
\psset{Radius=5,Decran=100,Dobs=100,unit=0.5}
\multido{\i=0+2,\ih=1+2}{12}{%
\begin{pspicture}(-7,-8)(7,6)
\psframe(-7,-8)(7,6)
\psline(-10;48.85)(8;48.85)
\rput(-10;48.85){\psline(3,0)\psarc{->}(0,0){2}{0}{48.85}\uput[24.4](2;24.4){48.85}}
\psGlobeTellure[hour=\i,Day=22,Month=06,Year=2008](2.32,48.85000){Paris}
\end{pspicture}
\newpage
\begin{pspicture}(-7,-8)(7,6)
\psframe(-7,-8)(7,6)
\psline(-10;48.85)(8;48.85)
\rput(-10;48.85){\psline(3,0)\psarc{->}(0,0){2}{0}{48.85}\uput[24.4](2;24.4){48.85}}
\psGlobeTellure[hour=\ih,Day=22,Month=06,Year=2008](2.32,48.85000){Paris}
\end{pspicture}
\newpage}
 
 
 
\end{document}