Réorganisation des dossiers « anamorphoses »
[pst-anamorphosis.git] / img / serie02 / parapluie.tex
diff --git a/img/serie02/parapluie.tex b/img/serie02/parapluie.tex
new file mode 100644 (file)
index 0000000..c152674
--- /dev/null
@@ -0,0 +1,51 @@
+\documentclass{article}
+\usepackage{pst-anamorphosis-add}
+\usepackage[a4paper]{geometry}
+\pagestyle{empty}
+\begin{document}
+
+\begin{center}
+%\begin{pspicture}[showgrid](-9,-14)(9,8)
+\begin{pspicture}(-6,-6)(6,6)
+\pscircle[doubleline=true]{3}
+\psset{type=conical}
+\multido{\n=0.5+0.5,\N=0.5+0.5}{4}{%
+    \pnode(! \n\space -2){A}
+    \pnode(! \n\space 2){B}
+    \psline(A)(B)
+    \pslineA(A)(B)
+    \pnode(!-2 \N){A}
+    \pnode(!2 \N){B}
+    \pslineA(A)(B)
+    \psline(A)(B)
+    }
+\multido{\n=-2.0+0.5,\N=-2.0+0.5}{4}{%
+    \pnode(! \n\space -2){A}
+    \pnode(! \n\space 2){B}
+    \psline(A)(B)
+    \pslineA(A)(B)
+    \pnode(!-2 \N){A}
+    \pnode(!2 \N){B}
+    \pslineA(A)(B)
+    \psline(A)(B)
+    }
+\psline(-2,0)(2,0)
+\psline(0,-2)(0,2)
+\pslineA(-2,0)(-0.5,0)
+\pslineA(2,0)(0.5,0)
+\psdot[dotstyle=x,dotsize=.2](0,0)
+\psanamorphosis[drawanamorphosis=true](0,0.2){parapluie.eps}
+\psset{fontsize=15,fillcolor=black}
+\pstextA(-1.25,0){P}
+\pstextA(-1.25,-0.5){A}
+\pstextA(-1.25,-1.0){R}
+\pstextA(-1.25,-1.5){A}
+\pstextA(-0.75,0){P}
+\pstextA(-0.75,-0.5){L}
+\pstextA(-0.75,-1.0){U}
+\pstextA(-0.75,-1.5){I}
+\pstextA(-0.75,-2){E}
+\end{pspicture}
+\end{center}
+
+\end{document} 
\ No newline at end of file

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.