\psset{lightsrc=10 0 10,SphericalCoor=true,viewpoint=50 -20 30,Decran=50}
\begin{pspicture*}(-5,-4)(6,4)
\psframe(-5,-4)(6,4)
\psset{solidmemory}
\psSolid[object=cube,
   trunc=all,
   trunccoeff=.3,
   fillcolor=cyan,
   name=A1,
   numfaces=all
]
\codejps{
   A1 6 solidcentreface 
   /z0 exch def
   /y0 exch def
   /x0 exch def
   A1 6 solidnormaleface /v defpoint3d
}
\psSolid[object=vecteur,
   args=v](x0,y0,z0)
\codejps{
   A1 4 2 copy
   solidcentreface 
   /z0 exch def
   /y0 exch def
   /x0 exch def
   solidnormaleface /v defpoint3d
}
\psSolid[object=vecteur,
   args=v](x0,y0,z0)
\codejps{
   A1 9 2 copy
   solidcentreface 
   /z0 exch def
   /y0 exch def
   /x0 exch def
   solidnormaleface /v defpoint3d
}
\psSolid[object=vecteur,
   args=v](x0,y0,z0)
\codejps{
   A1 0 2 copy
   solidcentreface 
   /z0 exch def
   /y0 exch def
   /x0 exch def
   solidnormaleface /v defpoint3d
}
\psSolid[object=vecteur,
   args=v](x0,y0,z0)
\composeSolid
\end{pspicture*}