Lazarus - OpenGL 3.3 Tutorial - Shader - Shader Mandelbrot

Aus DGL Wiki
Version vom 14. Dezember 2017, 19:17 Uhr von Mathias (Diskussion | Beiträge) (Die Seite wurde neu angelegt: „200px<br><br> =Shader - Shader Mandelbrot = == Einleitung == Zum Schluss eine kleine S…“)

(Unterschied) ← Nächstältere Version | Aktuelle Version (Unterschied) | Nächstjüngere Version → (Unterschied)
Wechseln zu: Navigation, Suche

Lazarus - OpenGL 3.3 Tutorial - Shader - Shader Mandelbrot.png

Shader - Shader Mandelbrot

Einleitung

Zum Schluss eine kleine Spielerei: Hier wird ein Mandelbrot im Shader (also auf der GPU) berechnet.
Mit der CPU hatte ich noch keine so schnelle Berechnung hingekriegt, trotz Assembler.

Anmerkung: Bei diesem Beispiel geht es nicht um mathematische Hintegründe, sondern es soll legentlich demonstrieren, das man mit Shader-Programs sehr komplexe Berechnungen machen kann.

Der Lazarus-Code ist nichts besonderes, es wird nur ein Rechteck gerendert und anschliessend mit einer Matrix gedreht. Was eine Matrix ist, wird im Kapitel Matrix beschrieben.
Achtung: Eine lahme Grafikkarte kann bei Vollbild ins Stockern kommen.
Zur Beschleunigung kann der Wert #define depth 1000.0 im Fragment-Shader verkleinert werden.


Vertex-Shader:

#version 330

layout (location = 10) in vec3 inPos;   // Vertex-Koordinaten

uniform mat4 mat;

out vec2 pos;                           // Koordinaten für den Fragment-Shader

void main(void) {
  gl_Position = mat * vec4(inPos, 1.0);
  pos = gl_Position.xy;                 // XY an Fragment-Shader
}



Fragment-Shader:


Hier steckt die ganze Berechnung für das Mandelbrot.

#version 330
#define depth 1000.0

in vec2 pos;       // Interpolierte Koordinaten vom Vertex-Shader

uniform float col; // Start-Wert, für Farben-Spielerei

out vec4 outColor;

void main(void) {
   float creal = pos.x * 1.5 - 0.3;
   float cimag = pos.y * 1.5;

   float Color = 0.0;
   float XPos  = 0.0;
   float YPos  = 0.0;

   float SqrX, SqrY;

   do {
      SqrX = XPos * XPos;
      SqrY = YPos * YPos;
      YPos = 2 * XPos * YPos + cimag;
      XPos = SqrX - SqrY + creal;
      Color += 1;
   } while (!((SqrX + SqrY > 8) || (Color > depth)));

   Color += col;

   if (Color > depth) {
      Color -= depth;
   }

   outColor = vec4(Color / 3, Color / 10 , Color / 100, 1.0);
}


Autor: Mathias

Siehe auch