ruby-opengl 0.60.1 → 0.61.0

data/examples/OrangeBook/particle.vert

@@ -1,38 +0,0 @@
-//
-// Vertex shader for rendering a "confetti cannon"
-// via a partcle system
-//
-// Author: Randi Rost
-//
-// Copyright (c) 2003-2004: 3Dlabs, Inc.
-//
-// See 3Dlabs-License.txt for license information
-//
-
-uniform float Time;            // updated each frame by the application
-uniform vec4  Background;      // constant color equal to background
- 
-attribute vec3  Velocity;      // initial velocity
-attribute float StartTime;     // time at which particle is activated
-
-varying vec4 Color;
- 
-void main(void)
-{
-    vec4  vert;
-    float t = Time - StartTime;
-
-    if (t >= 0.0)
-    {
-        vert    = gl_Vertex + vec4 (Velocity * t, 0.0);
-        vert.y -= 4.9 * t * t;
-        Color   = gl_Color;
-    }
-    else
-    {
-        vert  = gl_Vertex;      // Initial position
-        Color = Background;     // "pre-birth" color
-    }
- 
-    gl_Position  = gl_ModelViewProjectionMatrix * vert;
-}

data/examples/README

@@ -1,16 +0,0 @@
-Examples
-========
-
-This directory contains OpenGL examples converted to ruby from various sources.
-As such, they are distributed under various terms - see each file for licensing info.
-
-RedBook/
-	Examples from OpenGL Red Book and SGI's example code in general, licensed under
-	SGI open-source license.
-OrangeBook/
-	Examples from OpenGL Orange Book (GLSL), distributed under BSD license
-NeHe/
-  NeHe's opengl tutorials (http://nehe.gamedev.net), licensed under free license.
-Misc/
-	Other examples. If license is not given, MIT is assumed.
-	

data/examples/RedBook/aapoly.rb

