pst-3dplot 1.84 (28jul09)

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

1 files changed, 9 insertions, 5 deletions

diff --git a/Master/texmf-dist/tex/generic/pst-3dplot/pst-3dplot.tex b/Master/texmf-dist/tex/generic/pst-3dplot/pst-3dplot.tex
index aa4e64502ca..662a740dda1 100644
--- a/Master/texmf-dist/tex/generic/pst-3dplot/pst-3dplot.tex
+++ b/Master/texmf-dist/tex/generic/pst-3dplot/pst-3dplot.tex
@@ -1,4 +1,4 @@
-%% $Id: pst-3dplot.tex 50 2008-11-12 13:44:21Z herbert $
+%% $Id: pst-3dplot.tex 121 2009-07-28 18:03:37Z herbert $
 %%
 %% This is file `pst-3dplot.tex',
 %%
@@ -25,8 +25,8 @@
 \ifx\PSTricksAddLoaded\endinput\else\input pstricks-add.tex\fi% loads node and plot
 \ifx\PSTMultidoLoaded\endinput\else\input multido.tex\fi
 %
-\def\fileversion{1.83}
-\def\filedate{2008/11/18}
+\def\fileversion{1.84}
+\def\filedate{2009/04/20}
 \message{`PST-3dplot' v\fileversion, \filedate\space (HV,DL)}
 %
 \edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -65,6 +65,7 @@
 \define@boolkey[psset]{pst-3dplot}[Pst@]{drawCoor}[true]{}% draw the coordinates of a dot?
 \define@boolkey[psset]{pst-3dplot}[Pst@]{hiddenLine}[true]{}% emulate hidden line surface?
 \define@boolkey[psset]{pst-3dplot}[Pst@]{SphericalCoor}[true]{}% (r,phi,theta)
+\define@boolkey[psset]{pst-3dplot}[Pst@]{showgrid}[true]{}% draw the coordinates of a dot?
 %    \Pst@CylindricalCoorfalse}% 
 \define@boolkey[psset]{pst-3dplot}[Pst@]{CylindricalCoor}[true]{}% (r,phi,z)
 %    \Pst@SphericalCoorfalse}% 
@@ -81,12 +82,14 @@
 %        \def\psk@ThreeDplot@Beta{0}
       \or %3
         \def\psk@ThreeDplot@Alpha{45}
+      \or %4
+%        \def\psk@ThreeDplot@Alpha{135}
     \fi}
 % 0 default
 % 1 z y are orthogonal and angle x|y is Alpha, Beta has no meaning 
 % 1 z y are orthogonal and angle Alpha is always 135, x-axis shortened by 1/sqrt(2), Beta has no meaning 
 \psset[pst-3dplot]{drawing,drawCoor,hiddenLine=false,SphericalCoor=false,
-    leftHanded=false,eulerRotation=false,coorType=0}
+    leftHanded=false,eulerRotation=false,coorType=0,showgrid}
 %
 % ------- the global definitions for the pspicture frame ------
 %
@@ -291,6 +294,7 @@
   /Sin1Sin2 Sin1 Sin2 mul def
   /Cos1Cos2 Cos1 Cos2 mul def
   /Sin1Cos2 Sin1 Cos2 mul def
+  /showgrid \ifPst@showgrid true \else false \fi def
   currentdict tx@3DPlotDict ne dup 
   {tx@3DPlotDict begin} if % Begin the correct dict if necessary
    /eulerRotation \ifPst@eulerRotation true \else false \fi def
@@ -1326,7 +1330,7 @@
 \def\psBox@ii(#1,#2,#3)#4#5#6{% #1,#2,#3: center of the lower left edge 
 			    % #4:width #5:height #6:depth 
   \addto@par{viewpoint=0 0 0}%
-  \pssetlength\pst@dima{#4}\pssetlength\pst@dimb{#5}\pssetlength\pst@dimc{#5}
+  \pssetlength\pst@dima{#4}\pssetlength\pst@dimb{#5}\pssetlength\pst@dimc{#6}
   \begin@SpecialObj%
   \addto@pscode {
   /viewpoint {