Du musst es mit `xelatex` laufen lassen oder `latex->dvips->ps2pdf`. Per Definition zeigt meine y-Achse allerdings nach rechts! \documentclass[pstricks]{standalone} \usepackage{pst-3dplot} \begin{document} \multido{\iA=90+15}{24}{% \begin{pspicture}(-5,-5)(5,5) \psset{Beta=0,Alpha=\iA} \psframe*[linecolor=blue!10](-5,-5)(5,5) \pstThreeDCoor[xMin=0,yMin=0,zMin=0,linewidth=2pt,linecolor=blue] \pscircle*[linecolor=blue!70!black]{2mm} \psset{dash=5.5mm 2mm .5mm 2mm} \pstThreeDLine[linestyle=dashed,linewidth=1pt](0,-4,0)(0,4,0) \pstThreeDLine[linestyle=dashed,linewidth=1pt](0,0,0)(0,0,4) \pstThreeDLine[linewidth=2pt](0,-4,-0.7)(0,4,-0.7) \pstThreeDLine[linewidth=2pt](0,-4,0.7)(0,4,0.7) \pstThreeDLine[linewidth=2pt](0,0,-0.7)(0,0,0.7) \pstThreeDLine[linewidth=2pt](0,-0.7,4)(0,-0.7,0)(0,0.7,0)(0,0.7,4) \pstThreeDDot[linecolor=red,dotsize=2mm](0,-0.9243,0.7) \pstThreeDDot[linecolor=red,dotsize=2mm](0,-0.7,0.9234) \pstThreeDDot[linecolor=red,dotsize=2mm](0,0.7,0.9243) \pstThreeDDot[linecolor=red,dotsize=2mm](0,2.0414,0.7) \pstThreeDLine[linewidth=2pt](0,-0.9243,0.7)(0,-0.9243,1.2)\pstThreeDPut(0,-0.9243,1.25){0} \pstThreeDLine[linewidth=2pt](0,-0.7,0.9243)(0,-1.2,0.9243)\pstThreeDPut(0,-1.2,1){1} \pstThreeDLine[linewidth=2pt](0,0.7,2.0414)(0,1.2,2.0414)\pstThreeDPut(0,1.2,2.1){2} \pstThreeDLine[linewidth=2pt](0,2.0414,0.7)(0,2.0414,1.2)\pstThreeDPut(0,2.0414,1.25){3} \pstThreeDTriangle[linecolor=green,fillstyle=solid,fillcolor=green] (0,-1.1243,0.7)(0,-0.7,0.7)(0,-0.7,1.1243) \pstThreeDTriangle[linecolor=green,fillstyle=solid,fillcolor=green] (0,0.7,0.7)(0,0.8414,0.7)(0,0.7,0.8414)% \end{pspicture}% } \end{document} ![alt text][1] Alternative Darstellung mit `BETA=10,...` ![alt text][2] [1]: http://texwelt.de/wissen/upfiles/demo.gifhttp://texwelt.de/wissen/upfiles/demo.gif [2]: http://texwelt.de/wissen/upfiles/demo_1.gif

