pst-plot (20jan11)

git-svn-id: svn://tug.org/texlive/trunk@21134 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 27 insertions, 19 deletions

diff --git a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
index e89b28864ed..0b97daebec3 100644
--- a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
+++ b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
@@ -1,4 +1,4 @@
-% $Id: pst-plot.tex 428 2010-11-28 16:22:11Z herbert $
+% $Id: pst-plot.tex 447 2011-01-19 15:23:33Z herbert $
 %% BEGIN pst-plot.tex
 %%
 %% plotting functions and data with PSTricks.
@@ -20,8 +20,8 @@
 \ifx\PSTFPloaded\endinput\else   \input pst-fp.tex  \fi
 \ifx\MultidoLoaded\endinput\else \input multido.tex \fi
 %
-\def\fileversion{1.25}
-\def\filedate{2010/11/27}
+\def\fileversion{1.26}
+\def\filedate{2011/01/19}
 \message{ v\fileversion, \filedate\space (tvz,hv)}
 %
 \edef\TheAtCode{\the\catcode`\@}
@@ -415,8 +415,10 @@ D\space##1%
 \psset[pst-plot]{plotpoints=50}
 %
 %the following works only for plotstyle line, polygon and bezier
-\define@key[psset]{pst-plot}{yMaxValue}[-1.0]{\def\psk@yMaxValue{#1 }}
-\psset[pst-plot]{yMaxValue=-1.0}
+\define@key[psset]{pst-plot}{yMaxValue}[1.e30]{\def\psk@yMaxValue{#1 }}
+\psset{yMaxValue=1.e30}
+\define@key[psset]{pst-plot}{yMinValue}[-1.e30]{\def\psk@yMinValue{#1 }}
+\psset{yMinValue=-1.e30}
 % can be in PS syntax (eg 1e1.2) and must be positiv! negative values
 % will beignored
 %
@@ -428,10 +430,13 @@ D\space##1%
 %
 \def\beginqp@line{\pst@oplineto}
 \def\doqp@line{ 
-  \psk@yMaxValue 0 gt 
-    { dup abs \psk@yMaxValue \pst@number\psyunit mul gt 
-      { moveto }{ L } ifelse }
-    { L } ifelse 
+      dup
+      \psk@yMaxValue \pst@number\psyunit mul gt 
+      { moveto }{ 
+          dup
+          \psk@yMinValue \pst@number\psyunit mul lt 
+          { moveto }{ L } ifelse 
+      } ifelse
 }
 \def\endqp@line{%
   \ifPst@variableLW \addto@pscode{ \pst@flattenpath }\fi%
@@ -449,10 +454,13 @@ D\space##1%
 %
 \def\beginqp@polygon{moveto }
 \def\doqp@polygon{ 
-  \psk@yMaxValue 0 gt 
-    { dup abs \psk@yMaxValue \pst@number\psyunit mul gt 
-      { moveto }{ L } ifelse }
-    { L } ifelse 
+      dup
+      \psk@yMaxValue \pst@number\psyunit mul gt 
+      { moveto }{ 
+          dup
+          \psk@yMinValue \pst@number\psyunit mul lt 
+          { moveto }{ L } ifelse 
+      } ifelse
 }
 \def\endqp@polygon{%
   \addto@pscode{closepath}%
@@ -478,12 +486,12 @@ D\space##1%
 \def\testqp@dots{\@psttrue}
 %
 \def\beginqp@bezier{/n 0 def \pst@oplineto}
-\def\doqp@bezier{/n n 1 add def n 3 mod 0 eq { % we need 3 points
-  \psk@yMaxValue 0 gt 
-    { dup % last y value
-      abs \psk@yMaxValue\space \pst@number\psyunit mul gt 
-        { moveto pop pop pop pop }{ curveto } ifelse }
-      { curveto } ifelse 
+\def\doqp@bezier{/n n 1 add def n 3 mod 0 eq { % we need 3 points   
+    dup \psk@yMaxValue\space \pst@number\psyunit mul gt 
+    { moveto pop pop pop pop}
+    { dup \psk@yMinValue\space \pst@number\psyunit mul lt 
+      { moveto pop pop pop pop}{ curveto } ifelse 
+    } ifelse 
   } if
 }
 \def\endqp@bezier{%