Zylinder - Versionsgeschichte

Openglerf: Vorraus -> Voraus

2012-03-21T14:29:23Z

Vorraus -> Voraus

Flash: /* Parameter */

2010-07-31T19:36:27Z

‎Parameter

Flash: /* Allgemein */

2010-07-31T19:35:41Z

‎Allgemein

Olee: Die Seite wurde neu angelegt: „==Allgemein== Der folgende Code zeichnet einen Zylinder in einen Würfel der Kantenlänge 2. Dadurch lassen sich beim Zeichnen die Positionskoordinaten auch direk…“

2010-07-31T17:20:07Z

Die Seite wurde neu angelegt: „==Allgemein== Der folgende Code zeichnet einen Zylinder in einen Würfel der Kantenlänge 2. Dadurch lassen sich beim Zeichnen die Positionskoordinaten auch direk…“

Neue Seite

==Allgemein==
Der folgende Code zeichnet einen Zylinder in einen Würfel der Kantenlänge 2.
Dadurch lassen sich beim Zeichnen die Positionskoordinaten auch direkt für die Normalen des Zylinders nutzen.
Der Körper des Zylinders sowie die Endkappen werden mit der aktuell gebundene Textur gezeichnet. Will man jede der Flächen mit einer anderen Textur versehen, so muss diese zwischen den einzelnen Abschnitten gewechselt werden.

==Verwendete Typen==
<source lang="pascal">
Type
TVector3f = Record
x, y, z : Single;
End;
</source>

==Parameter==
Der einzige Parameter '''n''' der Prozedur besimmt die Anzahl der Unterteilungen des Zylinders.
Die Größe des Objektes wird durch ein vorangehendes [[glScalef]] festgelegt, welches als Parameter jeweils die Radien des Objektes in den verschiedenen Koordinatenachsen enthält.

==Procedure==
<source lang="pascal">
Procedure DrawCylinder(n : Byte);
Const
Two_PI = PI * 2;
Half_PI = PI / 2;
Var
i : Integer;
vect : TVector3f;
SinCosData : Array of Extended;
Begin
If n < 4 then exit;
If n = 4 then DrawCube; //Ein Zylinder mit 4 Seiten ist ein Würfel - falls es jemanden interessiert *gg*

glEnable(GL_NORMALIZE); //Aktiviere GL_NORMALIZE damit die Normalen nach dem glScale auch die richtige Länge haben

//Berechne die Sinus- und Cosinus-werte einmalig im Vorraus
SetLength(SinCosData, (n+1)*2);
for i := 0 to n do
SinCos(i/n * Two_PI, SinCosData[i*2], SinCosData[i*2+1]);

glBegin(GL_QUAD_STRIP);
for i := 0 to n do
begin
vect.x := SinCosData[i*2];
vect.z := SinCosData[i*2+1];
vect.y := 1;

glTexCoord2f(i/n, 0);
glNormal3f(vect.x, 0, vect.z);
glVertex3fv(@vect);

vect.y := -1;

glTexCoord2f(i/n, 1);
glNormal3f(vect.x, 0, vect.z);
glVertex3fv(@vect);
end;
glEnd;

//Zeichnen der oberen Endkappe
glBegin(GL_TRIANGLE_FAN);
vect.y := 1;
glNormal3f(0, 1, 0);
glTexCoord2f(0.5, 0.5);
glVertex3f(0, 1, 0);
for i := 0 to n do
begin
vect.x := SinCosData[i*2];
vect.z := SinCosData[i*2+1];
glTexCoord2f(vect.x*0.5 + 0.5, vect.z*0.5 + 0.5);
glVertex3fv(@vect);
end;
glEnd;

//Zeichnen der unteren Endkappe
glBegin(GL_TRIANGLE_FAN);
vect.y := -1;
glNormal3f(0, -1, 0);
glTexCoord2f(0.5, 0.5);
glVertex3f(0, -1, 0);
for i := n downto 0 do
begin
vect.x := SinCosData[i*2];
vect.z := SinCosData[i*2+1];
glTexCoord2f(0.5 - vect.x*0.5, vect.z*0.5 + 0.5);
glVertex3fv(@vect);
end;
glEnd;

glDisable(GL_NORMALIZE);
End;
</source>

==Beispiel Aufruf==
Einen Zylinder mit der Höhe 3 und dem Radius 4 zeichnet man mit der Prozedur wie folgt:
<source lang="pascal">
glPushMatrix; //Sichere die Matrix
glTranslatef(0, 1.5, 0); //Verschiebe den Mittelpunkt des Zylinders an die Position (0 | 1.5 | 0)
glScalef(4, 3 / 2, 4); //Die Höhe wird halbiert, da bei glScale die radien des Objektes stehen sollen
DrawCylinder(16); //Zeichne den Zylinder mit 16 Unterteilungen
glPopMatrix; //Setzte die Matrix auf den Ausgangszustand zurück
</source>

[[Kategorie:Technik_oder_Algorithmus]] [[Kategorie:Anleitung]]

@@ Zeile 32: / Zeile 32: @@
    glEnable(GL_NORMALIZE);  //Aktiviere GL_NORMALIZE damit die Normalen nach dem glScale auch die richtige Länge haben
-   //Berechne die Sinus- und Cosinus-werte einmalig im Vorraus
+   //Berechne die Sinus- und Cosinus-werte einmalig im Voraus
    SetLength(SinCosData, (n+1)*2);
    for i := 0 to n do

@@ Zeile 13: / Zeile 13: @@
 ==Parameter==
-Der einzige Parameter '''n''' der Prozedur besimmt die Anzahl der Unterteilungen des Zylinders.
+Der einzige Parameter '''n''' der Prozedur bestimmt die Anzahl der Unterteilungen des Zylinders.
 Die Größe des Objektes wird durch ein vorangehendes [[glScalef]] festgelegt, welches als Parameter jeweils die Radien des Objektes in den verschiedenen Koordinatenachsen enthält.

@@ Zeile 1: / Zeile 1: @@
 ==Allgemein==
-Der folgende Code zeichnet einen Zylinder in einen Würfel der Kantenlänge 2.
+Der folgende Code zeichnet einen Zylinder in einem Würfel der Kantenlänge 2.
 Dadurch lassen sich beim Zeichnen die Positionskoordinaten auch direkt für die Normalen des Zylinders nutzen.
 Der Körper des Zylinders sowie die Endkappen werden mit der aktuell gebundene Textur gezeichnet. Will man jede der Flächen mit einer anderen Textur versehen, so muss diese zwischen den einzelnen Abschnitten gewechselt werden.