\documentclass[12pt]{article}
\usepackage{pst-vue3d}
\SpecialCoor
\makeatletter
%
\makeatother
\begin{document}

\begin{pspicture}(-3.75,-3.25)(5,5.5)
	\AxesThreeD(45,40,50)
	\psset{PortionSphereTHETA=60,PortionSpherePHI=45,linewidth=0.1pt}
	\SphereThreeD[fillstyle=solid,fillcolor=cyan,linewidth=0.1pt](0,0,0){30}
	\PortionSphereThreeD[fillstyle=solid,fillcolor=red](0,0,0){30}
	\LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,70,35)
	\LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,50,35)
	\LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,70,55)
	\LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,50,55)
	\LineThreeD[SphericalCoor](30,70,35)(50,70,35)
	\LineThreeD[SphericalCoor](30,50,35)(50,50,35)
	\LineThreeD[SphericalCoor](30,70,55)(50,70,55)
	\LineThreeD[SphericalCoor](30,50,55)(50,50,55)
	\PortionSphereThreeD[fillstyle=solid,fillcolor=red](0,0,0){50}
	\psset{linestyle=dashed,linecolor=red,linewidth=\pslinewidth}
	\LineThreeD(0,0,0)(30,0,0)
	\LineThreeD(0,0,0)(0,30,0)
	\LineThreeD(0,0,0)(0,0,30)
\end{pspicture}

\end{document}
