1#include <stdio.h>
2#include <math.h>
3#include <allegro5/allegro.h>
4#include "allegro5/allegro_primitives.h"
5#include <allegro5/allegro_opengl.h>
6#include <GL/glu.h>
7
8
9const float FPS
= 60;
10
11ALLEGRO_DISPLAY *display
= NULL
;
12ALLEGRO_EVENT_QUEUE *event_queue
= NULL
;
13ALLEGRO_TIMER *timer1
= NULL
;
14
15bool redraw
= true;
16
17double lightangle
= 0.
0;
18GLUquadricObj
*quadric
= NULL
;
19
20// isolating cleanup code in a single function because we use this code many times
21// doing this will keep the rest of the source code easier to read
22void close_and_exit
()
23{
24 if (quadric
) gluDeleteQuadric
(quadric
);
25 if (timer1
) al_destroy_timer(timer1
);
26 if (display
) al_destroy_display(display
);
27 if (event_queue
) al_destroy_event_queue(event_queue
);
28 al_uninstall_system();
29 exit(0);
30}
31
32// the program execution starts here with 'main' function
33int main
(int argc,
char **argv
){
34
35 // here we initialize different parts of Allegro
36 if(!al_init()) {
37 fprintf(stderr,
"failed to initialize allegro!\n");
38 return -1;
39 }
40
41 al_init_primitives_addon();
42 al_set_new_display_option(ALLEGRO_DEPTH_SIZE , ALLEGRO_DONTCARE ,
16);
43 al_set_new_display_flags(ALLEGRO_OPENGL
);
44 display
= al_create_display(640,
480);
45 if(!display
) {
46 fprintf(stderr,
"failed to create display!\n");
47 close_and_exit
();
48 }
49
50 if (!al_install_keyboard())
51 {
52 fprintf(stderr,
"Error installing keyboard.\n");
53 close_and_exit
();
54 }
55
56 event_queue
= al_create_event_queue();
57 if(!event_queue
) {
58 fprintf(stderr,
"failed to create event_queue!\n");
59 close_and_exit
();
60 }
61
62 timer1
= al_create_timer(1.
0 / FPS
);
63 if(!timer1
) {
64 fprintf(stderr,
"failed to create timer!\n");
65 close_and_exit
();
66 }
67
68 al_register_event_source(event_queue,
al_get_keyboard_event_source());
69
70 al_register_event_source(event_queue,
al_get_display_event_source(display
));
71
72 al_register_event_source(event_queue,
al_get_timer_event_source(timer1
));
73
74 al_start_timer(timer1
);
75
76glEnable
(GL_DEPTH_TEST
);
77glDisable
(GL_CULL_FACE
);
78glEnable
(GL_LIGHTING
);
79quadric
= gluNewQuadric
();
80 while(1)
81 {
82 ALLEGRO_EVENT ev
;
83 al_wait_for_event(event_queue,
&ev
);
84
85 if(ev.type
== ALLEGRO_EVENT_TIMER
) {
86 redraw
= true;
87 }
88
89 if(ev.type
== ALLEGRO_EVENT_KEY_DOWN
) {
90
91 if (ev.keyboard.keycode
==ALLEGRO_KEY_ESCAPE
)
92 close_and_exit
();
93 }
94
95
96 if(ev.type
== ALLEGRO_EVENT_DISPLAY_CLOSE
) {
97 break;
98 }
99
100 if(redraw
&& al_is_event_queue_empty(event_queue
))
101 {
102 redraw
= false;
103 al_set_target_backbuffer(display
);
104 al_clear_to_color(al_map_rgb(0,
50,
140));
105 glClear
(GL_COLOR_BUFFER_BIT
| GL_DEPTH_BUFFER_BIT
);
106 glMatrixMode
(GL_PROJECTION
);
107 glLoadIdentity
();
108 gluPerspective
(90.
0,
(GLdouble
)640.
0 / (GLdouble
)480.
0,
1.
0,
2000.
0);
109
110 glMatrixMode
(GL_MODELVIEW
);
111 glLoadIdentity
();
112 gluLookAt
(0.
0f,
0.
0f,
-100.
0f,
0.
0f,
0.
0f,
1.
0f,
0.
0,
1.
0f,
0.
0f);
113
114 GLfloat light0_pos
[] = {50.
0,
50.
0,
-50.
0,
1.
0};
115 GLfloat light0_color
[] = {0.
01,
0.
01,
0.
01,
0.
0};
116 GLfloat light1_pos
[] = {10.
0,
35.
0,
-10.
0,
1.
0};
117 GLfloat light1_color
[] = {1.
0,
0.
80,
0.
65,
0.
0};
118 light1_pos
[0]=cos(lightangle
/10.
0)*4000.
0;
119 light1_pos
[2]=sin(lightangle
/10.
0)*4000.
0;
120 lightangle
+=0.
01;
121 glLightfv
( GL_LIGHT0,GL_POSITION,light0_pos
);
122 glLightfv
( GL_LIGHT0,GL_DIFFUSE,light1_color
);
123 glLightfv
( GL_LIGHT0,GL_AMBIENT,light0_color
);
124 glLightfv
( GL_LIGHT1,GL_POSITION,light1_pos
);
125 glLightfv
( GL_LIGHT1,GL_DIFFUSE,light1_color
);
126 glLightfv
( GL_LIGHT1,GL_AMBIENT,light1_color
);
127 glEnable
(GL_LIGHT0
);
128 glEnable
(GL_LIGHT1
);
129
130 glTranslatef
(0,
30+cos(lightangle
/10.
0)*cos(lightangle
/5.
0)*20.
0,
0);
131 glRotatef
(cos(lightangle
)*5.
0,
0,
2.
0,
0);
132 glRotatef
(cos(lightangle
*2.
0),
0,
0,
2.
0);
133 glColor3f
(1,
1,
0);
134 gluQuadricTexture
(quadric, GL_FALSE
); // halt texture coordinate generation
135 gluQuadricDrawStyle
(quadric, GLU_FILL
);
136 gluQuadricDrawStyle
(quadric, GLU_OUTSIDE
);
137 gluQuadricNormals
(quadric, GL_SMOOTH
);
138 gluSphere
(quadric,
30.
0f,
18,
18); // radius, slices, stacks
139 glRotatef
(90,
1,
0,
0);
140 glColor3f
(1,
1,
0);
141 gluQuadricDrawStyle
(quadric, GLU_LINE
);
142 gluCylinder
(quadric,
30,
10,
50,
12,
2);
143 glTranslatef
(0,
0,
50);
144 gluQuadricDrawStyle
(quadric, GLU_FILL
);
145 gluCylinder
(quadric,
10,
8,
10,
12,
12);
146
147 al_flip_display();
148 }
149 }
150 close_and_exit
();
151}
I can't help anyway because I myself haven't gone past the tutorial step.
