[pstricks] PSTricks Digest, Vol 166, Issue 5

[Herbert Voss]

Am 02.12.2016 um 14:12 schrieb Field, Malcolm:

> Unfortunately, adding "\SpecialCoor" did not improve things for me.  I do  not know why MiKTeX is a problem but I accept your assessment and, if you have any additional thoughts, I will very much welcome them.  Thanks again.

I see, a problem with the different versions.
This works for me and MikTeX 2.9

\listfiles
\documentclass{article}
\usepackage{multido,pstricks-add,pst-slpe,xcolor}
\begin{document}
\makeatletter
\def\psBall{\pst at object{psBall}}
\def\psBall at i{\@ifnextchar(\psBall at ii{\psBall at ii(0,0)}}
\def\psBall at ii(#1)#2#3{{%
   \pst at killglue
   \pssetlength\pst at dima{#3}%%%%%  20111025 hv
   \pst at dimb=\pst at dima%%%%%%%%%%%  20111025 hv
   \advance\pst at dima by 0.075\pst at dimb%
   \addbefore at par{sloperadius=\the\pst at dima,fillstyle=ccslope,
    slopebegin=white,slopeend=#2,slopecenter=0.4 0.6,linestyle=none}%
   \use at par%
   \pscircle(#1){#3}%
   }\ignorespaces%
}

\pstVerb{
   \psk at randInit srand  % initializes the random generator
   /getRandReal { rand 2147483647 div } def }
\makeatother
\begin{pspicture}(-1,-1)(11,11)
\SpecialCoor
\psframe*[linecolor=black!10](-1,-1)(11,11)
\multido{\iA=0+1}{100}{%
	\psBall(! getRandReal 10 mul getRandReal 10 mul){blue}{3ex}}
\end{pspicture}

\end{document}


Herbert