summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2014-09-01 21:35:30 +0000
committerKarl Berry <karl@freefriends.org>2014-09-01 21:35:30 +0000
commit90a719a4e36e91ce8d6c935f4ad9e5b1e50e2c49 (patch)
tree8e2096c4852f923cd98d7df251add19581408bba
parentdb5527176c257269461bf1b4bbcc7f4a057f82e6 (diff)
pstricks
git-svn-id: svn://tug.org/texlive/trunk@35082 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/texmf-dist/doc/generic/pstricks/Changes1
-rw-r--r--Master/texmf-dist/doc/generic/pstricks/Changes.generic1
-rw-r--r--Master/texmf-dist/doc/generic/pstricks/pst-news14.pdfbin69691 -> 77050 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pstricks/pst-news14.tex28
-rw-r--r--Master/texmf-dist/dvips/pstricks/pst-algparser.pro3
-rw-r--r--Master/texmf-dist/tex/generic/pstricks/config/xdvipdfmx.cfg42
-rw-r--r--Master/texmf-dist/tex/generic/pstricks/pstricks.tex62
7 files changed, 103 insertions, 34 deletions
diff --git a/Master/texmf-dist/doc/generic/pstricks/Changes b/Master/texmf-dist/doc/generic/pstricks/Changes
index a97be59d9fb..4c43f30360e 100644
--- a/Master/texmf-dist/doc/generic/pstricks/Changes
+++ b/Master/texmf-dist/doc/generic/pstricks/Changes
@@ -1,3 +1,4 @@
+2014-08-28 - updated news2014
2014-07-28 - updated news2014
2013-12-09 - updated news2009 and news2013
2013-11-26 - updated news2013
diff --git a/Master/texmf-dist/doc/generic/pstricks/Changes.generic b/Master/texmf-dist/doc/generic/pstricks/Changes.generic
index 49cf40f06b4..ee0276af234 100644
--- a/Master/texmf-dist/doc/generic/pstricks/Changes.generic
+++ b/Master/texmf-dist/doc/generic/pstricks/Changes.generic
@@ -3,6 +3,7 @@ versions like 2.47a have only changes in other files, but not
in this main package.
+2.57 2014-08-27 - take option correctAngle into account for \psellipticwedge
2.56 2014-07-31 - added gridstyleA and fixed bug with Ellipse and move
to start point
2.55 2014-07-28 - added \psellipseAB: draw an ellipse between two given points
diff --git a/Master/texmf-dist/doc/generic/pstricks/pst-news14.pdf b/Master/texmf-dist/doc/generic/pstricks/pst-news14.pdf
index 4785da550b5..736504dc193 100644
--- a/Master/texmf-dist/doc/generic/pstricks/pst-news14.pdf
+++ b/Master/texmf-dist/doc/generic/pstricks/pst-news14.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pstricks/pst-news14.tex b/Master/texmf-dist/doc/generic/pstricks/pst-news14.tex
index 9707ad4e0d3..64d7d2dada2 100644
--- a/Master/texmf-dist/doc/generic/pstricks/pst-news14.tex
+++ b/Master/texmf-dist/doc/generic/pstricks/pst-news14.tex
@@ -74,6 +74,34 @@ needs some tricky internal commands and may not work in all cases.
\end{pspicture}
\end{LTXexample}
+
+\subsection{Option \texttt{correctAngle}}
+It now works also for \Lcs{psellipiticwedge}. The setting of \Lkeyword{origin} is needed
+if the center of the ellipse is not the origin of the underlying coordinate system.
+
+\begin{LTXexample}[pos=t]
+\begin{pspicture}[dimen=m,showgrid=top](6,4)
+\pnodes{P}(3,1)(5,1)(4,2)
+\pcline[nodesep=-1](P0)(P1)
+\pcline[nodesep=-1](P0)(P2)
+\psellipticarc[origin={P0},correctAngle](P0)(2,1){(P2)}{(P1)}
+\psellipticwedge[origin={P0},linecolor=red,correctAngle,
+ fillstyle=vlines](P0)(2,1){(P2)}{(P1)}
+\end{pspicture}
+\end{LTXexample}
+
+\begin{LTXexample}[pos=t]
+\begin{pspicture}[dimen=m,showgrid=top](-3,-1)(3,3)
+\pnodes{P}(0,0)(2,0)(1,1)
+\pcline[nodesep=-1](P0)(P1)
+\pcline[nodesep=-1](P0)(P2)
+\psellipticarc[correctAngle](P0)(2,1){(P2)}{(P1)}
+\psellipticwedge[linecolor=red,correctAngle,
+ fillstyle=vlines](P0)(2,1){(P2)}{(P1)}
+\end{pspicture}
+\end{LTXexample}
+
+\clearpage
\subsection{New macro \nxLcs{psellipseAB}}
\begin{BDef}
diff --git a/Master/texmf-dist/dvips/pstricks/pst-algparser.pro b/Master/texmf-dist/dvips/pstricks/pst-algparser.pro
index 6e131dc8d06..0d0b7238673 100644
--- a/Master/texmf-dist/dvips/pstricks/pst-algparser.pro
+++ b/Master/texmf-dist/dvips/pstricks/pst-algparser.pro
@@ -1,7 +1,7 @@
% $Id: pst-algparser.pro 919 2014-05-19 18:42:47Z herbert $
%%
%% PostScript prologue for PSTricks algorithm parser
-%% Version 0.06, 2014/05/19
+%% Version 0.07, 2014/08/01
%%
%% This program can be redistributed and/or modified under the terms
%% of the LaTeX Project Public License Distributed from CTAN archives
@@ -12,6 +12,7 @@
%currentdict /Pi known not { /Pi 3.14159265359 def } if
%
/AlgParser { tx@AlgToPs begin AlgToPs end } def % Dominique Rodriguez
+/I2P { AlgParser cvx exec } def % Infix to Postfix
%
/tx@CoreAnalyzerDict 100 dict def tx@CoreAnalyzerDict begin
%
diff --git a/Master/texmf-dist/tex/generic/pstricks/config/xdvipdfmx.cfg b/Master/texmf-dist/tex/generic/pstricks/config/xdvipdfmx.cfg
index 9ca3de516d5..717283eb3ae 100644
--- a/Master/texmf-dist/tex/generic/pstricks/config/xdvipdfmx.cfg
+++ b/Master/texmf-dist/tex/generic/pstricks/config/xdvipdfmx.cfg
@@ -49,25 +49,25 @@
\pstcustomize%
\typeout{Using PSTricks configuration for XeTeX+xdvipdfmx}%
\def\@@scalebox{%
-\leavevmode%
+\leavevmode
\hbox{%
\ifdim\pst@tempd\p@<\z@
-\pst@dimg=\pst@tempd\ht\pst@hbox%
-\pst@dimh=\pst@tempd\dp\pst@hbox%
-\dp\pst@hbox=-\pst@dimg%
-\ht\pst@hbox=-\pst@dimh%
+\pst@dimg=\pst@tempd\ht\pst@hbox
+\pst@dimh=\pst@tempd\dp\pst@hbox
+\dp\pst@hbox=-\pst@dimg
+\ht\pst@hbox=-\pst@dimh
\else
-\ht\pst@hbox=\pst@tempd\ht\pst@hbox%
-\dp\pst@hbox=\pst@tempd\dp\pst@hbox%
+\ht\pst@hbox=\pst@tempd\ht\pst@hbox
+\dp\pst@hbox=\pst@tempd\dp\pst@hbox
\fi
-\pst@dima=\pst@tempc\wd\pst@hbox%
-\ifdim\pst@dima<\z@\kern-\pst@dima\fi%
+\pst@dima=\pst@tempc\wd\pst@hbox
+\ifdim\pst@dima<\z@\kern-\pst@dima\fi
\special{x: bscale \pst@tempc \pst@tempd}%
\hbox to \z@{\box\pst@hbox\hss}%
\special{x: escale}%
\ifdim\pst@dima>\z@\kern\pst@dima\fi}}%
%
-\let\ps@@scalebox\@@scalebox%
+\let\ps@@scalebox\@@scalebox
\def\ps@rotateleft#1{%
\leavevmode\hbox{\hskip\ht#1\hskip\dp#1\vbox{\vskip\wd#1%
\pst@Verb{90 \tx@RotBegin}%
@@ -87,13 +87,13 @@
\vbox to \z@{\hbox to \z@{\box#1\hss}\vss}%
\pst@Verb{\tx@RotEnd}}}}%
%
-\def\begin@psclip{\special{x: gsave}}
-\def\end@psclip{\special{x: grestore}}
+\def\begin@psclip{\special{x: gsave}}%
+\def\end@psclip{\special{x: grestore}}%
\def\@newcolor#1#2#3{%
\expandafter\edef\csname #1\endcsname{\noexpand\pst@color{#2}}%
\expandafter\edef\csname\string\color@#1\endcsname{#2}% hv 1.14 2005-12-17
\expandafter\edef\csname\string\color@xetex@#1\endcsname{#3}%
-\ignorespaces}
+\ignorespaces}%
%
\def\newgray#1#2{%
\pst@checknum{#2}\pst@tempg
@@ -102,16 +102,16 @@
\def\newrgbcolor#1#2{%
\pst@expandafter\pst@getnumiii{#2} {} {} {} {}\@nil
\@newcolor{#1}{\pst@tempg \pst@temph \pst@tempi setrgbcolor}{rgb \pst@tempg \pst@temph \pst@tempi}%
-}
+}%
\def\newhsbcolor#1#2{%
\pst@expandafter\pst@getnumiii{#2} {} {} {} {}\@nil
\@newcolor{#1}{\pst@tempg \pst@temph \pst@tempi sethsbcolor}{hsb \pst@tempg \pst@temph \pst@tempi}%
-}
+}%
\def\newcmykcolor#1#2{%
\pst@expandafter\pst@getnumiv{#2} {} {} {} {} {}\@nil
\@newcolor{#1}{\pst@tempg \pst@temph \pst@tempi \pst@tempj setcmykcolor}%
{cmyk \pst@tempg \pst@temph \pst@tempi \pst@tempj}%
-}
+}%
\newgray{black}{0}%
\newgray{darkgray}{.25}%
\newgray{gray}{.5}%
@@ -127,7 +127,7 @@
\@ifundefined{LaTeXe}%
{\def\current@@@@color{\csname\string\color@xetex@\psfillcolor\endcsname}}{%
\AtBeginDocument{\@ifpackageloaded{xcolor}{\def\current@@@@color{\psfillcolor}}%
- {\def\current@@@@color{\csname\string\color@\psfillcolor\endcsname}}}}
+ {\def\current@@@@color{\csname\string\color@\psfillcolor\endcsname}}}}%
%
\iffalse
\def\pst@starbox{%
@@ -148,11 +148,11 @@
\def\putoverlaybox#1{%
\hbox{\special{x: gsave}\special{x: initoverlay #1}\copy\theoverlaybox\special{x: grestore}}}%
%
-\def\pst@overlay#1{\edef\curr@overlay{#1}\special{x: clipoverlay #1}\aftergroup\pst@endoverlay}
-\def\pst@endoverlay{\special{x: clipoverlay \curr@overlay}}
-\def\AltOverlayMode{}
+\def\pst@overlay#1{\edef\curr@overlay{#1}\special{x: clipoverlay #1}\aftergroup\pst@endoverlay}%
+\def\pst@endoverlay{\special{x: clipoverlay \curr@overlay}}%
+\def\AltOverlayMode{}%
%The next line is not necessary, if pstricks.sty of [2007/02/18 v0.33] or newer is used.
-\@ifundefined{LaTeXe}{}{\AtBeginDocument{\psset{fillcolor=white}}}
+\@ifundefined{LaTeXe}{}{\AtBeginDocument{\psset{fillcolor=white}}}%
%
\endinput
%
diff --git a/Master/texmf-dist/tex/generic/pstricks/pstricks.tex b/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
index 57fbc03fa1b..5aa9d422c40 100644
--- a/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
+++ b/Master/texmf-dist/tex/generic/pstricks/pstricks.tex
@@ -109,8 +109,8 @@
\input pgffor.code.tex
\let\pgfforeach\foreach
%
-\def\fileversion{2.56}
-\def\filedate{2014/07/31}
+\def\fileversion{2.57}
+\def\filedate{2014/08/27}
\catcode`\@=11\relax
\pst@addfams{pstricks}
%
@@ -2488,7 +2488,7 @@
\fi%
\end@OpenObj%
}
-\def\psline@iii{
+\def\psline@iii{%
\ifdim\pslinearc>\z@
/r \pst@number\pslinearc def
/Lineto { \tx@Arcto } def
@@ -2642,14 +2642,36 @@
\def\psframe@i(#1){%
\@ifnextchar({\psframe@ii(#1)}{\psframe@ii(0,0)(#1)}}
\def\psframe@ii(#1)(#2){%
- \begin@ClosedObj%
- \pst@getcoor{#1}\pst@tempa%
+ \begin@ClosedObj
+ \pst@getcoor{#1}\pst@tempa
\pst@@getcoor{#2}%
\addto@pscode{ \psk@cornersize \pst@tempa \pst@coor \psk@dimen \tx@Frame }%
\def\pst@linetype{2}%
- \showpointsfalse%
- \end@ClosedObj%
+ \showpointsfalse
+ \end@ClosedObj
+}
+
+\iffalse
+\def\psSquare{\pst@object{psSquare}}
+\def\psSquare@i(#1)(#2){%
+ \begin@ClosedObj
+ \pst@getcoor{#1}\pst@tempa
+ \pst@getcoor{#2}\pst@tempb
+ \addto@pscode{ \psk@cornersize
+ \pst@tempa /yA ED /xA ED
+ \pst@tempb /yB ED /xB ED
+ xA yA moveto xB yB L
+ xA xB sub yA yB sub atan /Angle ED
+ xA yA xB yB Pyth2 dup xA add exch yA add
+ \psk@dimen
+ \tx@Frame
+% grestore
+ }%
+ \def\pst@linetype{2}%
+ \showpointsfalse
+ \end@ClosedObj
}
+\fi
%
\def\psTextFrame{\pst@object{psTextFrame}}
\def\psTextFrame@i(#1)(#2)#3{%
@@ -3470,7 +3492,7 @@ pop
% I - Definition of \psellipticwedge, a generalization of \pswedge for wedges
% of ellipses (from the code of \pswedge and \psellipse)
%
-\def\psellipticwedge{\def\pst@par{}\pst@object{psellipticwedge}}
+\def\psellipticwedge{\pst@object{psellipticwedge}}
\def\psellipticwedge@i(#1){%
\@ifnextchar({\psellipticwedge@ii(#1)}{\psellipticwedge@ii(0,0)(#1)}}
\def\psellipticwedge@ii(#1)(#2)#3#4{%
@@ -3481,9 +3503,25 @@ pop
\pst@@getcoor{#2}%
\def\pst@linetype{1}%
\addto@pscode{%
+ \pst@coor /ry ED /rx ED
\ifx\psk@rot\@empty \else \psk@rot\space rotate \fi
- \pst@tempa \pst@tempb
- \pst@coor
+ \pst@tempa
+ \ifPst@correctAngle
+ cvi 90 mod 0 eq { \pst@tempa }
+ { rx abs ry abs sub cvi 0 eq { \pst@tempa }{ rx ry
+ \tx@UserCoor exch \pst@tempa tan mul exch atan
+ \pst@tempa 180 div 0.5 add floor
+ 180 mul sub } ifelse } ifelse
+ \fi
+ \pst@tempb
+ \ifPst@correctAngle
+ cvi 90 mod 0 eq { \pst@tempb }
+ { rx abs ry abs sub cvi 0 eq { \pst@tempb }{ rx ry
+ \tx@UserCoor exch \pst@tempb tan mul exch atan
+ \pst@tempb 180 div 0.5 add floor
+ 180 mul sub } ifelse } ifelse
+ \fi
+ rx ry
\pst@tempc moveto
\ifdim\psk@dimen\p@=\z@\else
\psk@dimen CLW mul dup 3 1 roll
@@ -3499,10 +3537,10 @@ pop
%
% Code mainly from "pstricks.tex'' 0.94 beta (TvZ)
%
-\def\psellipticarcn{\def\pst@par{}\pst@object{psellipticarcn}}
+\def\psellipticarcn{\pst@object{psellipticarcn}}
\def\psellipticarcn@i{\let\if@psarcn\iftrue\psellipticarc@ii}
%
-\def\psellipticarc{\def\pst@par{}\pst@object{psellipticarc}}
+\def\psellipticarc{\pst@object{psellipticarc}}
\def\psellipticarc@i{\let\if@psarcn\iffalse\psellipticarc@ii}
\define@boolkey[psset]{pstricks}[Pst@]{correctAngle}[true]{}
\psset{correctAngle}