texlive[49680] Master/texmf-dist: pstricks-add (12jan19)

commits+karl at tug.org commits+karl at tug.org
Sun Jan 13 00:06:36 CET 2019


Revision: 49680
          http://tug.org/svn/texlive?view=revision&revision=49680
Author:   karl
Date:     2019-01-13 00:06:35 +0100 (Sun, 13 Jan 2019)
Log Message:
-----------
pstricks-add (12jan19)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/generic/pstricks-add/Changes
    trunk/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf
    trunk/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex
    trunk/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex

Modified: trunk/Master/texmf-dist/doc/generic/pstricks-add/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pstricks-add/Changes	2019-01-12 22:59:22 UTC (rev 49679)
+++ trunk/Master/texmf-dist/doc/generic/pstricks-add/Changes	2019-01-12 23:06:35 UTC (rev 49680)
@@ -1,4 +1,4 @@
-%% $Id: Changes 851 2018-12-08 20:06:43Z herbert $
+%% $Id: Changes 902 2019-01-12 10:06:35Z herbert $
 %%
 pstricks-add.pro ----------- 
 0.23 2009-12-17 - add RGBtoGRAY and WavelengthToGRAY
@@ -41,6 +41,7 @@
 
 
 pstricks-add.tex ----------- (hv)
+ v 3.87  2019-01-12 - added \psCallout
  v 3.86  2018-12-08 - added some more options for \psCancel
  v 3.85b 2018-02-04 - use LaTeX package pst-calculate
  v 3.85a 2018-02-03 - added area computing for \psStep

Modified: trunk/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex	2019-01-12 22:59:22 UTC (rev 49679)
+++ trunk/Master/texmf-dist/doc/generic/pstricks-add/pstricks-add-doc.tex	2019-01-12 23:06:35 UTC (rev 49680)
@@ -1,4 +1,4 @@
-%% $Id: pstricks-add-doc.tex 851 2018-12-08 20:06:43Z herbert $
+%% $Id: pstricks-add-doc.tex 887 2018-12-29 13:17:59Z herbert $
 %
 \documentclass[11pt,english,BCOR=10mm,DIV=12,bibliography=totoc,parskip=false,headings=small,
     headinclude=false,footinclude=false,oneside]{pst-doc}
@@ -115,6 +115,7 @@
 Peter Hutnick;
 Christophe Jorssen;
 Uwe Kern;
+Friedrich Lenk;
 Manuel Luque;
 Jens-Uwe Morawski;
 Tobias N\"ahring;
@@ -4679,6 +4680,7 @@
 
 
 
+
 %--------------------------------------------------------------------------------------
 \section{Gouraud shading}
 %--------------------------------------------------------------------------------------
@@ -4705,6 +4707,8 @@
 \end{pspicture}
 \end{LTXexample}
 
+
+
 \begin{LTXexample}[pos=t,preset=\centering]
 \begin{pspicture}(0,-.25)(10,10)
   \psGTriangle*(0,0)(9,10)(10,3){black}{white!50}{red!50!green!95}
@@ -4728,6 +4732,62 @@
 \end{pspicture}
 \end{LTXexample}
 
+
+
+
+
+\section{\Lcs{psCallout}}
+
+\begin{BDef}
+\Lcs{psCallout}\OptArgs\Largr{$x_0,y_0$}\Largb{Text}
+\end{BDef}
+
+Possible parameter are:
+
+\begin{description}
+  \item[tipAngle] The angle of the tip depending to the horizontal line. 
+  \item[tipLength] The length of the tip from the coordinates to the box.
+  \item[tipWidth] The width of the tip end.
+  \item[tipPos] Relative position of the tip end to the width of the box.
+\end{description}
+
+
+
+
+\begin{LTXexample}[pos=t,preset=\centering]
+\begin{pspicture}(-5.5,-1)(4,5.5)
+\psaxes[labels=none,ticks=none]{->}(0,0)(-5,-1)(3.5,5)[$x$,-90][$y$,0]
+\psyTick(1){1}\uput[225](0,0){0}
+\psplot[algebraic,,yMaxValue=4.5,linecolor=red,linewidth=1.5pt]{-2.5}{3}{Euler^(-(x))}
+\psCallout(1,0.5){\scriptsize $f(x)=e^{-x}$}
+\psCallout[tipAngle=90](1,1.6){\scriptsize $f(x)=e^{-x}$}
+\psCallout[tipLength=10mm](1,3){$f(x)=e^{-x}$}
+\psCallout[tipLength=10mm,tipAngle=120,tipPos=0.8](-1,1){$f(x)=e^{-x}$}
+\psCallout[tipAngle=120,fillcolor=red!40,fillstyle=solid](-4,3){%
+   \shortstack{Some math\\$f(x)=e^{-x}$}}
+\end{pspicture}
+\end{LTXexample}
+
+
+
+
+\begin{LTXexample}[pos=t,preset=\centering]
+\begin{pspicture}(-5.5,-1)(4,5.5)
+\psaxes[labels=none,ticks=none]{->}(0,0)(-5,-1)(3.5,5)[$x$,-90][$y$,0]
+\psyTick(1){1}\uput[225](0,0){0}
+\psplot[algebraic,,yMaxValue=4.5,linecolor=red,linewidth=1.5pt]{-2.5}{3}{Euler^(-(x))}
+\psset{linearc=0.4}%
+\psCallout(1,0.5){\scriptsize $f(x)=e^{-x}$}
+\psCallout[tipAngle=90](1,1.6){\scriptsize $f(x)=e^{-x}$}
+\psCallout[tipLength=10mm](1,3){$f(x)=e^{-x}$}
+\psCallout[tipLength=10mm,tipAngle=120,tipPos=0.8](-1,1){$f(x)=e^{-x}$}
+\psCallout[tipAngle=120,fillcolor=red!40,fillstyle=solid](-4,3){%
+   \shortstack{Some math\\$f(x)=e^{-x}$}}
+\end{pspicture}
+\end{LTXexample}
+
+
+
 \section{Internal color macros}
 The internal macros \Lcs{pswavelengthToRGB} and \Lcs{pswavelengthToRGB} can be used for own purposed.
 They are defines as follows:
