opengl 0.7.0.pre1-x86-mingw32 → 0.7.0.pre2-x86-mingw32

data/examples/NeHe/nehe_lesson16.rb

@@ -0,0 +1,208 @@
+require 'opengl'
+require 'png'
+require 'png/reader'
+
+class Lesson16
+  include Gl
+  include Glu
+  include Glut
+
+  def initialize
+    @textures = nil
+    @xrot = 0.0
+    @yrot = 0.0
+    @zrot = 0.0
+    @fullscreen = true
+    @filter = 0
+
+    @fog_mode = [
+      GL_EXP,
+      GL_EXP2,
+      GL_LINEAR
+    ]
+
+    @fog_filter = 0
+    @fog_color = [0.5, 0.5, 0.5, 1.0]
+
+    glutInit
+
+    glutInitDisplayMode GLUT_RGB | GLUT_DOUBLE | GLUT_ALPHA | GLUT_DEPTH
+    glutInitWindowSize 640, 480
+    glutInitWindowPosition 0, 0
+
+    @window = glutCreateWindow "NeHe Lesson 16 - ruby-opengl version"
+
+    glutDisplayFunc :draw_gl_scene
+    glutReshapeFunc :reshape
+    glutIdleFunc :idle
+    glutKeyboardFunc :keyboard
+
+    reshape 640, 480
+    load_texture
+    init_gl
+
+    glutMainLoop
+  end
+
+  def init_gl
+    glEnable GL_TEXTURE_2D
+    glShadeModel GL_SMOOTH
+    glClearColor 0.5, 0.5, 0.5, 1.0
+
+    glFogi GL_FOG_MODE, @fog_mode[@fog_filter]
+    glFogfv GL_FOG_COLOR, @fog_color
+    glFogf GL_FOG_DENSITY, 0.35
+    glHint GL_FOG_HINT, GL_DONT_CARE
+    glFogf GL_FOG_START, 2.0
+    glFogf GL_FOG_END, 8.0
+    glEnable GL_FOG
+
+    glClearDepth 1.0
+    glEnable GL_DEPTH_TEST
+    glDepthFunc GL_LEQUAL
+    glHint GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST
+  end
+
+  def reshape width, height
+    width   = width.to_f
+    height = height.to_f
+    height = 1.0 if height.zero?
+
+    glViewport 0, 0, width, height
+
+    glMatrixMode GL_PROJECTION
+    glLoadIdentity
+
+    gluPerspective 45.0, width / height, 0.1, 100.0
+
+    glMatrixMode GL_MODELVIEW
+    glLoadIdentity
+  end
+
+  def draw_gl_scene
+    glClear GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT
+    glMatrixMode GL_MODELVIEW
+    glLoadIdentity
+    glTranslatef 0.0, 0.0, -7.0
+
+    glRotatef @xrot, 1.0, 0.0, 0.0
+    glRotatef @yrot, 0.0, 1.0, 0.0
+    glRotatef @zrot, 0.0, 0.0, 1.0
+
+    glBindTexture GL_TEXTURE_2D, @textures[0]
+
+    glBegin GL_QUADS do
+      # front face
+      glTexCoord2f(0.0, 1.0)
+      glVertex3f(-1.0, -1.0,  1.0)
+      glTexCoord2f(1.0, 1.0)
+      glVertex3f( 1.0, -1.0,  1.0)
+      glTexCoord2f(1.0, 0.0)
+      glVertex3f( 1.0,  1.0,  1.0)
+      glTexCoord2f(0.0, 0.0)
+      glVertex3f(-1.0,  1.0,  1.0)
+
+      # back face
+      glTexCoord2f(0.0, 1.0)
+      glVertex3f(-1.0, -1.0, -1.0)
+      glTexCoord2f(1.0, 1.0)
+      glVertex3f(-1.0,  1.0, -1.0)
+      glTexCoord2f(1.0, 0.0)
+      glVertex3f( 1.0,  1.0, -1.0)
+      glTexCoord2f(0.0, 0.0)
+      glVertex3f( 1.0, -1.0, -1.0)
+
+      # top face
+      glTexCoord2f(0.0, 1.0)
+      glVertex3f(-1.0,  1.0, -1.0)
+      glTexCoord2f(1.0, 1.0)
+      glVertex3f(-1.0,  1.0,  1.0)
+      glTexCoord2f(1.0, 0.0)
+      glVertex3f( 1.0,  1.0,  1.0)
+      glTexCoord2f(0.0, 0.0)
+      glVertex3f( 1.0,  1.0, -1.0)
+
+      # bottom face
+      glTexCoord2f(1.0, 1.0)
+      glVertex3f(-1.0, -1.0, -1.0)
+      glTexCoord2f(1.0, 0.0)
+      glVertex3f( 1.0, -1.0, -1.0)
+      glTexCoord2f(0.0, 0.0)
+      glVertex3f( 1.0, -1.0,  1.0)
+      glTexCoord2f(0.0, 1.0)
+      glVertex3f(-1.0, -1.0,  1.0)
+
+      # right face
+      glTexCoord2f(1.0, 0.0)
+      glVertex3f( 1.0, -1.0, -1.0)
+      glTexCoord2f(0.0, 0.0)
+      glVertex3f( 1.0,  1.0, -1.0)
+      glTexCoord2f(0.0, 1.0)
+      glVertex3f( 1.0,  1.0,  1.0)
+      glTexCoord2f(1.0, 1.0)
+      glVertex3f( 1.0, -1.0,  1.0)
+
+      # left face
+      glTexCoord2f(0.0, 0.0)
+      glVertex3f(-1.0, -1.0, -1.0)
+      glTexCoord2f(0.0, 1.0)
+      glVertex3f(-1.0, -1.0,  1.0)
+      glTexCoord2f(1.0, 1.0)
+      glVertex3f(-1.0,  1.0,  1.0)
+      glTexCoord2f(1.0, 0.0)
+      glVertex3f(-1.0,  1.0, -1.0)
+    end
+
+    @xrot += 0.03
+    @yrot += 0.02
+    @zrot += 0.04
+
+    glutSwapBuffers
+  end
+
+  def idle
+    glutPostRedisplay
+  end
+
+  def keyboard key, x, y
+    case key
+    when ?\e
+      glutDestroyWindow @window
+      exit 0
+    when 'F' then 
+      @fullscreen = !@fullscreen
+
+      if @fullscreen then
+        glutFullScreen
+      else
+        glutPositionWindow 0, 0
+      end
+    when 'f' then
+      @fog_filter += 1
+      @fog_filter %= 3
+
+      glFogi GL_FOG_MODE, @fog_mode[@fog_filter]
+      puts "fog #{@fog_filter}"
+    end
+
+    glutPostRedisplay
+  end
+
+  def load_texture
+    png = PNG.load_file File.expand_path('../crate.png', __FILE__)
+    height = png.height
+    width = png.width
+
+    image = png.data.flatten.map { |c| c.values }.join
+
+    @textures = glGenTextures 1
+    glBindTexture GL_TEXTURE_2D, @textures[0]
+    glTexImage2D GL_TEXTURE_2D, 0, GL_RGBA, width, height, 0, GL_RGBA, GL_UNSIGNED_BYTE, image
+    glTexParameteri GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR
+    glTexParameteri GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR
+  end
+
+end
+
+Lesson16.new
+

