1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
require 'opengl'
require 'sdl'
#init
SDL.init(SDL::INIT_VIDEO)
SDL.setGLAttr(SDL::GL_DOUBLEBUFFER,1)
SDL.setVideoMode(512,512,32,SDL::OPENGL)
# main loop
while true
while event = SDL::Event2.poll
case event
when SDL::Event2::KeyDown, SDL::Event2::Quit
exit
end
end
Gl.glClear( Gl::GL_COLOR_BUFFER_BIT | Gl::GL_DEPTH_BUFFER_BIT )
Gl.glBegin( Gl::GL_POLYGON )
Gl.glColor3f( 1.0, 0.0, 0.0 )
Gl.glVertex2f( -0.5, -0.5 )
Gl.glColor3f( 0.0, 1.0, 0.0 )
Gl.glVertex2f( -0.5, 0.5 )
Gl.glColor3f( 0.0, 0.0, 1.0 )
Gl.glVertex2f( 0.5, 0.5 )
Gl.glColor3f( 1.0, 0.0, 1.0 )
Gl.glVertex2f( 0.5, -0.5 )
Gl.glEnd
SDL.GLSwapBuffers()
sleep 0.01 # to avoid consuming all CPU power
end
|
