\documentclass{article} \usepackage{pst-V3D} \usepackage[latin1]{inputenc} \usepackage[T1]{fontenc}% utiliser obligatoirement ce codage !!! % sinon affichage des lettres accentuées % très perturbées !!! %\usepackage[frenchb]{babel} \usepackage[a4paper]{geometry} \input{cylindre_object.tex} \def\Rectangle(#1,#2)(#3,#4){ newpath #1 #2 moveto #3 #2 lineto #3 #4 lineto #1 #4 lineto closepath } \definecolor{Orange}{rgb}{.956 .643 .376} \pagestyle{empty} \begin{document} \begin{center} \begin{pspicture}(-5,-6)(6,10) \psset{THETA=30,PHI=30,Dobs=30,Decran=10} \planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-14,-14)(9,17)} \planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-14,-14)(9,17)} \psCylindre[nF=20,nH=5,interior=true](0,0,0){3}{10} \psCylindre[nF=15,nH=5,RotX=-90,RotZ=80,interior=true](-10,5,1.5){3}{7} \psCylindre[nF=15,nH=5,RotX=80,RotZ=120,interior=true](7,5,10){1}{3} \end{pspicture} \end{center} \begin{center} \begin{pspicture}(-5,-6)(6,10) \psset{THETA=30,PHI=30,Dobs=30,Decran=10} \planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-14,-14)(9,17)} \planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-14,-14)(9,17)} \psCylindre[nF=20,nH=5,interior=true](0,0,0){3}{10} \psCylindre[nF=15,nH=5,RotX=-90,interior=true](-10,5,3){3}{10} \psCylindre[nF=15,nH=5,RotY=80,interior=true](0,7,1){1}{7} \end{pspicture} \end{center} \newpage %\begin{center} \psset{THETA=30,PHI=30,Dobs=30,Decran=10} \multido{\iRot=0+30}{12}{% \begin{pspicture}(-2,-2)(2,2) \planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)} \planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)} \psCylindre[nF=20,nH=5,RotX=\iRot,interior=true](0,0,0){1}{5} \end{pspicture} \ifnum\multidocount=4 \\ \fi \ifnum\multidocount=8 \\ \fi} %\end{center} \newpage %\begin{center} \psset{THETA=30,PHI=30,Dobs=30,Decran=10} \multido{\iRot=0+30}{12}{% \begin{pspicture}(-2,-2)(2,2) %\planThreeDput[fillstyle=solid,fillcolor=Orange,normale=90 -90]{\Rectangle(-4,-4)(4,4)} %\planThreeDput[gridcolor=white,normale=90 -90,fontscale=0.5]{\Grille(-4,-4)(4,4)} \psCylindre[nF=20,nH=5,RotY=\iRot,interior=true,RotZ=30](0,0,0){1}{5} \axesIIID(3,3,3) \end{pspicture} \ifnum\multidocount=4 \\ \fi \ifnum\multidocount=8 \\ \fi} %\end{center} \end{document}