summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pst-turtle
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-10-02 21:19:32 +0000
committerKarl Berry <karl@freefriends.org>2019-10-02 21:19:32 +0000
commit3a42c1fa608c2ce1e17a6301f9f96bf20fce0a2e (patch)
tree6bbe568e19e38aa88000759d778b123a9d74a04c /Master/texmf-dist/tex/generic/pst-turtle
parent40da9ba138cb7756f970eca33d3896daf628c2c9 (diff)
pst-turtle (2oct19)
git-svn-id: svn://tug.org/texlive/trunk@52261 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-turtle')
-rw-r--r--Master/texmf-dist/tex/generic/pst-turtle/pst-turtle.tex63
1 files changed, 63 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-turtle/pst-turtle.tex b/Master/texmf-dist/tex/generic/pst-turtle/pst-turtle.tex
new file mode 100644
index 00000000000..acf95677dbf
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/pst-turtle/pst-turtle.tex
@@ -0,0 +1,63 @@
+%% $Id: pst-turtle.tex 1093 2019-10-02 11:28:36Z herbert $
+%%
+%% This is file `pst-turtle.tex',
+%%
+%% IMPORTANT NOTICE:
+%%
+%% Package `pst-turtle.tex'
+%%
+%% Herbert Voss <hvoss@tug.org>
+%%
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License Distributed from CTAN archives
+%% in directory macros/latex/base/lppl.txt.
+%%
+%% DESCRIPTION:
+%% `pst-turtle' is a PSTricks package to plot special functions
+%%
+%% For a ChangeLog go the the end
+%%
+\csname PSTturtleLoaded\endcsname
+\let\PSTfuncLoaded\endinput
+% Requires some PSTricks packages
+\ifx\PSTricksLoaded\endinput\else \input pstricks.tex\fi
+\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey.tex \fi
+%
+\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
+% interface to the `xkeyval' package
+\pst@addfams{pst-turtle}
+%
+\def\fileversion{0.02}
+\def\filedate{2019/10/02}
+\message{`PST-turtle' v\fileversion, \filedate\space (hv)}
+%
+\define@boolkey[psset]{pst-turtle}[Pst@]{showhead}[true]{}%
+\psset{showhead=false}
+%
+\pstheader{pst-turtle.pro}
+%
+\def\psTurtle{\pst@object{psTurtle}}
+\def\psTurtle@i{\@ifnextchar(\psTurtle@ii{\psTurtle@ii(0,0)}}
+\def\psTurtle@ii(#1)#2{%
+ \pst@getcoor{#1}\pst@tempA
+ \begin@OpenObj
+ \psset{unit=1cm}%
+ \addto@pscode{
+ tx@TurtleDict begin
+ \pst@tempA translate
+ \pst@number\psxunit \pst@number\psyunit scale
+ 0 0 moveto
+ turtle % initialize
+ #2
+ 2 setlinejoin
+ end
+ 1 \pst@number\psxunit div 1 \pst@number\psyunit div scale
+ }%
+ \end@OpenObj
+}
+\catcode`\@=\PstAtCode\relax
+%
+%% END: pst-turtle.tex
+\endinput
+%
+