\psset{unit=0.8}
\psset[pst-solides3d]{viewpoint=40 30 30,SphericalCoor,Decran=30}
\begin{pspicture}(-8,-9)(7,5)
\psset{%
   incolor=yellow!50,fillcolor=green!25,
   linecolor={[cmyk]{1,0,1,0.5}}}
\psframe*(-8,-9)(7,5)
\psSolid[object=grille,base=-6 6 -6 6,linecolor=red,
    linewidth=0.5\pslinewidth,ngrid=12](0,0,-6)
\psSolid[object=grille,base=-6 6 -6 3,RotX=-90,linecolor=red,
    linewidth=0.5\pslinewidth,ngrid=12 9](0,-6,-3)
\psSolid[object=grille,base=-6 3 -6 6,RotY=90,linecolor=red,
    linewidth=0.5\pslinewidth,ngrid=9 12](-6,0,-3)
\psTorusMagic[R=3,r=1.5,angularAperture=90,linecolor=red,
    linewidth=0.75\pslinewidth,torusMagic,projectionXY,projectionXZ,projectionYZ]%
\psTorusMagicSolid[R=3,r=1.5,angularAperture=90]%
\red\gridIIID[Zmin=-6,Zmax=3,QZ=-1.5,linecolor=red](-6,6)(-6,6)
\end{pspicture}