void title_save_game()
{
grs_canvas * save_canv;
grs_canvas * save_canv_data;
grs_font * save_font;
ubyte palette[768];
if ( Next_level_num == 0 ) return;
save_canv = grd_curcanv;
save_font = grd_curcanv->cv_font;
save_canv_data = gr_create_canvas( grd_curcanv->cv_bitmap.bm_w, grd_curcanv->cv_bitmap.bm_h );
gr_set_current_canvas(save_canv_data);
gr_ubitmap(0,0,&save_canv->cv_bitmap);
gr_set_current_canvas(save_canv);
gr_clear_canvas(gr_find_closest_color_current( 0, 0, 0));
gr_palette_read( palette );
gr_palette_load( gr_palette );
#ifndef SHAREWARE
state_save_all(1);
#endif
gr_palette_clear();
gr_set_current_canvas(save_canv);
gr_ubitmap(0,0,&save_canv_data->cv_bitmap);
gr_palette_load( palette );
gr_set_curfont(save_font);
}
void gr_restore_mode()
{
int i;
//gr_set_text_25();
#ifndef NOGRAPH
gr_palette_fade_out( gr_palette, 32, 0 );
gr_palette_set_gamma(0);
if ( gr_saved_screen.video_mode == 3 ) {
switch( gr_saved_screen.height ) {
case 43: gr_set_text_43(); break;
case 50: gr_set_text_50(); break;
default: gr_set_text_25(); break;
}
} else {
gr_set_misc_mode(gr_saved_screen.video_mode);
}
if (gr_saved_screen.is_graphics==0) {
gr_sync_display();
gr_sync_display();
gr_palette_read( gr_pal_default );
gr_palette_clear();
for (i=0; i < gr_saved_screen.width*gr_saved_screen.height; i++ )
pTextMemory[i]=gr_saved_screen.video_memory[i];
gr_setcursor( gr_saved_screen.cursor_x, gr_saved_screen.cursor_y, gr_saved_screen.cursor_sline, gr_saved_screen.cursor_eline );
gr_palette_faded_out = 1;
gr_palette_fade_in( gr_pal_default, 32, 0 );
}
#endif
}
int show_title_screen( char * filename, int allow_keys )
{
fix timer;
int pcx_error;
grs_bitmap title_bm;
gr_init_bitmap_data (&title_bm);
if ((pcx_error=pcx_read_bitmap( filename, &title_bm, BM_LINEAR, New_pal ))!=PCX_ERROR_NONE) {
printf( "File '%s', PCX load error: %s (%i)\n (No big deal, just no title screen.)\n",filename, pcx_errormsg(pcx_error), pcx_error);
mprintf((0, "File '%s', PCX load error: %s (%i)\n (No big deal, just no title screen.)\n",filename, pcx_errormsg(pcx_error), pcx_error));
Int3();
gr_free_bitmap_data (&title_bm);
return 0;
}
// vfx_set_palette_sub( New_pal );
#ifdef OGL
gr_palette_load(New_pal);
#else
gr_palette_clear();
#endif
gr_set_current_canvas( NULL );
show_fullscr(&title_bm);
//added on 9/13/98 by adb to make update-needing arch's work
gr_update();
//end addition - adb
gr_free_bitmap_data (&title_bm);
if (allow_keys > 2 || gr_palette_fade_in( New_pal, 32, allow_keys ) || allow_keys > 1) {
return 1;
}
gr_palette_load( New_pal );
timer = timer_get_fixed_seconds() + i2f(3);
while (1) {
if ( local_key_inkey() && allow_keys ) break;
if ( timer_get_fixed_seconds() > timer ) break;
}
if (gr_palette_fade_out( New_pal, 32, allow_keys ))
return 1;
return 0;
}
int gr_palette_fade_out(ubyte *pal, int nsteps, int allow_keys )
{
ubyte c;
int i,j;
fix fade_palette[768];
fix fade_palette_delta[768];
allow_keys = allow_keys;
if (gr_palette_faded_out) return 0;
#ifndef NDEBUG
if (grd_fades_disabled) {
gr_palette_clear();
return 0;
}
#endif
#if defined(POLY_ACC)
return 0;
#endif
for (i=0; i<768; i++ ) {
fade_palette[i] = i2f(pal[i]+gr_palette_gamma);
fade_palette_delta[i] = fade_palette[i] / nsteps;
}
for (j=0; j<nsteps; j++ ) {
gr_sync_display();
outp( 0x3c6, 0xff );
outp( 0x3c8, 0 );
for (i=0; i<768; i++ ) {
fade_palette[i] -= fade_palette_delta[i];
if (fade_palette[i] < 0 )
fade_palette[i] = 0;
c = f2i(fade_palette[i]);
if ( c > 63 ) c = 63;
outp( 0x3c9, c );
}
}
gr_palette_faded_out = 1;
return 0;
}
int gr_set_mode(u_int32_t mode)
{
int w,h;
#ifdef NOGRAPH
return 0;
#endif
if (mode<=0)
return 0;
w=SM_W(mode);
h=SM_H(mode);
if (screen != NULL) gr_palette_clear();
//added on 11/06/98 by Matt Mueller to set the title bar. (moved from below)
//sekmu: might wanna copy this litte blurb to one of the text files or something
//we want to set it here so that X window manager "Style" type commands work
//for example, in fvwm2 or fvwm95:
//Style "D1X*" NoTitle, NoHandles, BorderWidth 0
//if you can't use -fullscreen like me (crashes X), this is a big help in
//getting the window centered correctly (if you use SmartPlacement)
SDL_WM_SetCaption(DESCENT_VERSION " " D1X_DATE, "Descent");
//end addition -MM
//edited 10/05/98 by Matt Mueller - make fullscreen mode optional
// changed by adb on 980913: added SDL_HWPALETTE (should be option?)
// changed by someone on 980923 to add SDL_FULLSCREEN
if(!checkvidmodeok || SDL_VideoModeOK(w,h,8,sdl_video_flags)){
screen = SDL_SetVideoMode(w, h, 8, sdl_video_flags);
} else {
screen=NULL;
}
// end changes by someone
// end changes by adb
//end edit -MM
if (screen == NULL) {
Error("Could not set %dx%dx8 video mode\n",w,h);
exit(1);
}
memset( grd_curscreen, 0, sizeof(grs_screen));
grd_curscreen->sc_mode = mode;
grd_curscreen->sc_w = w;
grd_curscreen->sc_h = h;
grd_curscreen->sc_aspect = fixdiv(grd_curscreen->sc_w*3,grd_curscreen->sc_h*4);
grd_curscreen->sc_canvas.cv_bitmap.bm_x = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_y = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_w = w;
grd_curscreen->sc_canvas.cv_bitmap.bm_h = h;
grd_curscreen->sc_canvas.cv_bitmap.bm_rowsize = screen->pitch;
grd_curscreen->sc_canvas.cv_bitmap.bm_type = BM_LINEAR;
grd_curscreen->sc_canvas.cv_bitmap.bm_data = (unsigned char *)screen->pixels;
gr_set_current_canvas(NULL);
//gr_enable_default_palette_loading();
//added on 9/30/98 by Matt Mueller to hide the mouse if its over the game window
SDL_ShowCursor(0);
//end addition -MM
//--moved up--added on 9/30/98 by Matt Mueller to set the title bar. Woohoo!
//--moved up-- SDL_WM_SetCaption(DESCENT_VERSION " " D1X_DATE, NULL);
//--moved up--end addition -MM
gamefont_choose_game_font(w,h);
return 0;
}
int gr_set_mode(u_int32_t mode)
{
unsigned int w, h;
ggi_mode other_mode;
#ifdef NOGRAPH
return 0;
#endif
if (mode<=0)
return 0;
w=SM_W(mode);
h=SM_H(mode);
gr_palette_clear();
if(ggiCheckGraphMode(screenvis, w, h, GGI_AUTO, GGI_AUTO, GT_8BIT, &other_mode))
ggiSetMode(screenvis, &other_mode);
else
ggiSetGraphMode(screenvis, w, h, GGI_AUTO, GGI_AUTO, GT_8BIT);
ggiSetFlags(screenvis, GGIFLAG_ASYNC);
if (!ggiDBGetNumBuffers(screenvis))
use_directbuffer = 0;
else
{
dbuffer = ggiDBGetBuffer(screenvis, 0);
if (!(dbuffer->type & GGI_DB_SIMPLE_PLB))
use_directbuffer = 0;
else
use_directbuffer = 1;
}
memset(grd_curscreen, 0, sizeof(grs_screen));
grd_curscreen->sc_mode = mode;
grd_curscreen->sc_w = w;
grd_curscreen->sc_h = h;
grd_curscreen->sc_aspect = fixdiv(grd_curscreen->sc_w*3,grd_curscreen->sc_h*4);
grd_curscreen->sc_canvas.cv_bitmap.bm_x = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_y = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_w = w;
grd_curscreen->sc_canvas.cv_bitmap.bm_h = h;
grd_curscreen->sc_canvas.cv_bitmap.bm_type = BM_LINEAR;
if (use_directbuffer)
{
grd_curscreen->sc_canvas.cv_bitmap.bm_data = dbuffer->write;
grd_curscreen->sc_canvas.cv_bitmap.bm_rowsize = dbuffer->buffer.plb.stride;
}
else
{
free(screenbuffer);
screenbuffer = malloc (w * h);
grd_curscreen->sc_canvas.cv_bitmap.bm_data = screenbuffer;
grd_curscreen->sc_canvas.cv_bitmap.bm_rowsize = w;
}
gr_set_current_canvas(NULL);
gamefont_choose_game_font(w,h);
return 0;
}
void modex_print_message(int x, int y, char *str)
{
#ifndef AUTOMAP_DIRECT_RENDER
#ifndef AUTOMAP_NO_PAGING
int i;
for (i=0; i<2; i++ ) {
gr_set_current_canvas(&Pages[i]);
#else
{
gr_set_current_canvas(OffscreenPage);
#endif
#endif
modex_printf(x, y, str, GFONT_MEDIUM_1);
#ifndef AUTOMAP_DIRECT_RENDER
}
gr_set_current_canvas(&DrawingPages[current_page]);
#endif
}
extern void GameLoop(int, int );
extern int set_segment_depths(int start_seg, ubyte *segbuf);
u_int32_t automap_mode = SM(640,480);
int automap_width = 640;
int automap_height = 480;
int automap_use_game_res=0;
int nice_automap=0;
void do_automap( int key_code ) {
int done=0;
vms_matrix tempm;
vms_angvec tangles;
int leave_mode=0;
int first_time=1;
// int pcx_error;
int c;
// char filename[] = "MAP.PCX";
fix entry_time;
int pause_game=1; // Set to 1 if everything is paused during automap...No pause during net.
fix t1, t2;
control_info saved_control_info;
grs_bitmap Automap_background;
int Max_segments_away = 0;
int SegmentLimit = 1;
//added on 10/28/98 by adb to fix compile versions
#if !defined (NDEBUG) || (!defined(AUTOMAP_NO_PAGING) && !defined(AUTOMAP_DIRECT_RENDER))
int i;
#endif
key_code = key_code; // disable warning...
if ((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence))
pause_game = 0;
if (pause_game)
stop_time();
create_name_canv();
Max_edges = min(MAX_EDGES_FROM_VERTS(Num_vertices),MAX_EDGES); //make maybe smaller than max
//Edges = malloc( sizeof(Edge_info)*Max_edges);
//if ( Edges == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(Edge_info)*Max_edges/1024));
// return;
//}
//DrawingListBright = malloc( sizeof(short)*Max_edges);
//if ( DrawingListBright == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(short)*Max_edges/1024));
// return;
//}
mprintf( (0, "Num_vertices=%d, Max_edges=%d, (MAX:%d)\n", Num_vertices, Max_edges, MAX_EDGES ));
mprintf( (0, "Allocated %d K for automap edge list\n", (sizeof(Edge_info)+sizeof(short))*Max_edges/1024 ));
//edit 4/23/99 Matt Mueller - don't switch res unless we need to
if (grd_curscreen->sc_mode != AUTOMAP_MODE)
gr_set_mode( AUTOMAP_MODE );
else
gr_set_current_canvas(NULL);
//end edit -MM
automap_width=grd_curscreen->sc_canvas.cv_bitmap.bm_w;
automap_height=grd_curscreen->sc_canvas.cv_bitmap.bm_h;
gr_palette_clear();
#ifndef AUTOMAP_DIRECT_RENDER
gr_init_sub_canvas(&Pages[0],grd_curcanv,0,0,automap_width,automap_height);
#ifndef AUTOMAP_NO_PAGING
// NOTICE: should be 0,401! FIXME!
gr_init_sub_canvas(&Pages[1],grd_curcanv,0,0,automap_width,automap_height);
gr_init_sub_canvas(&DrawingPages[0],&Pages[0],0,0,automap_width,automap_height);
gr_init_sub_canvas(&DrawingPages[1],&Pages[1],0,0,automap_width,automap_height);
#else
OffscreenPage = gr_create_canvas( automap_width,automap_height );
if (!OffscreenPage) {
nm_messagebox("No memory for automap", 1, "Ok");
return;
}
gr_init_sub_canvas(&DrawingPages[0],OffscreenPage,0,0,automap_width,automap_height);
#endif
#endif
gr_init_bitmap_data (&Automap_background);
// pcx_error = pcx_read_bitmap(filename,&Automap_background,BM_LINEAR,NULL);
// if ( pcx_error != PCX_ERROR_NONE ) {
// printf("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
// Error("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
// return;
// }
#ifndef AUTOMAP_DIRECT_RENDER
#ifndef AUTOMAP_NO_PAGING
for (i=0; i<2; i++ ) {
gr_set_current_canvas(&Pages[i]);
#else
{
gr_set_current_canvas(OffscreenPage);
#endif
// gr_bitmap( 0, 0, &Automap_background );
// modex_printf( 40, 22,TXT_AUTOMAP,GFONT_BIG_1);
// modex_printf( 70,353,TXT_TURN_SHIP,GFONT_SMALL);
// modex_printf( 70,369,TXT_SLIDE_UPDOWN,GFONT_SMALL);
// modex_printf( 70,385,TXT_VIEWING_DISTANCE,GFONT_SMALL);
}
#ifdef AUTOMAP_NO_PAGING
//killed 05/17/99 Matt Mueller - this seems to merely copy undefined bytes around.. not needed
//--killed-- gr_bm_ubitblt(automap_width,automap_height, 0, 0, 0, 0, &OffscreenPage->cv_bitmap,&Pages[0].cv_bitmap);
//end kill -MM
#endif
gr_free_bitmap_data (&Automap_background);
gr_set_current_canvas(&DrawingPages[current_page]);
#endif
automap_build_edge_list();
if ( ViewDist==0 )
ViewDist = ZOOM_DEFAULT;
ViewMatrix = Objects[Players[Player_num].objnum].orient;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
done = 0;
view_target = Objects[Players[Player_num].objnum].pos;
t1 = entry_time = timer_get_fixed_seconds();
t2 = t1;
//Fill in Automap_visited from Objects[Players[Player_num].objnum].segnum
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
while(!done) {
if ( leave_mode==0 && Controls.automap_state && (timer_get_fixed_seconds()-entry_time)>LEAVE_TIME)
leave_mode = 1;
if ( !Controls.automap_state && (leave_mode==1) )
done=1;
if (!pause_game) {
ushort old_wiggle;
saved_control_info = Controls; // Save controls so we can zero them
memset(&Controls,0,sizeof(control_info)); // Clear everything...
old_wiggle = ConsoleObject->mtype.phys_info.flags & PF_WIGGLE; // Save old wiggle
ConsoleObject->mtype.phys_info.flags &= ~PF_WIGGLE; // Turn off wiggle
#ifdef NETWORK
if (multi_menu_poll())
done = 1;
#endif
// GameLoop( 0, 0 ); // Do game loop with no rendering and no reading controls.
ConsoleObject->mtype.phys_info.flags |= old_wiggle; // Restore wiggle
Controls = saved_control_info;
}
controls_read_all();
if ( Controls.automap_down_count ) {
if (leave_mode==0)
done = 1;
c = 0;
}
while( (c=key_inkey()) ) {
switch( c ) {
#ifndef NDEBUG
case KEY_BACKSP: Int3(); break;
#endif
case KEY_PRINT_SCREEN: save_screen_shot(1); break;
case KEY_ESC:
if (leave_mode==0)
done = 1;
break;
case KEY_ALTED+KEY_F: // Alt+F shows full map, if cheats enabled
if (Cheats_enabled)
{
uint t;
t = Players[Player_num].flags;
Players[Player_num].flags |= PLAYER_FLAGS_MAP_ALL_CHEAT;
automap_build_edge_list();
Players[Player_num].flags=t;
}
break;
#ifndef NDEBUG
case KEY_DEBUGGED+KEY_F: {
for (i=0; i<=Highest_segment_index; i++ )
Automap_visited[i] = 1;
automap_build_edge_list();
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
}
break;
#endif
case KEY_MINUS:
if (SegmentLimit > 1) {
SegmentLimit--;
adjust_segment_limit(SegmentLimit);
}
break;
case KEY_EQUAL:
if (SegmentLimit < Max_segments_away) {
SegmentLimit++;
adjust_segment_limit(SegmentLimit);
}
break;
}
}
if ( Controls.fire_primary_down_count ) {
// Reset orientation
ViewDist = ZOOM_DEFAULT;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
view_target = Objects[Players[Player_num].objnum].pos;
}
ViewDist -= Controls.forward_thrust_time*ZOOM_SPEED_FACTOR;
tangles.p += fixdiv( Controls.pitch_time, ROT_SPEED_DIVISOR );
tangles.h += fixdiv( Controls.heading_time, ROT_SPEED_DIVISOR );
tangles.b += fixdiv( Controls.bank_time, ROT_SPEED_DIVISOR*2 );
if ( Controls.vertical_thrust_time || Controls.sideways_thrust_time ) {
vms_angvec tangles1;
vms_vector old_vt;
old_vt = view_target;
tangles1 = tangles;
vm_angles_2_matrix(&tempm,&tangles1);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
vm_vec_scale_add2( &view_target, &ViewMatrix.uvec, Controls.vertical_thrust_time*SLIDE_SPEED );
vm_vec_scale_add2( &view_target, &ViewMatrix.rvec, Controls.sideways_thrust_time*SLIDE_SPEED );
if ( vm_vec_dist_quick( &view_target, &Objects[Players[Player_num].objnum].pos) > i2f(1000) ) {
view_target = old_vt;
}
}
vm_angles_2_matrix(&tempm,&tangles);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
if ( ViewDist < ZOOM_MIN_VALUE ) ViewDist = ZOOM_MIN_VALUE;
if ( ViewDist > ZOOM_MAX_VALUE ) ViewDist = ZOOM_MAX_VALUE;
draw_automap();
if ( first_time ) {
first_time = 0;
gr_palette_load( gr_palette );
}
t2 = timer_get_fixed_seconds();
while (t2-t1<F1_0/100){//ogl is fast enough that the automap can read the input too fast and you start to turn really slow. So delay a bit (and free up some cpu :)
if (nice_automap)
d_delay(1);
t2 = timer_get_fixed_seconds();
}
if (pause_game)
FrameTime=t2-t1;
t1 = t2;
}
//free(Edges);
//free(DrawingListBright);
gr_free_canvas(name_canv); name_canv=NULL;
#ifdef AUTOMAP_NO_PAGING
gr_free_canvas(OffscreenPage);
OffscreenPage = NULL;
#endif
mprintf( (0, "Automap memory freed\n" ));
game_flush_inputs();
if (pause_game)
start_time();
}
void adjust_segment_limit(int SegmentLimit)
{
int i,e1;
Edge_info * e;
mprintf(( 0, "Seglimit: %d\n", SegmentLimit ));
for (i=0; i<=Highest_edge_index; i++ ) {
e = &Edges[i];
e->flags |= EF_TOO_FAR;
for (e1=0; e1<e->num_faces; e1++ ) {
if ( Automap_visited[e->segnum[e1]] <= SegmentLimit ) {
e->flags &= (~EF_TOO_FAR);
break;
}
}
}
}
void do_automap( int key_code ) {
int done=0;
vms_matrix tempm;
vms_angvec tangles;
int leave_mode=0;
int first_time=1;
int pcx_error;
int i;
int c;
char filename[] = "MAP.PCX";
fix entry_time;
int pause_game=1; // Set to 1 if everything is paused during automap...No pause during net.
fix t1, t2;
control_info saved_control_info;
int Max_segments_away = 0;
int SegmentLimit = 1;
key_code = key_code; // disable warning...
if ((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence))
pause_game = 0;
if (pause_game)
stop_time();
create_name_canv();
Max_edges = min(MAX_EDGES_FROM_VERTS(Num_vertices),MAX_EDGES); //make maybe smaller than max
//Edges = malloc( sizeof(Edge_info)*Max_edges);
//if ( Edges == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(Edge_info)*Max_edges/1024));
// return;
//}
//DrawingListBright = malloc( sizeof(short)*Max_edges);
//if ( DrawingListBright == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(short)*Max_edges/1024));
// return;
//}
mprintf( (0, "Num_vertices=%d, Max_edges=%d, (MAX:%d)\n", Num_vertices, Max_edges, MAX_EDGES ));
mprintf( (0, "Allocated %d K for automap edge list\n", (sizeof(Edge_info)+sizeof(short))*Max_edges/1024 ));
gr_palette_clear();
gr_init_sub_canvas(&Page,&VR_render_buffer[0],0, 0, 640, 480);
gr_init_sub_canvas(&DrawingPage,&Page,38,77,564,381);
#if 0
gr_init_sub_canvas(&Pages[0],grd_curcanv,0,0,320,400);
gr_init_sub_canvas(&Pages[1],grd_curcanv,0,401,320,400);
gr_init_sub_canvas(&DrawingPages[0],&Pages[0],16,69,288,272);
gr_init_sub_canvas(&DrawingPages[1],&Pages[1],16,69,288,272);
#endif
gr_set_current_canvas(&Page);
pcx_error = pcx_read_bitmap(filename,&(grd_curcanv->cv_bitmap),BM_LINEAR,NULL);
if ( pcx_error != PCX_ERROR_NONE ) {
printf("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
Error("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
return;
}
gr_set_curfont(Gamefonts[GFONT_BIG_1]);
gr_set_fontcolor(BM_XRGB(20, 20, 20), -1);
gr_printf( 80, 36,TXT_AUTOMAP,GFONT_BIG_1);
gr_set_curfont(Gamefonts[GFONT_SMALL]);
gr_set_fontcolor(BM_XRGB(20, 20, 20), -1);
gr_printf( 265, 27,TXT_TURN_SHIP);
gr_printf( 265, 44,TXT_SLIDE_UPDOWN);
gr_printf( 265, 61,TXT_VIEWING_DISTANCE);
gr_set_current_canvas(&DrawingPage);
automap_build_edge_list();
if ( ViewDist==0 )
ViewDist = ZOOM_DEFAULT;
ViewMatrix = Objects[Players[Player_num].objnum].orient;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
done = 0;
view_target = Objects[Players[Player_num].objnum].pos;
t1 = entry_time = timer_get_fixed_seconds();
t2 = t1;
//Fill in Automap_visited from Objects[Players[Player_num].objnum].segnum
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
while(!done) {
#ifndef MAC_SHAREWARE
redbook_restart_track();
#endif
if ( leave_mode==0 && Controls.automap_state && (timer_get_fixed_seconds()-entry_time)>LEAVE_TIME)
leave_mode = 1;
if ( !Controls.automap_state && (leave_mode==1) )
done=1;
if (!pause_game) {
ushort old_wiggle;
saved_control_info = Controls; // Save controls so we can zero them
memset(&Controls,0,sizeof(control_info)); // Clear everything...
old_wiggle = ConsoleObject->mtype.phys_info.flags & PF_WIGGLE; // Save old wiggle
ConsoleObject->mtype.phys_info.flags &= ~PF_WIGGLE; // Turn off wiggle
#ifdef NETWORK
if (multi_menu_poll())
done = 1;
#endif
// GameLoop( 0, 0 ); // Do game loop with no rendering and no reading controls.
ConsoleObject->mtype.phys_info.flags |= old_wiggle; // Restore wiggle
Controls = saved_control_info;
}
controls_read_all();
if ( Controls.automap_down_count ) {
if (leave_mode==0)
done = 1;
c = 0;
}
while( (c=key_inkey()) ) {
switch( c ) {
#ifndef NDEBUG
case KEY_BACKSP: Int3(); break;
#endif
case KEY_PRINT_SCREEN: save_screen_shot(1); break;
case KEY_ESC:
if (leave_mode==0)
done = 1;
break;
case KEY_ALTED+KEY_F: // Alt+F shows full map, if cheats enabled
if (Cheats_enabled)
{
uint t;
t = Players[Player_num].flags;
Players[Player_num].flags |= PLAYER_FLAGS_MAP_ALL_CHEAT;
automap_build_edge_list();
Players[Player_num].flags=t;
}
break;
#ifndef NDEBUG
case KEY_DEBUGGED+KEY_F: {
for (i=0; i<=Highest_segment_index; i++ )
Automap_visited[i] = 1;
automap_build_edge_list();
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
}
break;
#endif
case KEY_MINUS:
if (SegmentLimit > 1) {
SegmentLimit--;
adjust_segment_limit(SegmentLimit);
}
break;
case KEY_EQUAL:
if (SegmentLimit < Max_segments_away) {
SegmentLimit++;
adjust_segment_limit(SegmentLimit);
}
break;
}
}
if ( Controls.fire_primary_down_count ) {
// Reset orientation
ViewDist = ZOOM_DEFAULT;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
view_target = Objects[Players[Player_num].objnum].pos;
}
ViewDist -= Controls.forward_thrust_time*ZOOM_SPEED_FACTOR;
tangles.p += fixdiv( Controls.pitch_time, ROT_SPEED_DIVISOR );
tangles.h += fixdiv( Controls.heading_time, ROT_SPEED_DIVISOR );
tangles.b += fixdiv( Controls.bank_time, ROT_SPEED_DIVISOR*2 );
if ( Controls.vertical_thrust_time || Controls.sideways_thrust_time ) {
vms_angvec tangles1;
vms_vector old_vt;
old_vt = view_target;
tangles1 = tangles;
vm_angles_2_matrix(&tempm,&tangles1);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
vm_vec_scale_add2( &view_target, &ViewMatrix.uvec, Controls.vertical_thrust_time*SLIDE_SPEED );
vm_vec_scale_add2( &view_target, &ViewMatrix.rvec, Controls.sideways_thrust_time*SLIDE_SPEED );
if ( vm_vec_dist_quick( &view_target, &Objects[Players[Player_num].objnum].pos) > i2f(1000) ) {
view_target = old_vt;
}
}
vm_angles_2_matrix(&tempm,&tangles);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
if ( ViewDist < ZOOM_MIN_VALUE ) ViewDist = ZOOM_MIN_VALUE;
if ( ViewDist > ZOOM_MAX_VALUE ) ViewDist = ZOOM_MAX_VALUE;
draw_automap();
if ( first_time ) {
first_time = 0;
gr_palette_load( gr_palette );
}
t2 = timer_get_fixed_seconds();
if (pause_game)
FrameTime=t2-t1;
t1 = t2;
}
//free(Edges);
//free(DrawingListBright);
gr_free_canvas(name_canv); name_canv=NULL;
mprintf( (0, "Automap memory freed\n" ));
game_flush_inputs();
if (pause_game)
start_time();
}
short vga_set_mode(short mode)
{
int retcode;
unsigned int w,h,t,data, r;
#if defined(POLY_ACC)
if(mode != SM_640x480x15xPA)
{
Int3();
mprintf((0, "vga_set_mode(%d)\n", mode));
return 0;
}
#endif
LinearSVGABuffer=0;
if (!vga_installed)
return 1;
switch(mode)
{
case SM_ORIGINAL:
return 0;
case SM_320x200C:
if (!isvga()) return 1;
vga_set_misc_mode(0x13);
w = 320; r = 320; h = 200; t=BM_LINEAR; data = 0xA0000;
break;
case SM_640x400V:
retcode = vga_vesa_setmode( 0x100 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 640; r = 640; h = 400; t=BM_SVGA; data = 0;
break;
case SM_640x480V:
retcode = vga_vesa_setmode( 0x101 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 640; r = 640; h = 480; t=BM_SVGA; data = 0;
break;
case SM_800x600V:
retcode = vga_vesa_setmode( 0x103 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 800; h = 600; t=BM_SVGA; data = 0;
r=VesaGetRowSize (0x103);
break;
case SM_1024x768V:
retcode = vga_vesa_setmode( 0x105 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 1024; r = 1024; h = 768; t=BM_SVGA; data = 0;
r=VesaGetRowSize (0x105);
break;
case SM_1280x1024V:
retcode = vga_vesa_setmode( 0x107 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 1280; r = 1280; h = 1024; t=BM_SVGA; data = 0;
r=VesaGetRowSize (0x107);
break;
case SM_640x480V15:
retcode = vga_vesa_setmode( 0x110 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 640; r = 640*2; h=480; t=BM_SVGA15; data = 0;
break;
case SM_800x600V15:
retcode = vga_vesa_setmode( 0x113 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
w = 800; r = 800*2; h=600; t=BM_SVGA15; data = 0;
break;
//super-special code for 3dmax high-res mode
case SM_320x400_3DMAX: // 3dmax 320x400
if (!isvga()) return 1;
gr_set_3dbios_mode(0x31);
//w = 320; r = 320/4; h = 400; t=BM_MODEX; data = 0;
w = 320; r = 320; h = 400; t=BM_SVGA; data = 0;
break;
//@@case 19:
//@@ if (!isvga()) return 1;
//@@ vga_set_misc_mode(0x13);
//@@ vga_set_cellheight( 3 );
//@@ w = 320; r = 320; h = 200; t=BM_LINEAR; data = 0xA0000;
//@@ break;
//@@
//@@case 20:
//@@ retcode = vga_vesa_setmode( 0x102 );
//@@ //gr_enable_default_palette_loading();
//@@ if (retcode !=0 ) return retcode;
//@@ vga_16_to_256();
//@@ vga_set_linear();
//@@ //gr_set_cellheight( 1 );
//@@ gr_vesa_setlogical( 400 );
//@@ w = 400; r = 400; h = 600; t=BM_SVGA; data = 0;
//@@ break;
//@@
//@@case 21:
//@@ if (!isvga()) return 1;
//@@ vga_set_misc_mode(0xd);
//@@ vga_16_to_256();
//@@ vga_set_linear();
//@@ //gr_set_cellheight( 3 );
//@@ w = 160; r = 160; h = 200; t=BM_LINEAR; data = 0xA0000;
//@@ break;
case SM_320x200U:
case SM_320x240U:
case SM_360x200U:
case SM_360x240U:
case SM_376x282U:
case SM_320x400U:
case SM_320x480U:
case SM_360x400U:
case SM_360x480U:
case SM_360x360U:
case SM_376x308U:
case SM_376x564U: //mode X modes
if (!isvga()) return 1;
w = gr_modex_setmode( mode );
//gr_enable_default_palette_loading();
h = w & 0xffff; w = w >> 16; r = w / 4;t = BM_MODEX; data = 0;
break;
#if defined(POLY_ACC)
case SM_640x480x15xPA:
pa_set_mode(mode);
w = 640; r = 640*2; h=480; t=BM_LINEAR15; data = 0; //$$ data should be what?
#ifdef PA_3DFX_VOODOO
r=2048;
#endif
break;
#endif
default: //unknown mode!!! Very bad!!
Error("Unknown mode %d in vga_set_mode()",mode);
}
// if (vga_palette_realized && (vga_prevent_palette_loading==0))
// gr_pal_setblock( 0, 256, gr_palette);
// return 0;
VGA_current_mode = mode;
#if defined(POLY_ACC)
vga_screen_addr = pa_get_buffer_address(0);
#else
if (LinearSVGABuffer)
{
mprintf ((0,"GREEEEAT!\n"));
t=BM_LINEAR;
vga_screen_addr=(ubyte *)VesaGetPtr();
}
else
vga_screen_addr=(ubyte *)0xa0000;
#endif
gr_palette_clear();
return gr_init_screen( t,w,h,0,0,r,vga_screen_addr);
}
int gr_palette_fade_out(ubyte *pal, int nsteps, int allow_keys )
{
ubyte c;
int i,j;
HRESULT ddresult;
fix fade_palette[768];
fix fade_palette_delta[768];
allow_keys = allow_keys;
Assert(_lpDDPalActive!=0);
if (gr_palette_faded_out) return 0;
#ifndef NDEBUG
if (grd_fades_disabled) {
gr_palette_clear();
return 0;
}
#endif
for (i=0; i<768; i++ ) {
fade_palette[i] = i2f(pal[i]+gr_palette_gamma);
fade_palette_delta[i] = fade_palette[i] / nsteps;
}
for (j=0; j<nsteps; j++ ) {
for (i=0; i<256; i++ ) {
fade_palette[i*3] -= fade_palette_delta[i*3];
if (fade_palette[i*3] < 0) fade_palette[i*3] = 0;
fade_palette[i*3+1] -= fade_palette_delta[i*3+1];
if (fade_palette[i*3+1] < 0) fade_palette[i*3+1] = 0;
fade_palette[i*3+2] -= fade_palette_delta[i*3+2];
if (fade_palette[i*3+2] < 0) fade_palette[i*3+2] = 0;
c = f2i(fade_palette[i*3]);
if ( c > 63 ) c = 63;
PalGDIData.ScratchPal[i].peRed = c << 2;
c = f2i(fade_palette[i*3+1]);
if ( c > 63 ) c = 63;
PalGDIData.ScratchPal[i].peGreen = c << 2;
c = f2i(fade_palette[i*3+2]);
if ( c > 63 ) c = 63;
PalGDIData.ScratchPal[i].peBlue = c << 2;
PalGDIData.ScratchPal[i].peFlags = 0;
}
if (!hPalGDI) {
IDirectDraw_WaitForVerticalBlank(lpDD, DDWAITVB_BLOCKBEGIN, NULL);
ddresult = IDirectDrawPalette_SetEntries(_lpDDPalActive, 0,
0, 256,
PalGDIData.ScratchPal);
Assert(ddresult == DD_OK);
}
else {
HDC hdc;
hdc = GetDC(GetLibraryWindow());
SetPaletteEntries(hPalGDI, 0, PalGDIData.num, PalGDIData.ScratchPal);
RealizePalette(hdc);
ReleaseDC(GetLibraryWindow(), hdc);
}
}
gr_palette_faded_out = 1;
if (GRMODEINFO(emul)) DDClearDisplay();
return 0;
}
int gr_set_mode(u_int32_t mode)
{
unsigned int w, h;
char vgamode[16];
vga_modeinfo *modeinfo;
int modenum, rowsize;
void *framebuffer;
#ifdef NOGRAPH
return 0;
#endif
if (mode<=0)
return 0;
w=SM_W(mode);
h=SM_H(mode);
gr_palette_clear();
sprintf(vgamode, "G%dx%dx256", w, h);
modenum = vga_getmodenumber(vgamode);
vga_setmode(modenum);
#ifdef SVGALIB_INPUT
mouse_seteventhandler(mouse_handler);
#endif
modeinfo = vga_getmodeinfo(modenum);
if (modeinfo->flags & CAPABLE_LINEAR)
{
usebuffer = 0;
vga_setlinearaddressing();
// Set up physical screen only
gl_setcontextvga(modenum);
physicalscreen = gl_allocatecontext();
gl_getcontext(physicalscreen);
screenbuffer = physicalscreen;
framebuffer = physicalscreen->vbuf;
rowsize = physicalscreen->bytewidth;
}
else
{
usebuffer = 1;
// Set up the physical screen
gl_setcontextvga(modenum);
physicalscreen = gl_allocatecontext();
gl_getcontext(physicalscreen);
// Set up the virtual screen
gl_setcontextvgavirtual(modenum);
screenbuffer = gl_allocatecontext();
gl_getcontext(screenbuffer);
framebuffer = screenbuffer->vbuf;
rowsize = screenbuffer->bytewidth;
}
memset(grd_curscreen, 0, sizeof(grs_screen));
grd_curscreen->sc_mode = mode;
grd_curscreen->sc_w = w;
grd_curscreen->sc_h = h;
grd_curscreen->sc_aspect = fixdiv(grd_curscreen->sc_w*3,grd_curscreen->sc_h*4);
grd_curscreen->sc_canvas.cv_bitmap.bm_x = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_y = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_w = w;
grd_curscreen->sc_canvas.cv_bitmap.bm_h = h;
grd_curscreen->sc_canvas.cv_bitmap.bm_rowsize = rowsize;
grd_curscreen->sc_canvas.cv_bitmap.bm_type = BM_LINEAR;
grd_curscreen->sc_canvas.cv_bitmap.bm_data = framebuffer;
gr_set_current_canvas(NULL);
gamefont_choose_game_font(w,h);
return 0;
}
int gr_init(void)
{
int org_gamma;
int retcode;
int mode = SM(320,200);
// Only do this function once!
if (gr_installed==1)
return 3;
#ifdef __DJGPP__
if (!__djgpp_nearptr_enable()) {
printf("nearptr enable=%x\n", __dpmi_error);
return 10;
}
#ifndef SAVEGR
gr_video_memory = (unsigned char *)(__djgpp_conventional_base + 0xa0000);
#else
gr_video_memory=(unsigned char *)-1;
#endif
pVideoMode = (volatile ubyte *)(__djgpp_conventional_base+0x449);
pNumColumns = (volatile ushort *)(__djgpp_conventional_base+0x44a);
pNumRows = (volatile ubyte *)(__djgpp_conventional_base+0x484);
pCharHeight = (volatile ushort *)(__djgpp_conventional_base+0x485);
pCursorPos = (volatile ushort *)(__djgpp_conventional_base+0x450);
pCursorType = (volatile ushort *)(__djgpp_conventional_base+0x460);
pTextMemory = (volatile ushort *)(__djgpp_conventional_base+0xb8000);
#endif
#ifndef __DJGPP__
if (gr_init_A0000())
return 10;
#endif
// Save the current text screen mode
if (gr_save_mode()==1)
return 2;
#ifndef NOGRAPH
// Save the current palette, and fade it out to black.
gr_palette_read( gr_pal_default );
gr_palette_faded_out = 0;
org_gamma = gr_palette_get_gamma();
gr_palette_set_gamma( 0 );
gr_palette_fade_out( gr_pal_default, 32, 0 );
gr_palette_clear();
gr_palette_set_gamma( org_gamma );
gr_sync_display();
gr_sync_display();
#endif
#ifdef __DJGPP__
#ifdef SAVEGR
__djgpp_nearptr_disable();
#endif
#endif
MALLOC( grd_curscreen,grs_screen,1 );
memset( grd_curscreen, 0, sizeof(grs_screen));
// Set the mode.
if ((retcode=gr_set_mode(mode)))
{
gr_restore_mode();
return retcode;
}
//JOHNgr_disable_default_palette_loading();
// Set all the screen, canvas, and bitmap variables that
// aren't set by the gr_set_mode call:
grd_curscreen->sc_canvas.cv_color = 0;
grd_curscreen->sc_canvas.cv_drawmode = 0;
grd_curscreen->sc_canvas.cv_font = NULL;
grd_curscreen->sc_canvas.cv_font_fg_color = 0;
grd_curscreen->sc_canvas.cv_font_bg_color = 0;
gr_set_current_canvas( &grd_curscreen->sc_canvas );
#if 0
if (!dpmi_allocate_selector( &gr_fade_table, 256*GR_FADE_LEVELS, &gr_fade_table_selector ))
Error( "Error allocating fade table selector!" );
if (!dpmi_allocate_selector( &gr_palette, 256*3, &gr_palette_selector ))
Error( "Error allocating palette selector!" );
#endif
// if (!dpmi_allocate_selector( &gr_inverse_table, 32*32*32, &gr_inverse_table_selector ))
// Error( "Error allocating inverse table selector!" );
// Set flags indicating that this is installed.
gr_installed = 1;
#ifdef __GNUC__
atexit((void (*)) gr_close);
#else
atexit(gr_close);
#endif
return 0;
}
int gr_set_mode(u_int32_t mode)
{
int retcode;
unsigned int w,h,t,data, r;
//JOHNgr_disable_default_palette_loading();
#ifdef NOGRAPH
return 0;
#endif
switch(mode)
{
case SM_ORIGINAL:
return 0;
case SM(320,200)://0:
if (!isvga()) return 1;
gr_set_misc_mode(0x13);
w = 320; r = 320; h = 200; t=BM_LINEAR; data = (int)gr_video_memory;
break;
case SM(640,400)://SM_640x400V:
retcode = gr_vesa_setmode( 0x100 );
if (retcode !=0 ) return retcode;
w = 640; r = 640; h = 400; t=BM_SVGA; data = 0;
break;
case SM(640,480)://SM_640x480V:
retcode = gr_vesa_setmode( 0x101 );
if (retcode !=0 ) return retcode;
w = 640; r = 640; h = 480; t=BM_SVGA; data = 0;
break;
case SM(800,600)://SM_800x600V:
retcode = gr_vesa_setmode( 0x103 );
if (retcode !=0 ) return retcode;
w = 800; r = 800; h = 600; t=BM_SVGA; data = 0;
break;
case SM(1024,768)://SM_1024x768V:
retcode = gr_vesa_setmode( 0x105 );
if (retcode !=0 ) return retcode;
w = 1024; r = 1024; h = 768; t=BM_SVGA; data = 0;
break;
/* case SM_640x480V15:
retcode = gr_vesa_setmode( 0x110 );
if (retcode !=0 ) return retcode;
w = 640; r = 640*2; h=480; t=BM_SVGA15; data = 0;
break;
case SM_800x600V15:
retcode = gr_vesa_setmode( 0x113 );
if (retcode !=0 ) return retcode;
w = 800; r = 800*2; h=600; t=BM_SVGA15; data = 0;
break;*/
// case 19:
case SM(320,100):
if (!isvga()) return 1;
gr_set_misc_mode(0x13);
// {
// ubyte x;
// x = inp( 0x3c5 );
// x |= 8;
// outp( 0x3c5, x );
// }
gr_set_cellheight( 3 );
w = 320; r = 320; h = 100; t=BM_LINEAR; data = (int)gr_video_memory;
break;
/* case 20:
retcode = gr_vesa_setmode( 0x102 );
//gr_enable_default_palette_loading();
if (retcode !=0 ) return retcode;
gr_16_to_256();
gr_set_linear();
//gr_set_cellheight( 1 );
gr_vesa_setlogical( 400 );
w = 400; r = 400; h = 600; t=BM_SVGA; data = 0;
break;
case 21:
if (!isvga()) return 1;
gr_set_misc_mode(0xd);
gr_16_to_256();
gr_set_linear();
gr_set_cellheight( 3 );
w = 160; r = 160; h = 100; t=BM_LINEAR; data = (int)gr_video_memory;
break;
case //22: // 3dmax 320x400
if (!isvga()) return 1;
gr_set_3dbios_mode(0x31);
//w = 320; r = 320/4; h = 400; t=BM_MODEX; data = 0;
w = 320; r = 320; h = 400; t=BM_SVGA; data = 0;
break;*/
default:
if (!isvga()) return 1;
if (mode==SM(320,240))
w = gr_modex_setmode( 2 );
else if (mode==SM(320,400))
w = gr_modex_setmode( 6 );
else
Error("unhandled vid mode\n");
//gr_enable_default_palette_loading();
h = w & 0xffff; w = w >> 16; r = w / 4;t = BM_MODEX; data = 0;
break;
}
gr_palette_clear();
memset( grd_curscreen, 0, sizeof(grs_screen));
grd_curscreen->sc_mode = mode;
grd_curscreen->sc_w = w;
grd_curscreen->sc_h = h;
grd_curscreen->sc_aspect = fixdiv(grd_curscreen->sc_w*3,grd_curscreen->sc_h*4);
grd_curscreen->sc_canvas.cv_bitmap.bm_x = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_y = 0;
grd_curscreen->sc_canvas.cv_bitmap.bm_w = w;
grd_curscreen->sc_canvas.cv_bitmap.bm_h = h;
grd_curscreen->sc_canvas.cv_bitmap.bm_rowsize = r;
grd_curscreen->sc_canvas.cv_bitmap.bm_type = t;
grd_curscreen->sc_canvas.cv_bitmap.bm_data = (unsigned char *)data;
VGA_current_mode = mode;
gr_set_current_canvas(NULL);
//gr_enable_default_palette_loading();
// gamefont_choose_game_font(w,h);
return 0;
}
