[pstricks] Transparency with pst-3dplot
Poul Riis
Poul.Riis at skolekom.dk
Sun Dec 6 21:40:17 CET 2009
Not that it is very necessary but is it possible to make transparent
colors here?
Poul Riis
\documentclass[10pt]{article}%
\usepackage[x11names]{xcolor}
\usepackage{multido}
\usepackage{pst-3dplot}%
\begin{document}
\begin{pspicture}(-3.25,-2.25)(3.25,5.25)
\psset{xunit=2cm,yunit=2cm,Alpha=30,Beta=15}
\pstThreeDCoor[linewidth=0.5pt,linecolor=Green4,xMin=-2,xMax=2,yMin=-4,yMax=4,zMax=2]
\pstVerb{/pi 3.14159265 def}
\multido{\n=0+1}{10}{%
\pscustom[fillstyle=solid,fillcolor=DeepSkyBlue1]{\parametricplotThreeD[xPlotpoints=200,linecolor=Blue1,linewidth=1.0pt,plotstyle=curve](0,180){0
180 \n\space 5 sub mul t add 180 div pi mul 4 div 180 \n\space 5 sub mul t
add sin}}
\pscustom[fillstyle=solid,fillcolor=LightPink1]{\parametricplotThreeD[xPlotpoints=200,linecolor=Blue1,linewidth=1.0pt,plotstyle=curve](0,180){180
\n\space 5 sub mul t add sin 180 \n\space 5 sub mul t add 180 div pi mul 4
div 0}}
\parametricplotThreeD[xPlotpoints=200,linecolor=Blue3,linewidth=1.0pt,plotstyle=curve](0,180){0
180 \n\space 5 sub mul t add 180 div pi mul 4 div 180 \n\space 5 sub mul t
add sin}
\parametricplotThreeD[xPlotpoints=200,linecolor=Red3,linewidth=1.0pt,plotstyle=curve](0,180){180
\n\space 5 sub mul t add sin 180 \n\space 5 sub mul t add 180 div pi mul 4
div 0}
}
\pstThreeDLine[linewidth=0.5pt,linecolor=Green4,arrows=->](0,0,0)(2,0,0)
\pstThreeDLine[linewidth=0.5pt,linecolor=Green4,arrows=->](0,0,0)(0,0,2)
\end{pspicture}
\end{document}
More information about the PSTricks
mailing list