@@ -1,142 +0,0 @@
-#
-# Copyright (c) 1993-1997, Silicon Graphics, Inc.
-# ALL RIGHTS RESERVED 
-# Permission to use, copy, modify, and distribute this software for 
-# any purpose and without fee is hereby granted, provided that the above
-# copyright notice appear in all copies and that both the copyright notice
-# and this permission notice appear in supporting documentation, and that 
-# the name of Silicon Graphics, Inc. not be used in advertising
-# or publicity pertaining to distribution of the software without specific,
-# written prior permission. 
-#
-# THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
-# AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
-# INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
-# FITNESS FOR A PARTICULAR PURPOSE.  IN NO EVENT SHALL SILICON
-# GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
-# SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
-# KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
-# LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
-# THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC.  HAS BEEN
-# ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
-# ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
-# POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
-# 
-# US Government Users Restricted Rights 
-# Use, duplication, or disclosure by the Government is subject to
-# restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
-# (c)(1)(ii) of the Rights in Technical Data and Computer Software
-# clause at DFARS 252.227-7013 and/or in similar or successor
-# clauses in the FAR or the DOD or NASA FAR Supplement.
-# Unpublished-- rights reserved under the copyright laws of the
-# United States.  Contractor/manufacturer is Silicon Graphics,
-# Inc., 2011 N.  Shoreline Blvd., Mountain View, CA 94039-7311.
-#
-# OpenGL(R) is a registered trademark of Silicon Graphics, Inc.
-#
-# aapoly.c
-# This program draws filled polygons with antialiased
-# edges.  The special GL_SRC_ALPHA_SATURATE blending 
-# function is used.
-# Pressing the 't' key turns the antialiasing on and off.
-require 'opengl'
-include Gl,Glu,Glut
-
-$polySmooth = true
-
-def init
-	glCullFace(GL_BACK)
-	glEnable(GL_CULL_FACE)
-	glBlendFunc(GL_SRC_ALPHA_SATURATE, GL_ONE)
-	glClearColor(0.0, 0.0, 0.0, 0.0)
-end
-
-NFACE=6
-NVERT=8
-$indices = [
-	[4, 5, 6, 7], [2, 3, 7, 6], [0, 4, 7, 3],
-	[0, 1, 5, 4], [1, 5, 6, 2], [0, 3, 2, 1]
-]
-
-def drawCube(x0, x1, y0, y1, z0, z1)
-	v = [[],[],[],[],[],[],[],[]]
-	c = [
-		[0.0, 0.0, 0.0, 1.0], [1.0, 0.0, 0.0, 1.0],
-		[0.0, 1.0, 0.0, 1.0], [1.0, 1.0, 0.0, 1.0],
-		[0.0, 0.0, 1.0, 1.0], [1.0, 0.0, 1.0, 1.0],
-		[0.0, 1.0, 1.0, 1.0], [1.0, 1.0, 1.0, 1.0]
-	]
-	
-	# indices of front, top, left, bottom, right, back faces
-	
-	v[0][0] = v[3][0] = v[4][0] = v[7][0] = x0
-	v[1][0] = v[2][0] = v[5][0] = v[6][0] = x1
-	v[0][1] = v[1][1] = v[4][1] = v[5][1] = y0
-	v[2][1] = v[3][1] = v[6][1] = v[7][1] = y1
-	v[0][2] = v[1][2] = v[2][2] = v[3][2] = z0
-	v[4][2] = v[5][2] = v[6][2] = v[7][2] = z1
-	
-	glEnableClientState(GL_VERTEX_ARRAY)
-	glEnableClientState(GL_COLOR_ARRAY)
-	glVertexPointer(3, GL_FLOAT, 0, v.flatten!.pack("f*"))
-	glColorPointer(4, GL_FLOAT, 0, c.flatten!.pack("f*"))
-	glDrawElements(GL_QUADS, NFACE*4, GL_UNSIGNED_BYTE, $indices.flatten.pack("C*"))
-	glDisableClientState(GL_VERTEX_ARRAY)
-	glDisableClientState(GL_COLOR_ARRAY)
-end
-
-# Note:  polygons must be drawn from front to back
-# for proper blending.
-display = proc do
-	if ($polySmooth)
-		glClear(GL_COLOR_BUFFER_BIT)
-		glEnable(GL_BLEND)
-		glEnable(GL_POLYGON_SMOOTH)
-		glDisable(GL_DEPTH_TEST)
-	else
-		glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT)
-		glDisable(GL_BLEND)
-		glDisable(GL_POLYGON_SMOOTH)
-		glEnable(GL_DEPTH_TEST)
-	end
-	
-	glPushMatrix()
-	glTranslate(0.0, 0.0, -8.0)    
-	glRotate(30.0, 1.0, 0.0, 0.0)
-	glRotate(60.0, 0.0, 1.0, 0.0) 
-	drawCube(-0.5, 0.5, -0.5, 0.5, -0.5, 0.5)
-	glPopMatrix()
-	glutSwapBuffers()
-end
-
-reshape = proc do |w, h|
-	glViewport(0, 0, w, h)
-	glMatrixMode(GL_PROJECTION)
-	glLoadIdentity()
-	gluPerspective(30.0,  w.to_f/ h.to_f, 1.0, 20.0)
-	glMatrixMode(GL_MODELVIEW)
-	glLoadIdentity()
-end
-
-keyboard = proc do |key, x, y|
-	case (key)
-		when ?t ,?T
-			$polySmooth = !$polySmooth
-			glutPostRedisplay()
-		when ?\e
-			exit(0)  # Escape key
-	end
-end
-
-# Main Loop
-glutInit
-glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_ALPHA | GLUT_DEPTH)
-glutInitWindowSize(500, 500)
-glutInitWindowPosition(100, 100)
-glutCreateWindow($0)
-init()
-glutReshapeFunc(reshape)
-glutKeyboardFunc(keyboard)
-glutDisplayFunc(display)
-glutMainLoop()
-

data/examples/RedBook/aargb.rb

