Merge branch 'master' of ssh://melusine.eu.org:223/pst-anamorphosis

[pst-anamorphosis.git] / img / serie01 / bugsbunny.tex

diff --git a/img/serie01/bugsbunny.tex b/img/serie01/bugsbunny.tex
new file mode 100644 (file)
index 0000000..083a959
--- /dev/null
+++ b/img/serie01/bugsbunny.tex
@@ -0,0 +1,29 @@
+
+\documentclass[a4paper]{article}
+\usepackage{pst-anamorphosis-add,pstricks-add}
+\def\epsRoot{C:/Dokumente und Einstellungen/Besitzer/Desktop/bergen/bergen/}
+\usepackage[a4paper,hmargin=1cm]{geometry}
+\pagestyle{empty}
+\begin{document}
+\begin{center}
+\begin{pspicture}(-4,-3)(4,10)
+
+\psset{ua=3,F=12,D=2,type=perspective}
+\pslineA[linecolor=red,fillstyle=solid,fillcolor={[rgb]{0.925 1 0.655}}](-3,-3)(-3,3)(3,3)(3,-3)(-3,-3)
+\psanamorphosis[scale=1.5 1.5](0,0){bugsbunny.eps}
+\multido{\i=-3+1}{7}{%
+    \pnode(! \i\space -3){A}
+    \pnode(! \i\space 3){B}
+    \psline(A)(B)
+    \pslineA(A)(B)
+    }%
+    \psset{linecolor=gray}
+\multido{\i=-3+1}{7}{%
+    \pnode(!-3 \i){A}
+    \pnode(!3 \i){B}
+    \pslineA(A)(B)
+    \psline(A)(B)
+    }%
+\end{pspicture}
+\end{center}
+\end{document} 
\ No newline at end of file