data/examples/NeHe/nehe_lesson19.rb

@@ -0,0 +1,206 @@
+require 'opengl'
+require 'png'
+require 'png/reader'
+
+class Lesson19
+  include Gl
+  include Glu
+  include Glut
+
+  Particle = Struct.new(:active, :life, :fade,
+                        :r, :g, :b,
+                        :x, :y, :z,
+                        :xi, :yi, :zi,
+                        :xg, :yg, :zg)
+
+  def initialize
+    @fullscreen = true
+    @rainbow = true
+    @slowdown = 2.0
+    @x_speed = 2.0
+    @y_speed = 5.0
+    @zoom = -100.0
+    @textures = nil
+    @colors = [
+      [1.0,  0.5,  0.5],
+      [1.0,  0.75, 0.5],
+      [1.0,  1.0,  0.5],
+      [0.75, 1.0,  0.5],
+      [0.5,  1.0,  0.5],
+      [0.5,  1.0,  0.75],
+      [0.5,  1.0,  1.0],
+      [0.5,  0.75, 1.0],
+      [0.5,  0.5,  1.0],
+      [0.75, 0.5,  1.0],
+      [1.0,  0.5,  1.0],
+      [1.0,  0.5,  0.75],
+    ]
+    @color = 0
+
+    @max_particles = 1_000
+    @particles = (0...@max_particles).map do |i|
+      Particle.new(true,                       # active
+                   1.0,                        # life
+                   rand(100) / 1000.0 + 0.003, # fade
+                   @colors[i % 12][0],         # red
+                   @colors[i % 12][1],         # green
+                   @colors[i % 12][2],         # blue
+                   0.0, 0.0, 0.0,              # x, y, z
+                   (rand * 2 - 1),             # x speed
+                   (rand * 2 - 1),             # y speed
+                   (rand * 2 - 1),             # z speed
+                    0.0,                       # x gravity
+                   -0.8,                       # y gravity
+                    0.0)                       # z gravity
+    end
+
+    glutInit
+
+    glutInitDisplayMode GLUT_RGB | GLUT_DOUBLE | GLUT_ALPHA | GLUT_DEPTH
+    glutInitWindowSize 640, 480
+    glutInitWindowPosition 0, 0
+
+    @window = glutCreateWindow "NeHe Lesson 19 - ruby-opengl version"
+
+    glutDisplayFunc :draw_gl_scene
+    glutReshapeFunc :reshape
+    glutIdleFunc :idle
+    glutKeyboardFunc :keyboard
+
+    reshape 640, 480
+    load_texture
+    init_gl
+
+    glutMainLoop
+  end
+
+  def init_gl
+    glShadeModel GL_SMOOTH
+    glClearColor 0, 0, 0, 0
+
+    glClearDepth 1.0
+    glDisable GL_DEPTH_TEST
+    glEnable GL_BLEND
+    glBlendFunc GL_SRC_ALPHA, GL_ONE
+    glHint GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST
+    glHint GL_POINT_SMOOTH_HINT, GL_NICEST
+    glEnable GL_TEXTURE_2D
+    glBindTexture GL_TEXTURE_2D, @textures[0]
+  end
+
+  def reshape width, height
+    width  = width.to_f
+    height = height.to_f
+    height = 1.0 if height.zero?
+
+    glViewport 0, 0, width, height
+
+    glMatrixMode GL_PROJECTION
+    glLoadIdentity
+
+    gluPerspective 45, width / height, 0.1, 200
+
+    glMatrixMode GL_MODELVIEW
+    glLoadIdentity
+  end
+
+  def draw_gl_scene
+    glClear GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT
+    glLoadIdentity
+
+    @particles.each do |particle|
+      next unless particle.active
+      
+      x = particle.x
+      y = particle.y
+      z = particle.z + @zoom
+
+      glColor4f particle.r, particle.g, particle.b, particle.life
+
+      glBegin GL_TRIANGLE_STRIP do
+        glTexCoord2d 1, 1; glVertex3f x + 0.5, y + 0.5, z
+        glTexCoord2d 0, 1; glVertex3f x - 0.5, y + 0.5, z
+        glTexCoord2d 1, 0; glVertex3f x + 0.5, y - 0.5, z
+        glTexCoord2d 0, 0; glVertex3f x - 0.5, y - 0.5, z
+      end
+
+      particle.x += particle.xi / @slowdown
+      particle.y += particle.yi / @slowdown
+      particle.z += particle.zi / @slowdown
+
+      particle.xi += particle.xg
+      particle.yi += particle.yg
+      particle.zi += particle.zg
+
+      particle.life -= particle.fade
+
+      if particle.life < 0 then
+        particle.life = 1.0
+        particle.fade = rand(100) / 1000.0 + 0.003
+
+        particle.x = 0.0
+        particle.y = 0.0
+        particle.z = 0.0
+
+        particle.xi = @x_speed + rand * 2 - 1
+        particle.yi = @y_speed + rand * 2 - 1
+        particle.zi =            rand * 2 - 1
+
+        particle.r = @colors[@color][0]
+        particle.g = @colors[@color][1]
+        particle.b = @colors[@color][2]
+
+        @color += 1
+        @color %= @colors.length - 1
+      end
+    end
+
+    glutSwapBuffers
+  end
+
+  def idle
+    glutPostRedisplay
+  end
+
+  def keyboard key, x, y
+    case key
+    when ?\e
+      glutDestroyWindow @window
+      exit 0
+    when 'F' then 
+      @fullscreen = !@fullscreen
+
+      if @fullscreen then
+        glutFullScreen
+      else
+        glutPositionWindow 0, 0
+      end
+    when 'f' then
+      @fog_filter += 1
+      @fog_filter %= 3
+
+      glFogi GL_FOG_MODE, @fog_mode[@fog_filter]
+      puts "fog #{@fog_filter}"
+    end
+
+    glutPostRedisplay
+  end
+
+  def load_texture
+    png = PNG.load_file File.expand_path('../particle.png', __FILE__)
+    height = png.height
+    width = png.width
+
+    image = png.data.flatten.map { |c| c.values }.join
+
+    @textures = glGenTextures 1
+    glBindTexture GL_TEXTURE_2D, @textures[0]
+    glTexImage2D GL_TEXTURE_2D, 0, GL_RGBA, width, height, 0, GL_RGBA, GL_UNSIGNED_BYTE, image
+    glTexParameteri GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR
+    glTexParameteri GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR
+  end
+
+end
+
+Lesson19.new
+