@@ -1,119 +0,0 @@
-#
-# Copyright (c) 1993-1997, Silicon Graphics, Inc.
-# ALL RIGHTS RESERVED 
-# Permission to use, copy, modify, and distribute this software for 
-# any purpose and without fee is hereby granted, provided that the above
-# copyright notice appear in all copies and that both the copyright notice
-# and this permission notice appear in supporting documentation, and that 
-# the name of Silicon Graphics, Inc. not be used in advertising
-# or publicity pertaining to distribution of the software without specific,
-# written prior permission. 
-#
-# THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
-# AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
-# INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
-# FITNESS FOR A PARTICULAR PURPOSE.  IN NO EVENT SHALL SILICON
-# GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
-# SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
-# KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
-# LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
-# THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC.  HAS BEEN
-# ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
-# ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
-# POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
-# 
-# US Government Users Restricted Rights 
-# Use, duplication, or disclosure by the Government is subject to
-# restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
-# (c)(1)(ii) of the Rights in Technical Data and Computer Software
-# clause at DFARS 252.227-7013 and/or in similar or successor
-# clauses in the FAR or the DOD or NASA FAR Supplement.
-# Unpublished-- rights reserved under the copyright laws of the
-# United States.  Contractor/manufacturer is Silicon Graphics,
-# Inc., 2011 N.  Shoreline Blvd., Mountain View, CA 94039-7311.
-#
-# OpenGL(R) is a registered trademark of Silicon Graphics, Inc.
-#
-# aargb.c
-# This program draws shows how to draw anti-aliased lines. It draws
-# two diagonal lines to form an X when 'r' is typed in the window, 
-# the lines are rotated in opposite directions.
-require 'opengl'
-require 'mathn'
-include Gl,Glu,Glut
-
-$rotAngle = 0.0
-
-# Initialize antialiasing for RGBA mode, including alpha
-# blending, hint, and line width.  Print out implementation
-# specific info on line width granularity and width.
-def init
-	glEnable(GL_LINE_SMOOTH)
-	glEnable(GL_BLEND)
-	glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA)
-	glHint(GL_LINE_SMOOTH_HINT, GL_DONT_CARE)
-	glLineWidth(1.5)
-	glClearColor(0.0, 0.0, 0.0, 0.0)
-end
-
-# Draw 2 diagonal lines to form an X
-display = Proc.new do
-	glClear(GL_COLOR_BUFFER_BIT)
-	
-	glColor(0.0, 1.0, 0.0)
-	glPushMatrix()
-	glRotate(-$rotAngle, 0.0, 0.0, 0.1)
-	glBegin(GL_LINES)
-	glVertex(-0.5, 0.5)
-	glVertex(0.5, -0.5)
-	glEnd()
-	glPopMatrix()
-	
-	glColor(0.0, 0.0, 1.0)
-	glPushMatrix()
-	glRotate($rotAngle, 0.0, 0.0, 0.1)
-	glBegin(GL_LINES)
-	glVertex(0.5, 0.5)
-	glVertex(-0.5, -0.5)
-	glEnd()
-	glPopMatrix()
-	glutSwapBuffers()
-end
-
-reshape = Proc.new do |w, h|
-	glViewport(0, 0, w, h)
-	glMatrixMode(GL_PROJECTION)
-	glLoadIdentity()
-	if (w <= h) 
-		gluOrtho2D(-1.0, 1.0, -1.0*h/w, 1.0*h/w)
-	else 
-		gluOrtho2D(-1.0*w/h, 1.0*w/h, -1.0, 1.0)
-	end
-	glMatrixMode(GL_MODELVIEW)
-	glLoadIdentity()
-end
-
-keyboard = Proc.new do |key, x, y|
-	case (key)
-		when ?r,?R
-			$rotAngle = $rotAngle + 20.0
-			$rotAngle = 0.0 if ($rotAngle >= 360.0) 
-			glutPostRedisplay()
-		when ?\e  # Escape Key
-			exit(0)
-	end
-end
-
-# Main Loop
-# Open window with initial window size, title bar, 
-# RGBA display mode, and handle input events.
-glutInit
-glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB)
-glutInitWindowSize(500, 500)
-glutInitWindowPosition(100, 100)
-glutCreateWindow($0)
-init()
-glutReshapeFunc(reshape)
-glutKeyboardFunc(keyboard)
-glutDisplayFunc(display)
-glutMainLoop()

data/examples/RedBook/accanti.rb

