--- /dev/null
+////////////////////////////////////////////////////////////////////\r
+//\r
+// WL_MENU.C\r
+// by John Romero (C) 1992 Id Software, Inc.\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+#include "wl_def.h"\r
+#pragma hdrstop\r
+\r
+//\r
+// PRIVATE PROTOTYPES\r
+//\r
+void CP_ReadThis(void);\r
+\r
+#ifdef SPEAR\r
+#define STARTITEM newgame\r
+\r
+#else\r
+#ifdef GOODTIMES\r
+#define STARTITEM newgame\r
+\r
+#else\r
+#define STARTITEM readthis\r
+#endif\r
+#endif\r
+\r
+char far endStrings[9][80]=\r
+{\r
+#ifndef SPEAR\r
+ {"Dost thou wish to\nleave with such hasty\nabandon?"},\r
+ {"Chickening out...\nalready?"},\r
+ {"Press N for more carnage.\nPress Y to be a weenie."},\r
+ {"So, you think you can\nquit this easily, huh?"},\r
+ {"Press N to save the world.\nPress Y to abandon it in\nits hour of need."},\r
+ {"Press N if you are brave.\nPress Y to cower in shame."},\r
+ {"Heroes, press N.\nWimps, press Y."},\r
+ {"You are at an intersection.\nA sign says, 'Press Y to quit.'\n>"},\r
+ {"For guns and glory, press N.\nFor work and worry, press Y."}\r
+#else\r
+ ENDSTR1,\r
+ ENDSTR2,\r
+ ENDSTR3,\r
+ ENDSTR4,\r
+ ENDSTR5,\r
+ ENDSTR6,\r
+ ENDSTR7,\r
+ ENDSTR8,\r
+ ENDSTR9\r
+#endif\r
+};\r
+\r
+CP_iteminfo\r
+ MainItems={MENU_X,MENU_Y,10,STARTITEM,24},\r
+ SndItems={SM_X,SM_Y1,12,0,52},\r
+ LSItems={LSM_X,LSM_Y,10,0,24},\r
+ CtlItems={CTL_X,CTL_Y,6,-1,56},\r
+ CusItems={8,CST_Y+13*2,9,-1,0},\r
+ NewEitems={NE_X,NE_Y,11,0,88},\r
+ NewItems={NM_X,NM_Y,4,2,24};\r
+\r
+#pragma warn -sus\r
+CP_itemtype far\r
+MainMenu[]=\r
+{\r
+#ifdef JAPAN\r
+ {1,"",CP_NewGame},\r
+ {1,"",CP_Sound},\r
+ {1,"",CP_Control},\r
+ {1,"",CP_LoadGame},\r
+ {0,"",CP_SaveGame},\r
+ {1,"",CP_ChangeView},\r
+ {2,"",CP_ReadThis},\r
+ {1,"",CP_ViewScores},\r
+ {1,"",0},\r
+ {1,"",0}\r
+#else\r
+\r
+ {1,STR_NG,CP_NewGame},\r
+ {1,STR_SD,CP_Sound},\r
+ {1,STR_CL,CP_Control},\r
+ {1,STR_LG,CP_LoadGame},\r
+ {0,STR_SG,CP_SaveGame},\r
+ {1,STR_CV,CP_ChangeView},\r
+\r
+#ifndef GOODTIMES\r
+#ifndef SPEAR\r
+\r
+ #ifdef SPANISH\r
+ {2,"Ve esto!",CP_ReadThis},\r
+ #else\r
+ {2,"Read This!",CP_ReadThis},\r
+ #endif\r
+\r
+#endif\r
+#endif\r
+\r
+ {1,STR_VS,CP_ViewScores},\r
+ {1,STR_BD,0},\r
+ {1,STR_QT,0}\r
+#endif\r
+},\r
+\r
+far SndMenu[]=\r
+{\r
+#ifdef JAPAN\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+#else\r
+ {1,STR_NONE,0},\r
+ {1,STR_PC,0},\r
+ {1,STR_ALSB,0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {1,STR_NONE,0},\r
+ {1,STR_DISNEY,0},\r
+ {1,STR_SB,0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {1,STR_NONE,0},\r
+ {1,STR_ALSB,0}\r
+#endif\r
+},\r
+\r
+far CtlMenu[]=\r
+{\r
+#ifdef JAPAN\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",MouseSensitivity},\r
+ {1,"",CustomControls}\r
+#else\r
+ {0,STR_MOUSEEN,0},\r
+ {0,STR_JOYEN,0},\r
+ {0,STR_PORT2,0},\r
+ {0,STR_GAMEPAD,0},\r
+ {0,STR_SENS,MouseSensitivity},\r
+ {1,STR_CUSTOM,CustomControls}\r
+#endif\r
+},\r
+\r
+#pragma warn +sus\r
+\r
+#ifndef SPEAR\r
+far NewEmenu[]=\r
+{\r
+#ifdef JAPAN\r
+#ifdef JAPDEMO\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+#else\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0}\r
+#endif\r
+#else\r
+ #ifdef SPANISH\r
+ {1,"Episodio 1\n"\r
+ "Fuga desde Wolfenstein",0},\r
+ {0,"",0},\r
+ {3,"Episodio 2\n"\r
+ "Operacion Eisenfaust",0},\r
+ {0,"",0},\r
+ {3,"Episodio 3\n"\r
+ "Muere, Fuhrer, Muere!",0},\r
+ {0,"",0},\r
+ {3,"Episodio 4\n"\r
+ "Un Negro Secreto",0},\r
+ {0,"",0},\r
+ {3,"Episodio 5\n"\r
+ "Huellas del Loco",0},\r
+ {0,"",0},\r
+ {3,"Episodio 6\n"\r
+ "Confrontacion",0}\r
+ #else\r
+ {1,"Episode 1\n"\r
+ "Escape from Wolfenstein",0},\r
+ {0,"",0},\r
+ {3,"Episode 2\n"\r
+ "Operation: Eisenfaust",0},\r
+ {0,"",0},\r
+ {3,"Episode 3\n"\r
+ "Die, Fuhrer, Die!",0},\r
+ {0,"",0},\r
+ {3,"Episode 4\n"\r
+ "A Dark Secret",0},\r
+ {0,"",0},\r
+ {3,"Episode 5\n"\r
+ "Trail of the Madman",0},\r
+ {0,"",0},\r
+ {3,"Episode 6\n"\r
+ "Confrontation",0}\r
+ #endif\r
+#endif\r
+},\r
+#endif\r
+\r
+\r
+far NewMenu[]=\r
+{\r
+#ifdef JAPAN\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0}\r
+#else\r
+ {1,STR_DADDY,0},\r
+ {1,STR_HURTME,0},\r
+ {1,STR_BRINGEM,0},\r
+ {1,STR_DEATH,0}\r
+#endif\r
+},\r
+\r
+far LSMenu[]=\r
+{\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0},\r
+ {1,"",0}\r
+},\r
+\r
+far CusMenu[]=\r
+{\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {0,"",0},\r
+ {1,"",0},\r
+ {0,"",0},\r
+ {1,"",0}\r
+}\r
+;\r
+\r
+\r
+int color_hlite[]={\r
+ DEACTIVE,\r
+ HIGHLIGHT,\r
+ READHCOLOR,\r
+ 0x67\r
+ },\r
+\r
+ color_norml[]={\r
+ DEACTIVE,\r
+ TEXTCOLOR,\r
+ READCOLOR,\r
+ 0x6b\r
+ };\r
+\r
+int EpisodeSelect[6]={1};\r
+\r
+\r
+int SaveGamesAvail[10],StartGame,SoundStatus=1,pickquick;\r
+char SaveGameNames[10][32],SaveName[13]="SAVEGAM?.";\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// INPUT MANAGER SCANCODE TABLES\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+static byte\r
+ *ScanNames[] = // Scan code names with single chars\r
+ {\r
+ "?","?","1","2","3","4","5","6","7","8","9","0","-","+","?","?",\r
+ "Q","W","E","R","T","Y","U","I","O","P","[","]","|","?","A","S",\r
+ "D","F","G","H","J","K","L",";","\"","?","?","?","Z","X","C","V",\r
+ "B","N","M",",",".","/","?","?","?","?","?","?","?","?","?","?",\r
+ "?","?","?","?","?","?","?","?","\xf","?","-","\x15","5","\x11","+","?",\r
+ "\x13","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?",\r
+ "?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?",\r
+ "?","?","?","?","?","?","?","?","?","?","?","?","?","?","?","?"\r
+ }, // DEBUG - consolidate these\r
+ far ExtScanCodes[] = // Scan codes with >1 char names\r
+ {\r
+ 1,0xe,0xf,0x1d,0x2a,0x39,0x3a,0x3b,0x3c,0x3d,0x3e,\r
+ 0x3f,0x40,0x41,0x42,0x43,0x44,0x57,0x59,0x46,0x1c,0x36,\r
+ 0x37,0x38,0x47,0x49,0x4f,0x51,0x52,0x53,0x45,0x48,\r
+ 0x50,0x4b,0x4d,0x00\r
+ },\r
+ *ExtScanNames[] = // Names corresponding to ExtScanCodes\r
+ {\r
+ "Esc","BkSp","Tab","Ctrl","LShft","Space","CapsLk","F1","F2","F3","F4",\r
+ "F5","F6","F7","F8","F9","F10","F11","F12","ScrlLk","Enter","RShft",\r
+ "PrtSc","Alt","Home","PgUp","End","PgDn","Ins","Del","NumLk","Up",\r
+ "Down","Left","Right",""\r
+ };\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Wolfenstein Control Panel! Ta Da!\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void US_ControlPanel(byte scancode)\r
+{\r
+ int which,i,start;\r
+\r
+\r
+ if (ingame)\r
+ if (CP_CheckQuick(scancode))\r
+ return;\r
+\r
+ StartCPMusic(MENUSONG);\r
+ SetupControlPanel();\r
+\r
+ //\r
+ // F-KEYS FROM WITHIN GAME\r
+ //\r
+ switch(scancode)\r
+ {\r
+ case sc_F1:\r
+ #ifdef SPEAR\r
+ BossKey();\r
+ #else\r
+ #ifdef GOODTIMES\r
+ BossKey();\r
+ #else\r
+ HelpScreens();\r
+ #endif\r
+ #endif\r
+ goto finishup;\r
+\r
+ case sc_F2:\r
+ CP_SaveGame(0);\r
+ goto finishup;\r
+\r
+ case sc_F3:\r
+ CP_LoadGame(0);\r
+ goto finishup;\r
+\r
+ case sc_F4:\r
+ CP_Sound();\r
+ goto finishup;\r
+\r
+ case sc_F5:\r
+ CP_ChangeView();\r
+ goto finishup;\r
+\r
+ case sc_F6:\r
+ CP_Control();\r
+ goto finishup;\r
+\r
+ finishup:\r
+ CleanupControlPanel();\r
+ #ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ #endif\r
+ return;\r
+ }\r
+\r
+#ifdef SPEAR\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+\r
+ DrawMainMenu();\r
+ MenuFadeIn();\r
+ StartGame=0;\r
+\r
+ //\r
+ // MAIN MENU LOOP\r
+ //\r
+ do\r
+ {\r
+ which=HandleMenu(&MainItems,&MainMenu[0],NULL);\r
+\r
+ #ifdef SPEAR\r
+ #ifndef SPEARDEMO\r
+ //\r
+ // EASTER EGG FOR SPEAR OF DESTINY!\r
+ //\r
+ if (Keyboard[sc_I] && Keyboard[sc_D])\r
+ {\r
+ VW_FadeOut();\r
+ StartCPMusic (XJAZNAZI_MUS);\r
+ UnCacheLump(OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ UnCacheLump(BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ MM_SortMem ();\r
+ ClearMemory ();\r
+\r
+\r
+ CA_CacheGrChunk (IDGUYS1PIC);\r
+ VWB_DrawPic(0,0,IDGUYS1PIC);\r
+ UNCACHEGRCHUNK(IDGUYS1PIC);\r
+\r
+ CA_CacheGrChunk (IDGUYS2PIC);\r
+ VWB_DrawPic(0,80,IDGUYS2PIC);\r
+ UNCACHEGRCHUNK(IDGUYS2PIC);\r
+\r
+ VW_UpdateScreen();\r
+\r
+ CA_CacheGrChunk (IDGUYSPALETTE);\r
+ VL_FadeIn(0,255,grsegs[IDGUYSPALETTE],30);\r
+ UNCACHEGRCHUNK(IDGUYSPALETTE);\r
+\r
+ while (Keyboard[sc_I] || Keyboard[sc_D]);\r
+ IN_ClearKeysDown();\r
+ IN_Ack();\r
+\r
+ VW_FadeOut();\r
+\r
+ CacheLump(BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ CacheLump(OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ DrawMainMenu();\r
+ StartCPMusic (MENUSONG);\r
+ MenuFadeIn();\r
+ }\r
+ #endif\r
+ #endif\r
+\r
+ switch(which)\r
+ {\r
+ case viewscores:\r
+ if (MainMenu[viewscores].routine == NULL)\r
+ if (CP_EndGame())\r
+ StartGame=1;\r
+\r
+ DrawMainMenu();\r
+ MenuFadeIn();\r
+ break;\r
+\r
+ case backtodemo:\r
+ #ifdef SPEAR\r
+ if (!ingame)\r
+ {\r
+ //\r
+ // DEALLOCATE ALL SOUNDS!\r
+ //\r
+ switch (SoundMode)\r
+ {\r
+ case sdm_PC:\r
+ start = STARTPCSOUNDS;\r
+ break;\r
+ case sdm_AdLib:\r
+ start = STARTADLIBSOUNDS;\r
+ break;\r
+ }\r
+\r
+ if (SoundMode != sdm_Off)\r
+ for (i=0;i<NUMSOUNDS;i++,start++)\r
+ if (audiosegs[start])\r
+ MM_SetPurge (&(memptr)audiosegs[start],3); // make purgable\r
+ }\r
+ #endif\r
+\r
+ MM_SortMem();\r
+ StartGame=1;\r
+ if (!ingame)\r
+ StartCPMusic(INTROSONG);\r
+ VL_FadeOut(0,255,0,0,0,10);\r
+ break;\r
+\r
+ case -1:\r
+ case quit:\r
+ CP_Quit();\r
+ break;\r
+\r
+ default:\r
+ if (!StartGame)\r
+ {\r
+ DrawMainMenu();\r
+ MenuFadeIn();\r
+ }\r
+ }\r
+\r
+ //\r
+ // "EXIT OPTIONS" OR "NEW GAME" EXITS\r
+ //\r
+ } while(!StartGame);\r
+\r
+ //\r
+ // DEALLOCATE EVERYTHING\r
+ //\r
+ CleanupControlPanel();\r
+\r
+ //\r
+ // CHANGE MAINMENU ITEM\r
+ //\r
+ if (startgame || loadedgame)\r
+ {\r
+ #pragma warn -sus\r
+ MainMenu[viewscores].routine = NULL;\r
+ #ifndef JAPAN\r
+ _fstrcpy(MainMenu[viewscores].string,STR_EG);\r
+ #endif\r
+ #pragma warn +sus\r
+ }\r
+\r
+ // RETURN/START GAME EXECUTION\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ MM_SortMem ();\r
+#endif\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DRAW MAIN MENU SCREEN\r
+//\r
+void DrawMainMenu(void)\r
+{\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_OPTIONSPIC);\r
+#else\r
+ ClearMScreen();\r
+\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+ DrawStripes(10);\r
+ VWB_DrawPic(84,0,C_OPTIONSPIC);\r
+\r
+ #ifdef SPANISH\r
+ DrawWindow(MENU_X-8,MENU_Y-3,MENU_W+8,MENU_H,BKGDCOLOR);\r
+ #else\r
+ DrawWindow(MENU_X-8,MENU_Y-3,MENU_W,MENU_H,BKGDCOLOR);\r
+ #endif\r
+#endif\r
+\r
+ //\r
+ // CHANGE "GAME" AND "DEMO"\r
+ //\r
+ if (ingame)\r
+ {\r
+ #ifndef JAPAN\r
+\r
+ #ifdef SPANISH\r
+ _fstrcpy(&MainMenu[backtodemo].string,STR_GAME);\r
+ #else\r
+ _fstrcpy(&MainMenu[backtodemo].string[8],STR_GAME);\r
+ #endif\r
+\r
+ #else\r
+ CA_CacheGrChunk(C_MRETGAMEPIC);\r
+ VWB_DrawPic(12*8,20*8,C_MRETGAMEPIC);\r
+ UNCACHEGRCHUNK(C_MRETGAMEPIC);\r
+ CA_CacheGrChunk(C_MENDGAMEPIC);\r
+ VWB_DrawPic(12*8,18*8,C_MENDGAMEPIC);\r
+ UNCACHEGRCHUNK(C_MENDGAMEPIC);\r
+ #endif\r
+ MainMenu[backtodemo].active=2;\r
+ }\r
+ else\r
+ {\r
+ #ifndef JAPAN\r
+ #ifdef SPANISH\r
+ _fstrcpy(&MainMenu[backtodemo].string,STR_BD);\r
+ #else\r
+ _fstrcpy(&MainMenu[backtodemo].string[8],STR_DEMO);\r
+ #endif\r
+ #else\r
+ CA_CacheGrChunk(C_MRETDEMOPIC);\r
+ VWB_DrawPic(12*8,20*8,C_MRETDEMOPIC);\r
+ UNCACHEGRCHUNK(C_MRETDEMOPIC);\r
+ CA_CacheGrChunk(C_MSCORESPIC);\r
+ VWB_DrawPic(12*8,18*8,C_MSCORESPIC);\r
+ UNCACHEGRCHUNK(C_MSCORESPIC);\r
+ #endif\r
+ MainMenu[backtodemo].active=1;\r
+ }\r
+\r
+ DrawMenu(&MainItems,&MainMenu[0]);\r
+ VW_UpdateScreen();\r
+}\r
+\r
+#ifndef GOODTIMES\r
+#ifndef SPEAR\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// READ THIS!\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_ReadThis(void)\r
+{\r
+ StartCPMusic(CORNER_MUS);\r
+ HelpScreens();\r
+ StartCPMusic(MENUSONG);\r
+}\r
+#endif\r
+#endif\r
+\r
+#ifndef SPEAR\r
+#ifndef GOODTIMES\r
+#else\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// BOSS KEY\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void BossKey(void)\r
+{\r
+ SD_MusicOff();\r
+ _AX = 3;\r
+ geninterrupt(0x10);\r
+ printf("C>");\r
+ while (!Keyboard[sc_Escape])\r
+ IN_ClearKeysDown();\r
+\r
+ SD_MusicOn();\r
+ VL_SetVGAPlaneMode ();\r
+ VL_TestPaletteSet ();\r
+ VL_SetPalette (&gamepal);\r
+ LoadLatchMem();\r
+}\r
+#endif\r
+#endif\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// CHECK QUICK-KEYS & QUIT (WHILE IN A GAME)\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int CP_CheckQuick(unsigned scancode)\r
+{\r
+ switch(scancode)\r
+ {\r
+ //\r
+ // END GAME\r
+ //\r
+ case sc_F7:\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+\r
+ WindowH=160;\r
+ #ifdef JAPAN\r
+ if (GetYorN(7,8,C_JAPQUITPIC))\r
+ #else\r
+ if (Confirm(ENDGAMESTR))\r
+ #endif\r
+ {\r
+ playstate = ex_died;\r
+ pickquick = gamestate.lives = 0;\r
+ }\r
+\r
+ DrawAllPlayBorder();\r
+ WindowH=200;\r
+ fontnumber=0;\r
+ MainMenu[savegame].active = 0;\r
+ return 1;\r
+\r
+ //\r
+ // QUICKSAVE\r
+ //\r
+ case sc_F8:\r
+ if (SaveGamesAvail[LSItems.curpos] && pickquick)\r
+ {\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+ fontnumber = 1;\r
+ Message(STR_SAVING"...");\r
+ CP_SaveGame(1);\r
+ fontnumber=0;\r
+ }\r
+ else\r
+ {\r
+ #ifndef SPEAR\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+ CA_CacheGrChunk(C_CURSOR1PIC);\r
+ CA_CacheGrChunk(C_CURSOR2PIC);\r
+ CA_CacheGrChunk(C_DISKLOADING1PIC);\r
+ CA_CacheGrChunk(C_DISKLOADING2PIC);\r
+ CA_CacheGrChunk(C_SAVEGAMEPIC);\r
+ CA_CacheGrChunk(C_MOUSELBACKPIC);\r
+ #else\r
+ CacheLump (BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ CA_CacheGrChunk(C_CURSOR1PIC);\r
+ #endif\r
+\r
+ VW_FadeOut ();\r
+\r
+ StartCPMusic(MENUSONG);\r
+ pickquick=CP_SaveGame(0);\r
+\r
+ SETFONTCOLOR(0,15);\r
+ IN_ClearKeysDown();\r
+ DrawPlayScreen ();\r
+\r
+ if (!startgame && !loadedgame)\r
+ {\r
+ VW_FadeIn ();\r
+ StartMusic ();\r
+ }\r
+\r
+ if (loadedgame)\r
+ playstate = ex_abort;\r
+ lasttimecount = TimeCount;\r
+\r
+ if (MousePresent)\r
+ Mouse(MDelta); // Clear accumulated mouse movement\r
+\r
+ PM_CheckMainMem ();\r
+\r
+ #ifndef SPEAR\r
+ UNCACHEGRCHUNK(C_CURSOR1PIC);\r
+ UNCACHEGRCHUNK(C_CURSOR2PIC);\r
+ UNCACHEGRCHUNK(C_DISKLOADING1PIC);\r
+ UNCACHEGRCHUNK(C_DISKLOADING2PIC);\r
+ UNCACHEGRCHUNK(C_SAVEGAMEPIC);\r
+ UNCACHEGRCHUNK(C_MOUSELBACKPIC);\r
+ #else\r
+ UnCacheLump (BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ #endif\r
+ }\r
+ return 1;\r
+\r
+ //\r
+ // QUICKLOAD\r
+ //\r
+ case sc_F9:\r
+ if (SaveGamesAvail[LSItems.curpos] && pickquick)\r
+ {\r
+ char string[100]=STR_LGC;\r
+\r
+\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+ fontnumber = 1;\r
+\r
+ strcat(string,SaveGameNames[LSItems.curpos]);\r
+ strcat(string,"\"?");\r
+\r
+ if (Confirm(string))\r
+ CP_LoadGame(1);\r
+\r
+ DrawAllPlayBorder();\r
+ fontnumber=0;\r
+ }\r
+ else\r
+ {\r
+ #ifndef SPEAR\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+ CA_CacheGrChunk(C_CURSOR1PIC);\r
+ CA_CacheGrChunk(C_CURSOR2PIC);\r
+ CA_CacheGrChunk(C_DISKLOADING1PIC);\r
+ CA_CacheGrChunk(C_DISKLOADING2PIC);\r
+ CA_CacheGrChunk(C_LOADGAMEPIC);\r
+ CA_CacheGrChunk(C_MOUSELBACKPIC);\r
+ #else\r
+ CA_CacheGrChunk(C_CURSOR1PIC);\r
+ CacheLump (BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ #endif\r
+\r
+ VW_FadeOut ();\r
+\r
+ StartCPMusic(MENUSONG);\r
+ pickquick=CP_LoadGame(0);\r
+\r
+ SETFONTCOLOR(0,15);\r
+ IN_ClearKeysDown();\r
+ DrawPlayScreen ();\r
+\r
+ if (!startgame && !loadedgame)\r
+ {\r
+ VW_FadeIn ();\r
+ StartMusic ();\r
+ }\r
+\r
+ if (loadedgame)\r
+ playstate = ex_abort;\r
+\r
+ lasttimecount = TimeCount;\r
+\r
+ if (MousePresent)\r
+ Mouse(MDelta); // Clear accumulated mouse movement\r
+ PM_CheckMainMem ();\r
+\r
+ #ifndef SPEAR\r
+ UNCACHEGRCHUNK(C_CURSOR1PIC);\r
+ UNCACHEGRCHUNK(C_CURSOR2PIC);\r
+ UNCACHEGRCHUNK(C_DISKLOADING1PIC);\r
+ UNCACHEGRCHUNK(C_DISKLOADING2PIC);\r
+ UNCACHEGRCHUNK(C_LOADGAMEPIC);\r
+ UNCACHEGRCHUNK(C_MOUSELBACKPIC);\r
+ #else\r
+ UnCacheLump (BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ #endif\r
+ }\r
+ return 1;\r
+\r
+ //\r
+ // QUIT\r
+ //\r
+ case sc_F10:\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+\r
+ WindowX=WindowY=0;\r
+ WindowW=320;\r
+ WindowH=160;\r
+ #ifdef JAPAN\r
+ if (GetYorN(7,8,C_QUITMSGPIC))\r
+ #else\r
+ #ifdef SPANISH\r
+ if (Confirm(ENDGAMESTR))\r
+ #else\r
+ if (Confirm(endStrings[US_RndT()&0x7+(US_RndT()&1)]))\r
+ #endif\r
+ #endif\r
+ {\r
+ int i;\r
+\r
+\r
+ VW_UpdateScreen();\r
+ SD_MusicOff();\r
+ SD_StopSound();\r
+ MenuFadeOut();\r
+\r
+ //\r
+ // SHUT-UP THE ADLIB\r
+ //\r
+ for (i=1;i<=0xf5;i++)\r
+ alOut(i,0);\r
+ Quit(NULL);\r
+ }\r
+\r
+ DrawAllPlayBorder();\r
+ WindowH=200;\r
+ fontnumber=0;\r
+ return 1;\r
+ }\r
+\r
+ return 0;\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// END THE CURRENT GAME\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int CP_EndGame(void)\r
+{\r
+#ifdef JAPAN\r
+ if (!GetYorN(7,8,C_JAPQUITPIC))\r
+#else\r
+ if (!Confirm(ENDGAMESTR))\r
+#endif\r
+ return 0;\r
+\r
+ pickquick = gamestate.lives = 0;\r
+ playstate = ex_died;\r
+\r
+ #pragma warn -sus\r
+ MainMenu[savegame].active = 0;\r
+ MainMenu[viewscores].routine=CP_ViewScores;\r
+ #ifndef JAPAN\r
+ _fstrcpy(MainMenu[viewscores].string,STR_VS);\r
+ #endif\r
+ #pragma warn +sus\r
+\r
+ return 1;\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// VIEW THE HIGH SCORES\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_ViewScores(void)\r
+{\r
+ fontnumber=0;\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ StartCPMusic (XAWARD_MUS);\r
+#else\r
+ StartCPMusic (ROSTER_MUS);\r
+#endif\r
+\r
+ DrawHighScores ();\r
+ VW_UpdateScreen ();\r
+ MenuFadeIn();\r
+ fontnumber=1;\r
+\r
+ IN_Ack();\r
+\r
+ StartCPMusic(MENUSONG);\r
+ MenuFadeOut();\r
+\r
+#ifdef SPEAR\r
+ CacheLump (BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// START A NEW GAME\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_NewGame(void)\r
+{\r
+ int which,episode;\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+\r
+\r
+#ifndef SPEAR\r
+firstpart:\r
+\r
+ DrawNewEpisode();\r
+ do\r
+ {\r
+ which=HandleMenu(&NewEitems,&NewEmenu[0],NULL);\r
+ switch(which)\r
+ {\r
+ case -1:\r
+ MenuFadeOut();\r
+ return;\r
+\r
+ default:\r
+ if (!EpisodeSelect[which/2])\r
+ {\r
+ SD_PlaySound (NOWAYSND);\r
+ Message("Please select \"Read This!\"\n"\r
+ "from the Options menu to\n"\r
+ "find out how to order this\n"\r
+ "episode from Apogee.");\r
+ IN_ClearKeysDown();\r
+ IN_Ack();\r
+ DrawNewEpisode();\r
+ which = 0;\r
+ }\r
+ else\r
+ {\r
+ episode = which/2;\r
+ which = 1;\r
+ }\r
+ break;\r
+ }\r
+\r
+ } while (!which);\r
+\r
+ ShootSnd();\r
+\r
+ //\r
+ // ALREADY IN A GAME?\r
+ //\r
+ if (ingame)\r
+ #ifdef JAPAN\r
+ if (!GetYorN(7,8,C_JAPNEWGAMEPIC))\r
+ #else\r
+ if (!Confirm(CURGAME))\r
+ #endif\r
+ {\r
+ MenuFadeOut();\r
+ return;\r
+ }\r
+\r
+ MenuFadeOut();\r
+\r
+#else\r
+ episode = 0;\r
+\r
+ //\r
+ // ALREADY IN A GAME?\r
+ //\r
+ CacheLump (NEWGAME_LUMP_START,NEWGAME_LUMP_END);\r
+ DrawNewGame();\r
+ if (ingame)\r
+ if (!Confirm(CURGAME))\r
+ {\r
+ MenuFadeOut();\r
+ UnCacheLump (NEWGAME_LUMP_START,NEWGAME_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ return;\r
+ }\r
+\r
+#endif\r
+\r
+ DrawNewGame();\r
+ which=HandleMenu(&NewItems,&NewMenu[0],DrawNewGameDiff);\r
+ if (which<0)\r
+ {\r
+ MenuFadeOut();\r
+ #ifndef SPEAR\r
+ goto firstpart;\r
+ #else\r
+ UnCacheLump (NEWGAME_LUMP_START,NEWGAME_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ return;\r
+ #endif\r
+ }\r
+\r
+ ShootSnd();\r
+ NewGame(which,episode);\r
+ StartGame=1;\r
+ MenuFadeOut();\r
+\r
+ //\r
+ // CHANGE "READ THIS!" TO NORMAL COLOR\r
+ //\r
+ #ifndef SPEAR\r
+ #ifndef GOODTIMES\r
+ MainMenu[readthis].active=1;\r
+ #endif\r
+ #endif\r
+\r
+ pickquick = 0;\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (NEWGAME_LUMP_START,NEWGAME_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+}\r
+\r
+\r
+#ifndef SPEAR\r
+/////////////////////\r
+//\r
+// DRAW NEW EPISODE MENU\r
+//\r
+void DrawNewEpisode(void)\r
+{\r
+ int i;\r
+\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_EPISODEPIC);\r
+#else\r
+ ClearMScreen();\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+\r
+ DrawWindow(NE_X-4,NE_Y-4,NE_W+8,NE_H+8,BKGDCOLOR);\r
+ SETFONTCOLOR(READHCOLOR,BKGDCOLOR);\r
+ PrintY=2;\r
+ WindowX=0;\r
+ #ifdef SPANISH\r
+ US_CPrint("Cual episodio jugar?");\r
+ #else\r
+ US_CPrint("Which episode to play?");\r
+ #endif\r
+#endif\r
+\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ DrawMenu(&NewEitems,&NewEmenu[0]);\r
+\r
+ for (i=0;i<6;i++)\r
+ VWB_DrawPic(NE_X+32,NE_Y+i*26,C_EPISODE1PIC+i);\r
+\r
+ VW_UpdateScreen();\r
+ MenuFadeIn();\r
+ WaitKeyUp();\r
+}\r
+#endif\r
+\r
+/////////////////////\r
+//\r
+// DRAW NEW GAME MENU\r
+//\r
+void DrawNewGame(void)\r
+{\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_SKILLPIC);\r
+#else\r
+ ClearMScreen();\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+\r
+ SETFONTCOLOR(READHCOLOR,BKGDCOLOR);\r
+ PrintX=NM_X+20;\r
+ PrintY=NM_Y-32;\r
+\r
+#ifndef SPEAR\r
+ #ifdef SPANISH\r
+ US_Print("Eres macho?");\r
+ #else\r
+ US_Print("How tough are you?");\r
+ #endif\r
+#else\r
+ VWB_DrawPic (PrintX,PrintY,C_HOWTOUGHPIC);\r
+#endif\r
+\r
+ DrawWindow(NM_X-5,NM_Y-10,NM_W,NM_H,BKGDCOLOR);\r
+#endif\r
+\r
+ DrawMenu(&NewItems,&NewMenu[0]);\r
+ DrawNewGameDiff(NewItems.curpos);\r
+ VW_UpdateScreen();\r
+ MenuFadeIn();\r
+ WaitKeyUp();\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DRAW NEW GAME GRAPHIC\r
+//\r
+void DrawNewGameDiff(int w)\r
+{\r
+ VWB_DrawPic(NM_X+185,NM_Y+7,w+C_BABYMODEPIC);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// HANDLE SOUND MENU\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_Sound(void)\r
+{\r
+ int which,i;\r
+\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ CacheLump (SOUND_LUMP_START,SOUND_LUMP_END);\r
+#endif\r
+\r
+ DrawSoundMenu();\r
+ MenuFadeIn();\r
+ WaitKeyUp();\r
+\r
+ do\r
+ {\r
+ which=HandleMenu(&SndItems,&SndMenu[0],NULL);\r
+ //\r
+ // HANDLE MENU CHOICES\r
+ //\r
+ switch(which)\r
+ {\r
+ //\r
+ // SOUND EFFECTS\r
+ //\r
+ case 0:\r
+ if (SoundMode!=sdm_Off)\r
+ {\r
+ SD_WaitSoundDone();\r
+ SD_SetSoundMode(sdm_Off);\r
+ DrawSoundMenu();\r
+ }\r
+ break;\r
+ case 1:\r
+ if (SoundMode!=sdm_PC)\r
+ {\r
+ SD_WaitSoundDone();\r
+ SD_SetSoundMode(sdm_PC);\r
+ CA_LoadAllSounds();\r
+ DrawSoundMenu();\r
+ ShootSnd();\r
+ }\r
+ break;\r
+ case 2:\r
+ if (SoundMode!=sdm_AdLib)\r
+ {\r
+ SD_WaitSoundDone();\r
+ SD_SetSoundMode(sdm_AdLib);\r
+ CA_LoadAllSounds();\r
+ DrawSoundMenu();\r
+ ShootSnd();\r
+ }\r
+ break;\r
+\r
+ //\r
+ // DIGITIZED SOUND\r
+ //\r
+ case 5:\r
+ if (DigiMode!=sds_Off)\r
+ {\r
+ SD_SetDigiDevice(sds_Off);\r
+ DrawSoundMenu();\r
+ }\r
+ break;\r
+ case 6:\r
+ if (DigiMode!=sds_SoundSource)\r
+ {\r
+ SD_SetDigiDevice(sds_SoundSource);\r
+ DrawSoundMenu();\r
+ ShootSnd();\r
+ }\r
+ break;\r
+ case 7:\r
+ if (DigiMode!=sds_SoundBlaster)\r
+ {\r
+ SD_SetDigiDevice(sds_SoundBlaster);\r
+ DrawSoundMenu();\r
+ ShootSnd();\r
+ }\r
+ break;\r
+\r
+ //\r
+ // MUSIC\r
+ //\r
+ case 10:\r
+ if (MusicMode!=smm_Off)\r
+ {\r
+ SD_SetMusicMode(smm_Off);\r
+ DrawSoundMenu();\r
+ ShootSnd();\r
+ }\r
+ break;\r
+ case 11:\r
+ if (MusicMode!=smm_AdLib)\r
+ {\r
+ SD_SetMusicMode(smm_AdLib);\r
+ DrawSoundMenu();\r
+ ShootSnd();\r
+ StartCPMusic(MENUSONG);\r
+ }\r
+ break;\r
+ }\r
+ } while(which>=0);\r
+\r
+ MenuFadeOut();\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (SOUND_LUMP_START,SOUND_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+}\r
+\r
+\r
+//////////////////////\r
+//\r
+// DRAW THE SOUND MENU\r
+//\r
+void DrawSoundMenu(void)\r
+{\r
+ int i,on;\r
+\r
+\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_SOUNDPIC);\r
+#else\r
+ //\r
+ // DRAW SOUND MENU\r
+ //\r
+ ClearMScreen();\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+\r
+ DrawWindow(SM_X-8,SM_Y1-3,SM_W,SM_H1,BKGDCOLOR);\r
+ DrawWindow(SM_X-8,SM_Y2-3,SM_W,SM_H2,BKGDCOLOR);\r
+ DrawWindow(SM_X-8,SM_Y3-3,SM_W,SM_H3,BKGDCOLOR);\r
+#endif\r
+\r
+ //\r
+ // IF NO ADLIB, NON-CHOOSENESS!\r
+ //\r
+ if (!AdLibPresent && !SoundBlasterPresent)\r
+ {\r
+ SndMenu[2].active=SndMenu[10].active=SndMenu[11].active=0;\r
+ }\r
+\r
+ if (!SoundSourcePresent)\r
+ SndMenu[6].active=0;\r
+\r
+ if (!SoundBlasterPresent)\r
+ SndMenu[7].active=0;\r
+\r
+ if (!SoundSourcePresent && !SoundBlasterPresent)\r
+ SndMenu[5].active=0;\r
+\r
+ DrawMenu(&SndItems,&SndMenu[0]);\r
+#ifndef JAPAN\r
+ VWB_DrawPic(100,SM_Y1-20,C_FXTITLEPIC);\r
+ VWB_DrawPic(100,SM_Y2-20,C_DIGITITLEPIC);\r
+ VWB_DrawPic(100,SM_Y3-20,C_MUSICTITLEPIC);\r
+#endif\r
+\r
+ for (i=0;i<SndItems.amount;i++)\r
+#ifdef JAPAN\r
+ if (i!=3 && i!=4 && i!=8 && i!=9)\r
+#else\r
+ if (SndMenu[i].string[0])\r
+#endif\r
+ {\r
+ //\r
+ // DRAW SELECTED/NOT SELECTED GRAPHIC BUTTONS\r
+ //\r
+ on=0;\r
+ switch(i)\r
+ {\r
+ //\r
+ // SOUND EFFECTS\r
+ //\r
+ case 0: if (SoundMode==sdm_Off) on=1; break;\r
+ case 1: if (SoundMode==sdm_PC) on=1; break;\r
+ case 2: if (SoundMode==sdm_AdLib) on=1; break;\r
+\r
+ //\r
+ // DIGITIZED SOUND\r
+ //\r
+ case 5: if (DigiMode==sds_Off) on=1; break;\r
+ case 6: if (DigiMode==sds_SoundSource) on=1; break;\r
+ case 7: if (DigiMode==sds_SoundBlaster) on=1; break;\r
+\r
+ //\r
+ // MUSIC\r
+ //\r
+ case 10: if (MusicMode==smm_Off) on=1; break;\r
+ case 11: if (MusicMode==smm_AdLib) on=1; break;\r
+ }\r
+\r
+ if (on)\r
+ VWB_DrawPic(SM_X+24,SM_Y1+i*13+2,C_SELECTEDPIC);\r
+ else\r
+ VWB_DrawPic(SM_X+24,SM_Y1+i*13+2,C_NOTSELECTEDPIC);\r
+ }\r
+\r
+ DrawMenuGun(&SndItems);\r
+ VW_UpdateScreen();\r
+}\r
+\r
+\r
+//\r
+// DRAW LOAD/SAVE IN PROGRESS\r
+//\r
+void DrawLSAction(int which)\r
+{\r
+ #define LSA_X 96\r
+ #define LSA_Y 80\r
+ #define LSA_W 130\r
+ #define LSA_H 42\r
+\r
+ DrawWindow(LSA_X,LSA_Y,LSA_W,LSA_H,TEXTCOLOR);\r
+ DrawOutline(LSA_X,LSA_Y,LSA_W,LSA_H,0,HIGHLIGHT);\r
+ VWB_DrawPic(LSA_X+8,LSA_Y+5,C_DISKLOADING1PIC);\r
+\r
+ fontnumber=1;\r
+ SETFONTCOLOR(0,TEXTCOLOR);\r
+ PrintX=LSA_X+46;\r
+ PrintY=LSA_Y+13;\r
+\r
+ if (!which)\r
+ US_Print(STR_LOADING"...");\r
+ else\r
+ US_Print(STR_SAVING"...");\r
+\r
+ VW_UpdateScreen();\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// LOAD SAVED GAMES\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int CP_LoadGame(int quick)\r
+{\r
+ int handle,which,exit=0;\r
+ char name[13];\r
+\r
+\r
+ strcpy(name,SaveName);\r
+\r
+ //\r
+ // QUICKLOAD?\r
+ //\r
+ if (quick)\r
+ {\r
+ which=LSItems.curpos;\r
+\r
+ if (SaveGamesAvail[which])\r
+ {\r
+ name[7]=which+'0';\r
+ handle=open(name,O_BINARY);\r
+ lseek(handle,32,SEEK_SET);\r
+ loadedgame=true;\r
+ LoadTheGame(handle,0,0);\r
+ loadedgame=false;\r
+ close(handle);\r
+\r
+ DrawFace ();\r
+ DrawHealth ();\r
+ DrawLives ();\r
+ DrawLevel ();\r
+ DrawAmmo ();\r
+ DrawKeys ();\r
+ DrawWeapon ();\r
+ DrawScore ();\r
+ return 1;\r
+ }\r
+ }\r
+\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ CacheLump (LOADSAVE_LUMP_START,LOADSAVE_LUMP_END);\r
+#endif\r
+\r
+ DrawLoadSaveScreen(0);\r
+\r
+ do\r
+ {\r
+ which=HandleMenu(&LSItems,&LSMenu[0],TrackWhichGame);\r
+ if (which>=0 && SaveGamesAvail[which])\r
+ {\r
+ ShootSnd();\r
+ name[7]=which+'0';\r
+\r
+ handle=open(name,O_BINARY);\r
+ lseek(handle,32,SEEK_SET);\r
+\r
+ DrawLSAction(0);\r
+ loadedgame=true;\r
+\r
+ LoadTheGame(handle,LSA_X+8,LSA_Y+5);\r
+ close(handle);\r
+\r
+ StartGame=1;\r
+ ShootSnd();\r
+ //\r
+ // CHANGE "READ THIS!" TO NORMAL COLOR\r
+ //\r
+\r
+ #ifndef SPEAR\r
+ #ifndef GOODTIMES\r
+ MainMenu[readthis].active=1;\r
+ #endif\r
+ #endif\r
+\r
+ exit=1;\r
+ break;\r
+ }\r
+\r
+ } while(which>=0);\r
+\r
+ MenuFadeOut();\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (LOADSAVE_LUMP_START,LOADSAVE_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+\r
+ return exit;\r
+}\r
+\r
+\r
+///////////////////////////////////\r
+//\r
+// HIGHLIGHT CURRENT SELECTED ENTRY\r
+//\r
+void TrackWhichGame(int w)\r
+{\r
+ static int lastgameon=0;\r
+\r
+ PrintLSEntry(lastgameon,TEXTCOLOR);\r
+ PrintLSEntry(w,HIGHLIGHT);\r
+\r
+ lastgameon=w;\r
+}\r
+\r
+\r
+////////////////////////////\r
+//\r
+// DRAW THE LOAD/SAVE SCREEN\r
+//\r
+void DrawLoadSaveScreen(int loadsave)\r
+{\r
+ #define DISKX 100\r
+ #define DISKY 0\r
+\r
+ int i;\r
+\r
+\r
+ ClearMScreen();\r
+ fontnumber=1;\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+ DrawWindow(LSM_X-10,LSM_Y-5,LSM_W,LSM_H,BKGDCOLOR);\r
+ DrawStripes(10);\r
+\r
+ if (!loadsave)\r
+ VWB_DrawPic(60,0,C_LOADGAMEPIC);\r
+ else\r
+ VWB_DrawPic(60,0,C_SAVEGAMEPIC);\r
+\r
+ for (i=0;i<10;i++)\r
+ PrintLSEntry(i,TEXTCOLOR);\r
+\r
+ DrawMenu(&LSItems,&LSMenu[0]);\r
+ VW_UpdateScreen();\r
+ MenuFadeIn();\r
+ WaitKeyUp();\r
+}\r
+\r
+\r
+///////////////////////////////////////////\r
+//\r
+// PRINT LOAD/SAVE GAME ENTRY W/BOX OUTLINE\r
+//\r
+void PrintLSEntry(int w,int color)\r
+{\r
+ SETFONTCOLOR(color,BKGDCOLOR);\r
+ DrawOutline(LSM_X+LSItems.indent,LSM_Y+w*13,LSM_W-LSItems.indent-15,11,color,color);\r
+ PrintX=LSM_X+LSItems.indent+2;\r
+ PrintY=LSM_Y+w*13+1;\r
+ fontnumber=0;\r
+\r
+ if (SaveGamesAvail[w])\r
+ US_Print(SaveGameNames[w]);\r
+ else\r
+ US_Print(" - "STR_EMPTY" -");\r
+\r
+ fontnumber=1;\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// SAVE CURRENT GAME\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int CP_SaveGame(int quick)\r
+{\r
+ int handle,which,exit=0;\r
+ unsigned nwritten;\r
+ char name[13],input[32];\r
+\r
+\r
+ strcpy(name,SaveName);\r
+\r
+ //\r
+ // QUICKSAVE?\r
+ //\r
+ if (quick)\r
+ {\r
+ which=LSItems.curpos;\r
+\r
+ if (SaveGamesAvail[which])\r
+ {\r
+ name[7]=which+'0';\r
+ unlink(name);\r
+ handle=creat(name,S_IREAD|S_IWRITE);\r
+\r
+ strcpy(input,&SaveGameNames[which][0]);\r
+\r
+ _dos_write(handle,(void far *)input,32,&nwritten);\r
+ lseek(handle,32,SEEK_SET);\r
+ SaveTheGame(handle,0,0);\r
+ close(handle);\r
+\r
+ return 1;\r
+ }\r
+ }\r
+\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ CacheLump (LOADSAVE_LUMP_START,LOADSAVE_LUMP_END);\r
+#endif\r
+\r
+ DrawLoadSaveScreen(1);\r
+\r
+ do\r
+ {\r
+ which=HandleMenu(&LSItems,&LSMenu[0],TrackWhichGame);\r
+ if (which>=0)\r
+ {\r
+ //\r
+ // OVERWRITE EXISTING SAVEGAME?\r
+ //\r
+ if (SaveGamesAvail[which])\r
+ #ifdef JAPAN\r
+ if (!GetYorN(7,8,C_JAPSAVEOVERPIC))\r
+ #else\r
+ if (!Confirm(GAMESVD))\r
+ #endif\r
+ {\r
+ DrawLoadSaveScreen(1);\r
+ continue;\r
+ }\r
+ else\r
+ {\r
+ DrawLoadSaveScreen(1);\r
+ PrintLSEntry(which,HIGHLIGHT);\r
+ VW_UpdateScreen();\r
+ }\r
+\r
+ ShootSnd();\r
+\r
+ strcpy(input,&SaveGameNames[which][0]);\r
+ name[7]=which+'0';\r
+\r
+ fontnumber=0;\r
+ if (!SaveGamesAvail[which])\r
+ VWB_Bar(LSM_X+LSItems.indent+1,LSM_Y+which*13+1,LSM_W-LSItems.indent-16,10,BKGDCOLOR);\r
+ VW_UpdateScreen();\r
+\r
+ if (US_LineInput(LSM_X+LSItems.indent+2,LSM_Y+which*13+1,input,input,true,31,LSM_W-LSItems.indent-30))\r
+ {\r
+ SaveGamesAvail[which]=1;\r
+ strcpy(&SaveGameNames[which][0],input);\r
+\r
+ unlink(name);\r
+ handle=creat(name,S_IREAD|S_IWRITE);\r
+ _dos_write(handle,(void far *)input,32,&nwritten);\r
+ lseek(handle,32,SEEK_SET);\r
+\r
+ DrawLSAction(1);\r
+ SaveTheGame(handle,LSA_X+8,LSA_Y+5);\r
+\r
+ close(handle);\r
+\r
+ ShootSnd();\r
+ exit=1;\r
+ }\r
+ else\r
+ {\r
+ VWB_Bar(LSM_X+LSItems.indent+1,LSM_Y+which*13+1,LSM_W-LSItems.indent-16,10,BKGDCOLOR);\r
+ PrintLSEntry(which,HIGHLIGHT);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(ESCPRESSEDSND);\r
+ continue;\r
+ }\r
+\r
+ fontnumber=1;\r
+ break;\r
+ }\r
+\r
+ } while(which>=0);\r
+\r
+ MenuFadeOut();\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (LOADSAVE_LUMP_START,LOADSAVE_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+\r
+ return exit;\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// CALIBRATE JOYSTICK\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int CalibrateJoystick(void)\r
+{\r
+ #define CALX 85\r
+ #define CALY 40\r
+ #define CALW 158\r
+ #define CALH 140\r
+\r
+ unsigned xmin,ymin,xmax,ymax,jb;\r
+\r
+\r
+\r
+ #ifdef JAPAN\r
+ VWB_DrawPic(CALX,CALY,C_JOY0PIC);\r
+ #else\r
+ DrawWindow(CALX-5,CALY-5,CALW,CALH,TEXTCOLOR);\r
+ DrawOutline(CALX-5,CALY-5,CALW,CALH,0,HIGHLIGHT);\r
+ SETFONTCOLOR(0,TEXTCOLOR);\r
+\r
+ WindowX = PrintX = CALX;\r
+ WindowW = CALW;\r
+ WindowH = CALH;\r
+ WindowY = PrintY = CALY;\r
+ US_Print(" "STR_CALIB"\n "STR_JOYST"\n");\r
+ VWB_DrawPic(CALX+40,CALY+30,C_JOY1PIC);\r
+ PrintY = CALY+80;\r
+ US_Print(STR_MOVEJOY);\r
+ SETFONTCOLOR(BKGDCOLOR,TEXTCOLOR);\r
+ US_Print(" "STR_ESCEXIT);\r
+ #endif\r
+ VW_UpdateScreen();\r
+\r
+ do\r
+ {\r
+ jb=IN_JoyButtons();\r
+ if (Keyboard[sc_Escape])\r
+ return 0;\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ PicturePause();\r
+ #endif\r
+\r
+ } while(!(jb&1));\r
+\r
+ SD_PlaySound(SHOOTSND);\r
+ IN_GetJoyAbs(joystickport,&xmin,&ymin);\r
+\r
+\r
+ #ifdef JAPAN\r
+ VWB_DrawPic(CALX,CALY,C_JOY1PIC);\r
+ #else\r
+ DrawWindow(CALX-5,CALY-5,CALW,CALH,TEXTCOLOR);\r
+ DrawOutline(CALX-5,CALY-5,CALW,CALH,0,HIGHLIGHT);\r
+ SETFONTCOLOR(0,TEXTCOLOR);\r
+\r
+ PrintX = CALX;\r
+ PrintY = CALY;\r
+ US_Print(" "STR_CALIB"\n "STR_JOYST"\n");\r
+ VWB_DrawPic(CALX+40,CALY+30,C_JOY2PIC);\r
+ PrintY = CALY+80;\r
+ US_Print(STR_MOVEJOY2);\r
+ SETFONTCOLOR(BKGDCOLOR,TEXTCOLOR);\r
+ US_Print(" "STR_ESCEXIT);\r
+ #endif\r
+ VW_UpdateScreen();\r
+\r
+ do\r
+ {\r
+ jb=IN_JoyButtons();\r
+ if (Keyboard[sc_Escape])\r
+ return 0;\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ PicturePause();\r
+ #endif\r
+ } while(!(jb&2));\r
+\r
+ IN_GetJoyAbs(joystickport,&xmax,&ymax);\r
+ SD_PlaySound(SHOOTSND);\r
+\r
+ while (IN_JoyButtons());\r
+\r
+ //\r
+ // ASSIGN ACTUAL VALUES HERE\r
+ //\r
+ if ((xmin != xmax) && (ymin != ymax))\r
+ IN_SetupJoy(joystickport,xmin,xmax,ymin,ymax);\r
+ else\r
+ return 0;\r
+\r
+ return 1;\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// DEFINE CONTROLS\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_Control(void)\r
+{\r
+ #define CTL_SPC 70\r
+ enum {MOUSEENABLE,JOYENABLE,USEPORT2,PADENABLE,MOUSESENS,CUSTOMIZE};\r
+ int i,which;\r
+\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+ CacheLump (CONTROL_LUMP_START,CONTROL_LUMP_END);\r
+#endif\r
+\r
+ DrawCtlScreen();\r
+ MenuFadeIn();\r
+ WaitKeyUp();\r
+\r
+ do\r
+ {\r
+ which=HandleMenu(&CtlItems,&CtlMenu[0],NULL);\r
+ switch(which)\r
+ {\r
+ case MOUSEENABLE:\r
+ mouseenabled^=1;\r
+ _CX=_DX=CENTER;\r
+ Mouse(4);\r
+ DrawCtlScreen();\r
+ CusItems.curpos=-1;\r
+ ShootSnd();\r
+ break;\r
+\r
+ case JOYENABLE:\r
+ joystickenabled^=1;\r
+ if (joystickenabled)\r
+ if (!CalibrateJoystick())\r
+ joystickenabled = 0;\r
+ DrawCtlScreen();\r
+ CusItems.curpos=-1;\r
+ ShootSnd();\r
+ break;\r
+\r
+ case USEPORT2:\r
+ joystickport^=1;\r
+ DrawCtlScreen();\r
+ ShootSnd();\r
+ break;\r
+\r
+ case PADENABLE:\r
+ joypadenabled^=1;\r
+ DrawCtlScreen();\r
+ ShootSnd();\r
+ break;\r
+\r
+ case MOUSESENS:\r
+ case CUSTOMIZE:\r
+ DrawCtlScreen();\r
+ MenuFadeIn();\r
+ WaitKeyUp();\r
+ break;\r
+ }\r
+ } while(which>=0);\r
+\r
+ MenuFadeOut();\r
+\r
+#ifdef SPEAR\r
+ UnCacheLump (CONTROL_LUMP_START,CONTROL_LUMP_END);\r
+ CacheLump (OPTIONS_LUMP_START,OPTIONS_LUMP_END);\r
+#endif\r
+}\r
+\r
+\r
+////////////////////////////////\r
+//\r
+// DRAW MOUSE SENSITIVITY SCREEN\r
+//\r
+void DrawMouseSens(void)\r
+{\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_MOUSESENSPIC);\r
+#else\r
+ ClearMScreen();\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+ #ifdef SPANISH\r
+ DrawWindow(10,80,300,43,BKGDCOLOR);\r
+ #else\r
+ DrawWindow(10,80,300,30,BKGDCOLOR);\r
+ #endif\r
+\r
+ WindowX=0;\r
+ WindowW=320;\r
+ PrintY=82;\r
+ SETFONTCOLOR(READCOLOR,BKGDCOLOR);\r
+ US_CPrint(STR_MOUSEADJ);\r
+\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ #ifdef SPANISH\r
+ PrintX=14;\r
+ PrintY=95+13;\r
+ US_Print(STR_SLOW);\r
+ PrintX=252;\r
+ US_Print(STR_FAST);\r
+ #else\r
+ PrintX=14;\r
+ PrintY=95;\r
+ US_Print(STR_SLOW);\r
+ PrintX=269;\r
+ US_Print(STR_FAST);\r
+ #endif\r
+#endif\r
+\r
+ VWB_Bar(60,97,200,10,TEXTCOLOR);\r
+ DrawOutline(60,97,200,10,0,HIGHLIGHT);\r
+ DrawOutline(60+20*mouseadjustment,97,20,10,0,READCOLOR);\r
+ VWB_Bar(61+20*mouseadjustment,98,19,9,READHCOLOR);\r
+\r
+ VW_UpdateScreen();\r
+ MenuFadeIn();\r
+}\r
+\r
+\r
+///////////////////////////\r
+//\r
+// ADJUST MOUSE SENSITIVITY\r
+//\r
+void MouseSensitivity(void)\r
+{\r
+ ControlInfo ci;\r
+ int exit=0,oldMA;\r
+\r
+\r
+ oldMA=mouseadjustment;\r
+ DrawMouseSens();\r
+ do\r
+ {\r
+ ReadAnyControl(&ci);\r
+ switch(ci.dir)\r
+ {\r
+ case dir_North:\r
+ case dir_West:\r
+ if (mouseadjustment)\r
+ {\r
+ mouseadjustment--;\r
+ VWB_Bar(60,97,200,10,TEXTCOLOR);\r
+ DrawOutline(60,97,200,10,0,HIGHLIGHT);\r
+ DrawOutline(60+20*mouseadjustment,97,20,10,0,READCOLOR);\r
+ VWB_Bar(61+20*mouseadjustment,98,19,9,READHCOLOR);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(MOVEGUN1SND);\r
+ while(Keyboard[sc_LeftArrow]);\r
+ WaitKeyUp();\r
+ }\r
+ break;\r
+\r
+ case dir_South:\r
+ case dir_East:\r
+ if (mouseadjustment<9)\r
+ {\r
+ mouseadjustment++;\r
+ VWB_Bar(60,97,200,10,TEXTCOLOR);\r
+ DrawOutline(60,97,200,10,0,HIGHLIGHT);\r
+ DrawOutline(60+20*mouseadjustment,97,20,10,0,READCOLOR);\r
+ VWB_Bar(61+20*mouseadjustment,98,19,9,READHCOLOR);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(MOVEGUN1SND);\r
+ while(Keyboard[sc_RightArrow]);\r
+ WaitKeyUp();\r
+ }\r
+ break;\r
+ }\r
+\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ #else\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("debugmode"))\r
+ #endif\r
+ PicturePause();\r
+\r
+ if (ci.button0 || Keyboard[sc_Space] || Keyboard[sc_Enter])\r
+ exit=1;\r
+ else\r
+ if (ci.button1 || Keyboard[sc_Escape])\r
+ exit=2;\r
+\r
+ } while(!exit);\r
+\r
+ if (exit==2)\r
+ {\r
+ mouseadjustment=oldMA;\r
+ SD_PlaySound(ESCPRESSEDSND);\r
+ }\r
+ else\r
+ SD_PlaySound(SHOOTSND);\r
+\r
+ WaitKeyUp();\r
+ MenuFadeOut();\r
+}\r
+\r
+\r
+///////////////////////////\r
+//\r
+// DRAW CONTROL MENU SCREEN\r
+//\r
+void DrawCtlScreen(void)\r
+{\r
+ int i,x,y;\r
+\r
+\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_CONTROLPIC);\r
+#else\r
+ ClearMScreen();\r
+ DrawStripes(10);\r
+ VWB_DrawPic(80,0,C_CONTROLPIC);\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+ DrawWindow(CTL_X-8,CTL_Y-5,CTL_W,CTL_H,BKGDCOLOR);\r
+#endif\r
+ WindowX=0;\r
+ WindowW=320;\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+\r
+ if (JoysPresent[0])\r
+ CtlMenu[1].active=\r
+ CtlMenu[2].active=\r
+ CtlMenu[3].active=1;\r
+\r
+ CtlMenu[2].active=CtlMenu[3].active=joystickenabled;\r
+\r
+ if (MousePresent)\r
+ {\r
+ CtlMenu[4].active=\r
+ CtlMenu[0].active=1;\r
+ }\r
+\r
+ CtlMenu[4].active=mouseenabled;\r
+\r
+\r
+ DrawMenu(&CtlItems,&CtlMenu[0]);\r
+\r
+\r
+ x=CTL_X+CtlItems.indent-24;\r
+ y=CTL_Y+3;\r
+ if (mouseenabled)\r
+ VWB_DrawPic(x,y,C_SELECTEDPIC);\r
+ else\r
+ VWB_DrawPic(x,y,C_NOTSELECTEDPIC);\r
+\r
+ y=CTL_Y+16;\r
+ if (joystickenabled)\r
+ VWB_DrawPic(x,y,C_SELECTEDPIC);\r
+ else\r
+ VWB_DrawPic(x,y,C_NOTSELECTEDPIC);\r
+\r
+ y=CTL_Y+29;\r
+ if (joystickport)\r
+ VWB_DrawPic(x,y,C_SELECTEDPIC);\r
+ else\r
+ VWB_DrawPic(x,y,C_NOTSELECTEDPIC);\r
+\r
+ y=CTL_Y+42;\r
+ if (joypadenabled)\r
+ VWB_DrawPic(x,y,C_SELECTEDPIC);\r
+ else\r
+ VWB_DrawPic(x,y,C_NOTSELECTEDPIC);\r
+\r
+ //\r
+ // PICK FIRST AVAILABLE SPOT\r
+ //\r
+ if (CtlItems.curpos<0 || !CtlMenu[CtlItems.curpos].active)\r
+ for (i=0;i<6;i++)\r
+ if (CtlMenu[i].active)\r
+ {\r
+ CtlItems.curpos=i;\r
+ break;\r
+ }\r
+\r
+ DrawMenuGun(&CtlItems);\r
+ VW_UpdateScreen();\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// CUSTOMIZE CONTROLS\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+enum {FIRE,STRAFE,RUN,OPEN};\r
+char mbarray[4][3]={"b0","b1","b2","b3"},\r
+ order[4]={RUN,OPEN,FIRE,STRAFE};\r
+\r
+\r
+void CustomControls(void)\r
+{\r
+ int which;\r
+\r
+\r
+ DrawCustomScreen();\r
+ do\r
+ {\r
+ which=HandleMenu(&CusItems,&CusMenu[0],FixupCustom);\r
+ switch(which)\r
+ {\r
+ case 0:\r
+ DefineMouseBtns();\r
+ DrawCustMouse(1);\r
+ break;\r
+ case 3:\r
+ DefineJoyBtns();\r
+ DrawCustJoy(0);\r
+ break;\r
+ case 6:\r
+ DefineKeyBtns();\r
+ DrawCustKeybd(0);\r
+ break;\r
+ case 8:\r
+ DefineKeyMove();\r
+ DrawCustKeys(0);\r
+ }\r
+ } while(which>=0);\r
+\r
+\r
+\r
+ MenuFadeOut();\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DEFINE THE MOUSE BUTTONS\r
+//\r
+void DefineMouseBtns(void)\r
+{\r
+ CustomCtrls mouseallowed={0,1,1,1};\r
+ EnterCtrlData(2,&mouseallowed,DrawCustMouse,PrintCustMouse,MOUSE);\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DEFINE THE JOYSTICK BUTTONS\r
+//\r
+void DefineJoyBtns(void)\r
+{\r
+ CustomCtrls joyallowed={1,1,1,1};\r
+ EnterCtrlData(5,&joyallowed,DrawCustJoy,PrintCustJoy,JOYSTICK);\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DEFINE THE KEYBOARD BUTTONS\r
+//\r
+void DefineKeyBtns(void)\r
+{\r
+ CustomCtrls keyallowed={1,1,1,1};\r
+ EnterCtrlData(8,&keyallowed,DrawCustKeybd,PrintCustKeybd,KEYBOARDBTNS);\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DEFINE THE KEYBOARD BUTTONS\r
+//\r
+void DefineKeyMove(void)\r
+{\r
+ CustomCtrls keyallowed={1,1,1,1};\r
+ EnterCtrlData(10,&keyallowed,DrawCustKeys,PrintCustKeys,KEYBOARDMOVE);\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// ENTER CONTROL DATA FOR ANY TYPE OF CONTROL\r
+//\r
+enum {FWRD,RIGHT,BKWD,LEFT};\r
+int moveorder[4]={LEFT,RIGHT,FWRD,BKWD};\r
+\r
+void EnterCtrlData(int index,CustomCtrls *cust,void (*DrawRtn)(int),void (*PrintRtn)(int),int type)\r
+{\r
+ int j,exit,tick,redraw,which,x,picked;\r
+ ControlInfo ci;\r
+\r
+\r
+ ShootSnd();\r
+ PrintY=CST_Y+13*index;\r
+ IN_ClearKeysDown();\r
+ exit=0;\r
+ redraw=1;\r
+ //\r
+ // FIND FIRST SPOT IN ALLOWED ARRAY\r
+ //\r
+ for (j=0;j<4;j++)\r
+ if (cust->allowed[j])\r
+ {\r
+ which=j;\r
+ break;\r
+ }\r
+\r
+ do\r
+ {\r
+ if (redraw)\r
+ {\r
+ x=CST_START+CST_SPC*which;\r
+ DrawWindow(5,PrintY-1,310,13,BKGDCOLOR);\r
+\r
+ DrawRtn(1);\r
+ DrawWindow(x-2,PrintY,CST_SPC,11,TEXTCOLOR);\r
+ DrawOutline(x-2,PrintY,CST_SPC,11,0,HIGHLIGHT);\r
+ SETFONTCOLOR(0,TEXTCOLOR);\r
+ PrintRtn(which);\r
+ PrintX=x;\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ VW_UpdateScreen();\r
+ WaitKeyUp();\r
+ redraw=0;\r
+ }\r
+\r
+ ReadAnyControl(&ci);\r
+\r
+ if (type==MOUSE || type==JOYSTICK)\r
+ if (IN_KeyDown(sc_Enter)||IN_KeyDown(sc_Control)||IN_KeyDown(sc_Alt))\r
+ {\r
+ IN_ClearKeysDown();\r
+ ci.button0=ci.button1=false;\r
+ }\r
+\r
+ //\r
+ // CHANGE BUTTON VALUE?\r
+ //\r
+ if ((ci.button0|ci.button1|ci.button2|ci.button3)||\r
+ ((type==KEYBOARDBTNS||type==KEYBOARDMOVE) && LastScan==sc_Enter))\r
+ {\r
+ tick=TimeCount=picked=0;\r
+ SETFONTCOLOR(0,TEXTCOLOR);\r
+\r
+ do\r
+ {\r
+ int button,result=0;\r
+\r
+\r
+ if (type==KEYBOARDBTNS||type==KEYBOARDMOVE)\r
+ IN_ClearKeysDown();\r
+\r
+ //\r
+ // FLASH CURSOR\r
+ //\r
+ if (TimeCount>10)\r
+ {\r
+ switch(tick)\r
+ {\r
+ case 0:\r
+ VWB_Bar(x,PrintY+1,CST_SPC-2,10,TEXTCOLOR);\r
+ break;\r
+ case 1:\r
+ PrintX=x;\r
+ US_Print("?");\r
+ SD_PlaySound(HITWALLSND);\r
+ }\r
+ tick^=1;\r
+ TimeCount=0;\r
+ VW_UpdateScreen();\r
+ }\r
+\r
+ //\r
+ // WHICH TYPE OF INPUT DO WE PROCESS?\r
+ //\r
+ switch(type)\r
+ {\r
+ case MOUSE:\r
+ Mouse(3);\r
+ button=_BX;\r
+ switch(button)\r
+ {\r
+ case 1: result=1; break;\r
+ case 2: result=2; break;\r
+ case 4: result=3; break;\r
+ }\r
+\r
+ if (result)\r
+ {\r
+ int z;\r
+\r
+\r
+ for (z=0;z<4;z++)\r
+ if (order[which]==buttonmouse[z])\r
+ {\r
+ buttonmouse[z]=bt_nobutton;\r
+ break;\r
+ }\r
+\r
+ buttonmouse[result-1]=order[which];\r
+ picked=1;\r
+ SD_PlaySound(SHOOTDOORSND);\r
+ }\r
+ break;\r
+\r
+ case JOYSTICK:\r
+ if (ci.button0) result=1;\r
+ else\r
+ if (ci.button1) result=2;\r
+ else\r
+ if (ci.button2) result=3;\r
+ else\r
+ if (ci.button3) result=4;\r
+\r
+ if (result)\r
+ {\r
+ int z;\r
+\r
+\r
+ for (z=0;z<4;z++)\r
+ if (order[which]==buttonjoy[z])\r
+ {\r
+ buttonjoy[z]=bt_nobutton;\r
+ break;\r
+ }\r
+\r
+ buttonjoy[result-1]=order[which];\r
+ picked=1;\r
+ SD_PlaySound(SHOOTDOORSND);\r
+ }\r
+ break;\r
+\r
+ case KEYBOARDBTNS:\r
+ if (LastScan)\r
+ {\r
+ buttonscan[order[which]]=LastScan;\r
+ picked=1;\r
+ ShootSnd();\r
+ IN_ClearKeysDown();\r
+ }\r
+ break;\r
+\r
+ case KEYBOARDMOVE:\r
+ if (LastScan)\r
+ {\r
+ dirscan[moveorder[which]]=LastScan;\r
+ picked=1;\r
+ ShootSnd();\r
+ IN_ClearKeysDown();\r
+ }\r
+ break;\r
+ }\r
+\r
+ //\r
+ // EXIT INPUT?\r
+ //\r
+ if (IN_KeyDown(sc_Escape))\r
+ {\r
+ picked=1;\r
+ continue;\r
+ }\r
+\r
+ } while(!picked);\r
+\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ redraw=1;\r
+ WaitKeyUp();\r
+ continue;\r
+ }\r
+\r
+ if (ci.button1 || IN_KeyDown(sc_Escape))\r
+ exit=1;\r
+\r
+ //\r
+ // MOVE TO ANOTHER SPOT?\r
+ //\r
+ switch(ci.dir)\r
+ {\r
+ case dir_West:\r
+ do\r
+ {\r
+ which--;\r
+ if (which<0)\r
+ which=3;\r
+ } while(!cust->allowed[which]);\r
+ redraw=1;\r
+ SD_PlaySound(MOVEGUN1SND);\r
+ while(ReadAnyControl(&ci),ci.dir!=dir_None);\r
+ IN_ClearKeysDown();\r
+ break;\r
+\r
+ case dir_East:\r
+ do\r
+ {\r
+ which++;\r
+ if (which>3)\r
+ which=0;\r
+ } while(!cust->allowed[which]);\r
+ redraw=1;\r
+ SD_PlaySound(MOVEGUN1SND);\r
+ while(ReadAnyControl(&ci),ci.dir!=dir_None);\r
+ IN_ClearKeysDown();\r
+ break;\r
+ case dir_North:\r
+ case dir_South:\r
+ exit=1;\r
+ }\r
+ } while(!exit);\r
+\r
+ SD_PlaySound(ESCPRESSEDSND);\r
+ WaitKeyUp();\r
+ DrawWindow(5,PrintY-1,310,13,BKGDCOLOR);\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// FIXUP GUN CURSOR OVERDRAW SHIT\r
+//\r
+void FixupCustom(int w)\r
+{\r
+ static int lastwhich=-1;\r
+ int y=CST_Y+26+w*13;\r
+\r
+\r
+ VWB_Hlin(7,32,y-1,DEACTIVE);\r
+ VWB_Hlin(7,32,y+12,BORD2COLOR);\r
+#ifndef SPEAR\r
+ VWB_Hlin(7,32,y-2,BORDCOLOR);\r
+ VWB_Hlin(7,32,y+13,BORDCOLOR);\r
+#else\r
+ VWB_Hlin(7,32,y-2,BORD2COLOR);\r
+ VWB_Hlin(7,32,y+13,BORD2COLOR);\r
+#endif\r
+\r
+ switch(w)\r
+ {\r
+ case 0: DrawCustMouse(1); break;\r
+ case 3: DrawCustJoy(1); break;\r
+ case 6: DrawCustKeybd(1); break;\r
+ case 8: DrawCustKeys(1);\r
+ }\r
+\r
+\r
+ if (lastwhich>=0)\r
+ {\r
+ y=CST_Y+26+lastwhich*13;\r
+ VWB_Hlin(7,32,y-1,DEACTIVE);\r
+ VWB_Hlin(7,32,y+12,BORD2COLOR);\r
+#ifndef SPEAR\r
+ VWB_Hlin(7,32,y-2,BORDCOLOR);\r
+ VWB_Hlin(7,32,y+13,BORDCOLOR);\r
+#else\r
+ VWB_Hlin(7,32,y-2,BORD2COLOR);\r
+ VWB_Hlin(7,32,y+13,BORD2COLOR);\r
+#endif\r
+\r
+ if (lastwhich!=w)\r
+ switch(lastwhich)\r
+ {\r
+ case 0: DrawCustMouse(0); break;\r
+ case 3: DrawCustJoy(0); break;\r
+ case 6: DrawCustKeybd(0); break;\r
+ case 8: DrawCustKeys(0);\r
+ }\r
+ }\r
+\r
+ lastwhich=w;\r
+}\r
+\r
+\r
+////////////////////////\r
+//\r
+// DRAW CUSTOMIZE SCREEN\r
+//\r
+void DrawCustomScreen(void)\r
+{\r
+ int i;\r
+\r
+\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_CUSTOMPIC);\r
+ fontnumber=1;\r
+\r
+ PrintX=CST_START;\r
+ PrintY = CST_Y+26;\r
+ DrawCustMouse(0);\r
+\r
+ PrintX=CST_START;\r
+ US_Print("\n\n\n");\r
+ DrawCustJoy(0);\r
+\r
+ PrintX=CST_START;\r
+ US_Print("\n\n\n");\r
+ DrawCustKeybd(0);\r
+\r
+ PrintX=CST_START;\r
+ US_Print("\n\n\n");\r
+ DrawCustKeys(0);\r
+#else\r
+ ClearMScreen();\r
+ WindowX=0;\r
+ WindowW=320;\r
+ VWB_DrawPic(112,184,C_MOUSELBACKPIC);\r
+ DrawStripes(10);\r
+ VWB_DrawPic(80,0,C_CUSTOMIZEPIC);\r
+\r
+ //\r
+ // MOUSE\r
+ //\r
+ SETFONTCOLOR(READCOLOR,BKGDCOLOR);\r
+ WindowX=0;\r
+ WindowW=320;\r
+\r
+#ifndef SPEAR\r
+ PrintY=CST_Y;\r
+ US_CPrint("Mouse\n");\r
+#else\r
+ PrintY = CST_Y+13;\r
+ VWB_DrawPic (128,48,C_MOUSEPIC);\r
+#endif\r
+\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ #ifdef SPANISH\r
+ PrintX=CST_START-16;\r
+ US_Print(STR_CRUN);\r
+ PrintX=CST_START-16+CST_SPC*1;\r
+ US_Print(STR_COPEN);\r
+ PrintX=CST_START-16+CST_SPC*2;\r
+ US_Print(STR_CFIRE);\r
+ PrintX=CST_START-16+CST_SPC*3;\r
+ US_Print(STR_CSTRAFE"\n");\r
+ #else\r
+ PrintX=CST_START;\r
+ US_Print(STR_CRUN);\r
+ PrintX=CST_START+CST_SPC*1;\r
+ US_Print(STR_COPEN);\r
+ PrintX=CST_START+CST_SPC*2;\r
+ US_Print(STR_CFIRE);\r
+ PrintX=CST_START+CST_SPC*3;\r
+ US_Print(STR_CSTRAFE"\n");\r
+ #endif\r
+\r
+ DrawWindow(5,PrintY-1,310,13,BKGDCOLOR);\r
+ DrawCustMouse(0);\r
+ US_Print("\n");\r
+\r
+\r
+ //\r
+ // JOYSTICK/PAD\r
+ //\r
+#ifndef SPEAR\r
+ SETFONTCOLOR(READCOLOR,BKGDCOLOR);\r
+ US_CPrint("Joystick/Gravis GamePad\n");\r
+#else\r
+ PrintY += 13;\r
+ VWB_DrawPic (40,88,C_JOYSTICKPIC);\r
+#endif\r
+\r
+#ifdef SPEAR\r
+ VWB_DrawPic (112,120,C_KEYBOARDPIC);\r
+#endif\r
+\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ #ifdef SPANISH\r
+ PrintX=CST_START-16;\r
+ US_Print(STR_CRUN);\r
+ PrintX=CST_START-16+CST_SPC*1;\r
+ US_Print(STR_COPEN);\r
+ PrintX=CST_START-16+CST_SPC*2;\r
+ US_Print(STR_CFIRE);\r
+ PrintX=CST_START-16+CST_SPC*3;\r
+ US_Print(STR_CSTRAFE"\n");\r
+ #else\r
+ PrintX=CST_START;\r
+ US_Print(STR_CRUN);\r
+ PrintX=CST_START+CST_SPC*1;\r
+ US_Print(STR_COPEN);\r
+ PrintX=CST_START+CST_SPC*2;\r
+ US_Print(STR_CFIRE);\r
+ PrintX=CST_START+CST_SPC*3;\r
+ US_Print(STR_CSTRAFE"\n");\r
+ #endif\r
+ DrawWindow(5,PrintY-1,310,13,BKGDCOLOR);\r
+ DrawCustJoy(0);\r
+ US_Print("\n");\r
+\r
+\r
+ //\r
+ // KEYBOARD\r
+ //\r
+#ifndef SPEAR\r
+ SETFONTCOLOR(READCOLOR,BKGDCOLOR);\r
+ US_CPrint("Keyboard\n");\r
+#else\r
+ PrintY += 13;\r
+#endif\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ #ifdef SPANISH\r
+ PrintX=CST_START-16;\r
+ US_Print(STR_CRUN);\r
+ PrintX=CST_START-16+CST_SPC*1;\r
+ US_Print(STR_COPEN);\r
+ PrintX=CST_START-16+CST_SPC*2;\r
+ US_Print(STR_CFIRE);\r
+ PrintX=CST_START-16+CST_SPC*3;\r
+ US_Print(STR_CSTRAFE"\n");\r
+ #else\r
+ PrintX=CST_START;\r
+ US_Print(STR_CRUN);\r
+ PrintX=CST_START+CST_SPC*1;\r
+ US_Print(STR_COPEN);\r
+ PrintX=CST_START+CST_SPC*2;\r
+ US_Print(STR_CFIRE);\r
+ PrintX=CST_START+CST_SPC*3;\r
+ US_Print(STR_CSTRAFE"\n");\r
+ #endif\r
+ DrawWindow(5,PrintY-1,310,13,BKGDCOLOR);\r
+ DrawCustKeybd(0);\r
+ US_Print("\n");\r
+\r
+\r
+ //\r
+ // KEYBOARD MOVE KEYS\r
+ //\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ #ifdef SPANISH\r
+ PrintX=4;\r
+ US_Print(STR_LEFT);\r
+ US_Print("/");\r
+ US_Print(STR_RIGHT);\r
+ US_Print("/");\r
+ US_Print(STR_FRWD);\r
+ US_Print("/");\r
+ US_Print(STR_BKWD"\n");\r
+ #else\r
+ PrintX=CST_START;\r
+ US_Print(STR_LEFT);\r
+ PrintX=CST_START+CST_SPC*1;\r
+ US_Print(STR_RIGHT);\r
+ PrintX=CST_START+CST_SPC*2;\r
+ US_Print(STR_FRWD);\r
+ PrintX=CST_START+CST_SPC*3;\r
+ US_Print(STR_BKWD"\n");\r
+ #endif\r
+ DrawWindow(5,PrintY-1,310,13,BKGDCOLOR);\r
+ DrawCustKeys(0);\r
+#endif\r
+ //\r
+ // PICK STARTING POINT IN MENU\r
+ //\r
+ if (CusItems.curpos<0)\r
+ for (i=0;i<CusItems.amount;i++)\r
+ if (CusMenu[i].active)\r
+ {\r
+ CusItems.curpos=i;\r
+ break;\r
+ }\r
+\r
+\r
+ VW_UpdateScreen();\r
+ MenuFadeIn();\r
+}\r
+\r
+\r
+void PrintCustMouse(int i)\r
+{\r
+ int j;\r
+\r
+ for (j=0;j<4;j++)\r
+ if (order[i]==buttonmouse[j])\r
+ {\r
+ PrintX=CST_START+CST_SPC*i;\r
+ US_Print(mbarray[j]);\r
+ break;\r
+ }\r
+}\r
+\r
+void DrawCustMouse(int hilight)\r
+{\r
+ int i,color;\r
+\r
+\r
+ color=TEXTCOLOR;\r
+ if (hilight)\r
+ color=HIGHLIGHT;\r
+ SETFONTCOLOR(color,BKGDCOLOR);\r
+\r
+ if (!mouseenabled)\r
+ {\r
+ SETFONTCOLOR(DEACTIVE,BKGDCOLOR);\r
+ CusMenu[0].active=0;\r
+ }\r
+ else\r
+ CusMenu[0].active=1;\r
+\r
+ PrintY=CST_Y+13*2;\r
+ for (i=0;i<4;i++)\r
+ PrintCustMouse(i);\r
+}\r
+\r
+void PrintCustJoy(int i)\r
+{\r
+ int j;\r
+\r
+ for (j=0;j<4;j++)\r
+ if (order[i]==buttonjoy[j])\r
+ {\r
+ PrintX=CST_START+CST_SPC*i;\r
+ US_Print(mbarray[j]);\r
+ break;\r
+ }\r
+}\r
+\r
+void DrawCustJoy(int hilight)\r
+{\r
+ int i,color;\r
+\r
+\r
+ color=TEXTCOLOR;\r
+ if (hilight)\r
+ color=HIGHLIGHT;\r
+ SETFONTCOLOR(color,BKGDCOLOR);\r
+\r
+ if (!joystickenabled)\r
+ {\r
+ SETFONTCOLOR(DEACTIVE,BKGDCOLOR);\r
+ CusMenu[3].active=0;\r
+ }\r
+ else\r
+ CusMenu[3].active=1;\r
+\r
+ PrintY=CST_Y+13*5;\r
+ for (i=0;i<4;i++)\r
+ PrintCustJoy(i);\r
+}\r
+\r
+\r
+void PrintCustKeybd(int i)\r
+{\r
+ PrintX=CST_START+CST_SPC*i;\r
+ US_Print(IN_GetScanName(buttonscan[order[i]]));\r
+}\r
+\r
+void DrawCustKeybd(int hilight)\r
+{\r
+ int i,color;\r
+\r
+\r
+ color=TEXTCOLOR;\r
+ if (hilight)\r
+ color=HIGHLIGHT;\r
+ SETFONTCOLOR(color,BKGDCOLOR);\r
+\r
+ PrintY=CST_Y+13*8;\r
+ for (i=0;i<4;i++)\r
+ PrintCustKeybd(i);\r
+}\r
+\r
+void PrintCustKeys(int i)\r
+{\r
+ PrintX=CST_START+CST_SPC*i;\r
+ US_Print(IN_GetScanName(dirscan[moveorder[i]]));\r
+}\r
+\r
+void DrawCustKeys(int hilight)\r
+{\r
+ int i,color;\r
+\r
+\r
+ color=TEXTCOLOR;\r
+ if (hilight)\r
+ color=HIGHLIGHT;\r
+ SETFONTCOLOR(color,BKGDCOLOR);\r
+\r
+ PrintY=CST_Y+13*10;\r
+ for (i=0;i<4;i++)\r
+ PrintCustKeys(i);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// CHANGE SCREEN VIEWING SIZE\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_ChangeView(void)\r
+{\r
+ int exit=0,oldview,newview;\r
+ ControlInfo ci;\r
+\r
+\r
+ WindowX=WindowY=0;\r
+ WindowW=320;\r
+ WindowH=200;\r
+ newview=oldview=viewwidth/16;\r
+ DrawChangeView(oldview);\r
+\r
+ do\r
+ {\r
+ CheckPause();\r
+ ReadAnyControl(&ci);\r
+ switch(ci.dir)\r
+ {\r
+ case dir_South:\r
+ case dir_West:\r
+ newview--;\r
+ if (newview<4)\r
+ newview=4;\r
+ ShowViewSize(newview);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(HITWALLSND);\r
+ TicDelay(10);\r
+ break;\r
+\r
+ case dir_North:\r
+ case dir_East:\r
+ newview++;\r
+ if (newview>19)\r
+ newview=19;\r
+ ShowViewSize(newview);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(HITWALLSND);\r
+ TicDelay(10);\r
+ break;\r
+ }\r
+\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ #else\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("debugmode"))\r
+ #endif\r
+ PicturePause();\r
+\r
+ if (ci.button0 || Keyboard[sc_Enter])\r
+ exit=1;\r
+ else\r
+ if (ci.button1 || Keyboard[sc_Escape])\r
+ {\r
+ viewwidth=oldview*16;\r
+ SD_PlaySound(ESCPRESSEDSND);\r
+ MenuFadeOut();\r
+ return;\r
+ }\r
+\r
+ } while(!exit);\r
+\r
+\r
+ if (oldview!=newview)\r
+ {\r
+ SD_PlaySound (SHOOTSND);\r
+ Message(STR_THINK"...");\r
+ NewViewSize(newview);\r
+ }\r
+\r
+ ShootSnd();\r
+ MenuFadeOut();\r
+}\r
+\r
+\r
+/////////////////////////////\r
+//\r
+// DRAW THE CHANGEVIEW SCREEN\r
+//\r
+void DrawChangeView(int view)\r
+{\r
+#ifdef JAPAN\r
+ CA_CacheScreen(S_CHANGEPIC);\r
+\r
+ ShowViewSize(view);\r
+#else\r
+ VWB_Bar(0,160,320,40,VIEWCOLOR);\r
+ ShowViewSize(view);\r
+\r
+ PrintY=161;\r
+ WindowX=0;\r
+ WindowY=320;\r
+ SETFONTCOLOR(HIGHLIGHT,BKGDCOLOR);\r
+\r
+ US_CPrint(STR_SIZE1"\n");\r
+ US_CPrint(STR_SIZE2"\n");\r
+ US_CPrint(STR_SIZE3);\r
+#endif\r
+ VW_UpdateScreen();\r
+\r
+ MenuFadeIn();\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// QUIT THIS INFERNAL GAME!\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CP_Quit(void)\r
+{\r
+ int i;\r
+\r
+\r
+ #ifdef JAPAN\r
+ if (GetYorN(7,11,C_QUITMSGPIC))\r
+ #else\r
+\r
+ #ifdef SPANISH\r
+ if (Confirm(ENDGAMESTR))\r
+ #else\r
+ if (Confirm(endStrings[US_RndT()&0x7+(US_RndT()&1)]))\r
+ #endif\r
+\r
+ #endif\r
+ {\r
+ VW_UpdateScreen();\r
+ SD_MusicOff();\r
+ SD_StopSound();\r
+ MenuFadeOut();\r
+ //\r
+ // SHUT-UP THE ADLIB\r
+ //\r
+ for (i=1;i<=0xf5;i++)\r
+ alOut(i,0);\r
+ Quit(NULL);\r
+ }\r
+\r
+ DrawMainMenu();\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// HANDLE INTRO SCREEN (SYSTEM CONFIG)\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void IntroScreen(void)\r
+{\r
+#ifdef SPEAR\r
+\r
+#define MAINCOLOR 0x4f\r
+#define EMSCOLOR 0x4f\r
+#define XMSCOLOR 0x4f\r
+\r
+#else\r
+\r
+#define MAINCOLOR 0x6c\r
+#define EMSCOLOR 0x6c\r
+#define XMSCOLOR 0x6c\r
+\r
+#endif\r
+#define FILLCOLOR 14\r
+\r
+ long memory,emshere,xmshere;\r
+ int i,num,ems[10]={100,200,300,400,500,600,700,800,900,1000},\r
+ xms[10]={100,200,300,400,500,600,700,800,900,1000},\r
+ main[10]={32,64,96,128,160,192,224,256,288,320};\r
+\r
+\r
+ //\r
+ // DRAW MAIN MEMORY\r
+ //\r
+ memory=(1023l+mminfo.nearheap+mminfo.farheap)/1024l;\r
+ for (i=0;i<10;i++)\r
+ if (memory>=main[i])\r
+ VWB_Bar(49,163-8*i,6,5,MAINCOLOR-i);\r
+\r
+\r
+ //\r
+ // DRAW EMS MEMORY\r
+ //\r
+ if (EMSPresent)\r
+ {\r
+ emshere=4l*EMSPagesAvail;\r
+ for (i=0;i<10;i++)\r
+ if (emshere>=ems[i])\r
+ VWB_Bar(89,163-8*i,6,5,EMSCOLOR-i);\r
+ }\r
+\r
+ //\r
+ // DRAW XMS MEMORY\r
+ //\r
+ if (XMSPresent)\r
+ {\r
+ xmshere=4l*XMSPagesAvail;\r
+ for (i=0;i<10;i++)\r
+ if (xmshere>=xms[i])\r
+ VWB_Bar(129,163-8*i,6,5,XMSCOLOR-i);\r
+ }\r
+\r
+ //\r
+ // FILL BOXES\r
+ //\r
+ if (MousePresent)\r
+ VWB_Bar(164,82,12,2,FILLCOLOR);\r
+\r
+ if (JoysPresent[0] || JoysPresent[1])\r
+ VWB_Bar(164,105,12,2,FILLCOLOR);\r
+\r
+ if (AdLibPresent && !SoundBlasterPresent)\r
+ VWB_Bar(164,128,12,2,FILLCOLOR);\r
+\r
+ if (SoundBlasterPresent)\r
+ VWB_Bar(164,151,12,2,FILLCOLOR);\r
+\r
+ if (SoundSourcePresent)\r
+ VWB_Bar(164,174,12,2,FILLCOLOR);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// SUPPORT ROUTINES\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+////////////////////////////////////////////////////////////////////\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Clear Menu screens to dark red\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void ClearMScreen(void)\r
+{\r
+#ifndef SPEAR\r
+ VWB_Bar(0,0,320,200,BORDCOLOR);\r
+#else\r
+ VWB_DrawPic(0,0,C_BACKDROPPIC);\r
+#endif\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Un/Cache a LUMP of graphics\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CacheLump(int lumpstart,int lumpend)\r
+{\r
+ int i;\r
+\r
+ for (i=lumpstart;i<=lumpend;i++)\r
+ CA_CacheGrChunk(i);\r
+}\r
+\r
+\r
+void UnCacheLump(int lumpstart,int lumpend)\r
+{\r
+ int i;\r
+\r
+ for (i=lumpstart;i<=lumpend;i++)\r
+ if (grsegs[i])\r
+ UNCACHEGRCHUNK(i);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Draw a window for a menu\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void DrawWindow(int x,int y,int w,int h,int wcolor)\r
+{\r
+ VWB_Bar(x,y,w,h,wcolor);\r
+ DrawOutline(x,y,w,h,BORD2COLOR,DEACTIVE);\r
+}\r
+\r
+\r
+void DrawOutline(int x,int y,int w,int h,int color1,int color2)\r
+{\r
+ VWB_Hlin(x,x+w,y,color2);\r
+ VWB_Vlin(y,y+h,x,color2);\r
+ VWB_Hlin(x,x+w,y+h,color1);\r
+ VWB_Vlin(y,y+h,x+w,color1);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Setup Control Panel stuff - graphics, etc.\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void SetupControlPanel(void)\r
+{\r
+ struct ffblk f;\r
+ char name[13];\r
+ int which,i;\r
+\r
+\r
+ //\r
+ // CACHE GRAPHICS & SOUNDS\r
+ //\r
+ CA_CacheGrChunk(STARTFONT+1);\r
+#ifndef SPEAR\r
+ CacheLump(CONTROLS_LUMP_START,CONTROLS_LUMP_END);\r
+#else\r
+ CacheLump(BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+#endif\r
+\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ fontnumber=1;\r
+ WindowH=200;\r
+\r
+ if (!ingame)\r
+ CA_LoadAllSounds();\r
+ else\r
+ MainMenu[savegame].active=1;\r
+\r
+ //\r
+ // SEE WHICH SAVE GAME FILES ARE AVAILABLE & READ STRING IN\r
+ //\r
+ strcpy(name,SaveName);\r
+ if (!findfirst(name,&f,0))\r
+ do\r
+ {\r
+ which=f.ff_name[7]-'0';\r
+ if (which<10)\r
+ {\r
+ int handle;\r
+ char temp[32];\r
+\r
+ SaveGamesAvail[which]=1;\r
+ handle=open(f.ff_name,O_BINARY);\r
+ read(handle,temp,32);\r
+ close(handle);\r
+ strcpy(&SaveGameNames[which][0],temp);\r
+ }\r
+ } while(!findnext(&f));\r
+\r
+ //\r
+ // CENTER MOUSE\r
+ //\r
+ _CX=_DX=CENTER;\r
+ Mouse(4);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Clean up all the Control Panel stuff\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void CleanupControlPanel(void)\r
+{\r
+#ifndef SPEAR\r
+ UnCacheLump(CONTROLS_LUMP_START,CONTROLS_LUMP_END);\r
+#else\r
+ UnCacheLump (BACKDROP_LUMP_START,BACKDROP_LUMP_END);\r
+#endif\r
+\r
+ fontnumber = 0;\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Handle moving gun around a menu\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int HandleMenu(CP_iteminfo *item_i,CP_itemtype far *items,void (*routine)(int w))\r
+{\r
+ char key;\r
+ static int redrawitem=1,lastitem=-1;\r
+ int i,x,y,basey,exit,which,shape,timer;\r
+ ControlInfo ci;\r
+\r
+\r
+ which=item_i->curpos;\r
+ x=item_i->x&-8;\r
+ basey=item_i->y-2;\r
+ y=basey+which*13;\r
+\r
+ VWB_DrawPic(x,y,C_CURSOR1PIC);\r
+ SetTextColor(items+which,1);\r
+ if (redrawitem)\r
+ {\r
+ PrintX=item_i->x+item_i->indent;\r
+ PrintY=item_i->y+which*13;\r
+ US_Print((items+which)->string);\r
+ }\r
+ //\r
+ // CALL CUSTOM ROUTINE IF IT IS NEEDED\r
+ //\r
+ if (routine)\r
+ routine(which);\r
+ VW_UpdateScreen();\r
+\r
+ shape=C_CURSOR1PIC;\r
+ timer=8;\r
+ exit=0;\r
+ TimeCount=0;\r
+ IN_ClearKeysDown();\r
+\r
+\r
+ do\r
+ {\r
+ //\r
+ // CHANGE GUN SHAPE\r
+ //\r
+ if (TimeCount>timer)\r
+ {\r
+ TimeCount=0;\r
+ if (shape==C_CURSOR1PIC)\r
+ {\r
+ shape=C_CURSOR2PIC;\r
+ timer=8;\r
+ }\r
+ else\r
+ {\r
+ shape=C_CURSOR1PIC;\r
+ timer=70;\r
+ }\r
+ VWB_DrawPic(x,y,shape);\r
+ if (routine)\r
+ routine(which);\r
+ VW_UpdateScreen();\r
+ }\r
+\r
+ CheckPause();\r
+\r
+ //\r
+ // SEE IF ANY KEYS ARE PRESSED FOR INITIAL CHAR FINDING\r
+ //\r
+ key=LastASCII;\r
+ if (key)\r
+ {\r
+ int ok=0;\r
+\r
+ //\r
+ // CHECK FOR SCREEN CAPTURE\r
+ //\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ #else\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("debugmode"))\r
+ #endif\r
+ PicturePause();\r
+\r
+\r
+ if (key>='a')\r
+ key-='a'-'A';\r
+\r
+ for (i=which+1;i<item_i->amount;i++)\r
+ if ((items+i)->active && (items+i)->string[0]==key)\r
+ {\r
+ EraseGun(item_i,items,x,y,which);\r
+ which=i;\r
+ DrawGun(item_i,items,x,&y,which,basey,routine);\r
+ ok=1;\r
+ IN_ClearKeysDown();\r
+ break;\r
+ }\r
+\r
+ //\r
+ // DIDN'T FIND A MATCH FIRST TIME THRU. CHECK AGAIN.\r
+ //\r
+ if (!ok)\r
+ {\r
+ for (i=0;i<which;i++)\r
+ if ((items+i)->active && (items+i)->string[0]==key)\r
+ {\r
+ EraseGun(item_i,items,x,y,which);\r
+ which=i;\r
+ DrawGun(item_i,items,x,&y,which,basey,routine);\r
+ IN_ClearKeysDown();\r
+ break;\r
+ }\r
+ }\r
+ }\r
+\r
+ //\r
+ // GET INPUT\r
+ //\r
+ ReadAnyControl(&ci);\r
+ switch(ci.dir)\r
+ {\r
+ ////////////////////////////////////////////////\r
+ //\r
+ // MOVE UP\r
+ //\r
+ case dir_North:\r
+\r
+ EraseGun(item_i,items,x,y,which);\r
+\r
+ //\r
+ // ANIMATE HALF-STEP\r
+ //\r
+ if (which && (items+which-1)->active)\r
+ {\r
+ y-=6;\r
+ DrawHalfStep(x,y);\r
+ }\r
+\r
+ //\r
+ // MOVE TO NEXT AVAILABLE SPOT\r
+ //\r
+ do\r
+ {\r
+ if (!which)\r
+ which=item_i->amount-1;\r
+ else\r
+ which--;\r
+ } while(!(items+which)->active);\r
+\r
+ DrawGun(item_i,items,x,&y,which,basey,routine);\r
+ //\r
+ // WAIT FOR BUTTON-UP OR DELAY NEXT MOVE\r
+ //\r
+ TicDelay(20);\r
+ break;\r
+\r
+ ////////////////////////////////////////////////\r
+ //\r
+ // MOVE DOWN\r
+ //\r
+ case dir_South:\r
+\r
+ EraseGun(item_i,items,x,y,which);\r
+ //\r
+ // ANIMATE HALF-STEP\r
+ //\r
+ if (which!=item_i->amount-1 && (items+which+1)->active)\r
+ {\r
+ y+=6;\r
+ DrawHalfStep(x,y);\r
+ }\r
+\r
+ do\r
+ {\r
+ if (which==item_i->amount-1)\r
+ which=0;\r
+ else\r
+ which++;\r
+ } while(!(items+which)->active);\r
+\r
+ DrawGun(item_i,items,x,&y,which,basey,routine);\r
+\r
+ //\r
+ // WAIT FOR BUTTON-UP OR DELAY NEXT MOVE\r
+ //\r
+ TicDelay(20);\r
+ break;\r
+ }\r
+\r
+ if (ci.button0 ||\r
+ Keyboard[sc_Space] ||\r
+ Keyboard[sc_Enter])\r
+ exit=1;\r
+\r
+ if (ci.button1 ||\r
+ Keyboard[sc_Escape])\r
+ exit=2;\r
+\r
+ } while(!exit);\r
+\r
+\r
+ IN_ClearKeysDown();\r
+\r
+ //\r
+ // ERASE EVERYTHING\r
+ //\r
+ if (lastitem!=which)\r
+ {\r
+ VWB_Bar(x-1,y,25,16,BKGDCOLOR);\r
+ PrintX=item_i->x+item_i->indent;\r
+ PrintY=item_i->y+which*13;\r
+ US_Print((items+which)->string);\r
+ redrawitem=1;\r
+ }\r
+ else\r
+ redrawitem=0;\r
+\r
+ if (routine)\r
+ routine(which);\r
+ VW_UpdateScreen();\r
+\r
+ item_i->curpos=which;\r
+\r
+ lastitem=which;\r
+ switch(exit)\r
+ {\r
+ case 1:\r
+ //\r
+ // CALL THE ROUTINE\r
+ //\r
+ if ((items+which)->routine!=NULL)\r
+ {\r
+ ShootSnd();\r
+ MenuFadeOut();\r
+ (items+which)->routine(0);\r
+ }\r
+ return which;\r
+\r
+ case 2:\r
+ SD_PlaySound(ESCPRESSEDSND);\r
+ return -1;\r
+ }\r
+\r
+ return 0; // JUST TO SHUT UP THE ERROR MESSAGES!\r
+}\r
+\r
+\r
+//\r
+// ERASE GUN & DE-HIGHLIGHT STRING\r
+//\r
+void EraseGun(CP_iteminfo *item_i,CP_itemtype far *items,int x,int y,int which)\r
+{\r
+ VWB_Bar(x-1,y,25,16,BKGDCOLOR);\r
+ SetTextColor(items+which,0);\r
+\r
+ PrintX=item_i->x+item_i->indent;\r
+ PrintY=item_i->y+which*13;\r
+ US_Print((items+which)->string);\r
+ VW_UpdateScreen();\r
+}\r
+\r
+\r
+//\r
+// DRAW HALF STEP OF GUN TO NEXT POSITION\r
+//\r
+void DrawHalfStep(int x,int y)\r
+{\r
+ VWB_DrawPic(x,y,C_CURSOR1PIC);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(MOVEGUN1SND);\r
+ TimeCount=0;\r
+ while(TimeCount<8);\r
+}\r
+\r
+\r
+//\r
+// DRAW GUN AT NEW POSITION\r
+//\r
+void DrawGun(CP_iteminfo *item_i,CP_itemtype far *items,int x,int *y,int which,int basey,void (*routine)(int w))\r
+{\r
+ VWB_Bar(x-1,*y,25,16,BKGDCOLOR);\r
+ *y=basey+which*13;\r
+ VWB_DrawPic(x,*y,C_CURSOR1PIC);\r
+ SetTextColor(items+which,1);\r
+\r
+ PrintX=item_i->x+item_i->indent;\r
+ PrintY=item_i->y+which*13;\r
+ US_Print((items+which)->string);\r
+\r
+ //\r
+ // CALL CUSTOM ROUTINE IF IT IS NEEDED\r
+ //\r
+ if (routine)\r
+ routine(which);\r
+ VW_UpdateScreen();\r
+ SD_PlaySound(MOVEGUN2SND);\r
+}\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// DELAY FOR AN AMOUNT OF TICS OR UNTIL CONTROLS ARE INACTIVE\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void TicDelay(int count)\r
+{\r
+ ControlInfo ci;\r
+\r
+\r
+ TimeCount=0;\r
+ do\r
+ {\r
+ ReadAnyControl(&ci);\r
+ } while(TimeCount<count && ci.dir!=dir_None);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// Draw a menu\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void DrawMenu(CP_iteminfo *item_i,CP_itemtype far *items)\r
+{\r
+ int i,which=item_i->curpos;\r
+\r
+\r
+ WindowX=PrintX=item_i->x+item_i->indent;\r
+ WindowY=PrintY=item_i->y;\r
+ WindowW=320;\r
+ WindowH=200;\r
+\r
+ for (i=0;i<item_i->amount;i++)\r
+ {\r
+ SetTextColor(items+i,which==i);\r
+\r
+ PrintY=item_i->y+i*13;\r
+ if ((items+i)->active)\r
+ US_Print((items+i)->string);\r
+ else\r
+ {\r
+ SETFONTCOLOR(DEACTIVE,BKGDCOLOR);\r
+ US_Print((items+i)->string);\r
+ SETFONTCOLOR(TEXTCOLOR,BKGDCOLOR);\r
+ }\r
+\r
+ US_Print("\n");\r
+ }\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// SET TEXT COLOR (HIGHLIGHT OR NO)\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void SetTextColor(CP_itemtype far *items,int hlight)\r
+{\r
+ if (hlight)\r
+ {SETFONTCOLOR(color_hlite[items->active],BKGDCOLOR);}\r
+ else\r
+ {SETFONTCOLOR(color_norml[items->active],BKGDCOLOR);}\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// WAIT FOR CTRLKEY-UP OR BUTTON-UP\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void WaitKeyUp(void)\r
+{\r
+ ControlInfo ci;\r
+ while(ReadAnyControl(&ci), ci.button0|\r
+ ci.button1|\r
+ ci.button2|\r
+ ci.button3|\r
+ Keyboard[sc_Space]|\r
+ Keyboard[sc_Enter]|\r
+ Keyboard[sc_Escape]);\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// READ KEYBOARD, JOYSTICK AND MOUSE FOR INPUT\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void ReadAnyControl(ControlInfo *ci)\r
+{\r
+ int mouseactive=0;\r
+\r
+\r
+ IN_ReadControl(0,ci);\r
+\r
+ if (mouseenabled)\r
+ {\r
+ int mousey,mousex;\r
+\r
+\r
+ // READ MOUSE MOTION COUNTERS\r
+ // RETURN DIRECTION\r
+ // HOME MOUSE\r
+ // CHECK MOUSE BUTTONS\r
+\r
+ Mouse(3);\r
+ mousex=_CX;\r
+ mousey=_DX;\r
+\r
+ if (mousey<CENTER-SENSITIVE)\r
+ {\r
+ ci->dir=dir_North;\r
+ _CX=_DX=CENTER;\r
+ Mouse(4);\r
+ mouseactive=1;\r
+ }\r
+ else\r
+ if (mousey>CENTER+SENSITIVE)\r
+ {\r
+ ci->dir=dir_South;\r
+ _CX=_DX=CENTER;\r
+ Mouse(4);\r
+ mouseactive=1;\r
+ }\r
+\r
+ if (mousex<CENTER-SENSITIVE)\r
+ {\r
+ ci->dir=dir_West;\r
+ _CX=_DX=CENTER;\r
+ Mouse(4);\r
+ mouseactive=1;\r
+ }\r
+ else\r
+ if (mousex>CENTER+SENSITIVE)\r
+ {\r
+ ci->dir=dir_East;\r
+ _CX=_DX=CENTER;\r
+ Mouse(4);\r
+ mouseactive=1;\r
+ }\r
+\r
+ if (IN_MouseButtons())\r
+ {\r
+ ci->button0=IN_MouseButtons()&1;\r
+ ci->button1=IN_MouseButtons()&2;\r
+ ci->button2=IN_MouseButtons()&4;\r
+ ci->button3=false;\r
+ mouseactive=1;\r
+ }\r
+ }\r
+\r
+ if (joystickenabled && !mouseactive)\r
+ {\r
+ int jx,jy,jb;\r
+\r
+\r
+ INL_GetJoyDelta(joystickport,&jx,&jy);\r
+ if (jy<-SENSITIVE)\r
+ ci->dir=dir_North;\r
+ else\r
+ if (jy>SENSITIVE)\r
+ ci->dir=dir_South;\r
+\r
+ if (jx<-SENSITIVE)\r
+ ci->dir=dir_West;\r
+ else\r
+ if (jx>SENSITIVE)\r
+ ci->dir=dir_East;\r
+\r
+ jb=IN_JoyButtons();\r
+ if (jb)\r
+ {\r
+ ci->button0=jb&1;\r
+ ci->button1=jb&2;\r
+ if (joypadenabled)\r
+ {\r
+ ci->button2=jb&4;\r
+ ci->button3=jb&8;\r
+ }\r
+ else\r
+ ci->button2=ci->button3=false;\r
+ }\r
+ }\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// DRAW DIALOG AND CONFIRM YES OR NO TO QUESTION\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int Confirm(char far *string)\r
+{\r
+ int xit=0,i,x,y,tick=0,time,whichsnd[2]={ESCPRESSEDSND,SHOOTSND};\r
+\r
+\r
+ Message(string);\r
+ IN_ClearKeysDown();\r
+\r
+ //\r
+ // BLINK CURSOR\r
+ //\r
+ x=PrintX;\r
+ y=PrintY;\r
+ TimeCount=0;\r
+\r
+ do\r
+ {\r
+ if (TimeCount>=10)\r
+ {\r
+ switch(tick)\r
+ {\r
+ case 0:\r
+ VWB_Bar(x,y,8,13,TEXTCOLOR);\r
+ break;\r
+ case 1:\r
+ PrintX=x;\r
+ PrintY=y;\r
+ US_Print("_");\r
+ }\r
+ VW_UpdateScreen();\r
+ tick^=1;\r
+ TimeCount=0;\r
+ }\r
+\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ PicturePause();\r
+ #endif\r
+\r
+ #ifdef SPANISH\r
+ } while(!Keyboard[sc_S] && !Keyboard[sc_N] && !Keyboard[sc_Escape]);\r
+ #else\r
+ } while(!Keyboard[sc_Y] && !Keyboard[sc_N] && !Keyboard[sc_Escape]);\r
+ #endif\r
+\r
+ #ifdef SPANISH\r
+ if (Keyboard[sc_S])\r
+ {\r
+ xit=1;\r
+ ShootSnd();\r
+ }\r
+\r
+ while(Keyboard[sc_S] || Keyboard[sc_N] || Keyboard[sc_Escape]);\r
+\r
+ #else\r
+\r
+ if (Keyboard[sc_Y])\r
+ {\r
+ xit=1;\r
+ ShootSnd();\r
+ }\r
+\r
+ while(Keyboard[sc_Y] || Keyboard[sc_N] || Keyboard[sc_Escape]);\r
+ #endif\r
+\r
+ IN_ClearKeysDown();\r
+ SD_PlaySound(whichsnd[xit]);\r
+ return xit;\r
+}\r
+\r
+#ifdef JAPAN\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// DRAW MESSAGE & GET Y OR N\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+int GetYorN(int x,int y,int pic)\r
+{\r
+ int xit=0,whichsnd[2]={ESCPRESSEDSND,SHOOTSND};\r
+\r
+\r
+ CA_CacheGrChunk(pic);\r
+ VWB_DrawPic(x * 8,y * 8,pic);\r
+ UNCACHEGRCHUNK(pic);\r
+ VW_UpdateScreen();\r
+ IN_ClearKeysDown();\r
+\r
+ do\r
+ {\r
+ #ifndef SPEAR\r
+ if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))\r
+ PicturePause();\r
+ #endif\r
+\r
+ #ifdef SPANISH\r
+ } while(!Keyboard[sc_S] && !Keyboard[sc_N] && !Keyboard[sc_Escape]);\r
+ #else\r
+ } while(!Keyboard[sc_Y] && !Keyboard[sc_N] && !Keyboard[sc_Escape]);\r
+ #endif\r
+\r
+ #ifdef SPANISH\r
+ if (Keyboard[sc_S])\r
+ {\r
+ xit=1;\r
+ ShootSnd();\r
+ }\r
+\r
+ while(Keyboard[sc_S] || Keyboard[sc_N] || Keyboard[sc_Escape]);\r
+\r
+ #else\r
+\r
+ if (Keyboard[sc_Y])\r
+ {\r
+ xit=1;\r
+ ShootSnd();\r
+ }\r
+\r
+ while(Keyboard[sc_Y] || Keyboard[sc_N] || Keyboard[sc_Escape]);\r
+ #endif\r
+\r
+ IN_ClearKeysDown();\r
+ SD_PlaySound(whichsnd[xit]);\r
+ return xit;\r
+}\r
+#endif\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// PRINT A MESSAGE IN A WINDOW\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+void Message(char far *string)\r
+{\r
+ int h=0,w=0,mw=0,i,x,y,time;\r
+ fontstruct _seg *font;\r
+\r
+\r
+ CA_CacheGrChunk (STARTFONT+1);\r
+ fontnumber=1;\r
+ font=grsegs[STARTFONT+fontnumber];\r
+ h=font->height;\r
+ for (i=0;i<_fstrlen(string);i++)\r
+ if (string[i]=='\n')\r
+ {\r
+ if (w>mw)\r
+ mw=w;\r
+ w=0;\r
+ h+=font->height;\r
+ }\r
+ else\r
+ w+=font->width[string[i]];\r
+\r
+ if (w+10>mw)\r
+ mw=w+10;\r
+\r
+ PrintY=(WindowH/2)-h/2;\r
+ PrintX=WindowX=160-mw/2;\r
+\r
+ DrawWindow(WindowX-5,PrintY-5,mw+10,h+10,TEXTCOLOR);\r
+ DrawOutline(WindowX-5,PrintY-5,mw+10,h+10,0,HIGHLIGHT);\r
+ SETFONTCOLOR(0,TEXTCOLOR);\r
+ US_Print(string);\r
+ VW_UpdateScreen();\r
+}\r
+\r
+\r
+////////////////////////////////////////////////////////////////////\r
+//\r
+// THIS MAY BE FIXED A LITTLE LATER...\r
+//\r
+////////////////////////////////////////////////////////////////////\r
+static int lastmusic;\r
+\r
+void StartCPMusic(int song)\r
+{\r
+ musicnames chunk;\r
+\r
+ if (audiosegs[STARTMUSIC + lastmusic]) // JDC\r
+ MM_FreePtr ((memptr *)&audiosegs[STARTMUSIC + lastmusic]);\r
+ lastmusic = song;\r
+\r
+ SD_MusicOff();\r
+ chunk = song;\r
+\r
+ MM_BombOnError (false);\r
+ CA_CacheAudioChunk(STARTMUSIC + chunk);\r
+ MM_BombOnError (true);\r
+ if (mmerror)\r
+ mmerror = false;\r
+ else\r
+ {\r
+ MM_SetLock(&((memptr)audiosegs[STARTMUSIC + chunk]),true);\r
+ SD_StartMusic((MusicGroup far *)audiosegs[STARTMUSIC + chunk]);\r
+ }\r
+}\r
+\r
+void FreeMusic (void)\r
+{\r
+ if (audiosegs[STARTMUSIC + lastmusic]) // JDC\r
+ MM_FreePtr ((memptr *)&audiosegs[STARTMUSIC + lastmusic]);\r
+}\r
+\r
+\r
+///////////////////////////////////////////////////////////////////////////\r
+//\r
+// IN_GetScanName() - Returns a string containing the name of the\r
+// specified scan code\r
+//\r
+///////////////////////////////////////////////////////////////////////////\r
+byte *\r
+IN_GetScanName(ScanCode scan)\r
+{\r
+ byte **p;\r
+ ScanCode far *s;\r
+\r
+ for (s = ExtScanCodes,p = ExtScanNames;*s;p++,s++)\r
+ if (*s == scan)\r
+ return(*p);\r
+\r
+ return(ScanNames[scan]);\r
+}\r
+\r
+\r
+///////////////////////////////////////////////////////////////////////////\r
+//\r
+// CHECK FOR PAUSE KEY (FOR MUSIC ONLY)\r
+//\r
+///////////////////////////////////////////////////////////////////////////\r
+void CheckPause(void)\r
+{\r
+ if (Paused)\r
+ {\r
+ switch(SoundStatus)\r
+ {\r
+ case 0: SD_MusicOn(); break;\r
+ case 1: SD_MusicOff(); break;\r
+ }\r
+\r
+ SoundStatus^=1;\r
+ VW_WaitVBL(3);\r
+ IN_ClearKeysDown();\r
+ Paused=false;\r
+ }\r
+}\r
+\r
+\r
+///////////////////////////////////////////////////////////////////////////\r
+//\r
+// DRAW GUN CURSOR AT CORRECT POSITION IN MENU\r
+//\r
+///////////////////////////////////////////////////////////////////////////\r
+void DrawMenuGun(CP_iteminfo *iteminfo)\r
+{\r
+ int x,y;\r
+\r
+\r
+ x=iteminfo->x;\r
+ y=iteminfo->y+iteminfo->curpos*13-2;\r
+ VWB_DrawPic(x,y,C_CURSOR1PIC);\r
+}\r
+\r
+\r
+///////////////////////////////////////////////////////////////////////////\r
+//\r
+// DRAW SCREEN TITLE STRIPES\r
+//\r
+///////////////////////////////////////////////////////////////////////////\r
+void DrawStripes(int y)\r
+{\r
+#ifndef SPEAR\r
+ VWB_Bar(0,y,320,24,0);\r
+ VWB_Hlin(0,319,y+22,STRIPE);\r
+#else\r
+ VWB_Bar(0,y,320,22,0);\r
+ VWB_Hlin(0,319,y+23,0);\r
+#endif\r
+}\r
+\r
+void ShootSnd(void)\r
+{\r
+ SD_PlaySound(SHOOTSND);\r
+}\r
+\r
+\r
+///////////////////////////////////////////////////////////////////////////\r
+//\r
+// CHECK FOR EPISODES\r
+//\r
+///////////////////////////////////////////////////////////////////////////\r
+void CheckForEpisodes(void)\r
+{\r
+ struct ffblk f;\r
+\r
+//\r
+// JAPANESE VERSION\r
+//\r
+#ifdef JAPAN\r
+#ifdef JAPDEMO\r
+ if (!findfirst("*.WJ1",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"WJ1");\r
+#else\r
+ if (!findfirst("*.WJ6",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"WJ6");\r
+#endif\r
+ strcat(configname,extension);\r
+ strcat(SaveName,extension);\r
+ strcat(PageFileName,extension);\r
+ strcat(audioname,extension);\r
+ strcat(demoname,extension);\r
+ EpisodeSelect[1] =\r
+ EpisodeSelect[2] =\r
+ EpisodeSelect[3] =\r
+ EpisodeSelect[4] =\r
+ EpisodeSelect[5] = 1;\r
+ }\r
+ else\r
+ Quit("NO JAPANESE WOLFENSTEIN 3-D DATA FILES to be found!");\r
+#else\r
+\r
+//\r
+// ENGLISH\r
+//\r
+#ifndef UPLOAD\r
+#ifndef SPEAR\r
+ if (!findfirst("*.WL6",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"WL6");\r
+ NewEmenu[2].active =\r
+ NewEmenu[4].active =\r
+ NewEmenu[6].active =\r
+ NewEmenu[8].active =\r
+ NewEmenu[10].active =\r
+ EpisodeSelect[1] =\r
+ EpisodeSelect[2] =\r
+ EpisodeSelect[3] =\r
+ EpisodeSelect[4] =\r
+ EpisodeSelect[5] = 1;\r
+ }\r
+ else\r
+ if (!findfirst("*.WL3",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"WL3");\r
+ NewEmenu[2].active =\r
+ NewEmenu[4].active =\r
+ EpisodeSelect[1] =\r
+ EpisodeSelect[2] = 1;\r
+ }\r
+ else\r
+#endif\r
+#endif\r
+\r
+\r
+\r
+#ifdef SPEAR\r
+#ifndef SPEARDEMO\r
+ if (!findfirst("*.SOD",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"SOD");\r
+ }\r
+ else\r
+ Quit("NO SPEAR OF DESTINY DATA FILES TO BE FOUND!");\r
+#else\r
+ if (!findfirst("*.SDM",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"SDM");\r
+ }\r
+ else\r
+ Quit("NO SPEAR OF DESTINY DEMO DATA FILES TO BE FOUND!");\r
+#endif\r
+\r
+#else\r
+ if (!findfirst("*.WL1",&f,FA_ARCH))\r
+ {\r
+ strcpy(extension,"WL1");\r
+ }\r
+ else\r
+ Quit("NO WOLFENSTEIN 3-D DATA FILES to be found!");\r
+#endif\r
+\r
+ strcat(configname,extension);\r
+ strcat(SaveName,extension);\r
+ strcat(PageFileName,extension);\r
+ strcat(audioname,extension);\r
+ strcat(demoname,extension);\r
+#ifndef SPEAR\r
+#ifndef GOODTIMES\r
+ strcat(helpfilename,extension);\r
+#endif\r
+ strcat(endfilename,extension);\r
+#endif\r
+#endif\r
+}\r