data/examples/RedBook/light.rb

@@ -0,0 +1,154 @@
+# This example comes from the Red Book chapter 5, example 5-1 light.c
+
+require 'opengl'
+require 'mathn'
+
+def init
+  @fullscreen = false
+  @xrot = 0
+  @yrot = 0
+  @zrot = 0
+
+  glClearColor 0, 0, 0, 0
+  glShadeModel GL_SMOOTH
+
+  glMaterialfv GL_FRONT, GL_DIFFUSE, [1, 0, 0, 1]
+  glMaterialfv GL_FRONT, GL_SPECULAR, [0, 1, 0, 1]
+  glMaterialfv GL_FRONT, GL_AMBIENT, [0, 0, 0.75, 1]
+  glMaterialfv GL_FRONT, GL_SHININESS, [40]
+  glLightfv GL_LIGHT0, GL_POSITION, [0, 1, -0.25]
+
+  glEnable GL_LIGHTING
+  glEnable GL_LIGHT0
+  glEnable GL_DEPTH_TEST
+  glEnable GL_NORMALIZE
+end
+
+def cross_product a, b
+  Vector[a[1] * b[2] - a[2] * b[1],
+         a[2] * b[0] - a[0] * b[2],
+         a[0] * b[1] - a[1] * b[0]]
+end
+
+def normal v1, v2, v3
+  cross_product v1 - v2, v2 - v3
+end
+
+def normals_for_triangle_fan vertexes
+  center = vertexes.first
+
+  vertex_normals = vertexes[1..-1].each_cons(2).map do |a, b|
+    normal center, a, b
+  end
+
+  normals = vertex_normals.each_cons(2).map do |a, b|
+    a + b
+  end
+
+  normals.unshift vertex_normals.first(3).inject :+
+  normals.push vertex_normals.first + vertex_normals.last
+  normals.push normals[1]
+
+  normals
+end
+
+def display
+  glClear GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT
+  glLoadIdentity
+  #glutSolidSphere 1.0, 50, 50
+  glRotate @xrot, 1, 0, 0
+  glRotate @yrot, 0, 1, 0
+  glRotate @zrot, 0, 0, 1
+
+  #glBegin GL_POLYGON do
+  #  glVertex2f -1,  1
+  #  glVertex2f  1,  1
+  #  glVertex2f  1, -1
+  #  glVertex2f -1, -1
+  #end
+
+  glMaterialfv GL_FRONT_AND_BACK, GL_DIFFUSE,  [1, 1, 1, 1]
+  glMaterialfv GL_FRONT_AND_BACK, GL_SPECULAR, [1, 1, 1, 1]
+  glMaterialfv GL_FRONT_AND_BACK, GL_AMBIENT,  [1, 1, 1, 1]
+  glMaterialfv GL_FRONT, GL_SHININESS, [40]
+  glBegin GL_LINES do
+    glVertex3f 0, 0, 0
+    glVertex3f 0, 0, 1
+  end
+
+  glMaterialfv GL_FRONT, GL_DIFFUSE, [1, 0, 0, 1]
+  glMaterialfv GL_FRONT, GL_SPECULAR, [0, 1, 0, 1]
+  glMaterialfv GL_FRONT, GL_AMBIENT, [0, 0, 0.75, 1]
+  glMaterialfv GL_FRONT, GL_SHININESS, [40]
+
+  vertices = [
+    Vector[ 0.00, -0.4,  0.1],
+    Vector[ 0.00,  0.5,  0.0],
+    Vector[ 0.24, -0.5,  0.0],
+    Vector[-0.24, -0.5,  0.0],
+    Vector[ 0.00,  0.5,  0.0],
+  ]
+
+  normals = normals_for_triangle_fan vertices
+
+  glBegin GL_TRIANGLE_FAN do
+    normals.zip(vertices).each do |normal, vertex|
+      glNormal3fv normal
+      glVertex3fv vertex
+    end
+  end
+  glFlush
+end
+
+def reshape w, h
+  glViewport 0, 0, w, h
+  glMatrixMode GL_PROJECTION
+  glLoadIdentity
+
+  if w <= h then
+    glOrtho -1.5, 1.5, -1.5 * h / w, 1.5 * h / w, -10.0, 10.0
+  else
+    glOrtho -1.5 * w / h, 1.5 * w / h, -1.5, 1.5, -10.0, 10.0
+  end
+
+  glMatrixMode GL_MODELVIEW
+  glLoadIdentity
+end
+
+def keyboard key, x, y
+  case key
+  when ?\e
+    glutDestroyWindow $window
+    exit 0
+  when 'X' then @xrot += 1
+  when 'x' then @xrot -= 1
+  when 'Y' then @yrot += 1
+  when 'y' then @yrot -= 1
+  when 'Z' then @zrot += 1
+  when 'z' then @zrot -= 1
+  when 'F' then
+    @fullscreen = !@fullscreen
+
+    if @fullscreen then
+      glutFullScreen
+    else
+      glutPositionWindow 0, 0
+    end
+  end
+
+  p key => [@xrot, @yrot, @zrot]
+
+  glutPostRedisplay
+end
+
+glutInit
+glutInitDisplayMode GLUT_SINGLE | GLUT_RGB | GLUT_DEPTH
+glutInitWindowSize 500, 500
+glutInitWindowPosition 100, 100
+$window = glutCreateWindow 'example 5-1: light'
+init
+glutDisplayFunc :display
+glutReshapeFunc :reshape
+glutKeyboardFunc :keyboard
+glutMainLoop
+