<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
<font face="Myriad Pro">Heloo Fosk,<br>
<br>
you might try -- however i think some better results are possible with
pst-solides3d -- see the documentation about surfaces in R^3:<br>
<br>
\documentclass{article}<br>
\usepackage{pst-3dplot}<br>
<br>
\makeatletter<br>
\define@key[psset]{pst-3dplot}{HueBegin}{% Between 0 and 1<br>
\def\PstHSB@HueBegin{#1}}<br>
\define@key[psset]{pst-3dplot}{HueEnd}{% Between 0 and 1<br>
\def\PstHSB@HueEnd{#1}}<br>
\define@boolkey[psset]{pst-3dplot}[Pst@]{HSB}[true]{}<br>
% Default values<br>
\psset[pst-3dplot]{HueBegin=0,HueEnd=1,HSB=false}<br>
\psset{dimen=outer}<br>
<br>
\def\parametricPlotThreeD@iii{% without arrows (quickplot)<br>
\addto@pscode{%<br>
\psk@ThreeDplot@yPlotpoints {<br>
/Counter 0 def<br>
/t tMin def<br>
xyz \@nameuse{beginqp@\psplotstyle}<br>
/t t dt add def<br>
\psk@ThreeDplot@xPlotpoints\space 1 sub {<br>
xyz<br>
/Counter Counter 1 add def<br>
1 Counter eq { moveto currentpoint /OldY ED /OldX ED }<br>
{\ifPst@HSB % Other points than the first one<br>
/PointY exch def<br>
/PointX exch def<br>
Counter \psk@ThreeDplot@xPlotpoints\space div<br>
\PstHSB@HueEnd\space<br>
\PstHSB@HueBegin\space sub mul<br>
\PstHSB@HueBegin\space add<br>
1 1 sethsbcolor<br>
OldX OldY PointX PointY lineto lineto<br>
stroke<br>
PointX PointY moveto<br>
/OldX PointX def /OldY PointY def<br>
\else lineto \fi } ifelse<br>
/t t dt add def<br>
} repeat<br>
/t t dt sub def<br>
/u u du add def<br>
} repeat<br>
}%<br>
\@nameuse{endqp@\psplotstyle}%<br>
}<br>
\makeatother<br>
<br>
\begin{document}<br>
\psset{Beta=20}<br>
\begin{pspicture}(-4,-4)(4,4)<br>
\def\Radius{5 }<br>
\parametricplotThreeD[plotstyle=line,xPlotpoints=100,<br>
yPlotpoints=100,drawStyle=xyLines,HSB](0,365)(-1,1){<br>
t 2 div cos u mul \Radius add t cos mul<br>
t 2 div cos u mul \Radius add t sin mul<br>
t 2 div sin u mul }<br>
%\pstThreeDCoor[xMin=-1,yMin=-1,zMin=-1]<br>
\parametricplotThreeD[plotstyle=line,xPlotpoints=100,yPlotpoints=1,<br>
linecolor=black,linewidth=1.5pt](488,-60){<br>
t 2 div cos \Radius add t cos mul<br>
t 2 div cos \Radius add t sin mul<br>
t 2 div sin }<br>
\parametricplotThreeD[plotstyle=line,xPlotpoints=100,yPlotpoints=1,<br>
linecolor=black,linewidth=1.5pt](631,513){<br>
t 2 div cos \Radius add t cos mul<br>
t 2 div cos \Radius add t sin mul<br>
t 2 div sin }<br>
\end{pspicture}<br>
\end{document}<br>
<br>
<br>
Regards,<br>
<br>
Juergen<br>
</font><br>
Fosk wrote:
<blockquote
cite="mid:362a69cc0812180724v5d547306m6a0ab62e75099b37@mail.gmail.com"
type="cite">
<p>Good morning everybody. How can I draw a Mobius strip using
PStricks? I tried using pst-plot3d but i can't control the design of
parametric 2-manifold (i obviously know a global atlas) ...I found only
the function allowing to draw parametric curves in R3.</p>
<p>Thanks a lot<br>
</p>
<br>
<pre wrap="">
<hr size="4" width="90%">
_______________________________________________
PSTricks mailing list
<a class="moz-txt-link-abbreviated" href="mailto:PSTricks@tug.org">PSTricks@tug.org</a>
<a class="moz-txt-link-freetext" href="http://tug.org/mailman/listinfo/pstricks">http://tug.org/mailman/listinfo/pstricks</a>
</pre>
</blockquote>
<br>
<pre class="moz-signature" cols="65">--
Jürgen Gilg
Austr. 59
70376 Stuttgart
-------------------------------------
Tel 0711.59 27 88
e-Mail <a class="moz-txt-link-abbreviated" href="mailto:gilg@acrotex.net">gilg@acrotex.net</a>
Websites <a class="moz-txt-link-abbreviated" href="http://www.acrotex.net">www.acrotex.net</a>
<a class="moz-txt-link-abbreviated" href="http://www.brueckenkurs-physik.de">www.brueckenkurs-physik.de</a>
<a class="moz-txt-link-abbreviated" href="http://www.gilligan-online.de">www.gilligan-online.de</a>
</pre>
</body>
</html>