@@ -4741,6 +4801,9 @@
 manipulating or setting the color with \Lps{setgray} or \Lps{setrgbcolor}. 
 For an example see Section~\ref{sec:psMatrix}.
 
+
+
+
 \appendix
 
 

Modified: trunk/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex	2019-01-12 22:59:22 UTC (rev 49679)
+++ trunk/Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex	2019-01-12 23:06:35 UTC (rev 49680)
@@ -1,4 +1,4 @@
-%% $Id: pstricks-add.tex 852 2018-12-08 20:32:46Z herbert $
+%% $Id: pstricks-add.tex 903 2019-01-12 17:16:09Z 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.86}
-\def\filedate{2018/12/08}
+\def\fileversion{3.87}
+\def\filedate{2019/01/12}
 \let\pstricksaddFV\fileversion
 \message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)}
 %
@@ -594,6 +594,43 @@
   \ignorespaces%
 }
 %
+\define at key[psset]{pstricks-add}{tipAngle}[60]{\pst at getangle{#1}\psk at tipAngle}
+\define at key[psset]{pstricks-add}{tipLength}[5mm]{\pst at getlength{#1}\psk at tipLength}
+\define at key[psset]{pstricks-add}{tipWidth}[2mm]{\pst at getlength{#1}\psk at tipWidth}
+\define at key[psset]{pstricks-add}{tipPos}[0.2]{\def\psk at tipPos{#1 }}
+\psset[pstricks-add]{tipAngle=60,tipLength=5mm,tipWidth=2mm,tipPos=0.2}%
+%
+\def\psCallout{\def\pst at par{}\pst at object{psCallout}}
+\def\psCallout at i(#1)#2{%
+  \setbox\pst at hbox=\hbox{#2}%
+  \begingroup
+  \addbefore at par{linewidth=0.1pt,framesep=6pt}%
+  \use at par
+  \pstVerb{
+    /boxsepX { \pst at number\psframesep\space \pst at number\psxunit div } bind def
+    /boxsepY { \pst at number\psframesep\space \pst at number\psyunit div } bind def
+    /tipEnd { \psk at tipLength\space \pst at number\psxunit div \psk at tipAngle\space PtoC } bind def
+    /boxW { \pst at number\wd\pst at hbox\space \pst at number\psxunit div boxsepX 2 mul add } bind def
+    /boxH { \pst at number\ht\pst at hbox\space \pst at number\psyunit div boxsepY 2 mul add } bind def
+  }%
+  \rput(#1){%
+    \psline[linearc=0,linejoin=2]%
+      (! tipEnd exch \psk at tipWidth\space 2 div \pst at number\psxunit div sub exch)%
+      (0,0)
+      (! tipEnd exch \psk at tipWidth\space 2 div \pst at number\psxunit div add exch)%
+    \psline[linejoin=2]%
+      (! tipEnd exch \psk at tipWidth\space 2 div \pst at number\psxunit div sub exch)%
+      (! tipEnd exch \psk at tipPos boxW mul sub exch)% lower left
+      (! tipEnd exch \psk at tipPos boxW mul sub exch boxH add )% upper left
+      (! tipEnd exch 1 \psk at tipPos sub boxW mul add exch boxH add)% upper right 
+      (! tipEnd exch 1 \psk at tipPos sub boxW mul add exch)
+      (! tipEnd exch \psk at tipWidth\space 2 div \pst at number\psxunit div add exch)%
+    \rput[lb](! tipEnd boxsepY add exch \psk at tipPos boxW mul sub boxsepX add exch){#2}%
+  }%
+  \endgroup
+  \ignorespaces
+}
+%
 \def\tx at MovetoByHand{ tx at addDict begin MovetoByHand end }
 \def\tx at LinetoByHand{ tx at addDict begin LinetoByHand end }
 %/amplHand {.8} def 



More information about the tex-live-commits mailing list