Du musst es mit `xelatex` laufen lassen oder `latex->dvips->ps2pdf`: `latex->dvips->ps2pdf`. Per Definition zeigt meine y-Achse allerdings nach rechts! \documentclass[pstricks]{standalone} \usepackage{pst-3dplot} \begin{document} \multido{\iA=90+15}{24}{% \begin{pspicture}(-5,-5)(5,5) \psset{Beta=0,Alpha=\iA} \psframe*[linecolor=blue!10](-5,-5)(5,5) \pstThreeDCoor[xMin=0,yMin=0,zMin=0,linewidth=2pt,linecolor=blue] \pscircle*[linecolor=blue!70!black]{2mm} \psset{dash=5.5mm 2mm .5mm 2mm} \pstThreeDLine[linestyle=dashed,linewidth=1pt](0,-4,0)(0,4,0) \pstThreeDLine[linestyle=dashed,linewidth=1pt](0,0,0)(0,0,4) \pstThreeDLine[linewidth=2pt](0,-4,-0.7)(0,4,-0.7) \pstThreeDLine[linewidth=2pt](0,-4,0.7)(0,4,0.7) \pstThreeDLine[linewidth=2pt](0,0,-0.7)(0,0,0.7) \pstThreeDLine[linewidth=2pt](0,-0.7,4)(0,-0.7,0)(0,0.7,0)(0,0.7,4) \pstThreeDDot[linecolor=red,dotsize=2mm](0,-0.9243,0.7) \pstThreeDDot[linecolor=red,dotsize=2mm](0,-0.7,0.9234) \pstThreeDDot[linecolor=red,dotsize=2mm](0,0.7,0.9243) \pstThreeDDot[linecolor=red,dotsize=2mm](0,2.0414,0.7) \pstThreeDLine[linewidth=2pt](0,-0.9243,0.7)(0,-0.9243,1.2)\pstThreeDPut(0,-0.9243,1.25){0} \pstThreeDLine[linewidth=2pt](0,-0.7,0.9243)(0,-1.2,0.9243)\pstThreeDPut(0,-1.2,1){1} \pstThreeDLine[linewidth=2pt](0,0.7,2.0414)(0,1.2,2.0414)\pstThreeDPut(0,1.2,2.1){2} \pstThreeDLine[linewidth=2pt](0,2.0414,0.7)(0,2.0414,1.2)\pstThreeDPut(0,2.0414,1.25){3} \pstThreeDTriangle[linecolor=green,fillstyle=solid,fillcolor=green] (0,-1.1243,0.7)(0,-0.7,0.7)(0,-0.7,1.1243) \pstThreeDTriangle[linecolor=green,fillstyle=solid,fillcolor=green] (0,0.7,0.7)(0,0.8414,0.7)(0,0.7,0.8414)% \end{pspicture}% } \end{document} ![alt text][1] [1]: http://texwelt.de/wissen/upfiles/demo.gif

Du musst es mit `xelatex` laufen lassen oder `latex->dvips->ps2pdf`: \documentclass[pstricks]{standalone} \usepackage{pst-3dplot} \begin{document} \multido{\iA=90+15}{24}{% \begin{pspicture}(-5,-5)(5,5) \psset{Beta=0,Alpha=\iA} \psframe*[linecolor=blue!10](-5,-5)(5,5) \pstThreeDCoor[xMin=0,yMin=0,zMin=0,linewidth=2pt,linecolor=blue] \pscircle*[linecolor=blue!70!black]{2mm} \psset{dash=5.5mm 2mm .5mm 2mm} \pstThreeDLine[linestyle=dashed,linewidth=1pt](0,-4,0)(0,4,0) \pstThreeDLine[linestyle=dashed,linewidth=1pt](0,0,0)(0,0,4) \pstThreeDLine[linewidth=2pt](0,-4,-0.7)(0,4,-0.7) \pstThreeDLine[linewidth=2pt](0,-4,0.7)(0,4,0.7) \pstThreeDLine[linewidth=2pt](0,0,-0.7)(0,0,0.7) \pstThreeDLine[linewidth=2pt](0,-0.7,4)(0,-0.7,0)(0,0.7,0)(0,0.7,4) \pstThreeDDot[linecolor=red,dotsize=2mm](0,-0.9243,0.7) \pstThreeDDot[linecolor=red,dotsize=2mm](0,-0.7,0.9234) \pstThreeDDot[linecolor=red,dotsize=2mm](0,0.7,0.9243) \pstThreeDDot[linecolor=red,dotsize=2mm](0,2.0414,0.7) \pstThreeDLine[linewidth=2pt](0,-0.9243,0.7)(0,-0.9243,1.2)\pstThreeDPut(0,-0.9243,1.25){0} \pstThreeDLine[linewidth=2pt](0,-0.7,0.9243)(0,-1.2,0.9243)\pstThreeDPut(0,-1.2,1){1} \pstThreeDLine[linewidth=2pt](0,0.7,2.0414)(0,1.2,2.0414)\pstThreeDPut(0,1.2,2.1){2} \pstThreeDLine[linewidth=2pt](0,2.0414,0.7)(0,2.0414,1.2)\pstThreeDPut(0,2.0414,1.25){3} \pstThreeDTriangle[linecolor=green,fillstyle=solid,fillcolor=green] (0,-1.1243,0.7)(0,-0.7,0.7)(0,-0.7,1.1243) \pstThreeDTriangle[linecolor=green,fillstyle=solid,fillcolor=green] (0,0.7,0.7)(0,0.8414,0.7)(0,0.7,0.8414)% \end{pspicture}% } \end{document} ![alt text][1] [1]: http://texwelt.de/wissen/upfiles/demo.gif