[pstricks] pst-3dplot writing strange text: ,23falsefalse,

Poul Riis Poul.Riis at skolekom.dk
Sat Oct 16 00:03:15 CEST 2010


I still get this strange ',23falsefalse,' written on the screen when I use
pst-3dplot. There must be a bug somewhere? Or am I really the only one?
Please try example below.

Poul Riis



\documentclass{article}
\usepackage{pst-3dplot,pstricks-add}

\pagestyle{empty}

\makeatletter
\def\psDichtePlot{\pst at object{psDichtePlot}}
\def\psDichtePlot at i(#1,#2,#3)(#4,#5,#6)#7{%
  \pst at killglue
  \begingroup
  \begin at SpecialObj%
  \addto at pscode{
% /p [ [ [xyz][xyz]...][xyz][xyz] ] ... [ [xyz][xyz]...][xyz][xyz] ] ] def
% to allow more than 64 kByte values
    /zMin 0 def /zMax 0 def
    /p [
    #1 #2 #3 {
      /x ED
      [
      #4 #5 #6 {
        /y ED
        [
          x y #7 dup /zVal ED
          zVal zMax gt { /zMax zVal def } if
          zVal zMin lt { /zMin zVal def } if
        ]
      } for
      ]
    } for
    ] bind def
    zMax zMin sub /zDiff ED
    0 1 p length 1 sub {
      /Index ED
      p Index get /xRowArray ED                      % get a line
      0 1 xRowArray length 1 sub {
        /rowIndex ED
        xRowArray rowIndex get aload pop             % get 3 values
        dup /zVal ED
        tx at 3DPlotDict begin Conv3D2D end
        \pst at number\psyunit mul exch
        \pst at number\psxunit mul exch
        newpath
        0.5 0 360 arc
        gsave
          zVal zMin sub zDiff div 380 mul 420 add tx at addDict begin
wavelengthToRGB Red Green Blue end setrgbcolor
          fill
          stroke
        grestore
      } for
    } for
  }%
  \end at SpecialObj%
  \endgroup%
  \ignorespaces%
}
\makeatother

\begin{document}

\psset{unit=2,Alpha=0,Beta=90}
\begin{pspicture}(-1,-1)(2,2)
  \pstThreeDCoor[xMin=-4,xMax=4,yMin=0,yMax=8,zMin=0,zMax=4]%
\psDichtePlot(-4,0.025,4)(0,0.025,8){x y sub abs}
\end{pspicture}

\end{document}

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://tug.org/pipermail/pstricks/attachments/20101016/c972efcc/attachment-0001.html>


More information about the PSTricks mailing list