main/gamecntl.c

   1 /* $Id: gamecntl.c,v 1.26 2005-07-30 01:50:17 chris Exp $ */
   2 /*
   3 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
   4 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
   5 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
   6 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
   7 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
   8 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
   9 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
  10 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
  11 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
  12 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
  13 */
  14
  15 /*
  16  *
  17  * Game Controls Stuff
  18  *
  19  */
  20
  21 #ifdef HAVE_CONFIG_H
  22 #include <conf.h>
  23 #endif
  24
  25 //#define DOOR_DEBUGGING
  26
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <string.h>
  30 #include <stdarg.h>
  31
  32 #include "pstypes.h"
  33 #include "console.h"
  34 #include "inferno.h"
  35 #include "game.h"
  36 #include "player.h"
  37 #include "key.h"
  38 #include "object.h"
  39 #include "menu.h"
  40 #include "physics.h"
  41 #include "error.h"
  42 #include "joy.h"
  43 #include "mono.h"
  44 #include "iff.h"
  45 #include "pcx.h"
  46 #include "timer.h"
  47 #include "render.h"
  48 #include "laser.h"
  49 #include "screens.h"
  50 #include "textures.h"
  51 #include "slew.h"
  52 #include "gauges.h"
  53 #include "texmap.h"
  54 #include "3d.h"
  55 #include "effects.h"
  56 #include "gameseg.h"
  57 #include "wall.h"
  58 #include "ai.h"
  59 #include "digi.h"
  60 #include "ibitblt.h"
  61 #include "u_mem.h"
  62 #include "palette.h"
  63 #include "morph.h"
  64 #include "lighting.h"
  65 #include "newdemo.h"
  66 #include "weapon.h"
  67 #include "sounds.h"
  68 #include "args.h"
  69 #include "gameseq.h"
  70 #include "automap.h"
  71 #include "text.h"
  72 #include "powerup.h"
  73 #include "newmenu.h"
  74 #ifdef NETWORK
  75 #include "network.h"
  76 #endif
  77 #include "gamefont.h"
  78 #include "endlevel.h"
  79 #include "joydefs.h"
  80 #include "kconfig.h"
  81 #include "mouse.h"
  82 #include "titles.h"
  83 #include "gr.h"
  84 #include "playsave.h"
  85 #include "movie.h"
  86 #include "scores.h"
  87 #ifdef MACINTOSH
  88 #include "songs.h"
  89 #endif
  90
  91 #if defined (TACTILE)
  92 #include "tactile.h"
  93 #endif
  94
  95 #include "multi.h"
  96 #include "desc_id.h"
  97 #include "cntrlcen.h"
  98 #include "pcx.h"
  99 #include "state.h"
 100 #include "piggy.h"
 101 #include "multibot.h"
 102 #include "ai.h"
 103 #include "rbaudio.h"
 104 #include "switch.h"
 105 #include "escort.h"
 106
 107 //#define TEST_TIMER    1               //if this is set, do checking on timer
 108
 109 #define SHOW_EXIT_PATH  1
 110
 111 #define Arcade_mode 0
 112
 113
 114 #ifdef EDITOR
 115 #include "editor/editor.h"
 116 #endif
 117
 118 //#define _MARK_ON 1
 119 #ifdef __WATCOMC__
 120 #if __WATCOMC__ < 1000
 121 #include <wsample.h>            //should come after inferno.h to get mark setting
 122 #endif
 123 #endif
 124
 125 #ifdef SDL_INPUT
 126 #include <SDL.h>
 127 #endif
 128
 129 extern void full_palette_save(void);
 130 extern void object_goto_prev_viewer(void);
 131
 132 // Global Variables -----------------------------------------------------------
 133
 134 int     redbook_volume = 255;
 135
 136
 137 //      External Variables ---------------------------------------------------------
 138
 139 extern int      Speedtest_on;                    // Speedtest global adapted from game.c
 140 extern int Guided_in_big_window;
 141 extern char WaitForRefuseAnswer,RefuseThisPlayer,RefuseTeam;
 142
 143 #ifndef NDEBUG
 144 extern int      Mark_count;
 145 extern int      Speedtest_start_time;
 146 extern int      Speedtest_segnum;
 147 extern int      Speedtest_sidenum;
 148 extern int      Speedtest_frame_start;
 149 extern int      Speedtest_count;
 150 #endif
 151
 152 extern int      Global_missile_firing_count;
 153 extern int      Automap_flag;
 154 extern int      Config_menu_flag;
 155 extern int  EscortHotKeys;
 156
 157
 158 extern int      Game_aborted;
 159 extern int      *Toggle_var;
 160
 161 extern int      Physics_cheat_flag;
 162
 163 extern int      last_drawn_cockpit[2];
 164
 165 extern int      Debug_spew;
 166 extern int      Debug_pause;
 167 extern cvar_t   r_framerate;
 168
 169 extern fix      Show_view_text_timer;
 170
 171 extern ubyte DefiningMarkerMessage;
 172
 173 //      Function prototypes --------------------------------------------------------
 174
 175
 176 extern void CyclePrimary();
 177 extern void CycleSecondary();
 178 extern void InitMarkerInput();
 179 extern void MarkerInputMessage (int);
 180 extern void grow_window(void);
 181 extern void shrink_window(void);
 182 extern int      allowed_to_fire_missile(void);
 183 extern int      allowed_to_fire_flare(void);
 184 extern void     check_rear_view(void);
 185 extern int      create_special_path(void);
 186 extern void move_player_2_segment(segment *seg, int side);
 187 extern void     kconfig_center_headset(void);
 188 extern void game_render_frame_mono(void);
 189 extern void newdemo_strip_frames(char *, int);
 190 extern void toggle_cockpit(void);
 191 extern int  dump_used_textures_all(void);
 192 extern void DropMarker();
 193 extern void DropSecondaryWeapon();
 194 extern void DropCurrentWeapon();
 195
 196 void FinalCheats(int key);
 197
 198 #ifndef RELEASE
 199 void do_cheat_menu(void);
 200 #endif
 201
 202 void HandleGameKey(int key);
 203 int HandleSystemKey(int key);
 204 void HandleTestKey(int key);
 205 void HandleVRKey(int key);
 206
 207 void speedtest_init(void);
 208 void speedtest_frame(void);
 209 void advance_sound(void);
 210 void play_test_sound(void);
 211
 212 #ifdef MACINTOSH
 213 extern void macintosh_quit(void);       // dialog-style quit function
 214 #endif
 215
 216 #define key_isfunc(k) (((k&0xff)>=KEY_F1 && (k&0xff)<=KEY_F10) || (k&0xff)==KEY_F11 || (k&0xff)==KEY_F12)
 217 #define key_ismod(k)  ((k&0xff)==KEY_LALT || (k&0xff)==KEY_RALT || (k&0xff)==KEY_LSHIFT || (k&0xff)==KEY_RSHIFT || (k&0xff)==KEY_LCTRL || (k&0xff)==KEY_RCTRL)
 218
 219 // Functions ------------------------------------------------------------------
 220
 221 #define CONVERTER_RATE  20              //10 units per second xfer rate
 222 #define CONVERTER_SCALE  2              //2 units energy -> 1 unit shields
 223
 224 #define CONVERTER_SOUND_DELAY (f1_0/2)          //play every half second
 225
 226 void transfer_energy_to_shield(fix time)
 227 {
 228         fix e;          //how much energy gets transfered
 229         static fix last_play_time=0;
 230
 231         e = min(min(time*CONVERTER_RATE,Players[Player_num].energy - INITIAL_ENERGY),(MAX_SHIELDS-Players[Player_num].shields)*CONVERTER_SCALE);
 232
 233         if (e <= 0) {
 234
 235                 if (Players[Player_num].energy <= INITIAL_ENERGY)
 236                         HUD_init_message("Need more than %i energy to enable transfer", f2i(INITIAL_ENERGY));
 237                 else
 238                         HUD_init_message("No transfer: Shields already at max");
 239                 return;
 240         }
 241
 242         Players[Player_num].energy  -= e;
 243         Players[Player_num].shields += e/CONVERTER_SCALE;
 244
 245         if (last_play_time > GameTime)
 246                 last_play_time = 0;
 247
 248         if (GameTime > last_play_time+CONVERTER_SOUND_DELAY) {
 249                 digi_play_sample_once(SOUND_CONVERT_ENERGY, F1_0);
 250                 last_play_time = GameTime;
 251         }
 252
 253 }
 254
 255 void update_vcr_state();
 256 void do_weapon_stuff(void);
 257
 258
 259 // Control Functions
 260
 261 fix newdemo_single_frame_time;
 262
 263 void update_vcr_state(void)
 264 {
 265         if ((keyd_pressed[KEY_LSHIFT] || keyd_pressed[KEY_RSHIFT]) && keyd_pressed[KEY_RIGHT])
 266                 Newdemo_vcr_state = ND_STATE_FASTFORWARD;
 267         else if ((keyd_pressed[KEY_LSHIFT] || keyd_pressed[KEY_RSHIFT]) && keyd_pressed[KEY_LEFT])
 268                 Newdemo_vcr_state = ND_STATE_REWINDING;
 269         else if (!(keyd_pressed[KEY_LCTRL] || keyd_pressed[KEY_RCTRL]) && keyd_pressed[KEY_RIGHT] && ((timer_get_fixed_seconds() - newdemo_single_frame_time) >= F1_0))
 270                 Newdemo_vcr_state = ND_STATE_ONEFRAMEFORWARD;
 271         else if (!(keyd_pressed[KEY_LCTRL] || keyd_pressed[KEY_RCTRL]) && keyd_pressed[KEY_LEFT] && ((timer_get_fixed_seconds() - newdemo_single_frame_time) >= F1_0))
 272                 Newdemo_vcr_state = ND_STATE_ONEFRAMEBACKWARD;
 273         else if ((Newdemo_vcr_state == ND_STATE_FASTFORWARD) || (Newdemo_vcr_state == ND_STATE_REWINDING))
 274                 Newdemo_vcr_state = ND_STATE_PLAYBACK;
 275 }
 276
 277 //returns which bomb will be dropped next time the bomb key is pressed
 278 int which_bomb()
 279 {
 280         int bomb;
 281
 282         //use the last one selected, unless there aren't any, in which case use
 283         //the other if there are any
 284
 285
 286    // If hoard game, only let the player drop smart mines
 287    if (Game_mode & GM_HOARD)
 288                 return SMART_MINE_INDEX;
 289
 290         bomb = Secondary_last_was_super[PROXIMITY_INDEX]?SMART_MINE_INDEX:PROXIMITY_INDEX;
 291
 292         if (Players[Player_num].secondary_ammo[bomb] == 0 &&
 293                         Players[Player_num].secondary_ammo[SMART_MINE_INDEX+PROXIMITY_INDEX-bomb] != 0) {
 294                 bomb = SMART_MINE_INDEX+PROXIMITY_INDEX-bomb;
 295                 Secondary_last_was_super[bomb%SUPER_WEAPON] = (bomb == SMART_MINE_INDEX);
 296         }
 297
 298
 299
 300         return bomb;
 301 }
 302
 303
 304 void do_weapon_stuff(void)
 305 {
 306   int i;
 307
 308         if (Controls.fire_flare_down_count)
 309                 if (allowed_to_fire_flare())
 310                         Flare_create(ConsoleObject);
 311
 312         if (allowed_to_fire_missile())
 313                 Global_missile_firing_count += Weapon_info[Secondary_weapon_to_weapon_info[Secondary_weapon]].fire_count * (Controls.fire_secondary_state || Controls.fire_secondary_down_count);
 314
 315         if (Global_missile_firing_count) {
 316                 do_missile_firing(1);                   //always enable autoselect for normal missile firing
 317                 Global_missile_firing_count--;
 318         }
 319
 320    if (Controls.cycle_primary_count)
 321          {
 322      for (i=0;i<Controls.cycle_primary_count;i++)
 323                 CyclePrimary ();
 324     }
 325    if (Controls.cycle_secondary_count)
 326          {
 327      for (i=0;i<Controls.cycle_secondary_count;i++)
 328                 CycleSecondary ();
 329     }
 330    if (Controls.headlight_count)
 331          {
 332      for (i=0;i<Controls.headlight_count;i++)
 333                 toggle_headlight_active ();
 334     }
 335
 336         if (Global_missile_firing_count < 0)
 337                 Global_missile_firing_count = 0;
 338
 339         //      Drop proximity bombs.
 340         if (Controls.drop_bomb_down_count) {
 341                 int ssw_save = Secondary_weapon;
 342
 343                 while (Controls.drop_bomb_down_count--) {
 344                         int ssw_save2;
 345
 346                         ssw_save2 = Secondary_weapon = which_bomb();
 347
 348                         do_missile_firing(Secondary_weapon == ssw_save);        //only allow autoselect if bomb is actually selected
 349
 350                         if (Secondary_weapon != ssw_save2 && ssw_save == ssw_save2)
 351                                 ssw_save = Secondary_weapon;    //if bomb was selected, and we ran out & autoselect, then stick with new selection
 352                 }
 353
 354                 Secondary_weapon = ssw_save;
 355         }
 356 }
 357
 358
 359 int Game_paused;
 360 char *Pause_msg;
 361
 362 extern void game_render_frame();
 363 extern void show_extra_views();
 364 extern fix Flash_effect;
 365
 366 void apply_modified_palette(void)
 367 {
 368 //@@    int                             k,x,y;
 369 //@@    grs_bitmap      *sbp;
 370 //@@    grs_canvas      *save_canv;
 371 //@@    int                             color_xlate[256];
 372 //@@
 373 //@@
 374 //@@    if (!Flash_effect && ((PaletteRedAdd < 10) || (PaletteRedAdd < (PaletteGreenAdd + PaletteBlueAdd))))
 375 //@@            return;
 376 //@@
 377 //@@    reset_cockpit();
 378 //@@
 379 //@@    save_canv = grd_curcanv;
 380 //@@    gr_set_current_canvas(&grd_curscreen->sc_canvas);
 381 //@@
 382 //@@    sbp = &grd_curscreen->sc_canvas.cv_bitmap;
 383 //@@
 384 //@@    for (x=0; x<256; x++)
 385 //@@            color_xlate[x] = -1;
 386 //@@
 387 //@@    for (k=0; k<4; k++) {
 388 //@@            for (y=0; y<grd_curscreen->sc_h; y+= 4) {
 389 //@@                      for (x=0; x<grd_curscreen->sc_w; x++) {
 390 //@@                                    int     color, new_color;
 391 //@@                                    int     r, g, b;
 392 //@@                                    int     xcrd, ycrd;
 393 //@@
 394 //@@                                    ycrd = y+k;
 395 //@@                                    xcrd = x;
 396 //@@
 397 //@@                                    color = gr_ugpixel(sbp, xcrd, ycrd);
 398 //@@
 399 //@@                                    if (color_xlate[color] == -1) {
 400 //@@                                            r = gr_palette[color*3+0];
 401 //@@                                            g = gr_palette[color*3+1];
 402 //@@                                            b = gr_palette[color*3+2];
 403 //@@
 404 //@@                                            r += PaletteRedAdd;              if (r > 63) r = 63;
 405 //@@                                            g += PaletteGreenAdd;   if (g > 63) g = 63;
 406 //@@                                            b += PaletteBlueAdd;            if (b > 63) b = 63;
 407 //@@
 408 //@@                                            color_xlate[color] = gr_find_closest_color_current(r, g, b);
 409 //@@
 410 //@@                                    }
 411 //@@
 412 //@@                                    new_color = color_xlate[color];
 413 //@@
 414 //@@                                    gr_setcolor(new_color);
 415 //@@                                    gr_upixel(xcrd, ycrd);
 416 //@@                      }
 417 //@@            }
 418 //@@    }
 419 }
 420
 421 void format_time(char *str, int secs_int)
 422 {
 423         int h, m, s;
 424
 425         h = secs_int/3600;
 426         s = secs_int%3600;
 427         m = s / 60;
 428         s = s % 60;
 429         sprintf(str, "%1d:%02d:%02d", h, m, s );
 430 }
 431
 432 extern int Redbook_playing;
 433 void do_show_netgame_help();
 434
 435 //Process selected keys until game unpaused. returns key that left pause (p or esc)
 436 int do_game_pause()
 437 {
 438         int key;
 439         char msg[1000];
 440         char total_time[9],level_time[9];
 441
 442         key=0;
 443
 444         if (Game_paused) {              //unpause!
 445                 Game_paused=0;
 446       #if defined (TACTILE)
 447                         if (TactileStick)
 448                           EnableForces();
 449                 #endif
 450                 return KEY_PAUSE;
 451         }
 452
 453 #ifdef NETWORK
 454         if (Game_mode & GM_NETWORK)
 455         {
 456          do_show_netgame_help();
 457     return (KEY_PAUSE);
 458         }
 459         else if (Game_mode & GM_MULTI)
 460          {
 461           HUD_init_message ("You cannot pause in a modem/serial game!");
 462           return (KEY_PAUSE);
 463          }
 464 #endif
 465
 466         digi_pause_all();
 467         RBAPause();
 468         stop_time();
 469
 470         palette_save();
 471         apply_modified_palette();
 472         reset_palette_add();
 473
 474 // -- Matt: This is a hacked-in test for the stupid menu/flash problem.
 475 //      We need a new brightening primitive if we want to make this not horribly ugly.
 476 //                Gr_scanline_darkening_level = 2;
 477 //                gr_rect(0, 0, 319, 199);
 478
 479         game_flush_inputs();
 480
 481         Game_paused=1;
 482
 483    #if defined (TACTILE)
 484         if (TactileStick)
 485                   DisableForces();
 486         #endif
 487
 488
 489 //      set_screen_mode( SCREEN_MENU );
 490         set_popup_screen();
 491         gr_palette_load( gr_palette );
 492
 493         format_time(total_time, f2i(Players[Player_num].time_total) + Players[Player_num].hours_total*3600);
 494         format_time(level_time, f2i(Players[Player_num].time_level) + Players[Player_num].hours_level*3600);
 495
 496    if (Newdemo_state!=ND_STATE_PLAYBACK)
 497                 sprintf(msg,"PAUSE\n\nSkill level:  %s\nHostages on board:  %d\nTime on level: %s\nTotal time in game: %s",(*(&TXT_DIFFICULTY_1 + (Difficulty_level))),Players[Player_num].hostages_on_board,level_time,total_time);
 498    else
 499                 sprintf(msg,"PAUSE\n\nSkill level:  %s\nHostages on board:  %d\n",(*(&TXT_DIFFICULTY_1 + (Difficulty_level))),Players[Player_num].hostages_on_board);
 500
 501         show_boxed_message(Pause_msg=msg);                //TXT_PAUSE);
 502         gr_update();
 503
 504 #ifdef SDL_INPUT
 505         /* give control back to the WM */
 506         if (FindArg("-grabmouse"))
 507             SDL_WM_GrabInput(SDL_GRAB_OFF);
 508 #endif
 509
 510         while (Game_paused)
 511         {
 512                 int screen_changed;
 513
 514         #if defined (WINDOWS)
 515
 516                 if (!(VR_screen_flags & VRF_COMPATIBLE_MENUS)) {
 517                         show_boxed_message(msg);
 518                 }
 519
 520         SkipPauseStuff:
 521
 522                 while (!(key = key_inkey()))
 523                 {
 524                         MSG wmsg;
 525                         DoMessageStuff(&wmsg);
 526                         if (_RedrawScreen) {
 527                                 mprintf((0, "Redrawing paused screen.\n"));
 528                                 _RedrawScreen = FALSE;
 529                                 if (VR_screen_flags & VRF_COMPATIBLE_MENUS)
 530                                         game_render_frame();
 531                                 Screen_mode = -1;
 532                                 set_popup_screen();
 533                                 gr_palette_load(gr_palette);
 534                                 show_boxed_message(msg);
 535                                 if (Cockpit_mode==CM_FULL_COCKPIT || Cockpit_mode==CM_STATUS_BAR)
 536                                         if (!GRMODEINFO(modex)) render_gauges();
 537                         }
 538                 }
 539
 540         #else
 541                 key = key_getch();
 542         #endif
 543
 544                 #ifndef RELEASE
 545                 HandleTestKey(key);
 546                 #endif
 547
 548                 screen_changed = HandleSystemKey(key);
 549
 550         #ifdef WINDOWS
 551                 if (screen_changed == -1) {
 552                         nm_messagebox(NULL,1, TXT_OK, "Unable to do this\noperation while paused under\n320x200 mode");
 553                         goto SkipPauseStuff;
 554                 }
 555         #endif
 556
 557                 HandleVRKey(key);
 558
 559                 if (screen_changed) {
 560 //                      game_render_frame();
 561                         WIN(set_popup_screen());
 562                         show_boxed_message(msg);
 563                         //show_extra_views();
 564                         if (Cockpit_mode==CM_FULL_COCKPIT || Cockpit_mode==CM_STATUS_BAR)
 565                                 render_gauges();
 566                 }
 567         }
 568
 569 #ifdef SDL_INPUT
 570         /* keep the mouse from wandering in SDL */
 571         if (FindArg("-grabmouse"))
 572             SDL_WM_GrabInput(SDL_GRAB_ON);
 573 #endif
 574
 575         if (VR_screen_flags & VRF_COMPATIBLE_MENUS) {
 576                 clear_boxed_message();
 577         }
 578
 579         game_flush_inputs();
 580
 581         reset_cockpit();
 582
 583         palette_restore();
 584
 585         start_time();
 586
 587         if (Redbook_playing)
 588                 RBAResume();
 589         digi_resume_all();
 590
 591         MAC(delay(500);)        // delay 1/2 second because of dumb redbook problem
 592
 593         return key;
 594 }
 595
 596 extern int newmenu_dotiny2( char * title, char * subtitle, int nitems, newmenu_item * item, void (*subfunction)(int nitems,newmenu_item * items, int * last_key, int citem) );
 597 extern int network_who_is_master(),network_how_many_connected(),GetMyNetRanking();
 598 extern int TotalMissedPackets,TotalPacketsGot;
 599 extern char Pauseable_menu;
 600 char *NetworkModeNames[]={"Anarchy","Team Anarchy","Robo Anarchy","Cooperative","Capture the Flag","Hoard","Team Hoard","Unknown"};
 601 extern char *RankStrings[];
 602 extern int PhallicLimit,PhallicMan;
 603
 604 #ifdef NETWORK
 605 void do_show_netgame_help()
 606  {
 607         newmenu_item m[30];
 608    char mtext[30][50];
 609         int i,num=0,eff;
 610 #ifndef RELEASE
 611         int pl;
 612 #endif
 613         char *eff_strings[]={"trashing","really hurting","seriously effecting","hurting",
 614                                                                 "effecting","tarnishing"};
 615
 616    for (i=0;i<30;i++)
 617         {
 618          m[i].text=(char *)&mtext[i];
 619     m[i].type=NM_TYPE_TEXT;
 620         }
 621
 622    sprintf (mtext[num],"Game: %s",Netgame.game_name); num++;
 623    sprintf (mtext[num],"Mission: %s",Netgame.mission_title); num++;
 624         sprintf (mtext[num],"Current Level: %d",Netgame.levelnum); num++;
 625         sprintf (mtext[num],"Difficulty: %s",MENU_DIFFICULTY_TEXT(Netgame.difficulty)); num++;
 626         sprintf (mtext[num],"Game Mode: %s",NetworkModeNames[Netgame.gamemode]); num++;
 627         sprintf (mtext[num],"Game Master: %s",Players[network_who_is_master()].callsign); num++;
 628    sprintf (mtext[num],"Number of players: %d/%d",network_how_many_connected(),Netgame.max_numplayers); num++;
 629    sprintf (mtext[num],"Packets per second: %d",Netgame.PacketsPerSec); num++;
 630    sprintf (mtext[num],"Short Packets: %s",Netgame.ShortPackets?"Yes":"No"); num++;
 631
 632 #ifndef RELEASE
 633                 pl=(int)(((float)TotalMissedPackets/(float)TotalPacketsGot)*100.0);
 634                 if (pl<0)
 635                   pl=0;
 636                 sprintf (mtext[num],"Packets lost: %d (%d%%)",TotalMissedPackets,pl); num++;
 637 #endif
 638
 639    if (Netgame.KillGoal)
 640      { sprintf (mtext[num],"Kill goal: %d",Netgame.KillGoal*5); num++; }
 641
 642    sprintf (mtext[num]," "); num++;
 643    sprintf (mtext[num],"Connected players:"); num++;
 644
 645    NetPlayers.players[Player_num].rank=GetMyNetRanking();
 646
 647    for (i=0;i<N_players;i++)
 648      if (Players[i].connected)
 649           {
 650       if (!FindArg ("-norankings"))
 651                  {
 652                         if (i==Player_num)
 653                                 sprintf (mtext[num],"%s%s (%d/%d)",RankStrings[NetPlayers.players[i].rank],Players[i].callsign,Netlife_kills,Netlife_killed);
 654                         else
 655                                 sprintf (mtext[num],"%s%s %d/%d",RankStrings[NetPlayers.players[i].rank],Players[i].callsign,kill_matrix[Player_num][i],
 656                                                         kill_matrix[i][Player_num]);
 657                         num++;
 658                  }
 659            else
 660                  sprintf (mtext[num++],"%s",Players[i].callsign);
 661           }
 662
 663
 664   sprintf (mtext[num]," "); num++;
 665
 666   eff=(int)((float)((float)Netlife_kills/((float)Netlife_killed+(float)Netlife_kills))*100.0);
 667
 668   if (eff<0)
 669         eff=0;
 670
 671   if (Game_mode & GM_HOARD)
 672         {
 673          if (PhallicMan==-1)
 674                  sprintf (mtext[num],"There is no record yet for this level.");
 675          else
 676                  sprintf (mtext[num],"%s has the record at %d points.",Players[PhallicMan].callsign,PhallicLimit);
 677         num++;
 678         }
 679   else if (!FindArg ("-norankings"))
 680         {
 681           if (eff<60)
 682            {
 683                  sprintf (mtext[num],"Your lifetime efficiency of %d%%",eff); num++;
 684                  sprintf (mtext[num],"is %s your ranking.",eff_strings[eff/10]); num++;
 685                 }
 686           else
 687            {
 688                  sprintf (mtext[num],"Your lifetime efficiency of %d%%",eff); num++;
 689                  sprintf (mtext[num],"is serving you well."); num++;
 690            }
 691         }
 692
 693
 694         full_palette_save();
 695
 696    Pauseable_menu=1;
 697         newmenu_dotiny2( NULL, "Netgame Information", num, m, NULL);
 698
 699         palette_restore();
 700 }
 701 #endif
 702
 703 void HandleEndlevelKey(int key)
 704 {
 705
 706         #ifdef MACINTOSH
 707         if ( key == (KEY_COMMAND + KEY_SHIFTED + KEY_3) )
 708                 save_screen_shot(0);
 709
 710         if ( key == KEY_COMMAND+KEY_Q && !(Game_mode & GM_MULTI) )
 711                 macintosh_quit();
 712         #endif
 713
 714         if (key==KEY_PRINT_SCREEN)
 715                 save_screen_shot(0);
 716
 717         #ifdef MACINTOSH
 718         if ( key == (KEY_COMMAND+KEY_P) )
 719                 key = do_game_pause();
 720         #endif
 721         if (key == KEY_PAUSE)
 722                 key = do_game_pause();          //so esc from pause will end level
 723
 724         if (key == KEY_ESC) {
 725                 stop_endlevel_sequence();
 726                 last_drawn_cockpit[0]=-1;
 727                 last_drawn_cockpit[1]=-1;
 728                 return;
 729         }
 730
 731         if (key == KEY_BACKSP)
 732                 Int3();
 733 }
 734
 735 void HandleDeathKey(int key)
 736 {
 737 /*
 738         Commented out redundant calls because the key used here typically
 739         will be passed to HandleSystemKey later.  Note that I do this to pause
 740         which is supposed to pass the ESC key to leave the level.  This
 741         doesn't work in the DOS version anyway.   -Samir
 742 */
 743
 744         if (Player_exploded && !key_isfunc(key) && !key_ismod(key))
 745                 Death_sequence_aborted  = 1;            //Any key but func or modifier aborts
 746
 747         #ifdef MACINTOSH
 748         if ( key == (KEY_COMMAND + KEY_SHIFTED + KEY_3) ) {
 749 //              save_screen_shot(0);
 750                 Death_sequence_aborted  = 0;            // Clear because code above sets this for any key.
 751         }
 752
 753         if ( key == KEY_COMMAND+KEY_Q && !(Game_mode & GM_MULTI) )
 754                 macintosh_quit();
 755         #endif
 756
 757         if (key==KEY_PRINT_SCREEN) {
 758 //              save_screen_shot(0);
 759                 Death_sequence_aborted  = 0;            // Clear because code above sets this for any key.
 760         }
 761
 762         #ifdef MACINTOSH
 763         if ( key == (KEY_COMMAND+KEY_P) ) {
 764 //              key = do_game_pause();
 765                 Death_sequence_aborted  = 0;            // Clear because code above sets this for any key.
 766         }
 767         #endif
 768
 769         if (key == KEY_PAUSE)   {
 770 //              key = do_game_pause();          //so esc from pause will end level
 771                 Death_sequence_aborted  = 0;            // Clear because code above sets this for any key.
 772         }
 773
 774         if (key == KEY_ESC) {
 775                 if (ConsoleObject->flags & OF_EXPLODING)
 776                         Death_sequence_aborted = 1;
 777         }
 778
 779         if (key == KEY_BACKSP)  {
 780                 Death_sequence_aborted  = 0;            // Clear because code above sets this for any key.
 781                 Int3();
 782         }
 783
 784         //don't abort death sequence for netgame join/refuse keys
 785         if (    (key == KEY_ALTED + KEY_1) ||
 786                         (key == KEY_ALTED + KEY_2))
 787                 Death_sequence_aborted  = 0;
 788
 789         if (Death_sequence_aborted)
 790                 game_flush_inputs();
 791
 792 }
 793
 794 void HandleDemoKey(int key)
 795 {
 796         switch (key) {
 797
 798                 case KEY_F3:
 799
 800                          if (!(Guided_missile[Player_num] && Guided_missile[Player_num]->type==OBJ_WEAPON && Guided_missile[Player_num]->id==GUIDEDMISS_ID && Guided_missile[Player_num]->signature==Guided_missile_sig[Player_num] && Guided_in_big_window))
 801                                 toggle_cockpit();
 802                          break;
 803
 804                 case KEY_SHIFTED+KEY_MINUS:
 805                 case KEY_MINUS:         shrink_window(); break;
 806
 807                 case KEY_SHIFTED+KEY_EQUAL:
 808                 case KEY_EQUAL:         grow_window(); break;
 809
 810                 MAC(case KEY_COMMAND+KEY_2:)
 811                 case KEY_F2:            Config_menu_flag = 1; break;
 812
 813                 MAC(case KEY_COMMAND+KEY_7:)
 814                 case KEY_F7:
 815                         #ifdef NETWORK
 816                         Show_kill_list = (Show_kill_list+1) % ((Newdemo_game_mode & GM_TEAM) ? 4 : 3);
 817                         #endif
 818                         break;
 819                 case KEY_ESC:
 820                         Function_mode = FMODE_MENU;
 821                         break;
 822                 case KEY_UP:
 823                         Newdemo_vcr_state = ND_STATE_PLAYBACK;
 824                         break;
 825                 case KEY_DOWN:
 826                         Newdemo_vcr_state = ND_STATE_PAUSED;
 827                         break;
 828                 case KEY_LEFT:
 829                         newdemo_single_frame_time = timer_get_fixed_seconds();
 830                         Newdemo_vcr_state = ND_STATE_ONEFRAMEBACKWARD;
 831                         break;
 832                 case KEY_RIGHT:
 833                         newdemo_single_frame_time = timer_get_fixed_seconds();
 834                         Newdemo_vcr_state = ND_STATE_ONEFRAMEFORWARD;
 835                         break;
 836                 case KEY_CTRLED + KEY_RIGHT:
 837                         newdemo_goto_end();
 838                         break;
 839                 case KEY_CTRLED + KEY_LEFT:
 840                         newdemo_goto_beginning();
 841                         break;
 842
 843                 MAC(case KEY_COMMAND+KEY_P:)
 844                 case KEY_PAUSE:
 845                         do_game_pause();
 846                         break;
 847
 848                 MAC(case KEY_COMMAND + KEY_SHIFTED + KEY_3:)
 849                 case KEY_PRINT_SCREEN: {
 850                         int old_state;
 851
 852                         old_state = Newdemo_vcr_state;
 853                         Newdemo_vcr_state = ND_STATE_PRINTSCREEN;
 854                         game_render_frame_mono();
 855                         save_screen_shot(0);
 856                         Newdemo_vcr_state = old_state;
 857                         break;
 858                 }
 859
 860                 #ifdef MACINTOSH
 861                 case KEY_COMMAND+KEY_Q:
 862                         if ( !(Game_mode & GM_MULTI) )
 863                                 macintosh_quit();
 864                         break;
 865                 #endif
 866
 867                 #ifndef NDEBUG
 868                 case KEY_BACKSP:
 869                         Int3();
 870                         break;
 871                 case KEY_DEBUGGED + KEY_I:
 872                         Newdemo_do_interpolate = !Newdemo_do_interpolate;
 873                         if (Newdemo_do_interpolate)
 874                                 mprintf ((0, "demo playback interpolation now on\n"));
 875                         else
 876                                 mprintf ((0, "demo playback interpolation now off\n"));
 877                         break;
 878                 case KEY_DEBUGGED + KEY_K: {
 879                         int how_many, c;
 880                         char filename[FILENAME_LEN], num[16];
 881                         newmenu_item m[6];
 882
 883                         filename[0] = '\0';
 884                         m[ 0].type = NM_TYPE_TEXT; m[ 0].text = "output file name";
 885                         m[ 1].type = NM_TYPE_INPUT;m[ 1].text_len = 8; m[1].text = filename;
 886                         c = newmenu_do( NULL, NULL, 2, m, NULL );
 887                         if (c == -2)
 888                                 break;
 889                         strcat(filename, ".dem");
 890                         num[0] = '\0';
 891                         m[ 0].type = NM_TYPE_TEXT; m[ 0].text = "strip how many bytes";
 892                         m[ 1].type = NM_TYPE_INPUT;m[ 1].text_len = 16; m[1].text = num;
 893                         c = newmenu_do( NULL, NULL, 2, m, NULL );
 894                         if (c == -2)
 895                                 break;
 896                         how_many = atoi(num);
 897                         if (how_many <= 0)
 898                                 break;
 899                         newdemo_strip_frames(filename, how_many);
 900
 901                         break;
 902                 }
 903                 #endif
 904
 905         }
 906 }
 907
 908 //switch a cockpit window to the next function
 909 int select_next_window_function(int w)
 910 {
 911         Assert(w==0 || w==1);
 912
 913         switch (Cockpit_3d_view[w]) {
 914                 case CV_NONE:
 915                         Cockpit_3d_view[w] = CV_REAR;
 916                         break;
 917                 case CV_REAR:
 918                         if (find_escort()) {
 919                                 Cockpit_3d_view[w] = CV_ESCORT;
 920                                 break;
 921                         }
 922                         //if no ecort, fall through
 923                 case CV_ESCORT:
 924                         Coop_view_player[w] = -1;               //force first player
 925 #ifdef NETWORK
 926                         //fall through
 927                 case CV_COOP:
 928                         Marker_viewer_num[w] = -1;
 929                         if ((Game_mode & GM_MULTI_COOP) || (Game_mode & GM_TEAM)) {
 930                                 Cockpit_3d_view[w] = CV_COOP;
 931                                 while (1) {
 932                                         Coop_view_player[w]++;
 933                                         if (Coop_view_player[w] == N_players) {
 934                                                 Cockpit_3d_view[w] = CV_MARKER;
 935                                                 goto case_marker;
 936                                         }
 937                                         if (Coop_view_player[w]==Player_num)
 938                                                 continue;
 939
 940                                         if (Game_mode & GM_MULTI_COOP)
 941                                                 break;
 942                                         else if (get_team(Coop_view_player[w]) == get_team(Player_num))
 943                                                 break;
 944                                 }
 945                                 break;
 946                         }
 947                         //if not multi, fall through
 948                 case CV_MARKER:
 949                 case_marker:;
 950                         if ((Game_mode & GM_MULTI) && !(Game_mode & GM_MULTI_COOP) && Netgame.Allow_marker_view) {      //anarchy only
 951                                 Cockpit_3d_view[w] = CV_MARKER;
 952                                 if (Marker_viewer_num[w] == -1)
 953                                         Marker_viewer_num[w] = Player_num * 2;
 954                                 else if (Marker_viewer_num[w] == Player_num * 2)
 955                                         Marker_viewer_num[w]++;
 956                                 else
 957                                         Cockpit_3d_view[w] = CV_NONE;
 958                         }
 959                         else
 960 #endif
 961                                 Cockpit_3d_view[w] = CV_NONE;
 962                         break;
 963         }
 964         write_player_file();
 965
 966         return 1;        //screen_changed
 967 }
 968
 969 extern int Game_paused;
 970
 971 void songs_goto_next_song();
 972 void songs_goto_prev_song();
 973
 974 #ifdef DOOR_DEBUGGING
 975 dump_door_debugging_info()
 976 {
 977         object *obj;
 978         vms_vector new_pos;
 979         fvi_query fq;
 980         fvi_info hit_info;
 981         int fate;
 982         FILE *dfile;
 983         int wall_num;
 984
 985         obj = &Objects[Players[Player_num].objnum];
 986         vm_vec_scale_add(&new_pos,&obj->pos,&obj->orient.fvec,i2f(100));
 987
 988         fq.p0                                           = &obj->pos;
 989         fq.startseg                             = obj->segnum;
 990         fq.p1                                           = &new_pos;
 991         fq.rad                                  = 0;
 992         fq.thisobjnum                   = Players[Player_num].objnum;
 993         fq.ignore_obj_list      = NULL;
 994         fq.flags                                        = 0;
 995
 996         fate = find_vector_intersection(&fq,&hit_info);
 997
 998         dfile = fopen("door.out","at");
 999
1000         fprintf(dfile,"FVI hit_type = %d\n",fate);
1001         fprintf(dfile,"    hit_seg = %d\n",hit_info.hit_seg);
1002         fprintf(dfile,"    hit_side = %d\n",hit_info.hit_side);
1003         fprintf(dfile,"    hit_side_seg = %d\n",hit_info.hit_side_seg);
1004         fprintf(dfile,"\n");
1005
1006         if (fate == HIT_WALL) {
1007
1008                 wall_num = Segments[hit_info.hit_seg].sides[hit_info.hit_side].wall_num;
1009                 fprintf(dfile,"wall_num = %d\n",wall_num);
1010
1011                 if (wall_num != -1) {
1012                         wall *wall = &Walls[wall_num];
1013                         active_door *d;
1014                         int i;
1015
1016                         fprintf(dfile,"    segnum = %d\n",wall->segnum);
1017                         fprintf(dfile,"    sidenum = %d\n",wall->sidenum);
1018                         fprintf(dfile,"    hps = %x\n",wall->hps);
1019                         fprintf(dfile,"    linked_wall = %d\n",wall->linked_wall);
1020                         fprintf(dfile,"    type = %d\n",wall->type);
1021                         fprintf(dfile,"    flags = %x\n",wall->flags);
1022                         fprintf(dfile,"    state = %d\n",wall->state);
1023                         fprintf(dfile,"    trigger = %d\n",wall->trigger);
1024                         fprintf(dfile,"    clip_num = %d\n",wall->clip_num);
1025                         fprintf(dfile,"    keys = %x\n",wall->keys);
1026                         fprintf(dfile,"    controlling_trigger = %d\n",wall->controlling_trigger);
1027                         fprintf(dfile,"    cloak_value = %d\n",wall->cloak_value);
1028                         fprintf(dfile,"\n");
1029
1030
1031                         for (i=0;i<Num_open_doors;i++) {                //find door
1032                                 d = &ActiveDoors[i];
1033                                 if (d->front_wallnum[0]==wall-Walls || d->back_wallnum[0]==wall-Walls || (d->n_parts==2 && (d->front_wallnum[1]==wall-Walls || d->back_wallnum[1]==wall-Walls)))
1034                                         break;
1035                         }
1036
1037                         if (i>=Num_open_doors)
1038                                 fprintf(dfile,"No active door.\n");
1039                         else {
1040                                 fprintf(dfile,"Active door %d:\n",i);
1041                                 fprintf(dfile,"    n_parts = %d\n",d->n_parts);
1042                                 fprintf(dfile,"    front_wallnum = %d,%d\n",d->front_wallnum[0],d->front_wallnum[1]);
1043                                 fprintf(dfile,"    back_wallnum = %d,%d\n",d->back_wallnum[0],d->back_wallnum[1]);
1044                                 fprintf(dfile,"    time = %x\n",d->time);
1045                         }
1046
1047                 }
1048         }
1049
1050         fprintf(dfile,"\n");
1051         fprintf(dfile,"\n");
1052
1053         fclose(dfile);
1054
1055 }
1056 #endif
1057
1058
1059 //this is for system-level keys, such as help, etc.
1060 //returns 1 if screen changed
1061 int HandleSystemKey(int key)
1062 {
1063         int screen_changed=0;
1064
1065         if (!Player_is_dead)
1066                 switch (key) {
1067
1068                         #ifdef DOOR_DEBUGGING
1069                         case KEY_LAPOSTRO+KEY_SHIFTED:
1070                                 dump_door_debugging_info();
1071                                 break;
1072                         #endif
1073
1074                         case KEY_ESC:
1075                                 if (Game_paused)
1076                                         Game_paused=0;
1077                                 else {
1078                                         Game_aborted=1;
1079                                         Function_mode = FMODE_MENU;
1080                                 }
1081                                 break;
1082
1083 // fleshed these out because F1 and F2 aren't sequenctial keycodes on mac -- MWA
1084
1085                         MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_1:)
1086                         case KEY_SHIFTED+KEY_F1:
1087                                 screen_changed = select_next_window_function(0);
1088                                 break;
1089                         MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_2:)
1090                         case KEY_SHIFTED+KEY_F2:
1091                                 screen_changed = select_next_window_function(1);
1092                                 break;
1093                 }
1094
1095         switch (key) {
1096
1097 #if 1
1098                 case KEY_SHIFTED + KEY_ESC:
1099                         con_show();
1100                         break;
1101
1102 #else
1103                 case KEY_SHIFTED + KEY_ESC:     //quick exit
1104                         #ifdef EDITOR
1105                                 if (! SafetyCheck()) break;
1106                                 close_editor_screen();
1107                         #endif
1108
1109                         Game_aborted=1;
1110                         Function_mode=FMODE_EXIT;
1111                         break;
1112 #endif
1113
1114                 MAC( case KEY_COMMAND+KEY_P: )
1115                 case KEY_PAUSE:
1116                         do_game_pause();                                break;
1117
1118                 #ifdef MACINTOSH
1119                 case KEY_COMMAND + KEY_D:
1120                         Scanline_double = !Scanline_double;
1121                         init_cockpit();
1122                         break;
1123                 #endif
1124
1125                 MAC(case KEY_COMMAND + KEY_SHIFTED + KEY_3:)
1126                 case KEY_PRINT_SCREEN:  save_screen_shot(0);            break;
1127
1128                 MAC(case KEY_COMMAND+KEY_1:)
1129                 case KEY_F1:                                    do_show_help();                 break;
1130
1131                 MAC(case KEY_COMMAND+KEY_2:)
1132                 case KEY_F2:                                    //Config_menu_flag = 1; break;
1133                         {
1134                                 int scanline_save = Scanline_double;
1135
1136                                 if (!(Game_mode&GM_MULTI)) {palette_save(); apply_modified_palette(); reset_palette_add(); gr_palette_load(gr_palette); }
1137                                 do_options_menu();
1138                                 if (!(Game_mode&GM_MULTI)) palette_restore();
1139                                 if (scanline_save != Scanline_double)   init_cockpit(); // reset the cockpit after changing...
1140                                 break;
1141                         }
1142
1143
1144                 MAC(case KEY_COMMAND+KEY_3:)
1145
1146                 case KEY_F3:
1147                         #ifdef WINDOWS          // HACK! these shouldn't work in 320x200 pause or in letterbox.
1148                                 if (Player_is_dead) break;
1149                                 if (!(VR_screen_flags&VRF_COMPATIBLE_MENUS) && Game_paused) {
1150                                         screen_changed = -1;
1151                                         break;
1152                                 }
1153                         #endif
1154
1155                         if (!(Guided_missile[Player_num] && Guided_missile[Player_num]->type==OBJ_WEAPON && Guided_missile[Player_num]->id==GUIDEDMISS_ID && Guided_missile[Player_num]->signature==Guided_missile_sig[Player_num] && Guided_in_big_window))
1156                         {
1157                                 toggle_cockpit();       screen_changed=1;
1158                         }
1159                         break;
1160
1161                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_7:)
1162                 case KEY_F7+KEY_SHIFTED: palette_save(); joydefs_calibrate(); palette_restore(); break;
1163
1164                 case KEY_SHIFTED+KEY_MINUS:
1165                 case KEY_MINUS:
1166                 #ifdef WINDOWS
1167                         if (Player_is_dead) break;
1168                         if (!(VR_screen_flags&VRF_COMPATIBLE_MENUS) && Game_paused) {
1169                                 screen_changed = -1;
1170                                 break;
1171                         }
1172                 #endif
1173
1174                         shrink_window();
1175                         screen_changed=1;
1176                         break;
1177
1178                 case KEY_SHIFTED+KEY_EQUAL:
1179                 case KEY_EQUAL:
1180                 #ifdef WINDOWS
1181                         if (Player_is_dead) break;
1182                         if (!(VR_screen_flags&VRF_COMPATIBLE_MENUS) && Game_paused) {
1183                                 screen_changed = -1;
1184                                 break;
1185                         }
1186                 #endif
1187
1188                         grow_window();
1189                         screen_changed=1;
1190                         break;
1191
1192                 MAC(case KEY_COMMAND+KEY_5:)
1193                 case KEY_F5:
1194                         if ( Newdemo_state == ND_STATE_RECORDING )
1195                                 newdemo_stop_recording();
1196                         else if ( Newdemo_state == ND_STATE_NORMAL )
1197                                 if (!Game_paused)               //can't start demo while paused
1198                                         newdemo_start_recording();
1199                         break;
1200
1201                 MAC(case KEY_COMMAND+KEY_ALTED+KEY_4:)
1202                 case KEY_ALTED+KEY_F4:
1203                         #ifdef NETWORK
1204                         Show_reticle_name = (Show_reticle_name+1)%2;
1205                         #endif
1206                         break;
1207
1208                 MAC(case KEY_COMMAND + KEY_6:)
1209                 case KEY_F6:
1210                         if (!Player_is_dead && !(Game_mode & GM_MULTI))
1211                         {
1212                                 int rsave, gsave, bsave;
1213                                 rsave = PaletteRedAdd;
1214                                 gsave = PaletteGreenAdd;
1215                                 bsave = PaletteBlueAdd;
1216
1217                                 full_palette_save();
1218                                 PaletteRedAdd = rsave;
1219                                 PaletteGreenAdd = gsave;
1220                                 PaletteBlueAdd = bsave;
1221                                 state_save_all(0, 0, NULL, 1); // 0 means not between levels.
1222                                 palette_restore();
1223                         }
1224                         break;
1225
1226                 MAC(case KEY_COMMAND+KEY_7:)
1227                 case KEY_F7:
1228                         #ifdef NETWORK
1229                         Show_kill_list = (Show_kill_list+1) % ((Game_mode & GM_TEAM) ? 4 : 3);
1230                         if (Game_mode & GM_MULTI)
1231                                 multi_sort_kill_list();
1232                 #endif
1233                         break;
1234
1235                 MAC(case KEY_COMMAND+KEY_8:)
1236                 case KEY_F8:
1237                         #ifdef NETWORK
1238                         multi_send_message_start();
1239                         #endif
1240                         break;
1241
1242                 case KEY_F9:
1243                 case KEY_F10:
1244                 case KEY_F11:
1245                 case KEY_F12:
1246                         #ifdef NETWORK
1247                         multi_send_macro(key);
1248                         #endif
1249                         break;          // send taunt macros
1250
1251                 #ifdef MACINTOSH
1252                 case KEY_9 + KEY_COMMAND:
1253                         multi_send_macro(KEY_F9);
1254                         break;
1255                 case KEY_0 + KEY_COMMAND:
1256                         multi_send_macro(KEY_F10);
1257                         break;
1258                 case KEY_1 + KEY_COMMAND + KEY_CTRLED:
1259                         multi_send_macro(KEY_F11);
1260                         break;
1261                 case KEY_2 + KEY_COMMAND + KEY_CTRLED:
1262                         multi_send_macro(KEY_F12);
1263                         break;
1264                 #endif
1265
1266                 case KEY_SHIFTED + KEY_F9:
1267                 case KEY_SHIFTED + KEY_F10:
1268                 case KEY_SHIFTED + KEY_F11:
1269                 case KEY_SHIFTED + KEY_F12:
1270                         #ifdef NETWORK
1271                         multi_define_macro(key);
1272                         #endif
1273                         break;          // redefine taunt macros
1274
1275                 #ifdef MACINTOSH
1276                 case KEY_9 + KEY_SHIFTED + KEY_COMMAND:
1277                         multi_define_macro(KEY_F9);
1278                         break;
1279                 case KEY_0 + KEY_SHIFTED + KEY_COMMAND:
1280                         multi_define_macro(KEY_F10);
1281                         break;
1282                 case KEY_1 + KEY_SHIFTED + KEY_COMMAND + KEY_CTRLED:
1283                         multi_define_macro(KEY_F11);
1284                         break;
1285                 case KEY_2 + KEY_SHIFTED + KEY_COMMAND + KEY_CTRLED:
1286                         multi_define_macro(KEY_F12);
1287                         break;
1288                 #endif
1289
1290
1291                 MAC(case KEY_COMMAND+KEY_S:)
1292                 MAC(case KEY_COMMAND+KEY_ALTED+KEY_2:)
1293                 case KEY_ALTED+KEY_F2:
1294                         if (!Player_is_dead && !((Game_mode & GM_MULTI) && !(Game_mode & GM_MULTI_COOP))) {
1295                                 int     rsave, gsave, bsave;
1296                                 rsave = PaletteRedAdd;
1297                                 gsave = PaletteGreenAdd;
1298                                 bsave = PaletteBlueAdd;
1299
1300                                 full_palette_save();
1301                                 PaletteRedAdd = rsave;
1302                                 PaletteGreenAdd = gsave;
1303                                 PaletteBlueAdd = bsave;
1304                                 state_save_all(0, 0, NULL, 0); // 0 means not between levels.
1305                                 palette_restore();
1306                         }
1307                         break;
1308
1309                 MAC(case KEY_COMMAND+KEY_O:)
1310                 MAC(case KEY_COMMAND+KEY_ALTED+KEY_3:)
1311                 case KEY_ALTED+KEY_F3:
1312                         if (!Player_is_dead && !((Game_mode & GM_MULTI) && !(Game_mode & GM_MULTI_COOP))) {
1313                                 full_palette_save();
1314                                 state_restore_all(1, 0, NULL);
1315                                 if (Game_paused)
1316                                         do_game_pause();
1317                         }
1318                         break;
1319
1320
1321                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_4:)
1322                 case KEY_F4 + KEY_SHIFTED:
1323                         do_escort_menu();
1324                         break;
1325
1326
1327                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_ALTED+KEY_4:)
1328                 case KEY_F4 + KEY_SHIFTED + KEY_ALTED:
1329                         change_guidebot_name();
1330                         break;
1331
1332                 case KEY_MINUS + KEY_ALTED:     songs_goto_prev_song(); break;
1333                 case KEY_EQUAL + KEY_ALTED:     songs_goto_next_song(); break;
1334
1335                 #ifdef MACINTOSH
1336
1337                 case KEY_COMMAND+KEY_M:
1338                         #if !defined(SHAREWARE) || defined(APPLE_DEMO)
1339                         if ( (Game_mode & GM_MULTI) )           // don't process in multiplayer games
1340                                 break;
1341
1342                         key_close();            // no processing of keys with keyboard handler.. jeez
1343                         stop_time();
1344                         show_boxed_message ("Mounting CD\nESC to quit");
1345                         RBAMountDisk();         // OS has totaly control of the CD.
1346                         if (Function_mode == FMODE_MENU)
1347                                 songs_play_song(SONG_TITLE,1);
1348                         else if (Function_mode == FMODE_GAME)
1349                                 songs_play_level_song( Current_level_num );
1350                         clear_boxed_message();
1351                         key_init();
1352                         start_time();
1353                         #endif
1354
1355                         break;
1356
1357                 case KEY_COMMAND+KEY_E:
1358                         songs_stop_redbook();
1359                         RBAEjectDisk();
1360                         break;
1361
1362                 case KEY_COMMAND+KEY_RIGHT:
1363                         songs_goto_next_song();
1364                         break;
1365                 case KEY_COMMAND+KEY_LEFT:
1366                         songs_goto_prev_song();
1367                         break;
1368                 case KEY_COMMAND+KEY_UP:
1369                         songs_play_level_song(1);
1370                         break;
1371                 case KEY_COMMAND+KEY_DOWN:
1372                         songs_stop_redbook();
1373                         break;
1374
1375                 case KEY_COMMAND+KEY_Q:
1376                         if ( !(Game_mode & GM_MULTI) )
1377                                 macintosh_quit();
1378                         break;
1379                 #endif
1380
1381 //added 8/23/99 by Matt Mueller for hot key res/fullscreen changing, and menu access
1382                 case KEY_CTRLED+KEY_SHIFTED+KEY_PADDIVIDE:
1383                 case KEY_ALTED+KEY_CTRLED+KEY_PADDIVIDE:
1384                 case KEY_ALTED+KEY_SHIFTED+KEY_PADDIVIDE:
1385                         d2x_options_menu();
1386                         break;
1387 #if 0
1388                 case KEY_CTRLED+KEY_SHIFTED+KEY_PADMULTIPLY:
1389                 case KEY_ALTED+KEY_CTRLED+KEY_PADMULTIPLY:
1390                 case KEY_ALTED+KEY_SHIFTED+KEY_PADMULTIPLY:
1391                         change_res();
1392                         break;
1393                 case KEY_CTRLED+KEY_SHIFTED+KEY_PADMINUS:
1394                 case KEY_ALTED+KEY_CTRLED+KEY_PADMINUS:
1395                 case KEY_ALTED+KEY_SHIFTED+KEY_PADMINUS:
1396                         //lower res
1397                         //should we just cycle through the list that is displayed in the res change menu?
1398                         // what if their card/X/etc can't handle that mode? hrm.
1399                         //well, the quick access to the menu is good enough for now.
1400                         break;
1401                 case KEY_CTRLED+KEY_SHIFTED+KEY_PADPLUS:
1402                 case KEY_ALTED+KEY_CTRLED+KEY_PADPLUS:
1403                 case KEY_ALTED+KEY_SHIFTED+KEY_PADPLUS:
1404                         //increase res
1405                         break;
1406 #endif
1407                 case KEY_ALTED+KEY_ENTER:
1408                 case KEY_ALTED+KEY_PADENTER:
1409                         gr_toggle_fullscreen_game();
1410                         break;
1411 //end addition -MM
1412
1413 //added 11/01/98 Matt Mueller
1414 #if 0
1415                 case KEY_CTRLED+KEY_ALTED+KEY_LAPOSTRO:
1416                         toggle_hud_log();
1417                         break;
1418 #endif
1419 //end addition -MM
1420
1421                 default:
1422                         break;
1423
1424         }        //switch (key)
1425
1426         return screen_changed;
1427 }
1428
1429
1430 void HandleVRKey(int key)
1431 {
1432         switch( key )   {
1433
1434                 case KEY_ALTED+KEY_F5:
1435                         if ( VR_render_mode != VR_NONE )        {
1436                                 VR_reset_params();
1437                                 HUD_init_message( "-Stereoscopic Parameters Reset-" );
1438                                 HUD_init_message( "Interaxial Separation = %.2f", f2fl(VR_eye_width) );
1439                                 HUD_init_message( "Stereo balance = %.2f", (float)VR_eye_offset/30.0 );
1440                         }
1441                         break;
1442
1443                 case KEY_ALTED+KEY_F6:
1444                         if ( VR_render_mode != VR_NONE )        {
1445                                 VR_low_res++;
1446                                 if ( VR_low_res > 3 ) VR_low_res = 0;
1447                                 switch( VR_low_res )    {
1448                                         case 0: HUD_init_message( "Normal Resolution" ); break;
1449                                         case 1: HUD_init_message( "Low Vertical Resolution" ); break;
1450                                         case 2: HUD_init_message( "Low Horizontal Resolution" ); break;
1451                                         case 3: HUD_init_message( "Low Resolution" ); break;
1452                                 }
1453                         }
1454                         break;
1455
1456                 case KEY_ALTED+KEY_F7:
1457                         if ( VR_render_mode != VR_NONE )        {
1458                                 VR_eye_switch = !VR_eye_switch;
1459                                 HUD_init_message( "-Eyes toggled-" );
1460                                 if ( VR_eye_switch )
1461                                         HUD_init_message( "Right Eye -- Left Eye" );
1462                                 else
1463                                         HUD_init_message( "Left Eye -- Right Eye" );
1464                         }
1465                         break;
1466
1467                 case KEY_ALTED+KEY_F8:
1468                         if ( VR_render_mode != VR_NONE )        {
1469                         VR_sensitivity++;
1470                         if (VR_sensitivity > 2 )
1471                                 VR_sensitivity = 0;
1472                         HUD_init_message( "Head tracking sensitivy = %d", VR_sensitivity );
1473                  }
1474                         break;
1475                 case KEY_ALTED+KEY_F9:
1476                         if ( VR_render_mode != VR_NONE )        {
1477                                 VR_eye_width -= F1_0/10;
1478                                 if ( VR_eye_width < 0 ) VR_eye_width = 0;
1479                                 HUD_init_message( "Interaxial Separation = %.2f", f2fl(VR_eye_width) );
1480                                 HUD_init_message( "(The default value is %.2f)", f2fl(VR_SEPARATION) );
1481                         }
1482                         break;
1483                 case KEY_ALTED+KEY_F10:
1484                         if ( VR_render_mode != VR_NONE )        {
1485                                 VR_eye_width += F1_0/10;
1486                                 if ( VR_eye_width > F1_0*4 )    VR_eye_width = F1_0*4;
1487                                 HUD_init_message( "Interaxial Separation = %.2f", f2fl(VR_eye_width) );
1488                                 HUD_init_message( "(The default value is %.2f)", f2fl(VR_SEPARATION) );
1489                         }
1490                         break;
1491
1492                 case KEY_ALTED+KEY_F11:
1493                         if ( VR_render_mode != VR_NONE )        {
1494                                 VR_eye_offset--;
1495                                 if ( VR_eye_offset < -30 )      VR_eye_offset = -30;
1496                                 HUD_init_message( "Stereo balance = %.2f", (float)VR_eye_offset/30.0 );
1497                                 HUD_init_message( "(The default value is %.2f)", (float)VR_PIXEL_SHIFT/30.0 );
1498                                 VR_eye_offset_changed = 2;
1499                         }
1500                         break;
1501                 case KEY_ALTED+KEY_F12:
1502                         if ( VR_render_mode != VR_NONE )        {
1503                                 VR_eye_offset++;
1504                                 if ( VR_eye_offset > 30 )        VR_eye_offset = 30;
1505                                 HUD_init_message( "Stereo balance = %.2f", (float)VR_eye_offset/30.0 );
1506                                 HUD_init_message( "(The default value is %.2f)", (float)VR_PIXEL_SHIFT/30.0 );
1507                                 VR_eye_offset_changed = 2;
1508                         }
1509                         break;
1510         }
1511 }
1512
1513
1514 extern void DropFlag();
1515
1516 void HandleGameKey(int key)
1517 {
1518         switch (key) {
1519
1520                 #if defined(MACINTOSH)  && !defined(RELEASE)
1521                 case KEY_COMMAND+KEY_F: r_framerate.value = !r_framerate.value; break;
1522                 #endif
1523
1524 #ifndef D2X_KEYS // weapon selection handled in controls_read_all, d1x-style
1525 // MWA changed the weapon select cases to have each case call
1526 // do_weapon_select the macintosh keycodes aren't consecutive from 1
1527 // -- 0 on the keyboard -- boy is that STUPID!!!!
1528
1529                 //      Select primary or secondary weapon.
1530                 case KEY_1:
1531                         do_weapon_select(0 , 0);
1532                         break;
1533                 case KEY_2:
1534                         do_weapon_select(1 , 0);
1535                         break;
1536                 case KEY_3:
1537                         do_weapon_select(2 , 0);
1538                         break;
1539                 case KEY_4:
1540                         do_weapon_select(3 , 0);
1541                         break;
1542                 case KEY_5:
1543                         do_weapon_select(4 , 0);
1544                         break;
1545
1546                 case KEY_6:
1547                         do_weapon_select(0 , 1);
1548                         break;
1549                 case KEY_7:
1550                         do_weapon_select(1 , 1);
1551                         break;
1552                 case KEY_8:
1553                         do_weapon_select(2 , 1);
1554                         break;
1555                 case KEY_9:
1556                         do_weapon_select(3 , 1);
1557                         break;
1558                 case KEY_0:
1559                         do_weapon_select(4 , 1);
1560                         break;
1561 #endif
1562
1563                 case KEY_1 + KEY_SHIFTED:
1564                 case KEY_2 + KEY_SHIFTED:
1565                 case KEY_3 + KEY_SHIFTED:
1566                 case KEY_4 + KEY_SHIFTED:
1567                 case KEY_5 + KEY_SHIFTED:
1568                 case KEY_6 + KEY_SHIFTED:
1569                 case KEY_7 + KEY_SHIFTED:
1570                 case KEY_8 + KEY_SHIFTED:
1571                 case KEY_9 + KEY_SHIFTED:
1572                 case KEY_0 + KEY_SHIFTED:
1573                 if (EscortHotKeys)
1574                 {
1575                         if (!(Game_mode & GM_MULTI))
1576                                 set_escort_special_goal(key);
1577                         else
1578                                 HUD_init_message ("No Guide-Bot in Multiplayer!");
1579                         break;
1580                 }
1581
1582                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_5:)
1583                 case KEY_F5 + KEY_SHIFTED:
1584          DropCurrentWeapon();
1585                         break;
1586
1587                 MAC(case KEY_COMMAND+KEY_SHIFTED+KEY_6:)
1588                 case KEY_F6 + KEY_SHIFTED:
1589          DropSecondaryWeapon();
1590          break;
1591
1592 #ifdef NETWORK
1593                 case KEY_0 + KEY_ALTED:
1594                         DropFlag ();
1595                         break;
1596 #endif
1597
1598                 MAC(case KEY_COMMAND+KEY_4:)
1599                 case KEY_F4:
1600                 if (!DefiningMarkerMessage)
1601                   InitMarkerInput();
1602                  break;
1603
1604 #ifdef NETWORK
1605                 MAC(case KEY_COMMAND+KEY_6:)
1606                 case KEY_F6:
1607                         if (Netgame.RefusePlayers && WaitForRefuseAnswer && !(Game_mode & GM_TEAM))
1608                                 {
1609                                         RefuseThisPlayer=1;
1610                                         HUD_init_message ("Player accepted!");
1611                                 }
1612                         break;
1613                 case KEY_ALTED + KEY_1:
1614                         if (Netgame.RefusePlayers && WaitForRefuseAnswer && (Game_mode & GM_TEAM))
1615                                 {
1616                                         RefuseThisPlayer=1;
1617                                         HUD_init_message ("Player accepted!");
1618                                         RefuseTeam=1;
1619                                 }
1620                         break;
1621                 case KEY_ALTED + KEY_2:
1622                         if (Netgame.RefusePlayers && WaitForRefuseAnswer && (Game_mode & GM_TEAM))
1623                                 {
1624                                         RefuseThisPlayer=1;
1625                                         HUD_init_message ("Player accepted!");
1626                                         RefuseTeam=2;
1627                                 }
1628                         break;
1629 #endif
1630
1631                 default:
1632                         break;
1633
1634         }        //switch (key)
1635 }
1636
1637 void kill_all_robots(void)
1638 {
1639         int     i, dead_count=0;
1640         //int   boss_index = -1;
1641
1642         // Kill all bots except for Buddy bot and boss.  However, if only boss and buddy left, kill boss.
1643         for (i=0; i<=Highest_object_index; i++)
1644                 if (Objects[i].type == OBJ_ROBOT) {
1645                         if (!Robot_info[Objects[i].id].companion && !Robot_info[Objects[i].id].boss_flag) {
1646                                 dead_count++;
1647                                 Objects[i].flags |= OF_EXPLODING|OF_SHOULD_BE_DEAD;
1648                         }
1649                 }
1650
1651 // --           // Now, if more than boss and buddy left, un-kill boss.
1652 // --           if ((dead_count > 2) && (boss_index != -1)) {
1653 // --                   Objects[boss_index].flags &= ~(OF_EXPLODING|OF_SHOULD_BE_DEAD);
1654 // --                   dead_count--;
1655 // --           } else if (boss_index != -1)
1656 // --                   HUD_init_message("Toasted the BOSS!");
1657
1658         // Toast the buddy if nothing else toasted!
1659         if (dead_count == 0)
1660                 for (i=0; i<=Highest_object_index; i++)
1661                         if (Objects[i].type == OBJ_ROBOT)
1662                                 if (Robot_info[Objects[i].id].companion) {
1663                                         Objects[i].flags |= OF_EXPLODING|OF_SHOULD_BE_DEAD;
1664                                         HUD_init_message("Toasted the Buddy! *sniff*");
1665                                         dead_count++;
1666                                 }
1667
1668         HUD_init_message("%i robots toasted!", dead_count);
1669 }
1670
1671 //      --------------------------------------------------------------------------
1672 //      Detonate reactor.
1673 //      Award player all powerups in mine.
1674 //      Place player just outside exit.
1675 //      Kill all bots in mine.
1676 //      Yippee!!
1677 void kill_and_so_forth(void)
1678 {
1679         int     i, j;
1680
1681         HUD_init_message("Killing, awarding, etc.!");
1682
1683         for (i=0; i<=Highest_object_index; i++) {
1684                 switch (Objects[i].type) {
1685                         case OBJ_ROBOT:
1686                                 Objects[i].flags |= OF_EXPLODING|OF_SHOULD_BE_DEAD;
1687                                 break;
1688                         case OBJ_POWERUP:
1689                                 do_powerup(&Objects[i]);
1690                                 break;
1691                 }
1692         }
1693
1694         do_controlcen_destroyed_stuff(NULL);
1695
1696         for (i=0; i<Num_triggers; i++) {
1697                 if (Triggers[i].type == TT_EXIT) {
1698                         for (j=0; j<Num_walls; j++) {
1699                                 if (Walls[j].trigger == i) {
1700                                         compute_segment_center(&ConsoleObject->pos, &Segments[Walls[j].segnum]);
1701                                         obj_relink(ConsoleObject-Objects,Walls[j].segnum);
1702                                         goto kasf_done;
1703                                 }
1704                         }
1705                 }
1706         }
1707
1708 kasf_done: ;
1709
1710 }
1711
1712 #ifndef RELEASE
1713
1714 void kill_all_snipers(void)
1715 {
1716         int     i, dead_count=0;
1717
1718         //      Kill all snipers.
1719         for (i=0; i<=Highest_object_index; i++)
1720                 if (Objects[i].type == OBJ_ROBOT)
1721                         if (Objects[i].ctype.ai_info.behavior == AIB_SNIPE) {
1722                                 dead_count++;
1723                                 Objects[i].flags |= OF_EXPLODING|OF_SHOULD_BE_DEAD;
1724                         }
1725
1726         HUD_init_message("%i robots toasted!", dead_count);
1727 }
1728
1729 void kill_thief(void)
1730 {
1731         int     i;
1732
1733         //      Kill thief.
1734         for (i=0; i<=Highest_object_index; i++)
1735                 if (Objects[i].type == OBJ_ROBOT)
1736                         if (Robot_info[Objects[i].id].thief) {
1737                                 Objects[i].flags |= OF_EXPLODING|OF_SHOULD_BE_DEAD;
1738                                 HUD_init_message("Thief toasted!");
1739                         }
1740 }
1741
1742 void kill_buddy(void)
1743 {
1744         int     i;
1745
1746         //      Kill buddy.
1747         for (i=0; i<=Highest_object_index; i++)
1748                 if (Objects[i].type == OBJ_ROBOT)
1749                         if (Robot_info[Objects[i].id].companion) {
1750                                 Objects[i].flags |= OF_EXPLODING|OF_SHOULD_BE_DEAD;
1751                                 HUD_init_message("Buddy toasted!");
1752                         }
1753 }
1754
1755 void toggle_movie_saving(void);
1756 extern char Language[];
1757
1758 void HandleTestKey(int key)
1759 {
1760         switch (key) {
1761
1762                 case KEY_DEBUGGED+KEY_0:        show_weapon_status();   break;
1763
1764                 #ifdef SHOW_EXIT_PATH
1765                 case KEY_DEBUGGED+KEY_1:        create_special_path();  break;
1766                 #endif
1767
1768                 case KEY_DEBUGGED+KEY_Y:
1769                         do_controlcen_destroyed_stuff(NULL);
1770                         break;
1771
1772 #ifdef NETWORK
1773         case KEY_DEBUGGED+KEY_ALTED+KEY_D:
1774                         Netlife_kills=4000; Netlife_killed=5;
1775                         multi_add_lifetime_kills();
1776                         break;
1777 #endif
1778
1779                 case KEY_BACKSP:
1780                 case KEY_CTRLED+KEY_BACKSP:
1781                 case KEY_ALTED+KEY_BACKSP:
1782                 case KEY_SHIFTED+KEY_BACKSP:
1783                 case KEY_SHIFTED+KEY_ALTED+KEY_BACKSP:
1784                 case KEY_CTRLED+KEY_ALTED+KEY_BACKSP:
1785                 case KEY_SHIFTED+KEY_CTRLED+KEY_BACKSP:
1786                 case KEY_SHIFTED+KEY_CTRLED+KEY_ALTED+KEY_BACKSP:
1787
1788                                 Int3(); break;
1789
1790                 case KEY_DEBUGGED+KEY_S:                                digi_reset(); break;
1791
1792                 case KEY_DEBUGGED+KEY_P:
1793                         if (Game_suspended & SUSP_ROBOTS)
1794                                 Game_suspended &= ~SUSP_ROBOTS;         //robots move
1795                         else
1796                                 Game_suspended |= SUSP_ROBOTS;          //robots don't move
1797                         break;
1798
1799
1800
1801                 case KEY_DEBUGGED+KEY_K:        Players[Player_num].shields = 1;        break;                                                  //      a virtual kill
1802                 case KEY_DEBUGGED+KEY_SHIFTED + KEY_K:  Players[Player_num].shields = -1;        break;  //     an actual kill
1803                 case KEY_DEBUGGED+KEY_X: Players[Player_num].lives++; break; // Extra life cheat key.
1804                 case KEY_DEBUGGED+KEY_H:
1805 //                              if (!(Game_mode & GM_MULTI) )   {
1806                                 Players[Player_num].flags ^= PLAYER_FLAGS_CLOAKED;
1807                                 if (Players[Player_num].flags & PLAYER_FLAGS_CLOAKED) {
1808                                         #ifdef NETWORK
1809                                         if (Game_mode & GM_MULTI)
1810                                                 multi_send_cloak();
1811                                         #endif
1812                                         ai_do_cloak_stuff();
1813                                         Players[Player_num].cloak_time = GameTime;
1814                                         mprintf((0, "You are cloaked!\n"));
1815                                 } else
1816                                         mprintf((0, "You are DE-cloaked!\n"));
1817 //                              }
1818                         break;
1819
1820
1821                 case KEY_DEBUGGED+KEY_R:
1822                         Robot_firing_enabled = !Robot_firing_enabled;
1823                         break;
1824
1825                 case KEY_DEBUGGED+KEY_R+KEY_SHIFTED:
1826                         kill_all_robots();
1827                         break;
1828
1829                 #ifdef EDITOR           //editor-specific functions
1830
1831                 case KEY_E + KEY_DEBUGGED:
1832 #ifdef NETWORK
1833                         network_leave_game();
1834 #endif
1835                         Function_mode = FMODE_EDITOR;
1836                         break;
1837         case KEY_Q + KEY_SHIFTED + KEY_DEBUGGED:
1838                 {
1839                         char pal_save[768];
1840                         memcpy(pal_save,gr_palette,768);
1841                         init_subtitles("end.tex");      //ingore errors
1842                         PlayMovie ("end.mve",MOVIE_ABORT_ON);
1843                         close_subtitles();
1844                         Screen_mode = -1;
1845                         set_screen_mode(SCREEN_GAME);
1846                         reset_cockpit();
1847                         memcpy(gr_palette,pal_save,768);
1848                         gr_palette_load(gr_palette);
1849                         break;
1850                 }
1851                 case KEY_C + KEY_SHIFTED + KEY_DEBUGGED:
1852                         if (!( Game_mode & GM_MULTI ))
1853                                 move_player_2_segment(Cursegp,Curside);
1854                         break;   //move eye to curseg
1855
1856
1857                 case KEY_DEBUGGED+KEY_W:        draw_world_from_game(); break;
1858
1859                 #endif  //#ifdef EDITOR
1860
1861                 //flythrough keys
1862                 // case KEY_DEBUGGED+KEY_SHIFTED+KEY_F: toggle_flythrough(); break;
1863                 // case KEY_LEFT:               ft_preference=FP_LEFT; break;
1864                 // case KEY_RIGHT:                              ft_preference=FP_RIGHT; break;
1865                 // case KEY_UP:         ft_preference=FP_UP; break;
1866                 // case KEY_DOWN:               ft_preference=FP_DOWN; break;
1867
1868 #ifndef NDEBUG
1869                 case KEY_DEBUGGED+KEY_LAPOSTRO: Show_view_text_timer = 0x30000; object_goto_next_viewer(); break;
1870                 case KEY_DEBUGGED+KEY_CTRLED+KEY_LAPOSTRO: Show_view_text_timer = 0x30000; object_goto_prev_viewer(); break;
1871 #endif
1872                 case KEY_DEBUGGED+KEY_SHIFTED+KEY_LAPOSTRO: Viewer=ConsoleObject; break;
1873
1874         #ifndef NDEBUG
1875                 case KEY_DEBUGGED+KEY_O: toggle_outline_mode(); break;
1876         #endif
1877                 case KEY_DEBUGGED+KEY_T:
1878                         *Toggle_var = !*Toggle_var;
1879                         mprintf((0, "Variable at %08x set to %i\n", Toggle_var, *Toggle_var));
1880                         break;
1881                 case KEY_DEBUGGED + KEY_L:
1882                         if (++Lighting_on >= 2) Lighting_on = 0; break;
1883                 case KEY_DEBUGGED + KEY_SHIFTED + KEY_L:
1884                         Beam_brightness=0x38000-Beam_brightness; break;
1885                 case KEY_PAD5: slew_stop(); break;
1886
1887 #ifndef NDEBUG
1888                 case KEY_DEBUGGED + KEY_F11: play_test_sound(); break;
1889                 case KEY_DEBUGGED + KEY_SHIFTED+KEY_F11: advance_sound(); play_test_sound(); break;
1890 #endif
1891
1892                 case KEY_DEBUGGED +KEY_F4: {
1893                         //fvi_info hit_data;
1894                         //vms_vector p0 = {-0x1d99a7,-0x1b20000,0x186ab7f};
1895                         //vms_vector p1 = {-0x217865,-0x1b20000,0x187de3e};
1896                         //find_vector_intersection(&hit_data,&p0,0x1b9,&p1,0x40000,0x0,NULL,-1);
1897                         break;
1898                 }
1899
1900                 case KEY_DEBUGGED + KEY_M:
1901                         Debug_spew = !Debug_spew;
1902                         if (Debug_spew) {
1903                                 mopen( 0, 8, 1, 78, 16, "Debug Spew");
1904                                 HUD_init_message( "Debug Spew: ON" );
1905                         } else {
1906                                 mclose( 0 );
1907                                 HUD_init_message( "Debug Spew: OFF" );
1908                         }
1909                         break;
1910
1911                 case KEY_DEBUGGED + KEY_C:
1912
1913                         full_palette_save();
1914                         do_cheat_menu();
1915                         palette_restore();
1916                         break;
1917                 case KEY_DEBUGGED + KEY_SHIFTED + KEY_A:
1918                         do_megawow_powerup(10);
1919                         break;
1920                 case KEY_DEBUGGED + KEY_A:      {
1921                         do_megawow_powerup(200);
1922 //                                                              if ( Game_mode & GM_MULTI )     {
1923 //                                                                      nm_messagebox( NULL, 1, "Damn", "CHEATER!\nYou cannot use the\nmega-thing in network mode." );
1924 //                                                                      Network_message_reciever = 100;         // Send to everyone...
1925 //                                                                      sprintf( Network_message, "%s cheated!", Players[Player_num].callsign);
1926 //                                                              } else {
1927 //                                                                      do_megawow_powerup();
1928 //                                                              }
1929                                                 break;
1930                 }
1931
1932                 case KEY_DEBUGGED+KEY_F:        r_framerate.value = !r_framerate.value; break;
1933
1934                 case KEY_DEBUGGED+KEY_SPACEBAR:         //KEY_F7:                               // Toggle physics flying
1935                         slew_stop();
1936                         game_flush_inputs();
1937                         if ( ConsoleObject->control_type != CT_FLYING ) {
1938                                 fly_init(ConsoleObject);
1939                                 Game_suspended &= ~SUSP_ROBOTS; //robots move
1940                         } else {
1941                                 slew_init(ConsoleObject);                       //start player slewing
1942                                 Game_suspended |= SUSP_ROBOTS;  //robots don't move
1943                         }
1944                         break;
1945
1946                 case KEY_DEBUGGED+KEY_COMMA: Render_zoom = fixmul(Render_zoom,62259); break;
1947                 case KEY_DEBUGGED+KEY_PERIOD: Render_zoom = fixmul(Render_zoom,68985); break;
1948
1949                 case KEY_DEBUGGED+KEY_P+KEY_SHIFTED: Debug_pause = 1; break;
1950
1951                 //case KEY_F7: {
1952                 //      char mystr[30];
1953                 //      sprintf(mystr,"mark %i start",Mark_count);
1954                 //      _MARK_(mystr);
1955                 //      break;
1956                 //}
1957                 //case KEY_SHIFTED+KEY_F7: {
1958                 //      char mystr[30];
1959                 //      sprintf(mystr,"mark %i end",Mark_count);
1960                 //      Mark_count++;
1961                 //      _MARK_(mystr);
1962                 //      break;
1963                 //}
1964
1965
1966                 #ifndef NDEBUG
1967                 case KEY_DEBUGGED+KEY_F8: speedtest_init(); Speedtest_count = 1;         break;
1968                 case KEY_DEBUGGED+KEY_F9: speedtest_init(); Speedtest_count = 10;        break;
1969
1970                 case KEY_DEBUGGED+KEY_D:
1971                         if ((Game_double_buffer = !Game_double_buffer)!=0)
1972                                 init_cockpit();
1973                         break;
1974                 #endif
1975
1976                 #ifdef EDITOR
1977                 case KEY_DEBUGGED+KEY_Q:
1978                         stop_time();
1979                         dump_used_textures_all();
1980                         start_time();
1981                         break;
1982                 #endif
1983
1984                 case KEY_DEBUGGED+KEY_B: {
1985                         newmenu_item m;
1986                         char text[FILENAME_LEN]="";
1987                         int item;
1988                         m.type=NM_TYPE_INPUT; m.text_len = FILENAME_LEN; m.text = text;
1989                         item = newmenu_do( NULL, "Briefing to play?", 1, &m, NULL );
1990                         if (item != -1) {
1991                                 do_briefing_screens(text,1);
1992                                 reset_cockpit();
1993                         }
1994                         break;
1995                 }
1996
1997                 case KEY_DEBUGGED+KEY_F5:
1998                         toggle_movie_saving();
1999                         break;
2000
2001                 case KEY_DEBUGGED+KEY_SHIFTED+KEY_F5: {
2002                         extern int Movie_fixed_frametime;
2003                         Movie_fixed_frametime = !Movie_fixed_frametime;
2004                         break;
2005                 }
2006
2007                 case KEY_DEBUGGED+KEY_ALTED+KEY_F5:
2008                         GameTime = i2f(0x7fff - 840);           //will overflow in 14 minutes
2009                         mprintf((0,"GameTime bashed to %d secs\n",f2i(GameTime)));
2010                         break;
2011
2012                 case KEY_DEBUGGED+KEY_SHIFTED+KEY_B:
2013                         kill_and_so_forth();
2014                         break;
2015         }
2016 }
2017 #endif          //#ifndef RELEASE
2018
2019 //      Cheat functions ------------------------------------------------------------
2020 extern char *jcrypt (char *);
2021
2022 char *LamerCheats[]={   "!UyN#E$I",     // gabba-gabbahey
2023                                                                 "ei5cQ-ZQ", // mo-therlode
2024                                                                 "q^EpZxs8", // c-urrygoat
2025                                                                 "mxk(DyyP", // zi-ngermans
2026                                                                 "cBo#@y@P", // ea-tangelos
2027                                                                 "CLygLBGQ", // e-ricaanne
2028                                                                 "xAnHQxZX", // jos-huaakira
2029                                                                 "cKc[KUWo", // wh-ammazoom
2030                                                         };
2031
2032 #define N_LAMER_CHEATS (sizeof(LamerCheats) / sizeof(*LamerCheats))
2033
2034 char *WowieCheat        ="F_JMO3CV";    //only Matt knows / h-onestbob
2035 char *AllKeysCheat      ="%v%MrgbU";    //only Matt knows / or-algroove
2036 char *InvulCheat        ="Wv_\\JJ\\Z";  //only Matt knows / almighty
2037 char *HomingCheatString ="t\\LIhSB[";   //only Matt knows / l-pnlizard
2038 char *BouncyCheat       ="bGbiChQJ";    //only Matt knows / duddaboo
2039 char *FullMapCheat      ="PI<XQHRI";    //only Matt knows / rockrgrl
2040 char *LevelWarpCheat    ="ZQHtqbb\"";   //only Matt knows / f-reespace
2041 char *MonsterCheat      ="nfpEfRQp";    //only Matt knows / godzilla
2042 char *BuddyLifeCheat    ="%A-BECuY";    //only Matt knows / he-lpvishnu
2043 char *BuddyDudeCheat    ="u#uzIr%e";    //only Matt knows / g-owingnut
2044 char *KillRobotsCheat   ="&wxbs:5O";    //only Matt knows / spaniard
2045 char *FinishLevelCheat  ="%bG_bZ<D";    //only Matt knows / d-elshiftb
2046 char *RapidFireCheat    ="*jLgHi'J";    //only Matt knows / wildfire
2047
2048 char *RobotsKillRobotsCheat ="rT6xD__S"; // New for 1.1 / silkwing
2049 char *AhimsaCheat       ="!Uscq_yc";    // New for 1.1 / im-agespace
2050
2051 char *AccessoryCheat    ="dWdz[kCK";    // al-ifalafel
2052 char *JohnHeadCheat     ="ou]];H:%";    // p-igfarmer
2053 char *AcidCheat         ="qPmwxz\"S";   // bit-tersweet
2054 char *FramerateCheat    ="rQ60#ZBN";    // f-rametime
2055
2056 char CheatBuffer[]="AAAAAAAAAAAAAAA";
2057
2058 #define CHEATSPOT 14
2059 #define CHEATEND 15
2060
2061 void do_cheat_penalty ()
2062  {
2063   digi_play_sample( SOUND_CHEATER, F1_0);
2064   Cheats_enabled=1;
2065   Players[Player_num].score=0;
2066  }
2067
2068
2069 //      Main Cheat function
2070
2071 char BounceCheat=0;
2072 char HomingCheat=0;
2073 char john_head_on=0;
2074 char AcidCheatOn=0;
2075 char old_IntMethod;
2076 char OldHomingState[20];
2077 extern char Monster_mode;
2078
2079 void fill_background();
2080 void load_background_bitmap();
2081
2082 extern int Robots_kill_robots_cheat;
2083
2084 void FinalCheats(int key)
2085 {
2086   int i;
2087   char *cryptstring;
2088
2089   key=key_to_ascii(key);
2090
2091   for (i=0;i<15;i++)
2092    CheatBuffer[i]=CheatBuffer[i+1];
2093
2094   CheatBuffer[CHEATSPOT]=key;
2095
2096   cryptstring=jcrypt(&CheatBuffer[7]);
2097
2098         for (i=0;i<N_LAMER_CHEATS;i++)
2099           if (!(strcmp (cryptstring,LamerCheats[i])))
2100                         {
2101                                  do_cheat_penalty();
2102                                  Players[Player_num].shields=i2f(1);
2103                                  Players[Player_num].energy=i2f(1);
2104 #ifdef NETWORK
2105                   if (Game_mode & GM_MULTI)
2106                         {
2107                          Network_message_reciever = 100;                // Send to everyone...
2108                                 sprintf( Network_message, "%s is crippled...get him!",Players[Player_num].callsign);
2109                         }
2110 #endif
2111                         HUD_init_message ("Take that...cheater!");
2112                 }
2113
2114   if (!(strcmp (cryptstring,JohnHeadCheat)))
2115                 {
2116                                 john_head_on = !john_head_on;
2117                                 load_background_bitmap();
2118                                 fill_background();
2119                                 HUD_init_message (john_head_on?"Hi John!!":"Bye John!!");
2120                 }
2121   if (!(strcmp (cryptstring,AcidCheat)))
2122                 {
2123                                 if (AcidCheatOn)
2124                                 {
2125                                  AcidCheatOn=0;
2126                                  Interpolation_method=old_IntMethod;
2127                                  HUD_init_message ("Coming down...");
2128                                 }
2129                                 else
2130                                 {
2131                                  AcidCheatOn=1;
2132                                  old_IntMethod=Interpolation_method;
2133                                  Interpolation_method=1;
2134                                  HUD_init_message ("Going up!");
2135                                 }
2136
2137                 }
2138
2139   if (!(strcmp (cryptstring,FramerateCheat)))
2140                 {
2141                         r_framerate.value = !r_framerate.value;
2142                 }
2143
2144   if (Game_mode & GM_MULTI)
2145    return;
2146
2147   if (!(strcmp (&CheatBuffer[8],"blueorb")))
2148    {
2149                 if (Players[Player_num].shields < MAX_SHIELDS) {
2150                         fix boost = 3*F1_0 + 3*F1_0*(NDL - Difficulty_level);
2151                         if (Difficulty_level == 0)
2152                                 boost += boost/2;
2153                         Players[Player_num].shields += boost;
2154                         if (Players[Player_num].shields > MAX_SHIELDS)
2155                                 Players[Player_num].shields = MAX_SHIELDS;
2156                         powerup_basic(0, 0, 15, SHIELD_SCORE, "%s %s %d",TXT_SHIELD,TXT_BOOSTED_TO,f2ir(Players[Player_num].shields));
2157                         do_cheat_penalty();
2158                 } else
2159                         HUD_init_message(TXT_MAXED_OUT,TXT_SHIELD);
2160    }
2161
2162   if (!(strcmp(cryptstring,BuddyLifeCheat)))
2163    {
2164          do_cheat_penalty();
2165          HUD_init_message ("What's this? Another buddy bot!");
2166          create_buddy_bot();
2167    }
2168
2169
2170   if (!(strcmp(cryptstring,BuddyDudeCheat)))
2171    {
2172          do_cheat_penalty();
2173          Buddy_dude_cheat = !Buddy_dude_cheat;
2174          if (Buddy_dude_cheat) {
2175                 HUD_init_message ("%s gets angry!",guidebot_name);
2176                 strcpy(guidebot_name,"Wingnut");
2177          }
2178          else {
2179                 strcpy(guidebot_name,real_guidebot_name);
2180                 HUD_init_message ("%s calms down",guidebot_name);
2181          }
2182   }
2183
2184
2185   if (!(strcmp(cryptstring,MonsterCheat)))
2186    {
2187     Monster_mode=1-Monster_mode;
2188          do_cheat_penalty();
2189          HUD_init_message (Monster_mode?"Oh no, there goes Tokyo!":"What have you done, I'm shrinking!!");
2190    }
2191
2192
2193   if (!(strcmp (cryptstring,BouncyCheat)))
2194         {
2195                 do_cheat_penalty();
2196                 HUD_init_message ("Bouncing weapons!");
2197                 BounceCheat=1;
2198         }
2199
2200         if (!(strcmp(cryptstring,LevelWarpCheat)))
2201          {
2202                 newmenu_item m;
2203                 char text[10]="";
2204                 int new_level_num;
2205                 int item;
2206                 //digi_play_sample( SOUND_CHEATER, F1_0);
2207                 m.type=NM_TYPE_INPUT; m.text_len = 10; m.text = text;
2208                 item = newmenu_do( NULL, TXT_WARP_TO_LEVEL, 1, &m, NULL );
2209                 if (item != -1) {
2210                         new_level_num = atoi(m.text);
2211                         if (new_level_num!=0 && new_level_num>=0 && new_level_num<=Last_level) {
2212                                 StartNewLevel(new_level_num, 0);
2213                                 do_cheat_penalty();
2214                         }
2215                 }
2216          }
2217
2218   if (!(strcmp (cryptstring,WowieCheat)))
2219         {
2220
2221                                 HUD_init_message(TXT_WOWIE_ZOWIE);
2222                 do_cheat_penalty();
2223
2224                         if (Piggy_hamfile_version < 3) // SHAREWARE
2225                         {
2226                                 Players[Player_num].primary_weapon_flags = ~((1<<PHOENIX_INDEX) | (1<<OMEGA_INDEX) | (1<<FUSION_INDEX) | HAS_FLAG(SUPER_LASER_INDEX));
2227                                 Players[Player_num].secondary_weapon_flags = ~((1<<SMISSILE4_INDEX) | (1<<MEGA_INDEX) | (1<<SMISSILE5_INDEX));
2228                         }
2229                         else
2230                         {
2231                                 Players[Player_num].primary_weapon_flags = 0xffff ^ HAS_FLAG(SUPER_LASER_INDEX);                //no super laser
2232                                 Players[Player_num].secondary_weapon_flags = 0xffff;
2233                         }
2234
2235                         for (i=0; i<MAX_PRIMARY_WEAPONS; i++)
2236                                         Players[Player_num].primary_ammo[i] = Primary_ammo_max[i];
2237
2238                                 for (i=0; i<MAX_SECONDARY_WEAPONS; i++)
2239                                         Players[Player_num].secondary_ammo[i] = Secondary_ammo_max[i];
2240
2241                                 if (Piggy_hamfile_version < 3) // SHAREWARE
2242                                 {
2243                                         Players[Player_num].secondary_ammo[SMISSILE4_INDEX] = 0;
2244                                         Players[Player_num].secondary_ammo[SMISSILE5_INDEX] = 0;
2245                                         Players[Player_num].secondary_ammo[MEGA_INDEX] = 0;
2246                                 }
2247
2248                                 if (Game_mode & GM_HOARD)
2249                                         Players[Player_num].secondary_ammo[PROXIMITY_INDEX] = 12;
2250
2251                                 if (Newdemo_state == ND_STATE_RECORDING)
2252                                         newdemo_record_laser_level(Players[Player_num].laser_level, MAX_LASER_LEVEL);
2253
2254                                 Players[Player_num].energy = MAX_ENERGY;
2255                                 Players[Player_num].laser_level = MAX_SUPER_LASER_LEVEL;
2256                                 Players[Player_num].flags |= PLAYER_FLAGS_QUAD_LASERS;
2257                                 update_laser_weapon_info();
2258         }
2259
2260
2261   if (!(strcmp (cryptstring,AllKeysCheat)))
2262         {
2263                 do_cheat_penalty();
2264                                 HUD_init_message(TXT_ALL_KEYS);
2265                                 Players[Player_num].flags |= PLAYER_FLAGS_BLUE_KEY | PLAYER_FLAGS_RED_KEY | PLAYER_FLAGS_GOLD_KEY;
2266         }
2267
2268
2269   if (!(strcmp (cryptstring,InvulCheat)))
2270                 {
2271                 do_cheat_penalty();
2272                                 Players[Player_num].flags ^= PLAYER_FLAGS_INVULNERABLE;
2273                                 HUD_init_message("%s %s!", TXT_INVULNERABILITY, (Players[Player_num].flags&PLAYER_FLAGS_INVULNERABLE)?TXT_ON:TXT_OFF);
2274                                 Players[Player_num].invulnerable_time = GameTime+i2f(1000);
2275                 }
2276   if (!(strcmp (cryptstring,AccessoryCheat)))
2277                 {
2278                                 do_cheat_penalty();
2279                                 Players[Player_num].flags |=PLAYER_FLAGS_HEADLIGHT;
2280                                 Players[Player_num].flags |=PLAYER_FLAGS_AFTERBURNER;
2281                                 Players[Player_num].flags |=PLAYER_FLAGS_AMMO_RACK;
2282                                 Players[Player_num].flags |=PLAYER_FLAGS_CONVERTER;
2283
2284                                 HUD_init_message ("Accessories!!");
2285                 }
2286   if (!(strcmp (cryptstring,FullMapCheat)))
2287                 {
2288                                 do_cheat_penalty();
2289                                 Players[Player_num].flags |=PLAYER_FLAGS_MAP_ALL;
2290
2291                                 HUD_init_message ("Full Map!!");
2292                 }
2293
2294
2295   if (!(strcmp (cryptstring,HomingCheatString)))
2296                 {
2297                         if (!HomingCheat) {
2298                                 do_cheat_penalty();
2299                                 HomingCheat=1;
2300                                 for (i=0;i<20;i++)
2301                                  {
2302                                   OldHomingState[i]=Weapon_info[i].homing_flag;
2303                                   Weapon_info[i].homing_flag=1;
2304                                  }
2305                                 HUD_init_message ("Homing weapons!");
2306                         }
2307                 }
2308
2309   if (!(strcmp (cryptstring,KillRobotsCheat)))
2310                 {
2311                                 do_cheat_penalty();
2312                                 kill_all_robots();
2313                 }
2314
2315   if (!(strcmp (cryptstring,FinishLevelCheat)))
2316                 {
2317                                 do_cheat_penalty();
2318                                 kill_and_so_forth();
2319                 }
2320
2321         if (!(strcmp (cryptstring,RobotsKillRobotsCheat))) {
2322                 Robots_kill_robots_cheat = !Robots_kill_robots_cheat;
2323                 if (Robots_kill_robots_cheat) {
2324                         HUD_init_message ("Rabid robots!");
2325                         do_cheat_penalty();
2326                 }
2327                 else
2328                         HUD_init_message ("Kill the player!");
2329         }
2330
2331         if (!(strcmp (cryptstring,AhimsaCheat))) {
2332                 Robot_firing_enabled = !Robot_firing_enabled;
2333                 if (!Robot_firing_enabled) {
2334                         HUD_init_message("%s", "Robot firing OFF!");
2335                         do_cheat_penalty();
2336                 }
2337                 else
2338                         HUD_init_message("%s", "Robot firing ON!");
2339         }
2340
2341         if (!(strcmp (cryptstring,RapidFireCheat))) {
2342                 if (Laser_rapid_fire) {
2343                         Laser_rapid_fire = 0;
2344                         HUD_init_message("%s", "Rapid fire OFF!");
2345                 }
2346                 else {
2347                         Laser_rapid_fire = 0xbada55;
2348                         do_cheat_penalty();
2349                         HUD_init_message("%s", "Rapid fire ON!");
2350                 }
2351         }
2352
2353 }
2354
2355
2356 // Internal Cheat Menu
2357 #ifndef RELEASE
2358 void do_cheat_menu()
2359 {
2360         int mmn;
2361         newmenu_item mm[16];
2362         char score_text[21];
2363
2364         sprintf( score_text, "%d", Players[Player_num].score );
2365
2366         mm[0].type=NM_TYPE_CHECK; mm[0].value=Players[Player_num].flags & PLAYER_FLAGS_INVULNERABLE; mm[0].text="Invulnerability";
2367         mm[1].type=NM_TYPE_CHECK; mm[1].value=Players[Player_num].flags & PLAYER_FLAGS_CLOAKED; mm[1].text="Cloaked";
2368         mm[2].type=NM_TYPE_CHECK; mm[2].value=0; mm[2].text="All keys";
2369         mm[3].type=NM_TYPE_NUMBER; mm[3].value=f2i(Players[Player_num].energy); mm[3].text="% Energy"; mm[3].min_value=0; mm[3].max_value=200;
2370         mm[4].type=NM_TYPE_NUMBER; mm[4].value=f2i(Players[Player_num].shields); mm[4].text="% Shields"; mm[4].min_value=0; mm[4].max_value=200;
2371         mm[5].type=NM_TYPE_TEXT; mm[5].text = "Score:";
2372         mm[6].type=NM_TYPE_INPUT; mm[6].text_len = 10; mm[6].text = score_text;
2373         //mm[7].type=NM_TYPE_RADIO; mm[7].value=(Players[Player_num].laser_level==0); mm[7].group=0; mm[7].text="Laser level 1";
2374         //mm[8].type=NM_TYPE_RADIO; mm[8].value=(Players[Player_num].laser_level==1); mm[8].group=0; mm[8].text="Laser level 2";
2375         //mm[9].type=NM_TYPE_RADIO; mm[9].value=(Players[Player_num].laser_level==2); mm[9].group=0; mm[9].text="Laser level 3";
2376         //mm[10].type=NM_TYPE_RADIO; mm[10].value=(Players[Player_num].laser_level==3); mm[10].group=0; mm[10].text="Laser level 4";
2377
2378         mm[7].type=NM_TYPE_NUMBER; mm[7].value=Players[Player_num].laser_level+1; mm[7].text="Laser Level"; mm[7].min_value=0; mm[7].max_value=MAX_SUPER_LASER_LEVEL+1;
2379         mm[8].type=NM_TYPE_NUMBER; mm[8].value=Players[Player_num].secondary_ammo[CONCUSSION_INDEX]; mm[8].text="Missiles"; mm[8].min_value=0; mm[8].max_value=200;
2380
2381         mmn = newmenu_do("Wimp Menu",NULL,9, mm, NULL );
2382
2383         if (mmn > -1 )  {
2384                 if ( mm[0].value )  {
2385                         Players[Player_num].flags |= PLAYER_FLAGS_INVULNERABLE;
2386                         Players[Player_num].invulnerable_time = GameTime+i2f(1000);
2387                 } else
2388                         Players[Player_num].flags &= ~PLAYER_FLAGS_INVULNERABLE;
2389                 if ( mm[1].value ) {
2390                         Players[Player_num].flags |= PLAYER_FLAGS_CLOAKED;
2391                         #ifdef NETWORK
2392                         if (Game_mode & GM_MULTI)
2393                                 multi_send_cloak();
2394                         #endif
2395                         ai_do_cloak_stuff();
2396                         Players[Player_num].cloak_time = GameTime;
2397                 }
2398                 else
2399                         Players[Player_num].flags &= ~PLAYER_FLAGS_CLOAKED;
2400
2401                 if (mm[2].value) Players[Player_num].flags |= PLAYER_FLAGS_BLUE_KEY | PLAYER_FLAGS_RED_KEY | PLAYER_FLAGS_GOLD_KEY;
2402                 Players[Player_num].energy=i2f(mm[3].value);
2403                 Players[Player_num].shields=i2f(mm[4].value);
2404                 Players[Player_num].score = atoi(mm[6].text);
2405                 //if (mm[7].value) Players[Player_num].laser_level=0;
2406                 //if (mm[8].value) Players[Player_num].laser_level=1;
2407                 //if (mm[9].value) Players[Player_num].laser_level=2;
2408                 //if (mm[10].value) Players[Player_num].laser_level=3;
2409                 Players[Player_num].laser_level = mm[7].value-1;
2410                 Players[Player_num].secondary_ammo[CONCUSSION_INDEX] = mm[8].value;
2411                 init_gauges();
2412         }
2413 }
2414 #endif
2415
2416
2417
2418 //      Testing functions ----------------------------------------------------------
2419
2420 #ifndef NDEBUG
2421 void speedtest_init(void)
2422 {
2423         Speedtest_start_time = timer_get_fixed_seconds();
2424         Speedtest_on = 1;
2425         Speedtest_segnum = 0;
2426         Speedtest_sidenum = 0;
2427         Speedtest_frame_start = FrameCount;
2428
2429         mprintf((0, "Starting speedtest.  Will be %i frames.  Each . = 10 frames.\n", Highest_segment_index+1));
2430 }
2431
2432 void speedtest_frame(void)
2433 {
2434         vms_vector      view_dir, center_point;
2435
2436         Speedtest_sidenum=Speedtest_segnum % MAX_SIDES_PER_SEGMENT;
2437
2438         compute_segment_center(&Viewer->pos, &Segments[Speedtest_segnum]);
2439         Viewer->pos.x += 0x10;          Viewer->pos.y -= 0x10;          Viewer->pos.z += 0x17;
2440
2441         obj_relink(Viewer-Objects, Speedtest_segnum);
2442         compute_center_point_on_side(&center_point, &Segments[Speedtest_segnum], Speedtest_sidenum);
2443         vm_vec_normalized_dir_quick(&view_dir, &center_point, &Viewer->pos);
2444         vm_vector_2_matrix(&Viewer->orient, &view_dir, NULL, NULL);
2445
2446         if (((FrameCount - Speedtest_frame_start) % 10) == 0)
2447                 mprintf((0, "."));
2448
2449         Speedtest_segnum++;
2450
2451         if (Speedtest_segnum > Highest_segment_index) {
2452                 char    msg[128];
2453
2454                 sprintf(msg, "\nSpeedtest done:  %i frames, %7.3f seconds, %7.3f frames/second.\n",
2455                         FrameCount-Speedtest_frame_start,
2456                         f2fl(timer_get_fixed_seconds() - Speedtest_start_time),
2457                         (float) (FrameCount-Speedtest_frame_start) / f2fl(timer_get_fixed_seconds() - Speedtest_start_time));
2458
2459                 mprintf((0, "%s", msg));
2460                 HUD_init_message(msg);
2461
2462                 Speedtest_count--;
2463                 if (Speedtest_count == 0)
2464                         Speedtest_on = 0;
2465                 else
2466                         speedtest_init();
2467         }
2468
2469 }
2470
2471
2472 //      Sounds for testing
2473
2474 int test_sound_num = 0;
2475 int sound_nums[] = {10,11,20,21,30,31,32,33,40,41,50,51,60,61,62,70,80,81,82,83,90,91};
2476
2477 #define N_TEST_SOUNDS (sizeof(sound_nums) / sizeof(*sound_nums))
2478
2479
2480 void advance_sound()
2481 {
2482         if (++test_sound_num == N_TEST_SOUNDS)
2483                 test_sound_num=0;
2484
2485 }
2486
2487
2488 int     Test_sound = 251;
2489
2490 void play_test_sound()
2491 {
2492
2493         // -- digi_play_sample(sound_nums[test_sound_num], F1_0);
2494         digi_play_sample(Test_sound, F1_0);
2495 }
2496
2497 #endif  //ifndef NDEBUG
2498
2499
2500
2501
2502
2503 void ReadControls()
2504 {
2505         int key;
2506         fix key_time;
2507         static ubyte exploding_flag=0;
2508
2509         Player_fired_laser_this_frame=-1;
2510
2511         if (!Endlevel_sequence) // && !Player_is_dead  //this was taken out of the if statement by WraithX
2512         {
2513
2514                         if ( (Newdemo_state == ND_STATE_PLAYBACK) || (DefiningMarkerMessage)
2515                                 #ifdef NETWORK
2516                                 || multi_sending_message || multi_defining_message
2517                                 #endif
2518                                 )        // WATCH OUT!!! WEIRD CODE ABOVE!!!
2519                                 memset( &Controls, 0, sizeof(control_info) );
2520                         else
2521                                 #ifdef WINDOWS
2522                                         controls_read_all_win();
2523                                 #else
2524                                         controls_read_all();            //NOTE LINK TO ABOVE!!!
2525                                 #endif
2526
2527                 check_rear_view();
2528
2529                 //      If automap key pressed, enable automap unless you are in network mode, control center destroyed and < 10 seconds left
2530                 if ( Controls.automap_down_count && !((Game_mode & GM_MULTI) && Control_center_destroyed && (Countdown_seconds_left < 10)))
2531                         Automap_flag = 1;
2532
2533                 do_weapon_stuff();
2534
2535         }
2536
2537         if (Player_exploded) { //Player_is_dead && (ConsoleObject->flags & OF_EXPLODING) ) {
2538
2539                 if (exploding_flag==0)  {
2540                         exploding_flag = 1;                     // When player starts exploding, clear all input devices...
2541                         game_flush_inputs();
2542                 } else {
2543                         int i;
2544                         //if (key_down_count(KEY_BACKSP))
2545                         //      Int3();
2546                         //if (key_down_count(KEY_PRINT_SCREEN))
2547                         //      save_screen_shot(0);
2548
2549 #ifndef MACINTOSH
2550                         for (i = 0; i < 4; i++)
2551                                 // the following "if" added by WraithX, 4/17/00
2552                                 if (isJoyRotationKey(i) != 1)
2553                                 {
2554                                         if (joy_get_button_down_cnt(i) > 0)
2555                                                 Death_sequence_aborted = 1;
2556                                 }// end "if" added by WraithX
2557 #else
2558                         if (joy_get_any_button_down_cnt() > 0)
2559                                 Death_sequence_aborted = 1;
2560 #endif
2561                         for (i = 0; i < 3; i++)
2562                                 // the following "if" added by WraithX, 4/17/00
2563                                 if (isMouseRotationKey(i) != 1)
2564                                 {
2565                                         if (mouse_button_down_count(i) > 0)
2566                                                 Death_sequence_aborted = 1;
2567                                 }// end "if" added by WraithX
2568
2569                         //for (i = 0; i < 256; i++)
2570                         //      // the following "if" added by WraithX, 4/17/00
2571                         //      if (isKeyboardRotationKey(i) != 1)
2572                         //      {
2573                         //              if (!key_isfunc(i) && !key_ismod(i) && key_down_count(i) > 0)
2574                         //                      Death_sequence_aborted = 1;
2575                         //      }// end "if" added by WraithX
2576
2577                         if (Death_sequence_aborted)
2578                                 game_flush_inputs();
2579                 }
2580         } else {
2581                 exploding_flag=0;
2582         }
2583
2584         if (Newdemo_state == ND_STATE_PLAYBACK )
2585                 update_vcr_state();
2586
2587         while ((key=key_inkey_time(&key_time)) != 0)    {
2588
2589                 if (DefiningMarkerMessage)
2590                  {
2591                         MarkerInputMessage (key);
2592                         continue;
2593                  }
2594
2595                 #ifdef NETWORK
2596                 if ( (Game_mode&GM_MULTI) && (multi_sending_message || multi_defining_message ))        {
2597                         multi_message_input_sub( key );
2598                         continue;               //get next key
2599                 }
2600                 #endif
2601
2602                 #ifndef RELEASE
2603                 #ifdef NETWORK
2604                 if ((key&KEY_DEBUGGED)&&(Game_mode&GM_MULTI))   {
2605                         Network_message_reciever = 100;         // Send to everyone...
2606                         sprintf( Network_message, "%s %s", TXT_I_AM_A, TXT_CHEATER);
2607                 }
2608                 #endif
2609                 #endif
2610
2611 #ifdef CONSOLE
2612                 if(!con_events(key))
2613                         continue;
2614 #endif
2615
2616                 if (Player_is_dead)
2617                         HandleDeathKey(key);
2618
2619                 if (Endlevel_sequence)
2620                         HandleEndlevelKey(key);
2621                 else if (Newdemo_state == ND_STATE_PLAYBACK ) {
2622                         HandleDemoKey(key);
2623
2624                         #ifndef RELEASE
2625                         HandleTestKey(key);
2626                         #endif
2627                 } else {
2628                         FinalCheats(key);
2629
2630                         HandleSystemKey(key);
2631                         HandleVRKey(key);
2632                         HandleGameKey(key);
2633
2634                         #ifndef RELEASE
2635                         HandleTestKey(key);
2636                         #endif
2637                 }
2638         }
2639
2640
2641 //      if ((Players[Player_num].flags & PLAYER_FLAGS_CONVERTER) && keyd_pressed[KEY_F8] && (keyd_pressed[KEY_LALT] || keyd_pressed[KEY_RALT]))
2642   //            transfer_energy_to_shield(key_down_time(KEY_F8));
2643 }
2644