summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/support/latexindent/success/pstricks1.tex
blob: ff55548b6c7582edc685dd01e5e6d4505110bc1f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
% arara: indent: {overwrite: true, silent: on}
\documentclass[pstricks]{standalone}
\usepackage{pstricks,multido}

\def\Bottle#1{{\pscustom[linewidth=2pt]{%
	\rotate{#1}
	\psline(-1,3.5)(-1,4)(1,4)(1,3.5)
	\pscurve(3,2)(1,0)\psline(-1,0)
	\pscurve(-3,2)(-1,3.5)}}}

\def\BottleWithWater(#1)#2{%
	\rput[c]{#2}(#1){%
		\rput{*0}(0,0){%
			\psclip{\Bottle{#2}}
			\psframe*[linecolor=gray](-6,-2)(6,2)
			\endpsclip}\rput{*0}(0,0){\Bottle{#2}}}}

\begin{document}

\multido{\iA=-45+5}{19}{%
	\begin{pspicture}(-2.5,-0.5)(6,5.5)
		\BottleWithWater(1.5,1){\iA}
	\end{pspicture}
}

\end{document}