summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-12-13 23:45:03 +0000
committerKarl Berry <karl@freefriends.org>2010-12-13 23:45:03 +0000
commite572bd73edca41c8e3641ed601afa67ec7706bf4 (patch)
treea54fd6d59ae640a4b31f642c8f8d1637fb1f8b36 /Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
parent81a055e8de611631d607424adce2e6c5583e193e (diff)
pstricks-add 3.46 (13dec10)
git-svn-id: svn://tug.org/texlive/trunk@20723 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex')
-rw-r--r--Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex41
1 files changed, 38 insertions, 3 deletions
diff --git a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
index 7b68855d1de..3d2a9e33c44 100644
--- a/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
+++ b/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
@@ -1,4 +1,4 @@
-%% $Id: pstricks-add.tex 412 2010-11-03 19:39:07Z herbert $
+%% $Id: pstricks-add.tex 431 2010-12-13 10:53:46Z herbert $
%%
%%
%% This is file `pstricks-add.tex',
@@ -31,8 +31,8 @@
\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi
\ifx\PSTmathLoaded\endinput\else \input pst-math \fi
%
-\def\fileversion{3.45}
-\def\filedate{2010/11/03}
+\def\fileversion{3.46}
+\def\filedate{2010/12/13}
\message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)}
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -2027,6 +2027,40 @@ dup #1Delta.X m 1 add get mul #1.X m get add #1Tick.X j 3 -1 roll put % s on sta
\endgroup%
}
%
+\define@boolkey[psset]{pstricks-add}[Pst@]{markAngle}[true]{}
+\psset[pstricks-add]{markAngle=false}
+\newpsstyle{psMarkAngleStyle}{arrows=->,arrowsize=4pt}
+\newpsstyle{psMarkAngleLineStyle}{linestyle=dotted,arrows=-}
+%
+\def\psStartPoint(#1){\pst@getcoor{#1}\pst@tempA
+ \pstVerb{tx@Dict begin
+ \pst@tempA
+ \pst@number\psyunit div /cp.Y exch def
+ \pst@number\psxunit div /cp.X exch def end
+ }}
+\psStartPoint(0,0)
+%
+\def\psVector{\@ifnextchar[\psVector@i{\psVector@i[]}}
+\def\psVector@i[#1](#2){%
+ \pst@killglue%
+ \pst@getcoor{#2}\pst@tempCoor%
+ \begingroup
+ \psset{arrows=->,arrowsize=6pt,#1}%
+ \rput(! cp.X cp.Y ){%
+ \psline(0,0)(#2)%
+ \ifPst@markAngle
+ \psarc[style=psMarkAngleStyle](0,0){1}{0}{!\pst@tempCoor exch atan}%
+ \psline[style=psMarkAngleLineStyle](1.5,0)%
+ \fi}%
+ \endgroup%
+ \pstVerb{tx@Dict begin
+ \pst@tempCoor
+ \pst@number\psyunit div cp.Y add /cp.Y exch def
+ \pst@number\psxunit div cp.X add /cp.X exch def end
+ }%
+ \ignorespaces%
+}
+%
\def\resetOptions{%
\def\pst@linetype{0}%
\pstScalePoints(1,1){}{}%
@@ -2046,6 +2080,7 @@ dup #1Delta.X m 1 add get mul #1.X m get add #1Tick.X j 3 -1 roll put % s on sta
braceWidthOuter=10\pslinewidth,
chartNodeI=0.75,
chartNodeO=1.5,
+ markAngle=false,
}}
%
\resetOptions