summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pstricks/pst-plot.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/pstricks/pst-plot.tex')
-rw-r--r--Master/texmf-dist/tex/generic/pstricks/pst-plot.tex38
1 files changed, 26 insertions, 12 deletions
diff --git a/Master/texmf-dist/tex/generic/pstricks/pst-plot.tex b/Master/texmf-dist/tex/generic/pstricks/pst-plot.tex
index d2fff22ed98..0c0bd221216 100644
--- a/Master/texmf-dist/tex/generic/pstricks/pst-plot.tex
+++ b/Master/texmf-dist/tex/generic/pstricks/pst-plot.tex
@@ -4,8 +4,8 @@
%% See the PSTricks User's Guide for documentation.
%%
%%
-%% COPYRIGHT 1993, 1994, 1999 by Timothy Van Zandt, tvz@nwu.edu.
-%% COPYRIGHT 2007-2008 by Herbert Voss, hvoss@tug.org
+%% COPYRIGHT 1993-2006 by Timothy Van Zandt, tvz@nwu.edu.
+%% COPYRIGHT 2007-2009 by Herbert Voss, hvoss@tug.org
%%
%% This program can be redistributed and/or modified under the terms
%% of the LaTeX Project Public License Distributed from CTAN
@@ -24,8 +24,8 @@
\expandafter\next
\fi
-\def\fileversion{1.01}
-\def\filedate{2008/01/26}
+\def\fileversion{1.03}
+\def\filedate{2008/11/24}
\message{ v\fileversion, \filedate}
@@ -172,7 +172,7 @@ D\space##1%
\edef\psk@plotpoints{\the\pst@cntg\space}%
\fi}
\psset@plotpoints{50}
-
+%
% For quick plots, define:
% \beginqp@<foo> : What to do to first point (PS code only).
% \doqp@<foo> : What to do to subsequent points (PS code only).
@@ -275,7 +275,9 @@ n 0 eq not
L
pop pop } if}>
% end (hv) --------------------------------------------------------------
+
%
+\def\psdataplot{\def\pst@par{}\pst@object{dataplot}}
\def\dataplot{\def\pst@par{}\pst@object{dataplot}}
\def\dataplot@i#1{%
\pst@killglue
@@ -305,6 +307,7 @@ n 0 eq not
\addto@pscode{ D }%
\@nameuse{endqp@\psplotstyle}}
+\def\psfileplot{\def\pst@par{}\pst@object{fileplot}}
\def\fileplot{\def\pst@par{}\pst@object{fileplot}}
\def\fileplot@i#1{%
\pst@killglue%
@@ -322,6 +325,7 @@ n 0 eq not
/m exch def /n m 2 div cvi def
n { y mul m 1 roll x mul m 1 roll /m m 2 sub def } repeat>
+\def\pslistplot{\def\pst@par{}\pst@object{listplot}}
\def\listplot{\def\pst@par{}\pst@object{listplot}}
\def\listplot@i#1{\listplot@ii{\addto@pscode{#1}}}
\def\listplot@ii#1{%
@@ -363,13 +367,17 @@ n 0 eq not
\ignorespaces}
\def\psplot@ii{%
\addto@pscode{%
+ /ps@Exit false def % hv 2008-11-22
xy \@nameuse{beginqp@\psplotstyle}
\psk@plotpoints 1 sub {
/x x dx add def
xy \@nameuse{doqp@\psplotstyle}
+ ps@Exit { exit } if % hv 2008-11-22
} repeat
- /x x1 def
- xy \@nameuse{doqp@\psplotstyle}}%
+ ps@Exit not { % hv 2008-11-22
+ /x x1 def
+ xy \@nameuse{doqp@\psplotstyle}
+ } if }%
\@nameuse{endqp@\psplotstyle}}
\def\psplot@iii{%
\addto@pscode{%
@@ -386,6 +394,7 @@ n 0 eq not
n 2 roll}%
\@nameuse{endplot@\psplotstyle}}
+\def\psparametricplot{\def\pst@par{}\pst@object{parametricplot}}% hv 2008-11-22
\def\parametricplot{\def\pst@par{}\pst@object{parametricplot}}
\def\parametricplot@i#1#2#3{%
\pst@killglue
@@ -414,13 +423,17 @@ n 0 eq not
\ignorespaces}
\def\parametricplot@ii{%
\addto@pscode{%
+ /ps@Exit false def % hv 2008-11-22
xy \@nameuse{beginqp@\psplotstyle}
\psk@plotpoints 1 sub {
/t t dt add def
xy \@nameuse{doqp@\psplotstyle}
+ ps@Exit { exit } if % hv 2008-11-22
} repeat
- /t t1 def
- xy \@nameuse{doqp@\psplotstyle}}%
+ ps@Exit not {
+ /t t1 def
+ xy \@nameuse{doqp@\psplotstyle}
+ } if }%
\@nameuse{endqp@\psplotstyle}}
\def\parametricplot@iii{%
\addto@pscode{%
@@ -541,12 +554,13 @@ n 0 eq not
\ifdim\pst@dimb=\z@\else\showoriginfalse\fi
\ifnum\psk@dx=\z@
\pst@dimg=\psk@Dx\psxunit
- \psDEBUG[psaxes@iv]{\textbackslash pst@dimg=\the\pst@dimg}% v.1.01
+ \psDEBUG[psaxes@iv]{local:\textbackslash pst@dimg=\the\pst@dimg}% v.1.01
\ifdim\pst@dimg<\p@ \pst@cnta=\psk@Dx \edef\psk@Dx{-\the\pst@cnta} % v.1.01
- \ifnum\Pst@Debug>0 \typeout{==DEBUG== pst-plot(psaxes@iv): Dx -> -Dx (was negative)}\fi % v.1.01
+ \psDEBUG[psaxes@iv]{Dx -> -Dx (was negative)}% v.1.01
\fi % v.1.01
\edef\psk@dx{\number\pst@dimg}%
- \psDEBUG[psaxes@iv]{\textbackslash psk@dx=\psk@dx}% v.1.01
+ \psDEBUG[psaxes@iv]{local: \textbackslash psk@dx=\psk@dx}% v.1.01
+ \else\psDEBUG[psaxes@iv]{global: \textbackslash psk@dx=\psk@dx}%
\fi
\ifnum\psk@ticks<\tw@
\ifnum\psk@tickstyle>\z@ \else\advance\pslabelsep\psk@ticksize\p@\fi