\definecolor{BlueDark}{cmyk}{1,1,0,0.5}
\newpsstyle{Globe}{gridmap=true,daynight=false,circles=false,blueEarth=false,
                   borders=false,islands=false,
                   rivers=false,lakes=false}
\newpsstyle{ShadowGlobe}{fillstyle=vlines,linewidth=2\pslinewidth,opacity=0.8}
\psset{Radius=5,Decran=100,Dobs=100}
\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=22,Day=22,Month=12,Year=2008,
    styleNight=ShadowGlobe](2.32,48.85000){Paris}
\end{pspicture}