summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pst-spirograph/animation/anim9.tex
blob: 919997186012bbf08143a308e3fde2c3341d3542 (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
\documentclass[border=5mm]{standalone}
\usepackage{animate}
\usepackage{pst-spirograph}
\addtopsstyle{gridstyle}{gridlabels=0pt}

\begin{document}

\psset{unit=0.25cm}
\begin{animateinline}[
  width=0.9\linewidth,begin={\begin{pspicture}(-20,-20)(20,20)},end={\end{pspicture}},palindrome,controls]{5}
\multiframe{325}{i=0+10}{%
\psgrid[subgriddiv=0,gridcolor=black!20,unit=2](-10,-10)(10,10)%
\ifnum\i=325 \psset{gearwheels=false}\fi
\psSpirograph[Z1=72,Z2=16,m=0.2,ap=10,TypeA=false,linewidth=0.02,linecolor={[rgb]{0.5 0 0 }},fillstyle=solid,
  opacity=0.75,polarangle=\i,circles=false,thetamax=\i,curvecolor=blue,curvewidth=2pt,
    HolePos=0.5,color1=cyan!10,color2=cyan!10,strokeopacity=0.5]%
\psSpirograph[Z1=72,Z2=16,m=0.2,ap=10,TypeA=false,linewidth=0.02,linecolor={[rgb]{0.5 0 0 }},fillstyle=solid,
  opacity=0.75,polarangle=\i,circles=false,thetamax=\i,curvecolor=green,curvewidth=2pt,
    HolePos=1.5,color1=cyan!10,color2=cyan!10,strokeopacity=0.5,gearwheels=false]
}
\end{animateinline}

\end{document}