1 /**************************************************************************
2 * sky.c -- model sky with an upside down "bowl"
4 * Written by Curtis Olson, started December 1997.
6 * Copyright (C) 1997 Curtis L. Olson - curt@infoplane.com
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of the
11 * License, or (at your option) any later version.
13 * This program is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 * (Log is kept at end of this file)
24 **************************************************************************/
39 #include "../XGL/xgl.h"
43 #include "../Time/fg_time.h"
45 #include "../Aircraft/aircraft.h"
46 #include "../Flight/flight.h"
47 #include "../Include/constants.h"
48 #include "../Main/views.h"
49 #include "../Math/fg_random.h"
51 #include "../Include/general.h"
54 /* in meters of course */
55 #define INNER_RADIUS 50000.0
56 #define INNER_ELEV 20000.0
57 #define MIDDLE_RADIUS 70000.0
58 #define MIDDLE_ELEV 4000.0
59 #define OUTER_RADIUS 80000.0
60 #define OUTER_ELEV 0.0
63 static float sky_center[12][3];
64 static float sky_middle[12][3];
65 static float sky_outer[12][3];
67 /* (Re)generate the display list */
73 l = &cur_light_params;
75 printf("Generating the sky dome vertices.\n");
77 for ( i = 0; i < 12; i++ ) {
78 theta = (i * 30.0) * DEG_TO_RAD;
80 sky_center[i][0] = cos(theta) * INNER_RADIUS;
81 sky_center[i][1] = sin(theta) * INNER_RADIUS;
82 sky_center[i][2] = INNER_ELEV;
84 printf(" %.2f %.2f\n", cos(theta) * INNER_RADIUS,
85 sin(theta) * INNER_RADIUS);
87 sky_middle[i][0] = cos((double)theta) * MIDDLE_RADIUS;
88 sky_middle[i][1] = sin((double)theta) * MIDDLE_RADIUS;
89 sky_middle[i][2] = MIDDLE_ELEV;
91 sky_outer[i][0] = cos((double)theta) * OUTER_RADIUS;
92 sky_outer[i][1] = sin((double)theta) * OUTER_RADIUS;
93 sky_outer[i][2] = OUTER_ELEV;
105 f = ¤t_aircraft.flight;
108 printf("Rendering the sky.\n");
112 /* Translate to view position */
113 xglTranslatef( v->cur_zero_elev.x, v->cur_zero_elev.y, v->cur_zero_elev.z );
114 /* printf(" Translated to %.2f %.2f %.2f\n",
115 v->cur_zero_elev.x, v->cur_zero_elev.y, v->cur_zero_elev.z ); */
117 /* Rotate to proper orientation */
118 printf(" lon = %.2f lat = %.2f\n", FG_Longitude * RAD_TO_DEG,
119 FG_Latitude * RAD_TO_DEG);
120 xglRotatef( FG_Longitude * RAD_TO_DEG, 0.0, 0.0, 1.0 );
121 xglRotatef( 90.0 - FG_Latitude * RAD_TO_DEG, 0.0, 1.0, 0.0 );
123 /* xglMaterialfv(GL_FRONT, GL_AMBIENT, l->scene_clear);
124 xglMaterialfv(GL_FRONT, GL_DIFFUSE, moon_color); */
126 /* Draw inner/center section of sky*/
127 xglBegin( GL_TRIANGLE_FAN );
128 xglColor4f(0.0, 0.0, 1.0, 1.0);
129 xglVertex3f(0.0, 0.0, INNER_ELEV);
130 xglColor4f(0.2, 0.2, 0.8, 1.0);
131 for ( i = 0; i < 12; i++ ) {
132 xglVertex3fv( sky_center[i] );
134 xglVertex3fv( sky_center[0] );
137 /* Draw the middle ring */
138 xglBegin( GL_TRIANGLE_STRIP );
139 for ( i = 0; i < 12; i++ ) {
140 xglVertex3fv( sky_middle[i] );
141 xglVertex3fv( sky_center[i] );
143 xglVertex3fv( sky_middle[0] );
144 xglVertex3fv( sky_center[0] );
147 /* Draw the outer ring */
148 xglBegin( GL_TRIANGLE_STRIP );
149 for ( i = 0; i < 12; i++ ) {
150 xglVertex3fv( sky_outer[i] );
151 xglVertex3fv( sky_middle[i] );
153 xglVertex3fv( sky_outer[0] );
154 xglVertex3fv( sky_middle[0] );
162 /* Revision 1.4 1997/12/19 16:45:02 curt
163 /* Working on scene rendering order and options.
165 * Revision 1.3 1997/12/18 23:32:36 curt
166 * First stab at sky dome actually starting to look reasonable. :-)
168 * Revision 1.2 1997/12/18 04:07:03 curt
169 * Worked on properly translating and positioning the sky dome.
171 * Revision 1.1 1997/12/17 23:14:30 curt
173 * Begin work on rendering the sky. (Rather than just using a clear screen.)