@@ -1,162 +0,0 @@
-#
-# Copyright (c) Mark J. Kilgard, 1994.
-#
-# (c) Copyright 1993, Silicon Graphics, Inc.
-# ALL RIGHTS RESERVED 
-# Permission to use, copy, modify, and distribute this software for 
-# any purpose and without fee is hereby granted, provided that the above
-# copyright notice appear in all copies and that both the copyright notice
-# and this permission notice appear in supporting documentation, and that 
-# the name of Silicon Graphics, Inc. not be used in advertising
-# or publicity pertaining to distribution of the software without specific,
-# written prior permission. 
-#
-# THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
-# AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
-# INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
-# FITNESS FOR A PARTICULAR PURPOSE.  IN NO EVENT SHALL SILICON
-# GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
-# SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
-# KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
-# LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
-# THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC.  HAS BEEN
-# ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
-# ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
-# POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
-# 
-# US Government Users Restricted Rights 
-# Use, duplication, or disclosure by the Government is subject to
-# restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
-# (c)(1)(ii) of the Rights in Technical Data and Computer Software
-# clause at DFARS 252.227-7013 and/or in similar or successor
-# clauses in the FAR or the DOD or NASA FAR Supplement.
-# Unpublished-- rights reserved under the copyright laws of the
-# United States.  Contractor/manufacturer is Silicon Graphics,
-# Inc., 2011 N.  Shoreline Blvd., Mountain View, CA 94039-7311.
-#
-# OpenGL(TM) is a trademark of Silicon Graphics, Inc.
-#
-# accanti.c
-
-require 'opengl'
-require 'jitter'
-include Gl,Glu,Glut
-
-#  Initialize lighting and other values.
-def myinit
-	mat_ambient = [ 1.0, 1.0, 1.0, 1.0 ]
-	mat_specular = [ 1.0, 1.0, 1.0, 1.0 ]
-	light_position = [ 0.0, 0.0, 10.0, 1.0 ]
-	lm_ambient = [ 0.2, 0.2, 0.2, 1.0 ]
-	
-	glMaterial(GL_FRONT, GL_AMBIENT, mat_ambient)
-	glMaterial(GL_FRONT, GL_SPECULAR, mat_specular)
-	glMaterial(GL_FRONT, GL_SHININESS, 50.0)
-	glLight(GL_LIGHT0, GL_POSITION, light_position)
-	glLightModel(GL_LIGHT_MODEL_AMBIENT, lm_ambient)
-	
-	glEnable(GL_LIGHTING)
-	glEnable(GL_LIGHT0)
-	glDepthFunc(GL_LESS)
-	glEnable(GL_DEPTH_TEST)
-	glShadeModel(GL_FLAT)
-	
-	glClearColor(0.0, 0.0, 0.0, 0.0)
-	glClearAccum(0.0, 0.0, 0.0, 0.0)
-end
-
-def displayObjects
-	torus_diffuse = [ 0.7, 0.7, 0.0, 1.0 ]
-	cube_diffuse = [ 0.0, 0.7, 0.7, 1.0 ]
-	sphere_diffuse = [ 0.7, 0.0, 0.7, 1.0 ]
-	octa_diffuse = [ 0.7, 0.4, 0.4, 1.0 ]
-	
-	glPushMatrix()
-	glRotate(30.0, 1.0, 0.0, 0.0)
-	
-	glPushMatrix()
-	glTranslate(-0.80, 0.35, 0.0) 
-	glRotate(100.0, 1.0, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_DIFFUSE, torus_diffuse)
-	glutSolidTorus(0.275, 0.85, 16, 16)
-	glPopMatrix()
-	
-	glPushMatrix()
-	glTranslate(-0.75, -0.50, 0.0)
-	glRotate(45.0, 0.0, 0.0, 1.0)
-	glRotate(45.0, 1.0, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_DIFFUSE, cube_diffuse)
-	glutSolidCube(1.5)
-	glPopMatrix()
-	
-	glPushMatrix()
-	glTranslate(0.75, 0.60, 0.0) 
-	glRotate(30.0, 1.0, 0.0, 0.0)
-	glMaterial(GL_FRONT, GL_DIFFUSE, sphere_diffuse)
-	glutSolidSphere(1.0, 16, 16)
-	glPopMatrix()
-	
-	glPushMatrix()
-	glTranslate(0.70, -0.90, 0.25)
-	glMaterial(GL_FRONT, GL_DIFFUSE, octa_diffuse)
-	glutSolidOctahedron()
-	glPopMatrix()
-	
-	glPopMatrix()
-end
-
-ACSIZE=8
-
-myDisplay = proc do
-	viewport = glGetDoublev(GL_VIEWPORT)
-	
-	glClear(GL_ACCUM_BUFFER_BIT)
-	for jitter in 0...ACSIZE
-		glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT)
-		glPushMatrix()
-		#	Note that 4.5 is the distance in world space between
-		#	left and right and bottom and top.
-		#	This formula converts fractional pixel movement to 
-		#	world coordinates.
-		glTranslate($j8[jitter][0]*4.5/viewport[2], $j8[jitter][1]*4.5/viewport[3], 0.0)
-		displayObjects()
-		glPopMatrix()
-		glAccum(GL_ACCUM, 1.0/ACSIZE)
-	end
-	glAccum(GL_RETURN, 1.0)
-	glutSwapBuffers()
-end
-
-myReshape = proc do |w, h|
-	glViewport(0, 0, w, h)
-	glMatrixMode(GL_PROJECTION)
-	glLoadIdentity()
-	if (w <= h) 
-		glOrtho(-2.25, 2.25, -2.25*h/w, 2.25*h/w, -10.0, 10.0)
-	else 
-		glOrtho(-2.25*w/h, 2.25*w/h, -2.25, 2.25, -10.0, 10.0)
-	end
-	glMatrixMode(GL_MODELVIEW)
-end
-
-keyboard = Proc.new do |key, x, y|
-	case (key)
-		when ?\e
-		exit(0);
-	end
-end
-
-# Main Loop
-# Open window with initial window size, title bar, 
-# RGBA display mode, and handle input events.
-#
-glutInit()
-glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_ACCUM | GLUT_DEPTH)
-glutInitWindowSize(500, 500)
-glutInitWindowPosition(100, 100)
-glutCreateWindow($0)
-myinit()
-glutReshapeFunc(myReshape)
-glutDisplayFunc(myDisplay)
-glutKeyboardFunc(keyboard)
-glutMainLoop()