Retour

rayures.tex

Télécharger le fichier Fichier PDF
Image PNG
\documentclass{article}
\usepackage{pst-anamorphosis-add}
\usepackage[a4paper]{geometry}
\pagestyle{empty}
\begin{document}
\begin{center}
\begin{pspicture}[showgrid](-6.25,-6.25)(6.25,6.25)
\psframe*[linecolor=blue](-6.25,-6.25)(6.25,6.25)
\psset{Rmirror=3,type=conical}
\psset{linewidth=0.5\pslinewidth}
\psclip{\pscircleA[linestyle=none](0,0){0.25}}
\multido{\n=-3.25+0.50}{7}{%
    \pnode(! \n\space -3.25){A}
    \pnode(! \n\space 3.25){B}
    \pslineA[linewidth=2.5mm,linecolor={[rgb]{1 0.75 0}},linecap=1](A)(B)
    }
\multido{\n=0.25+0.50}{7}{%
    \pnode(! \n\space -3.25){A}
    \pnode(! \n\space 3.25){B}
    \pslineA[linewidth=2.5mm,linecolor={[rgb]{1 0.75 0}},linecap=1](A)(B)
    }
\endpsclip
\pscircle*[linecolor=blue]{3}
\psclip{\pscircle[linestyle=none](0,0){3}}
\multido{\n=-3.25+0.50}{7}{%
    \pnode(! \n\space -3.25){A}
    \pnode(! \n\space 3.25){B}
    \psline[linewidth=2.5mm,linecolor={[rgb]{1 0.75 0}},linecap=1](A)(B)
    }
\multido{\n=0.25+0.50}{7}{%
    \pnode(! \n\space -3.25){A}
    \pnode(! \n\space 3.25){B}
    \psline[linewidth=2.5mm,linecolor={[rgb]{1 0.75 0}},linecap=1](A)(B)
    }
\endpsclip
\pscircle[linecolor=white]{3}
\psdot[linecolor=white,dotsize=4\pslinewidth](0,0)
\end{pspicture}
\end{center}
\end{document}