\def\oeil{\psarc[linewidth=2pt](0,2.5){2.5}{215}{270}%
\psarc[linewidth=2pt](0,-2.5){2.5}{90}{140}%
\psarc(-2.5,0){1}{-30}{30}%
\psarc(0,0){1.75}{160}{200}
\psclip{%
\pscircle[linestyle=none](0,0){1.75}}
\pscircle[fillstyle=solid,fillcolor=lightgray](-2.5,0){0.9}
\endpsclip}%
\begin{center}
\begin{pspicture}(-2,-6)(15,6)
\psset{Xv=0,Yv=-100}
\newcommand\Rmirror{3}
\psset{viewpoint=-1 -1 1}
\ThreeDput[normal=0 0 1](0,0,0){%
\psaxes{->}(8,4)
\pscircle[doubleline=true]{\Rmirror}
\multido{\i=-2+1,\I=-2+1}{5}{%
    \pnode(! \i\space -2){A}
    \pnode(! \i\space 2){B}
    \psline(A)(B)
    \pslineA(A)(B)
    \pnode(!-2 \I){A}
    \pnode(!2 \I){B}
    \pslineA(A)(B)
    \psline(A)(B)
    }
\input{LouisXIII.pst}
\input{ALouisXIII.pst}
\pstextA[fontsize=28,linecolor=red,fillstyle=solid,fillcolor=yellow!50](0,2){LouisXIII}
    }
\FPmul{\largeur}{\Rmirror}{0.1745}
\newcount\n \n=135
     \loop
     \FPmul{\tempa}{\FPpi}{\the\n}
     \FPdiv{\angle}{\tempa}{180}
     \FPsin{\SIN}{\angle}\FPcos{\COS}{\angle}
     \FPmul{\xc}{\COS}{\Rmirror}
     \FPmul{\yc}{\SIN}{\Rmirror}
      \ThreeDput[normal={\COS} {\SIN} 0.0001](\xc,\yc,0){%
        \psframe[fillstyle=vlines,hatchangle=0,linestyle=none,hatchcolor=BleuCiel,](0,0)(\largeur,5)}
     \ifnum\n<315 \advance\n by 10
\repeat
\ThreeDput[normal=0.707 -0.707 0.001](2.121,-2.121,0){%
\psline[linewidth=2\pslinewidth](0,5)}
\ThreeDput[normal=0.707 -0.707 0.001](-2.121,2.121,0){%
\psline[linewidth=2\pslinewidth](0,5)}
\ThreeDput[normal=0 0 1](0,0,5){%
\pscircle[doubleline=true]{\Rmirror}
}
\ThreeDput[normal=-1 0 0](0,0,0){%
\psaxes(15,5)
\rput{26.5}(21.5,10.8){\oeil}
\psline[linestyle=dashed,linecolor=blue](20,10)%
\psset{arrowsize=0.5,linecolor=red,linewidth=2\pslinewidth}
\psline{->}(3,1.5)(10,5)
\psline(3,1.5)(20,10)
\psline{->}(6,0)(4.5,0.75)
\psline(6,0)(3,1.5)
\uput[ur](20,10){\color{red}{$V$}}
\uput[u](3,1.5){\color{red}{$I$}}
\uput[u](6,0){\color{red}{$M$}}
}
\end{pspicture}
\end{center}