X-Git-Url: https://melusine.eu.org/syracuse/G/git/?a=blobdiff_plain;f=img%2Fserie01%2Fexemple_parapluie.tex;fp=img%2Fserie01%2Fexemple_parapluie.tex;h=c1526744de2cad4edc0c859f4126c148cda970f9;hb=7c16f7f918d312378c6421b0bb54db86661bfea8;hp=0000000000000000000000000000000000000000;hpb=f9edda3f2b45eb3c46b262baf60662236649e323;p=pst-anamorphosis.git

diff --git a/img/serie01/exemple_parapluie.tex b/img/serie01/exemple_parapluie.tex
new file mode 100644
index 0000000..c152674
--- /dev/null
+++ b/img/serie01/exemple_parapluie.tex
@@ -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