2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
16 * Code to render cool external-scene terrain
44 #define GRID_MAX_SIZE 64
45 #define GRID_SCALE i2f(2*20)
46 #define HEIGHT_SCALE f1_0
50 g3s_uvl uvl_list1[] = { {0,0,0}, {f1_0,0,0}, {0,f1_0,0} };
51 g3s_uvl uvl_list2[] = { {f1_0,0,0}, {f1_0,f1_0,0}, {0,f1_0,0} };
56 #define HEIGHT(_i,_j) (height_array[(_i)*grid_w+(_j)])
57 #define LIGHT(_i,_j) light_array[(_i)*grid_w+(_j)]
59 //!!#define HEIGHT(_i,_j) height_array[(grid_h-1-j)*grid_w+(_i)]
60 //!!#define LIGHT(_i,_j) light_array[(grid_h-1-j)*grid_w+(_i)]
62 #define LIGHTVAL(_i,_j) (((fix) LIGHT(_i,_j))<<8)
64 g3s_point save_row[GRID_MAX_SIZE];
66 vms_vector start_point;
68 grs_bitmap *terrain_bm;
70 int terrain_outline=0;
74 int mine_tiles_drawn; //flags to tell if all 4 tiles under mine have drawn
77 // LINT: adding function prototypes
78 void build_light_table(void);
79 void free_light_table(void);
81 // ------------------------------------------------------------------------
82 void draw_cell(int i,int j,g3s_point *p0,g3s_point *p1,g3s_point *p2,g3s_point *p3)
84 g3s_point *pointlist[3];
89 uvl_list1[0].l = LIGHTVAL(i,j);
90 uvl_list1[1].l = LIGHTVAL(i,j+1);
91 uvl_list1[2].l = LIGHTVAL(i+1,j);
93 uvl_list1[0].u = (i)*f1_0/4; uvl_list1[0].v = (j)*f1_0/4;
94 uvl_list1[1].u = (i)*f1_0/4; uvl_list1[1].v = (j+1)*f1_0/4;
95 uvl_list1[2].u = (i+1)*f1_0/4; uvl_list1[2].v = (j)*f1_0/4;
97 g3_check_and_draw_tmap(3,pointlist,uvl_list1,terrain_bm,NULL,NULL);
98 if (terrain_outline) {
99 int lsave=Lighting_on;
101 gr_setcolor(BM_XRGB(31,0,0));
102 g3_draw_line(pointlist[0],pointlist[1]);
103 g3_draw_line(pointlist[2],pointlist[0]);
109 uvl_list2[0].l = LIGHTVAL(i,j+1);
110 uvl_list2[1].l = LIGHTVAL(i+1,j+1);
111 uvl_list2[2].l = LIGHTVAL(i+1,j);
113 uvl_list2[0].u = (i)*f1_0/4; uvl_list2[0].v = (j+1)*f1_0/4;
114 uvl_list2[1].u = (i+1)*f1_0/4; uvl_list2[1].v = (j+1)*f1_0/4;
115 uvl_list2[2].u = (i+1)*f1_0/4; uvl_list2[2].v = (j)*f1_0/4;
117 g3_check_and_draw_tmap(3,pointlist,uvl_list2,terrain_bm,NULL,NULL);
118 if (terrain_outline) {
119 int lsave=Lighting_on;
121 gr_setcolor(BM_XRGB(31,0,0));
122 g3_draw_line(pointlist[0],pointlist[1]);
123 g3_draw_line(pointlist[1],pointlist[2]);
124 g3_draw_line(pointlist[2],pointlist[0]);
128 if (i==org_i && j==org_j)
129 mine_tiles_drawn |= 1;
130 if (i==org_i-1 && j==org_j)
131 mine_tiles_drawn |= 2;
132 if (i==org_i && j==org_j-1)
133 mine_tiles_drawn |= 4;
134 if (i==org_i-1 && j==org_j-1)
135 mine_tiles_drawn |= 8;
137 if (mine_tiles_drawn == 0xf) {
138 render_mine(exit_segnum, 0, 0);
141 //if (ext_expl_playing)
142 // draw_fireball(&external_explosion);
147 vms_vector y_cache[256];
150 extern vms_matrix surface_orient;
152 vms_vector *get_dy_vec(int h)
161 //@@g3_rotate_delta_y(dyp,h*HEIGHT_SCALE);
163 vm_vec_copy_scale(&tv,&surface_orient.uvec,h*HEIGHT_SCALE);
164 g3_rotate_delta_vec(dyp,&tv);
175 void render_terrain(vms_vector *org_point,int org_2dx,int org_2dy)
177 vms_vector delta_i,delta_j; //delta_y;
178 g3s_point p,last_p,save_p_low,save_p_high;
181 int low_i,high_i,low_j,high_j;
182 int viewer_i,viewer_j;
185 mine_tiles_drawn = 0; //clear flags
190 low_i = 0; high_i = grid_w-1;
191 low_j = 0; high_j = grid_h-1;
193 //@@start_point.x = org_point->x - GRID_SCALE*(org_i - low_i);
194 //@@start_point.z = org_point->z - GRID_SCALE*(org_j - low_j);
195 //@@start_point.y = org_point->y;
197 memset(yc_flags,0,256);
200 Interpolation_method = im;
202 vm_vec_copy_scale(&tv,&surface_orient.rvec,GRID_SCALE);
203 g3_rotate_delta_vec(&delta_i,&tv);
204 vm_vec_copy_scale(&tv,&surface_orient.fvec,GRID_SCALE);
205 g3_rotate_delta_vec(&delta_j,&tv);
207 vm_vec_scale_add(&start_point,org_point,&surface_orient.rvec,-(org_i - low_i)*GRID_SCALE);
208 vm_vec_scale_add2(&start_point,&surface_orient.fvec,-(org_j - low_j)*GRID_SCALE);
210 vm_vec_sub(&tv,&Viewer->pos,&start_point);
211 viewer_i = vm_vec_dot(&tv,&surface_orient.rvec) / GRID_SCALE;
212 viewer_j = vm_vec_dot(&tv,&surface_orient.fvec) / GRID_SCALE;
214 //mprintf((0,"viewer_i,j = %d,%d\n",viewer_i,viewer_j));
216 g3_rotate_point(&last_p,&start_point);
219 for (j=low_j;j<=high_j;j++) {
220 g3_add_delta_vec(&save_row[j],&last_p,get_dy_vec(HEIGHT(low_i,j)));
222 save_p_high = last_p;
224 g3_add_delta_vec(&last_p,&last_p,&delta_j);
227 for (i=low_i;i<viewer_i;i++) {
229 g3_add_delta_vec(&save_p_low,&save_p_low,&delta_i);
231 g3_add_delta_vec(&last_p2,&last_p,get_dy_vec(HEIGHT(i+1,low_j)));
233 for (j=low_j;j<viewer_j;j++) {
236 g3_add_delta_vec(&p,&last_p,&delta_j);
237 g3_add_delta_vec(&p2,&p,get_dy_vec(HEIGHT(i+1,j+1)));
239 draw_cell(i,j,&save_row[j],&save_row[j+1],&p2,&last_p2);
242 save_row[j] = last_p2;
247 vm_vec_negate(&delta_j); //don't have a delta sub...
249 g3_add_delta_vec(&save_p_high,&save_p_high,&delta_i);
250 last_p = save_p_high;
251 g3_add_delta_vec(&last_p2,&last_p,get_dy_vec(HEIGHT(i+1,high_j)));
253 for (j=high_j-1;j>=viewer_j;j--) {
256 g3_add_delta_vec(&p,&last_p,&delta_j);
257 g3_add_delta_vec(&p2,&p,get_dy_vec(HEIGHT(i+1,j)));
259 draw_cell(i,j,&save_row[j],&save_row[j+1],&last_p2,&p2);
262 save_row[j+1] = last_p2;
267 save_row[j+1] = last_p2;
269 vm_vec_negate(&delta_j); //restore sign of j
273 //now do i from other end
275 vm_vec_negate(&delta_i); //going the other way now...
277 //@@start_point.x += (high_i-low_i)*GRID_SCALE;
278 vm_vec_scale_add2(&start_point,&surface_orient.rvec,(high_i-low_i)*GRID_SCALE);
279 g3_rotate_point(&last_p,&start_point);
282 for (j=low_j;j<=high_j;j++) {
283 g3_add_delta_vec(&save_row[j],&last_p,get_dy_vec(HEIGHT(high_i,j)));
285 save_p_high = last_p;
287 g3_add_delta_vec(&last_p,&last_p,&delta_j);
290 for (i=high_i-1;i>=viewer_i;i--) {
292 g3_add_delta_vec(&save_p_low,&save_p_low,&delta_i);
294 g3_add_delta_vec(&last_p2,&last_p,get_dy_vec(HEIGHT(i,low_j)));
296 for (j=low_j;j<viewer_j;j++) {
299 g3_add_delta_vec(&p,&last_p,&delta_j);
300 g3_add_delta_vec(&p2,&p,get_dy_vec(HEIGHT(i,j+1)));
302 draw_cell(i,j,&last_p2,&p2,&save_row[j+1],&save_row[j]);
305 save_row[j] = last_p2;
310 vm_vec_negate(&delta_j); //don't have a delta sub...
312 g3_add_delta_vec(&save_p_high,&save_p_high,&delta_i);
313 last_p = save_p_high;
314 g3_add_delta_vec(&last_p2,&last_p,get_dy_vec(HEIGHT(i,high_j)));
316 for (j=high_j-1;j>=viewer_j;j--) {
319 g3_add_delta_vec(&p,&last_p,&delta_j);
320 g3_add_delta_vec(&p2,&p,get_dy_vec(HEIGHT(i,j)));
322 draw_cell(i,j,&p2,&last_p2,&save_row[j+1],&save_row[j]);
325 save_row[j+1] = last_p2;
330 save_row[j+1] = last_p2;
332 vm_vec_negate(&delta_j); //restore sign of j
338 void free_height_array()
340 d_free(height_array);
343 void load_terrain(char *filename)
345 grs_bitmap height_bitmap;
350 iff_error = iff_read_bitmap(filename,&height_bitmap,BM_LINEAR,NULL);
351 if (iff_error != IFF_NO_ERROR) {
352 mprintf((1, "File %s - IFF error: %s",filename,iff_errormsg(iff_error)));
353 Error("File %s - IFF error: %s",filename,iff_errormsg(iff_error));
357 d_free(height_array);
359 atexit(free_height_array); //first time
361 grid_w = height_bitmap.bm_w;
362 grid_h = height_bitmap.bm_h;
364 Assert(grid_w <= GRID_MAX_SIZE);
365 Assert(grid_h <= GRID_MAX_SIZE);
367 height_array = height_bitmap.bm_data;
370 for (i=0;i<grid_w;i++)
371 for (j=0;j<grid_h;j++) {
382 for (i=0;i<grid_w;i++)
383 for (j=0;j<grid_h;j++)
384 HEIGHT(i,j) -= min_h;
387 // d_free(height_bitmap.bm_data);
389 terrain_bm = terrain_bitmap;
395 void get_pnt(vms_vector *p,int i,int j)
399 p->y = HEIGHT(i,j)*HEIGHT_SCALE;
402 vms_vector light = {0x2e14,0xe8f5,0x5eb8};
404 fix get_face_light(vms_vector *p0,vms_vector *p1,vms_vector *p2)
408 vm_vec_normal(&norm,p0,p1,p2);
410 return -vm_vec_dot(&norm,&light);
415 fix get_avg_light(int i,int j)
422 get_pnt(&p[0],i-1,j);
423 get_pnt(&p[1],i,j-1);
424 get_pnt(&p[2],i+1,j-1);
425 get_pnt(&p[3],i+1,j);
426 get_pnt(&p[4],i,j+1);
427 get_pnt(&p[5],i-1,j+1);
429 for (f=0,sum=0;f<6;f++)
430 sum += get_face_light(&pp,&p[f],&p[(f+1)%5]);
435 void free_light_table()
442 void build_light_table()
445 fix l,l2,min_l=0x7fffffff,max_l=0;
451 atexit(free_light_table); //first time
453 MALLOC(light_array,ubyte,grid_w*grid_h);
455 for (i=1;i<grid_w;i++)
456 for (j=1;j<grid_h;j++) {
457 l = get_avg_light(i,j);
465 //printf("light %2d,%2d = %8x\n",i,j,l);
468 for (i=1;i<grid_w;i++)
469 for (j=1;j<grid_h;j++) {
471 l = get_avg_light(i,j);
473 if (min_l == max_l) {
478 l2 = fixdiv((l-min_l),(max_l-min_l));
485 //printf("light %2d,%2d = %4x\n",i,j,l2>>8);