diff options
author | Karl Berry <karl@freefriends.org> | 2020-03-14 20:42:00 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2020-03-14 20:42:00 +0000 |
commit | b2608121e57d86dd2f5f8ba12b2a9fc3d4fcbb7a (patch) | |
tree | f719a1349371274fa4f608f393cb2844ecd8fdf0 /Master/texmf-dist/doc/generic | |
parent | 792d78e8b4555f20ed39adee7f374c4131c1c7aa (diff) |
pst-spirograph (14mar20)
git-svn-id: svn://tug.org/texlive/trunk@54295 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/generic')
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/Changes | 4 | ||||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/animation/README.anim | 2 | ||||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/animation/anim9.tex | 24 | ||||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/animation/animA.tex | 23 | ||||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/animation/animB.tex | 22 | ||||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/animation/animC.tex | 17 | ||||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.pdf | bin | 75598078 -> 57216485 bytes | |||
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.tex | 50 |
8 files changed, 131 insertions, 11 deletions
diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/Changes b/Master/texmf-dist/doc/generic/pst-spirograph/Changes index 23eeed9eb41..124518d431e 100644 --- a/Master/texmf-dist/doc/generic/pst-spirograph/Changes +++ b/Master/texmf-dist/doc/generic/pst-spirograph/Changes @@ -1,4 +1,6 @@ ----- pst-spirograph.tex +0.51 2020-03-14 - added new optional argument for a rubber band connection + of two gears 0.50 2020-03-11 - added new optional argument TypeA for special graphs 0.41 2014-08-23 - updated documentation - move some more PS functions into the pro file @@ -6,12 +8,14 @@ ----- pst-spirograph.pro +0.51 2020-03-14 - added some more functions 0.50 2020-03-11 - added some more functions 0.41 2014-08-23 - added some more functions 0.40 2014-08-18 - first CTAN version (hv) ----- pst-spirograph.sty +0.51 2020-03-14 - load more required files 0.50 2020-03-11 - updated file dates 0.41 2014-08-23 - updated file dates 0.40 2014-08-18 - first CTAN version (hv) diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/animation/README.anim b/Master/texmf-dist/doc/generic/pst-spirograph/animation/README.anim index 333ea8a91d0..36b2f23bde0 100644 --- a/Master/texmf-dist/doc/generic/pst-spirograph/animation/README.anim +++ b/Master/texmf-dist/doc/generic/pst-spirograph/animation/README.anim @@ -2,7 +2,7 @@ run all files with latex <file> dvips <file> -ps2pdf <file>.ps +ps2pdf -dNOSAFER <file>.ps and then view the pdf with the acrobat reader, available from Adobe if not already installed on your current system.
\ No newline at end of file diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/animation/anim9.tex b/Master/texmf-dist/doc/generic/pst-spirograph/animation/anim9.tex new file mode 100644 index 00000000000..91999718601 --- /dev/null +++ b/Master/texmf-dist/doc/generic/pst-spirograph/animation/anim9.tex @@ -0,0 +1,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} + diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/animation/animA.tex b/Master/texmf-dist/doc/generic/pst-spirograph/animation/animA.tex new file mode 100644 index 00000000000..cadac1cd1ac --- /dev/null +++ b/Master/texmf-dist/doc/generic/pst-spirograph/animation/animA.tex @@ -0,0 +1,23 @@ +\documentclass[border=5mm]{standalone} +\usepackage{geometry} +\geometry{paperwidth=18cm,paperheight=21cm,margin=1cm} +\usepackage{animate} +\usepackage{pst-spirograph} +\addtopsstyle{gridstyle}{gridlabels=0pt} + +\begin{document} + +\psset{unit=0.5cm} +\begin{animateinline}[ + width=0.9\linewidth,begin={\begin{pspicture}(-18,-18)(18,18)},end={\end{pspicture}},palindrome,controls]{5} +\multiframe{181}{i=0+10}{% +\psgrid[style=gridstyleA]% +\ifnum\i=181 \psset{gearwheels=false}\fi +\psSpirograph[Z1=60,Z2=24,m=0.2,linewidth=0.025,TypeA=false, + linecolor=blue,fillstyle=solid,opacity=0.75,polarangle=\i,circles=false,thetamax=\i,curvecolor=red,curvewidth=2pt,HolePos=1.7, + gearwheels=false, + circles]} +\end{animateinline} + +\end{document} + diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/animation/animB.tex b/Master/texmf-dist/doc/generic/pst-spirograph/animation/animB.tex new file mode 100644 index 00000000000..e568a039651 --- /dev/null +++ b/Master/texmf-dist/doc/generic/pst-spirograph/animation/animB.tex @@ -0,0 +1,22 @@ +\errorcontextlines=100 +\documentclass{article} +\usepackage{geometry} +\geometry{paperwidth=16.5cm,paperheight=12cm,margin=1cm} +\pagestyle{empty} +\usepackage{pst-spirograph,animate} +\begin{document} + +\noindent +\begin{animateinline}[ + begin={\begin{pspicture}(-6,-3)(8,6)\psframe*[linecolor=yellow,opacity=0.4](-6,-3)(8,6)}, + end={\end{pspicture}}, + palindrome,controls, +% autoplay +]{5} +\multiframe{361}{iA=0+2}{% +\psSpirograph[RubberBand,Z1=20,Z2=40,m=0.2,viewpoint=2 -5 3,arrowinset=0,arrowsize=0.2,wheelrotation=\iA, + linewidth=0.025,color1=yellow,color2=blue!50]} +\end{animateinline} + + +\end{document} diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/animation/animC.tex b/Master/texmf-dist/doc/generic/pst-spirograph/animation/animC.tex new file mode 100644 index 00000000000..f9ccfdd2e88 --- /dev/null +++ b/Master/texmf-dist/doc/generic/pst-spirograph/animation/animC.tex @@ -0,0 +1,17 @@ +\documentclass{standalone} +\usepackage{geometry} +\geometry{paperwidth=20cm,paperheight=16cm,margin=1cm} +\usepackage{pst-spirograph,animate} + +\begin{document} +\begin{animateinline}[ + begin={\begin{pspicture}(-10,-5)(7,8)}, + end={\end{pspicture}}, + palindrome,controls, +% autoplay +]{5} +\multiframe{181}{iA=0+2}{% + \psSpirograph[RubberBand,Z1=40,Z2=10,m=0.2,viewpoint=-1 -5 5,arrowinset=0,arrowsize=0.2,wheelrotation=\iA,linewidth=0.025,color1=yellow,color2=cyan]} +\end{animateinline} + +\end{document} diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.pdf b/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.pdf Binary files differindex 8f855e7883b..95c0731945d 100644 --- a/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.pdf +++ b/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.pdf diff --git a/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.tex b/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.tex index b61131c97ae..9af23c3350b 100644 --- a/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.tex +++ b/Master/texmf-dist/doc/generic/pst-spirograph/pst-spirograph-doc.tex @@ -63,7 +63,8 @@ The wheel can also turn off a first fixed gear, it is thus possible to draw epic \begin{BDef} -\Lcs{psSpirograph}\OptArgs\Largr{\CAny} +\Lcs{psSpirograph}\OptArgs\Largr{\CAny}\\ +\Lcs{psSpirographB}\OptArgs\Largr{\CAny} \end{BDef} @@ -125,15 +126,18 @@ which can take every possible value. \begin{LTXexample}[pos=t] \psset{unit=0.75} -\begin{pspicture}[showgrid=top,opacity=0.5](-7,-7)(7,7) -\psframe*[linecolor=yellow!30](-7,-7)(7,7) +\begin{pspicture}[showgrid=top,opacity=0.5](-11,-11)(11,11) +\psframe*[linecolor=yellow!30](-11,-11)(11,11) \psset{thetamax=720,Z1=120,Z2=48,ap=10,linewidth=0.025,fillstyle=solid} +\psSpirograph[inner=false,m=0.1,polarangle=200,holenumber=0,linecolor=blue,curvecolor=blue] \psSpirograph[m=0.1,polarangle=200,holenumber=0,linecolor=red] -\psSpirograph[m=0.05,polarangle=340,holenumber=3,curvecolor=blue,linecolor=blue] -\psSpirograph[m=0.075,polarangle=90,holenumber=6,curvecolor=green,linecolor=green] \end{pspicture} \end{LTXexample} + + + + \subsection{Pencil position} \noindent\begin{tabularx}{\linewidth}{@{} XX @{}} @@ -267,15 +271,15 @@ examples use a bigger angle step than useful for a single animation. palindrome,controls, % autoplay ]{5} -\multiframe{100}{iA=0+8}{% +\multiframe{80}{iA=0+10}{% \psSpirograph[thetamax=\iA,Z1=59,Z2=24,m=0.1,ap=10,curvewidth=1.1pt, linewidth=0.025,fillstyle=solid,polarangle=\iA,holenumber=5,opacity=0.5](0,0)} \end{animateinline} \end{LTXexample} +\iffalse \psset{linewidth=0.1pt} - \begin{LTXexample}[pos=t] \psset{unit=0.3cm} \begin{animateinline}[ @@ -289,7 +293,6 @@ examples use a bigger angle step than useful for a single animation. \end{LTXexample} -\iffalse \begin{LTXexample}[pos=t] \psset{unit=0.5cm} \begin{animateinline}[ @@ -313,7 +316,7 @@ examples use a bigger angle step than useful for a single animation. \psgrid[style=gridstyleA,unit=1.4](-10,-10)(10,10)% \ifnum\i=181 \psset{gearwheels=false}\fi \psSpirograph[Z1=50,Z2=20,m=0.2,linewidth=0.025,fillstyle=solid,opacity=0.75,polarangle=\i,circles,TypeA=false, - thetamax=\i,curvecolor=red,curvewidth=2pt,HolePos=1.05]} + thetamax=\i,curvecolor=red,curvewidth=2pt,HolePos=1.5]} \end{animateinline} \end{LTXexample} @@ -330,7 +333,6 @@ examples use a bigger angle step than useful for a single animation. linecolor=blue,fillstyle=solid,opacity=0.75,polarangle=\i,circles=false,thetamax=\i,curvecolor=red,curvewidth=2pt,HolePos=1.7]} \end{animateinline} \end{LTXexample} -\fi @@ -350,6 +352,34 @@ examples use a bigger angle step than useful for a single animation. } \end{animateinline} \end{LTXexample} +\fi + + +\clearpage + +\section{Connect the two gears with a rubberband} + +This is an adaptation with PSTricks of an idea of Alejandro Teutli which he realized with Mathematica: +\url{https://demonstrations.wolfram.com/ParametricMovementOfARubberBand/} which is a variation of a spirograph. +A rubber band is fixed by its ends on two gears. A pencil tied in the middle of the elastic rubberband draws the curve obtained when the gears are +rotating. The optional argument \Lkeyword{RubberBand} must be used, if you want such a spirograph. It is only available +in 3D. + + +\begin{LTXexample}[pos=t] +\begin{animateinline}[ + width=0.9\linewidth, + begin={\begin{pspicture}(-6,-3)(8,6)\psframe*[linecolor=yellow,opacity=0.4](-6,-3)(8,6)}, + end={\end{pspicture}}, + palindrome,controls, +% autoplay +]{5} +\multiframe{181}{iA=0+4}{% +\psSpirograph[RubberBand,Z1=20,Z2=40,m=0.2,viewpoint=2 -5 3,arrowinset=0,arrowsize=0.2,wheelrotation=\iA, + linewidth=0.025,color1=yellow,color2=blue!50]} +\end{animateinline} +\end{LTXexample} + |