Ruby 使用 OpenGL 的例子

boy11-2

1. require "opengl"
   
2. require "glut"
   
3. 
   
4. $light_diffuse = [1.0, 0.7, 0.7, 1.0]
   
5. $light_position = [1.0, 1.0, 1.0, 0.0]
   
6. $n = [
   
7.   [-1.0, 0.0, 0.0], [0.2, 1.0, 0.0], [1.0, 0.0, 0.0],
   
8.   [0.0, -1.0, 0.0], [0.0, 0.3, 1.0], [0.0, 0.0, -1.0] ]
   
9. 
   
10. $faces = [
    
11.   [0, 1, 2, 3], [3, 2, 6, 2], [7, 6, 5, 4],
    
12.   [4, 2, 1, 2], [5, 6, 2, 1], [7, 4, 0, 3] ]
    
13. 
    
14. def drawBox
    
15.   for i in (0..5)
    
16.     GL.Begin(GL::QUADS)
    
17.     GL.Normal(*($n[i]))
    
18.     GL.Vertex($v[$faces[i][0]])
    
19.     GL.Vertex($v[$faces[i][1]])
    
20.     GL.Vertex($v[$faces[i][2]])
    
21.     GL.Vertex($v[$faces[i][3]])
    
22.     GL.End()
    
23.   end
    
24. end
    
25. 
    
26. display = Proc.new {
    
27.   GL.Clear(GL::COLOR_BUFFER_BIT | GL::DEPTH_BUFFER_BIT)
    
28.   drawBox
    
29.   GLUT.SwapBuffers
    
30. }
    
31. 
    
32. def myinit
    
33.   $v = [[-1, -1,1],[-1, -1,-1], [-1,1,-1], [-1,1,1], [1, -1,1],
    
34.       [1, -1,-1], [1, 1,-1], [1,1,1]]
    
35. 
    
36.   GL.Light(GL::LIGHT0, GL::DIFFUSE, $light_diffuse)
    
37.   GL.Light(GL::LIGHT0, GL::POSITION, $light_position)
    
38.   GL.Enable(GL::LIGHT0)
    
39.   GL.Enable(GL::LIGHTING)
    
40. 
    
41.   GL.Enable(GL::DEPTH_TEST)
    
42. 
    
43.   GL.MatrixMode(GL::PROJECTION)
    
44.   GLU.Perspective(40.0, 1.0, 1.0,  10.0)
    
45.   GL.MatrixMode(GL::MODELVIEW)
    
46.   GLU.LookAt(0.0, 0.0, 5.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0)
    
47. 
    
48.   GL.Translate(0.0, 0.0, -1.0)
    
49.   GL.Rotate(60, 1.0, 0.0, 0.0)
    
50.   GL.Rotate(-20, 0.0, 0.0, 1.0)
    
51. end
    
52. GLUT.Init
    
53. GLUT.InitDisplayMode(GLUT::DOUBLE | GLUT::RGB | GLUT::DEPTH)
    
54. GLUT.CreateWindow("red 3D lighted cube")
    
55. GLUT.DisplayFunc(display)
    
56. myinit
    
57. GLUT.MainLoop()

复制代码