also mal sehen
<!--pas--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>Delphi-Source </td></tr><tr><td id='CODE'><!--pas1--><pre>
<span class='reserved'>var</span> x,y,z : GLfloat;
<span class='reserved'>begin</span>
...
glBegin(GL_POINTS);
<span class='reserved'>for</span> i = -<span class='integer'>1000</span> <span class='reserved'>to</span> <span class='integer'>1000</span> <span class='reserved'>do</span>
<span class='reserved'>for</span> j = -<span class='integer'>1000</span> <span class='reserved'>to</span> <span class='integer'>1000</span> <span class='reserved'>do</span> <span class='reserved'>begin</span>
x = i / <span class='integer'>100</span>;
y = j / <span class='integer'>100</span>;
z = sin(x) * cos(y);
glVertex3f(x,y,z);
<span class='reserved'>end</span>;
glEnd;
<span class='reserved'>end</span>;
</pre><!--pas2--></td></tr></table><span class='postcolor'><!--pas3-->

viel Spass

_________________
Viel Spaß beim Programmieren,
Mars
http://www.basegraph.com/

hey, vergiss das /2*pi nicht

[ jaja, das tut nix zur sache. hier wollte ja keiner n kreis malen. tschuldigung, ich verkriech mich in meine ecke ]

_________________
www.omfg.biz - aktuelles projekt

also mal sehen

<!--pas--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>Delphi-Source </td></tr><tr><td id='CODE'><!--pas1--><pre><span class='reserved'>var</span> x,y,z : GLfloat;
<span class='reserved'>begin</span>
...
<span class='reserved'>for</span> i = -<span class='integer'>1000</span> <span class='reserved'>to</span> <span class='integer'>999</span> <span class='reserved'>do</span> <span class='reserved'>begin</span>
glBegin(GL_QUAD_STRIP);
<span class='reserved'>for</span> j = -<span class='integer'>1000</span> <span class='reserved'>to</span> <span class='integer'>1000</span> <span class='reserved'>do</span> <span class='reserved'>begin</span>
x = i / <span class='integer'>100</span>;
y = j / <span class='integer'>100</span>;
z = sin(x) * cos(y);
glVertex3f(x,y,z);
x = (i+<span class='integer'>1</span>) / <span class='integer'>100</span>;
z = sin(x) * cos(y);
glVertex3f(x,y,z);
<span class='reserved'>end</span>;
glEnd;
<span class='reserved'>end</span>;
<span class='reserved'>end</span>;
</pre><!--pas2--></td></tr></table><span class='postcolor'><!--pas3-->

viel Spass

_________________
Viel Spaß beim Programmieren,
Mars
http://www.basegraph.com/