summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex')
-rw-r--r--Master/texmf-dist/tex/generic/pstricks-add/pstricks-add.tex20
1 files changed, 16 insertions, 4 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 96384ac46c1..31c7715954b 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 75 2009-01-17 22:01:38Z herbert $
+%% $Id: pstricks-add.tex 83 2009-01-23 19:59:51Z herbert $
%%
%%
%% This is file `pstricks-add.tex',
@@ -30,7 +30,7 @@
\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi
%
\def\fileversion{3.17}
-\def\filedate{2009/01/17}
+\def\filedate{2009/01/21}
\message{`pstricks-add' v\fileversion, \filedate\space (dr,hv)}
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -115,6 +115,10 @@
\@for#1:=\reserved@a\do{#3}%
\endgroup%
}
+\def\psForeach#1#2#3{%
+ \edef\reserved@a{#2}%
+ \@for#1:=\reserved@a\do{#3}%
+}
%
% A modulo macro for integer values
% \pst@mod{34}{6}\value ==> \value is 4
@@ -165,7 +169,13 @@
}
\def\pst@int#1{\expandafter\pst@@int#1..\@nil}
\def\pst@@int#1.#2.\@nil{#1}
-
+%
+\def\psGetSlope(#1,#2)(#3,#4)#5{% 4 values without a dimen! #5 is a macro
+ \pst@dimm=#1pt%
+ \advance\pst@dimm by -#3pt%
+ \pst@dimn=#2pt%
+ \advance\pst@dimn by -#4pt
+ \pst@divide{\pst@dimn}{\pst@dimm}#5}
%
%--------------------------------------- small stuff -------------------------------
\def\use@keep@par{% same as \use@par, but keeps the values
@@ -1344,7 +1354,9 @@
%
%the following works only for plotstyle line, polygon and bezier
\define@key[psset]{pstricks-add}{yMaxValue}{\def\psk@yMaxValue{#1 }}
-\psset{yMaxValue=-1.0}% can be in PS syntax (eg 1e1.2) and must be positiv!
+\psset{yMaxValue=-1.0}
+% can be in PS syntax (eg 1e1.2) and must be positiv! negative values
+% will beignored
%
% For quick plots, define:
% \beginqp@<foo> : What to do to first point (PS code only).