texlive[60024] Master/texmf-dist: pst-arrow (23jul21)
commits+karl at tug.org
commits+karl at tug.org
Fri Jul 23 22:08:01 CEST 2021
Revision: 60024
http://tug.org/svn/texlive?view=revision&revision=60024
Author: karl
Date: 2021-07-23 22:08:01 +0200 (Fri, 23 Jul 2021)
Log Message:
-----------
pst-arrow (23jul21)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/generic/pst-arrow/Changes
trunk/Master/texmf-dist/doc/generic/pst-arrow/README
trunk/Master/texmf-dist/doc/generic/pst-arrow/pst-arrow-doc.pdf
trunk/Master/texmf-dist/doc/generic/pst-arrow/pst-arrow-doc.tex
trunk/Master/texmf-dist/tex/generic/pst-arrow/pst-arrow.tex
trunk/Master/texmf-dist/tex/latex/pst-arrow/pst-arrow.sty
Modified: trunk/Master/texmf-dist/doc/generic/pst-arrow/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-arrow/Changes 2021-07-23 20:07:39 UTC (rev 60023)
+++ trunk/Master/texmf-dist/doc/generic/pst-arrow/Changes 2021-07-23 20:08:01 UTC (rev 60024)
@@ -1,4 +1,4 @@
-%% $Id: Changes 330 2016-09-01 19:02:44Z herbert $
+%% $Id: Changes 134 2021-07-23 06:33:54Z herbert $
%%
pst-arrow.sty -----------
v. 0.01 2016-09-09 initial version
@@ -5,4 +5,5 @@
pst-arrow.tex ----------- (hv)
+ v. 0.02 2021-07-23 - added tipcolor option
v. 0.01 2016-09-09 initial version
Modified: trunk/Master/texmf-dist/doc/generic/pst-arrow/README
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-arrow/README 2021-07-23 20:07:39 UTC (rev 60023)
+++ trunk/Master/texmf-dist/doc/generic/pst-arrow/README 2021-07-23 20:08:01 UTC (rev 60024)
@@ -7,10 +7,12 @@
Save the files pst-arrow.sty|tex in a directory,
which is part of your local TeX tree.
Then do not forget to run texhash to update this tree.
-For more information see the documentation of your LaTeX distribution
-on installing packages into your local TeX system or read the
-TeX Frequently Asked Questions:
-(http://www.tex.ac.uk/cgi-bin/texfaq2html?label=instpackages).
-# $Id: README 329 2016-09-01 19:01:53Z herbert $
+%% 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.
+
+hvoss at tug.org
+
+# $Id: README 134 2021-07-23 06:33:54Z herbert $
Modified: trunk/Master/texmf-dist/doc/generic/pst-arrow/pst-arrow-doc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/generic/pst-arrow/pst-arrow-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-arrow/pst-arrow-doc.tex 2021-07-23 20:07:39 UTC (rev 60023)
+++ trunk/Master/texmf-dist/doc/generic/pst-arrow/pst-arrow-doc.tex 2021-07-23 20:08:01 UTC (rev 60024)
@@ -1,4 +1,4 @@
-%% $Id: pst-arrow-doc.tex 328 2016-09-01 19:00:31Z herbert $
+%% $Id: pst-arrow-doc.tex 134 2021-07-23 06:33:54Z herbert $
\documentclass[11pt,english,BCOR10mm,DIV14,bibliography=totoc,parskip=false,smallheadings
headexclude,footexclude,twoside]{pst-doc}
\usepackage[utf8]{inputenc}
@@ -23,6 +23,7 @@
\end{pspicture}
}
+\addbibresource{\jobname.bib}
\begin{document}
\title{\texttt{pst-arrow}}
@@ -343,6 +344,44 @@
\end{LTXexample}
+%--------------------------------------------------------------------------------------
+\subsection{\nxLkeyword{tipcolor} option}
+%--------------------------------------------------------------------------------------
+
+It is possible to change the color of the arrow tip by setting \Lkeyword{tipcolor}:
+
+
+\begin{center}
+ \bgroup
+ \psset{linecolor=green,linewidth=1pt,arrowscale=2}%
+ \begin{tabular}{lp{2.8cm}}%
+ Value & Example \\[2pt]\hline
+ \rlap{\texttt{\textbackslash psset\{tipcolor=red\}}}\\
+ \verb+\psline{->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=red]{->>}(0,1ex)(2.3,1ex) \\
+ \verb+\psline[nArrowsA=3]{->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=red,nArrowsA=3]{->>}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=5]{->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=red,nArrowsA=5]{->>}(0,1ex)(2.3,1ex)\\
+ \verb+\psline{<<-}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=red]{<<-}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=3]{<<-}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=red,nArrowsA=3]{<<-}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=5]{<<-}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=red,nArrowsA=5]{<<-}(0,1ex)(2.3,1ex)\\
+ \rlap{\texttt{\textbackslash psset\{tipcolor=blue\}}}\\
+ \verb+\psline{<<->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=blue]{<<->>}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=3]{<<->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=blue,nArrowsA=3]{<<->>}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=5]{<<->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=blue,nArrowsA=5]{<<->>}(0,1ex)(2.3,1ex)\\
+ \verb+\psline{<<-|}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=blue]{<<-|}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=3]{<<-<<}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=blue,nArrowsA=3]{<<-<<}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[nArrowsA=5]{<<-o}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=blue,nArrowsA=5]{<<-o}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[tipcolor=magenta,nArrowsA=3,nArrowsB=4]{<<-<<}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=magenta,nArrowsA=3,nArrowsB=4]{<<-<<}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[tipcolor=cyan,nArrowsA=3,nArrowsB=4]{>>->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=cyan,nArrowsA=3,nArrowsB=4]{>>->>}(0,1ex)(2.3,1ex)\\
+ \verb+\psline[tipcolor=yellow,nArrowsA=1,nArrowsB=4]{>>->>}(0,1ex)(2.3,1ex)+ & \psline[tipcolor=yellow,nArrowsA=1,nArrowsB=4]{>>->>}(0,1ex)(2.3,1ex)\\\hline
+ \end{tabular}
+ \egroup
+\end{center}
+
+
+
+\clearpage
+
+
\subsection{Big Arrows}
\begin{LTXexample}[width=5cm]
@@ -842,8 +881,7 @@
\bgroup
\raggedright
\nocite{*}
-\bibliographystyle{plain}
-\bibliography{\jobname}
+\printbibliography
\egroup
\printindex
Modified: trunk/Master/texmf-dist/tex/generic/pst-arrow/pst-arrow.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pst-arrow/pst-arrow.tex 2021-07-23 20:07:39 UTC (rev 60023)
+++ trunk/Master/texmf-dist/tex/generic/pst-arrow/pst-arrow.tex 2021-07-23 20:08:01 UTC (rev 60024)
@@ -1,4 +1,4 @@
-%% $Id: pst-arrow.tex 328 2016-09-01 19:00:31Z herbert $
+%% $Id: pst-arrow.tex 134 2021-07-23 06:33:54Z herbert $
%%
%% This is file `pst-arrow.tex',
%%
@@ -22,13 +22,17 @@
\ifx\PSTricksLoaded\endinput\else\input pstricks \fi
\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi
%
-\def\fileversion{0.01}
-\def\filedate{2016/09/01}
+\def\fileversion{0.02}
+\def\filedate{2021/07/21}
\message{`pst-arrow' v\fileversion, \filedate\space (dr,hv)}
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
\pst at addfams{pst-arrow}
%
+\define at key[psset]{pst-arrow}{tipcolor}[black]{\pst at getcolor{#1}\psk at tipcolor}
+\psset[pst-arrow]{tipcolor=black}
+
+%
\def\psBigArrow{\pst at object{psBigArrow}}
\def\psBigArrow at i(#1)(#2){%
\addbefore at par{doublesep=1cm}
@@ -105,18 +109,25 @@
x y L % point #3
{ closepath gsave fill grestore } if % if filled : close and fill
\@nameuse{psls@\psarrowlinestyle}
+ \pst at usecolor\psk at tipcolor
stroke % draw line
0 t { y 2 mul } { 0 } ifelse moveto> % if outside : twice longer line
% VeeArrow : filled? outside? (total) angle (projected) length (arrow) line width
+\@namedef{psas@|}{\pst at usecolor\psk at tipcolor \psk at tbarsize \tx at Tbar}
+
\@namedef{psas at v}{%
+ \pst at usecolor\psk at tipcolor
false false \psk at veearrowangle \psk at veearrowlength \psk at veearrowlinewidth \tx at VeeArrow}
\@namedef{psas at V}{%
+ \pst at usecolor\psk at tipcolor
false true \psk at veearrowangle \psk at veearrowlength \psk at veearrowlinewidth \tx at VeeArrow}
\@namedef{psas at f}{%
+ \pst at usecolor\psk at tipcolor
true false \psk at filledveearrowangle \psk at filledveearrowlength \psk at filledveearrowlinewidth \tx at VeeArrow}
\@namedef{psas at F}{%
+ \pst at usecolor\psk at tipcolor
true true \psk at filledveearrowangle \psk at filledveearrowlength \psk at filledveearrowlinewidth \tx at VeeArrow}
% And An another arrowhead
@@ -138,12 +149,58 @@
y neg y moveto % point #1
y y neg L % point #2
\@nameuse{psls@\psarrowlinestyle}
+ \pst at usecolor\psk at tipcolor
stroke % draw line
0 0 moveto> % origin
-\@namedef{psas at t}{ false \psk at tickarrowlength \psk at tickarrowlinewidth \tx at TickArrow }
-\@namedef{psas at T}{ true \psk at tickarrowlength \psk at tickarrowlinewidth \tx at TickArrow }
+
+\@namedef{psas at t}{ \pst at usecolor\psk at tipcolor\space false \psk at tickarrowlength \psk at tickarrowlinewidth \tx at TickArrow }
+\@namedef{psas at T}{ \pst at usecolor\psk at tipcolor\space true \psk at tickarrowlength \psk at tickarrowlinewidth \tx at TickArrow }
+
+\pst at def{ArrowD}< % the sides are drawn as curves (hv 20071211)
+ CLW mul add dup
+ 2 div /w ED
+ mul dup /h ED
+ mul /Inset ED
+ { 0 h T 1 -1 scale } if % changes the direction
+% we use y=w/h^2 * x^2 as equation for the control points
+% for the coordinates the arrow is seen from top to bottom
+% the bottom (tip) is (0;0)
+ w neg h moveto % lower left of >
+ w 9 div 4 mul neg h 3 div 2 mul
+ w 9 div neg h 3 div
+ 0 0 curveto % tip of >
+ w 9 div h 3 div
+ w 9 div 4 mul h 3 div 2 mul
+ w h curveto % upper left of >
+ w neg Inset neg rlineto % move to x=0 and inset
+ gsave
+ \pst at usecolor\psk at tipcolor
+ fill grestore >
%
+\pst at def{ArrowT}< % like tikz
+ CLW mul add dup
+ 2 div /w ED
+ mul dup /h ED
+ mul /Inset ED
+ { 0 h T 1 -1 scale } if % changes the direction
+ w 2 mul /w exch def
+ w neg h moveto % lower left of >
+ w 9 div 4 mul neg h 3 div 2 mul
+ w 9 div neg h 3 div
+ 0 0 curveto % tip of >
+ w 9 div h 3 div
+ w 9 div 4 mul h 3 div 2 mul
+ w h curveto % upper left of >
+% w neg Inset neg rlineto % move to x=0 and inset
+% CLW SLW
+% 1 0 0 setrgbcolor
+ 2 setlinejoin
+ \pst at usecolor\psk at tipcolor
+ stroke
+ 0 0 moveto >
+%
+%
% HookLeft/RightArrow
\newdimen\pshooklength
\newdimen\pshookwidth
@@ -154,6 +211,7 @@
\edef\pst at arrowtable{\pst at arrowtable,H-H,h-h} % add new arrow
\def\tx at RHook{RHook } % PostScript name
\def\tx at Rhook{Rhook } % PostScript name
+
\@namedef{psas at H}{%
/RHook {
/x ED % hook width
@@ -165,6 +223,7 @@
stroke
0 y moveto % define current point
} def
+ \pst at usecolor\psk at tipcolor
\pst at number\pshooklength
\pst at number\pshookwidth
\tx at RHook
@@ -178,6 +237,7 @@
/a ED
w neg h abs moveto 0 0 L
gsave
+ \pst at usecolor\psk at tipcolor
stroke grestore
} def
0 \psk at arrowlength \psk at arrowsize \tx at Rhook
@@ -194,12 +254,15 @@
/a ED { 0 h T 1 -1 scale } if
gsave
\ifpsArrowFill\else\pst at number\pslinewidth \pst at arrowscale\space div SLW \fi
+ \pst at usecolor\psk at tipcolor
w neg h moveto
0 0 L w h L w neg a neg rlineto
\ifpsArrowFill gsave
\tx at setStrokeTransparency
fill
- grestore \else gsave closepath stroke grestore \fi
+ grestore \else gsave closepath
+ \pst at usecolor\psk at tipcolor
+ stroke grestore \fi
grestore
0 h a sub moveto
}>
Modified: trunk/Master/texmf-dist/tex/latex/pst-arrow/pst-arrow.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/pst-arrow/pst-arrow.sty 2021-07-23 20:07:39 UTC (rev 60023)
+++ trunk/Master/texmf-dist/tex/latex/pst-arrow/pst-arrow.sty 2021-07-23 20:08:01 UTC (rev 60024)
@@ -1,5 +1,9 @@
-%% $Id: pst-arrow.sty 328 2016-09-01 19:00:31Z herbert $
+%% $Id: pst-arrow.sty 134 2021-07-23 06:33:54Z herbert $
%
+%% 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.
+%
\RequirePackage{pstricks}
\ProvidesPackage{pst-arrow}[2016/09/01 v. 0.01 package wrapper for
pst-arrow.tex (hv)]
More information about the tex-live-commits
mailing list.