//
// END ARTICLES
//
void EndText (void)
{
int artnum;
char *text;
memptr layout;
ClearMemory ();
CA_UpLevel ();
MM_SortMem ();
#ifdef JAPAN
ShowArticle(gamestate.episode + 1);
VW_FadeOut();
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
if (MousePresent)
Mouse(MDelta); // Clear accumulated mouse movement
FreeMusic ();
CA_DownLevel ();
MM_SortMem ();
#else
#ifdef ARTSEXTERN
artnum = endextern+gamestate.episode;
CA_CacheGrChunk (artnum);
text = (char *)grsegs[artnum];
MM_SetLock (&grsegs[artnum], True);
#else
endfilename[6] = '1'+gamestate.episode;
CA_LoadFile (endfilename,&layout);
text = (char *)layout;
MM_SetLock (&layout, True);
#endif
ShowArticle (text);
#ifdef ARTSEXTERN
MM_FreePtr (&grsegs[artnum]);
#else
MM_FreePtr (&layout);
#endif
VW_FadeOut();
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
//FreeMusic ();
CA_DownLevel ();
MM_SortMem ();
#endif
}
void PlayDemo (int demonumber)
{
int length;
#ifdef DEMOSEXTERN
// debug: load chunk
#ifndef SPEARDEMO
int dems[4]={T_DEMO0,T_DEMO1,T_DEMO2,T_DEMO3};
#else
int dems[1]={T_DEMO0};
#endif
CA_CacheGrChunk(dems[demonumber]);
demoptr = grsegs[dems[demonumber]];
MM_SetLock (&grsegs[dems[demonumber]],true);
#else
demoname[4] = '0'+demonumber;
CA_LoadFile (demoname,&demobuffer);
MM_SetLock (&demobuffer,true);
demoptr = (char far *)demobuffer;
#endif
NewGame (1,0);
gamestate.mapon = *demoptr++;
gamestate.difficulty = gd_hard;
length = *((unsigned far *)demoptr)++;
demoptr++;
lastdemoptr = demoptr-4+length;
VW_FadeOut ();
SETFONTCOLOR(0,15);
DrawPlayScreen ();
VW_FadeIn ();
startgame = false;
demoplayback = true;
SetupGameLevel ();
StartMusic ();
PM_CheckMainMem ();
fizzlein = true;
PlayLoop ();
#ifdef DEMOSEXTERN
UNCACHEGRCHUNK(dems[demonumber]);
#else
MM_FreePtr (&demobuffer);
#endif
demoplayback = false;
StopMusic ();
VW_FadeOut ();
ClearMemory ();
}
void RecordDemo (void)
{
int level,esc;
CenterWindow(26,3);
PrintY+=6;
CA_CacheGrChunk(STARTFONT);
fontnumber=0;
US_Print(" Demo which level(1-10):");
VW_UpdateScreen();
VW_FadeIn ();
esc = !US_LineInput (px,py,str,NULL,true,2,0);
if (esc)
return;
level = atoi (str);
level--;
SETFONTCOLOR(0,15);
VW_FadeOut ();
#ifndef SPEAR
NewGame (gd_hard,level/10);
gamestate.mapon = level%10;
#else
NewGame (gd_hard,0);
gamestate.mapon = level;
#endif
StartDemoRecord (level);
DrawPlayScreen ();
VW_FadeIn ();
startgame = false;
demorecord = true;
SetupGameLevel ();
StartMusic ();
PM_CheckMainMem ();
fizzlein = true;
PlayLoop ();
demoplayback = false;
StopMusic ();
VW_FadeOut ();
ClearMemory ();
FinishDemoRecord ();
}
void HelpScreens (void)
{
int artnum;
char *text;
memptr layout;
CA_UpLevel ();
MM_SortMem ();
#ifdef JAPAN
ShowArticle (0);
VW_FadeOut();
FreeMusic ();
CA_DownLevel ();
MM_SortMem ();
#else
#ifdef ARTSEXTERN
artnum = helpextern;
CA_CacheGrChunk (artnum);
text = (char *)grsegs[artnum];
MM_SetLock (&grsegs[artnum], True);
#else
CA_LoadFile (helpfilename,&layout);
text = (char *)layout;
MM_SetLock (&layout, True);
#endif
ShowArticle (text);
#ifdef ARTSEXTERN
MM_FreePtr (&grsegs[artnum]);
#else
MM_FreePtr (&layout);
#endif
VW_FadeOut();
//FreeMusic (); // PORT
CA_DownLevel ();
MM_SortMem ();
#endif
}
//
// END ARTICLES
//
void EndText()
{
int artnum;
const char *text;
ClearMemory();
artnum = endextern+gamestate.episode;
CA_CacheGrChunk(artnum);
if (w0 == true){
text = (const char *)grsegsWL1[artnum];
} else if (w1 == true){
text = (const char *)grsegsWL6[artnum];
} else if (s0 == true){
text = (const char *)grsegsSDM[artnum];
} else {
text = (const char *)grsegsSOD[artnum];
}
ShowArticle(text);
CA_UnCacheGrChunk(artnum);
VW_FadeOut();
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
IN_GetMouseDelta(NULL, NULL); // Clear accumulated mouse movement
FreeMusic();
}
void DrawPlayScreen (void)
{
int i,j,p,m;
unsigned temp;
VW_FadeOut ();
temp = bufferofs;
CA_CacheGrChunk (STATUSBARPIC);
for (i=0;i<3;i++)
{
bufferofs = screenloc[i];
DrawPlayBorder ();
VWB_DrawPic (0,200-STATUSLINES,STATUSBARPIC);
}
bufferofs = temp;
UNCACHEGRCHUNK (STATUSBARPIC);
DrawFace ();
DrawHealth ();
DrawLives ();
DrawLevel ();
DrawAmmo ();
DrawKeys ();
DrawWeapon ();
DrawScore ();
}
void PG13 (void)
{
VW_FadeOut();
VWB_Bar(0,0,320,200,0x82); // background
CA_CacheGrChunk (PG13PIC);
VWB_DrawPic (216,110,PG13PIC);
VW_UpdateScreen ();
UNCACHEGRCHUNK (PG13PIC);
VW_FadeIn();
IN_UserInput(TickBase*7);
VW_FadeOut ();
}
//-------------------------------------------------------------------------
// PreFullDisplay()
//-------------------------------------------------------------------------
void PreFullDisplay()
{
VW_FadeOut();
VW_SetSplitScreen(200);
bufferofs = displayofs = screenloc[0];
VW_Bar(0,0,320,200,0);
}
/*
=================
=
= HelpScreens
=
=================
*/
void HelpScreens()
{
int artnum;
const char *text;
artnum = helpextern;
CA_CacheGrChunk(artnum);
if (w0 == true){
text = (const char *)grsegsWL1[artnum];
} else if (w1 == true){
text = (const char *)grsegsWL6[artnum];
} else if (s0 == true){
text = (const char *)grsegsSDM[artnum];
} else {
text = (const char *)grsegsSOD[artnum];
}
ShowArticle(text);
CA_UnCacheGrChunk(artnum);
VW_FadeOut();
FreeMusic();
}
void EndScreen (int palette, int screen)
{
CA_CacheScreen (screen);
VW_UpdateScreen ();
CA_CacheGrChunk (palette);
VL_FadeIn(0,255,grsegs[palette],30);
UNCACHEGRCHUNK (palette);
IN_ClearKeysDown ();
IN_Ack ();
VW_FadeOut ();
}
/*
=================
=
= HelpScreens
=
=================
*/
void HelpScreens (void)
{
int lumpNum = Wads.CheckNumForName("HELPART", ns_global);
if(lumpNum != -1)
{
FMemLump lump = Wads.ReadLump(lumpNum);
backgroundFlat = TexMan(gameinfo.FinaleFlat);
ShowArticle((char*)lump.GetMem());
}
VW_FadeOut();
}
void
EndScreen (int palette, int screen)
{
SDL_Color pal[256];
CA_CacheScreen (screen);
VW_UpdateScreen ();
CA_CacheGrChunk (palette);
VL_ConvertPalette(grsegs[palette], pal, 256);
VL_FadeIn (0, 255, pal, 30);
UNCACHEGRCHUNK (palette);
IN_ClearKeysDown ();
IN_Ack ();
VW_FadeOut ();
}
//-------------------------------------------------------------------------
// Display320()
//-------------------------------------------------------------------------
void Display320(void)
{
// Can you believe it takes all this just to change to 320 mode!!???!
//
VW_ColorBorder(0);
VW_FadeOut();
VW_SetLineWidth(40);
MoveScreen(0,0);
VW_Bar (0,0,320,200,0);
VW_SetScreenMode(EGA320GR);
VW_SetLineWidth(40);
BlackPalette();
VW_ScreenToScreen(FREESTART-STATUSLEN,0,40,80);
}
void DemoLoop (void)
{
/////////////////////////////////////////////////////////////////////////////
// main game cycle
/////////////////////////////////////////////////////////////////////////////
displayofs = bufferofs = 0;
VW_Bar (0,0,320,200,0);
VW_SetScreen(0,0);
//
// Read in all the graphic images needed for the title sequence
//
VW_WaitVBL(1);
IN_ReadControl(0,&control);
// set EASYMODE
//
if (BE_Cross_strcasecmp(id0_argv[2], "1") == 0)
EASYMODEON = true;
else
EASYMODEON = false;
// restore game
//
if (BE_Cross_strcasecmp(id0_argv[3], "1") == 0)
{
VW_FadeOut();
bufferofs = displayofs = 0;
VW_Bar(0,0,320,200,0);
if (GE_LoadGame())
{
loadedgame = true;
playstate = ex_loadedgame;
Keyboard[sc_Enter] = true;
VW_Bar(0,0,320,200,0);
ColoredPalette();
}
VW_Bar(0,0,320,200,0);
VW_FadeIn();
}
// Play a game
//
restartgame = gd_Normal;
NewGame();
GameLoop();
}
void EndSpear()
{
EndScreen(END1PALETTE, ENDSCREEN11PIC);
VL_CacheScreen(ENDSCREEN3PIC);
VW_UpdateScreen();
CA_CacheGrChunk(END3PALETTE);
VL_FadeIn(0, 255, grsegs[END3PALETTE], 30);
CA_UnCacheGrChunk(END3PALETTE);
fontnumber = 0;
fontcolor = 0xd0;
WindowX = 0;
WindowW = 320;
PrintX = 0;
PrintY = 180;
US_CPrint(STR_ENDGAME1"\n");
US_CPrint(STR_ENDGAME2);
VW_UpdateScreen();
IN_StartAck ();
set_TimeCount(0);
while ( !IN_CheckAck () && (get_TimeCount() < 700) );
PrintX = 0;
PrintY = 180;
VW_Bar(0,180,320,20,0);
US_CPrint(STR_ENDGAME3"\n");
US_CPrint(STR_ENDGAME4);
VW_UpdateScreen();
IN_StartAck ();
set_TimeCount(0);
while ( !IN_CheckAck () && (get_TimeCount() < 700) );
VW_FadeOut ();
EndScreen (END4PALETTE, ENDSCREEN4PIC);
EndScreen (END5PALETTE, ENDSCREEN5PIC);
EndScreen (END6PALETTE, ENDSCREEN6PIC);
EndScreen (END7PALETTE, ENDSCREEN7PIC);
EndScreen (END8PALETTE, ENDSCREEN8PIC);
EndScreen (END9PALETTE, ENDSCREEN9PIC);
EndScreen (END2PALETTE, ENDSCREEN12PIC);
MainMenu[savegame].active = 0;
}
void PreloadGraphics(void)
{
WindowY=188;
if (!(gamestate.flags & GS_QUICKRUN))
VW_FadeIn ();
PM_Preload(PreloadUpdate);
IN_UserInput(70);
if (playstate != ex_transported)
VW_FadeOut ();
DrawPlayBorder ();
VW_UpdateScreen ();
}
/*
=================
=
= HelpScreens
=
=================
*/
void HelpScreens()
{
int artnum;
signed char *text;
artnum = helpextern;
CA_CacheGrChunk(artnum);
text = (signed char *)grsegs[artnum];
ShowArticle(text);
CA_UnCacheGrChunk(artnum);
VW_FadeOut();
FreeMusic();
}
void
EndSpear (void)
{
SDL_Color pal[256];
EndScreen (END1PALETTE, ENDSCREEN11PIC);
CA_CacheScreen (ENDSCREEN3PIC);
VW_UpdateScreen ();
CA_CacheGrChunk (END3PALETTE);
VL_ConvertPalette(grsegs[END3PALETTE], pal, 256);
VL_FadeIn (0, 255, pal, 30);
UNCACHEGRCHUNK (END3PALETTE);
fontnumber = 0;
fontcolor = 0xd0;
WindowX = 0;
WindowW = 320;
PrintX = 0;
PrintY = 180;
US_CPrint (STR_ENDGAME1 "\n");
US_CPrint (STR_ENDGAME2);
VW_UpdateScreen ();
IN_UserInput(700);
PrintX = 0;
PrintY = 180;
VWB_Bar (0, 180, 320, 20, 0);
US_CPrint (STR_ENDGAME3 "\n");
US_CPrint (STR_ENDGAME4);
VW_UpdateScreen ();
IN_UserInput(700);
VW_FadeOut ();
EndScreen (END4PALETTE, ENDSCREEN4PIC);
EndScreen (END5PALETTE, ENDSCREEN5PIC);
EndScreen (END6PALETTE, ENDSCREEN6PIC);
EndScreen (END7PALETTE, ENDSCREEN7PIC);
EndScreen (END8PALETTE, ENDSCREEN8PIC);
EndScreen (END9PALETTE, ENDSCREEN9PIC);
EndScreen (END2PALETTE, ENDSCREEN12PIC);
MainMenu[savegame].active = 0;
}
void DemoLoop (void)
{
/////////////////////////////////////////////////////////////////////////////
// main game cycle
/////////////////////////////////////////////////////////////////////////////
// displayofs = bufferofs = 0;
// VW_Bar (0,0,320,200,0);
// VW_SetScreen(0,0);
// set EASYMODE
//
if (BE_Cross_strcasecmp(id0_argv[2], "1") == 0)
EASYMODEON = true;
else
EASYMODEON = false;
// restore game
//
if (BE_Cross_strcasecmp(id0_argv[3], "1") == 0)
{
VW_FadeOut();
bufferofs = displayofs = 0;
VW_Bar(0,0,320,200,0);
if (GE_LoadGame())
{
loadedgame = true;
playstate = ex_loadedgame;
Keyboard[sc_Enter] = true;
VW_Bar(0,0,320,200,0);
ColoredPalette();
}
VW_Bar(0,0,320,200,0);
VW_FadeIn();
}
// Play a game
//
restartgame = gd_Normal;
NewGame();
GameLoop();
}
void PreloadGraphics()
{
WindowY = 188;
if (!(gamestate.flags & GS_QUICKRUN)) {
VW_FadeIn();
}
// BBi No delay
#if 0
IN_UserInput(70);
#endif
if (playstate != ex_transported) {
VW_FadeOut();
}
DrawPlayBorder();
VW_UpdateScreen();
}
//
// END ARTICLES
//
void EndText()
{
int artnum;
signed char *text;
ClearMemory();
artnum = endextern+gamestate.episode;
CA_CacheGrChunk(artnum);
text = (signed char *)grsegs[artnum];
ShowArticle(text);
CA_UnCacheGrChunk(artnum);
VW_FadeOut();
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
FreeMusic();
}
// Episode start execute entertext.
void EnterText(unsigned int cluster)
{
ClearMemory ();
ClusterInfo &clusterInfo = ClusterInfo::Find(cluster);
if(!clusterInfo.EnterText.IsEmpty())
{
textcolor = clusterInfo.TextColor;
font = clusterInfo.TextFont;
alignment = clusterInfo.TextAlignment;
anchor = clusterInfo.TextAnchor;
if(clusterInfo.EnterTextType != ClusterInfo::EXIT_MESSAGE)
VW_FadeOut();
ShowText(clusterInfo.EnterText, clusterInfo.Flat, clusterInfo.Music, clusterInfo.EnterTextType);
}
if(!clusterInfo.EnterSlideshow.IsEmpty())
{
IntermissionInfo *intermission = IntermissionInfo::Find(clusterInfo.EnterSlideshow);
ShowIntermission(intermission);
}
}
void PrintHelp(void)
{
id0_char_t oldfontcolor = fontcolor;
PrintY = 1;
WindowX = 135;
WindowW = 640;
VW_FadeOut();
bufferofs = displayofs = screenloc[0];
VW_Bar(0,0,320,200,0);
Display640();
VW_Bar(0, 0, 640, 200, 7);
fontcolor = (7 ^ 1);
US_Print ("\n\n SUMMARY OF GAME CONTROLS\n\n");
fontcolor = (7 ^ 4);
US_Print (" ACTION\n\n");
US_Print ("Arrow keys, joystick, or mouse\n");
US_Print ("TAB or V while turning\n");
US_Print ("ALT or Button 2 while turning\n");
US_Print ("CTRL or Button 1\n");
US_Print ("Z\n");
US_Print ("X or Enter\n");
US_Print ("F1\n");
US_Print ("F2\n");
US_Print ("F3\n");
US_Print ("F4\n");
US_Print ("F5\n");
US_Print ("ESC\n\n");
fontcolor = (7 ^ 0);
#ifndef CATALOG
US_Print (" (See complete Instructions for more info)\n");
#endif
US_Print ("\n copyright (c) 1992-93 Softdisk Publishing\n");
fontcolor = (7 ^ 8);
PrintX = 400;
PrintY = 37;
WindowX = 400;
US_Print (" REACTION\n\n");
US_Print ("Move and turn\n");
US_Print ("Turn quickly (Quick Turn)\n");
US_Print ("Move sideways\n");
US_Print ("Shoot a Missile\n");
US_Print ("Shoot a Zapper\n");
US_Print ("Shoot an Xterminator\n");
US_Print ("Help (this screen)\n");
US_Print ("Sound control\n");
US_Print ("Save game position\n");
US_Print ("Restore a saved game\n");
US_Print ("Joystick control\n");
US_Print ("System options\n\n\n");
VW_UpdateScreen();
VW_FadeIn();
VW_ColorBorder(8 | 56);
IN_Ack();
Display320();
fontcolor = oldfontcolor;
}
void CheckKeys (void)
{
int i;
byte scan;
unsigned temp;
if (screenfaded || demoplayback) // don't do anything with a faded screen
return;
scan = LastScan;
#ifdef SPEAR
//
// SECRET CHEAT CODE: TAB-G-F10
//
if (Keyboard[sc_Tab] &&
Keyboard[sc_G] &&
Keyboard[sc_F10])
{
WindowH = 160;
if (godmode)
{
Message ("God mode OFF");
SD_PlaySound (NOBONUSSND);
}
else
{
Message ("God mode ON");
SD_PlaySound (ENDBONUS2SND);
}
IN_Ack();
godmode ^= 1;
DrawAllPlayBorderSides ();
IN_ClearKeysDown();
return;
}
#endif
//
// SECRET CHEAT CODE: 'MLI'
//
if (Keyboard[sc_M] &&
Keyboard[sc_L] &&
Keyboard[sc_I])
{
gamestate.health = 100;
gamestate.ammo = 99;
gamestate.keys = 3;
gamestate.score = 0;
gamestate.TimeCount += 42000L;
GiveWeapon (wp_chaingun);
DrawWeapon();
DrawHealth();
DrawKeys();
DrawAmmo();
DrawScore();
ClearMemory ();
CA_CacheGrChunk (STARTFONT+1);
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
Message(STR_CHEATER1"\n"
STR_CHEATER2"\n\n"
STR_CHEATER3"\n"
STR_CHEATER4"\n"
STR_CHEATER5);
UNCACHEGRCHUNK(STARTFONT+1);
PM_CheckMainMem ();
IN_ClearKeysDown();
IN_Ack();
DrawAllPlayBorder ();
}
//
// OPEN UP DEBUG KEYS
//
#ifndef SPEAR
if (Keyboard[sc_BackSpace] &&
Keyboard[sc_LShift] &&
Keyboard[sc_Alt] &&
MS_CheckParm("goobers"))
#else
if (Keyboard[sc_BackSpace] &&
Keyboard[sc_LShift] &&
Keyboard[sc_Alt] &&
MS_CheckParm("debugmode"))
#endif
{
ClearMemory ();
CA_CacheGrChunk (STARTFONT+1);
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
Message("Debugging keys are\nnow available!");
UNCACHEGRCHUNK(STARTFONT+1);
PM_CheckMainMem ();
IN_ClearKeysDown();
IN_Ack();
DrawAllPlayBorderSides ();
DebugOk=1;
}
//
// TRYING THE KEEN CHEAT CODE!
//
if (Keyboard[sc_B] &&
Keyboard[sc_A] &&
Keyboard[sc_T])
{
ClearMemory ();
CA_CacheGrChunk (STARTFONT+1);
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
Message("Commander Keen is also\n"
"available from Apogee, but\n"
"then, you already know\n"
"that - right, Cheatmeister?!");
UNCACHEGRCHUNK(STARTFONT+1);
PM_CheckMainMem ();
IN_ClearKeysDown();
IN_Ack();
DrawAllPlayBorder ();
}
//
// pause key weirdness can't be checked as a scan code
//
if (Paused)
{
bufferofs = displayofs;
LatchDrawPic (20-4,80-2*8,PAUSEDPIC);
SD_MusicOff();
IN_Ack();
IN_ClearKeysDown ();
SD_MusicOn();
Paused = False;
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
return;
}
//
// F1-F7/ESC to enter control panel
//
if (
#ifndef DEBCHECK
scan == sc_F10 ||
#endif
scan == sc_F9 ||
scan == sc_F7 ||
scan == sc_F8) // pop up quit dialog
{
ClearMemory ();
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
US_ControlPanel(scan);
DrawAllPlayBorderSides ();
if (scan == sc_F9)
StartMusic ();
PM_CheckMainMem ();
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
return;
}
if ( (scan >= sc_F1 && scan <= sc_F9) || scan == sc_Escape)
{
StopMusic ();
ClearMemory ();
VW_FadeOut ();
US_ControlPanel(scan);
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
DrawPlayScreen ();
if (!startgame && !loadedgame)
{
VW_FadeIn ();
StartMusic ();
}
if (loadedgame)
playstate = ex_abort;
lasttimecount = TimeCount;
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
PM_CheckMainMem ();
return;
}
//
// TAB-? debug keys
//
if (Keyboard[sc_Tab] && DebugOk)
{
CA_CacheGrChunk (STARTFONT);
fontnumber=0;
SETFONTCOLOR(0,15);
DebugKeys();
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
lasttimecount = TimeCount;
return;
}
}
void Victory (void)
{
#ifndef SPEARDEMO
long sec;
int i,min,kr,sr,tr,x;
char tempstr[8];
#define RATIOX 6
#define RATIOY 14
#define TIMEX 14
#define TIMEY 8
#ifdef SPEAR
StartCPMusic (XTHEEND_MUS);
CA_CacheGrChunk(BJCOLLAPSE1PIC);
CA_CacheGrChunk(BJCOLLAPSE2PIC);
CA_CacheGrChunk(BJCOLLAPSE3PIC);
CA_CacheGrChunk(BJCOLLAPSE4PIC);
VWB_Bar(0,0,320,200,VIEWCOLOR);
VWB_DrawPic (124,44,BJCOLLAPSE1PIC);
VW_UpdateScreen ();
VW_FadeIn ();
VW_WaitVBL(2*70);
VWB_DrawPic (124,44,BJCOLLAPSE2PIC);
VW_UpdateScreen ();
VW_WaitVBL(105);
VWB_DrawPic (124,44,BJCOLLAPSE3PIC);
VW_UpdateScreen ();
VW_WaitVBL(105);
VWB_DrawPic (124,44,BJCOLLAPSE4PIC);
VW_UpdateScreen ();
VW_WaitVBL(3*70);
UNCACHEGRCHUNK(BJCOLLAPSE1PIC);
UNCACHEGRCHUNK(BJCOLLAPSE2PIC);
UNCACHEGRCHUNK(BJCOLLAPSE3PIC);
UNCACHEGRCHUNK(BJCOLLAPSE4PIC);
VL_FadeOut (0,255,0,17,17,5);
#endif
StartCPMusic (URAHERO_MUS);
ClearSplitVWB ();
CacheLump(LEVELEND_LUMP_START,LEVELEND_LUMP_END);
CA_CacheGrChunk(STARTFONT);
#ifndef SPEAR
CA_CacheGrChunk(C_TIMECODEPIC);
#endif
VWB_Bar (0,0,320,200-STATUSLINES,127);
#ifdef JAPAN
#ifndef JAPDEMO
CA_CacheGrChunk(C_ENDRATIOSPIC);
VWB_DrawPic(0,0,C_ENDRATIOSPIC);
UNCACHEGRCHUNK(C_ENDRATIOSPIC);
#endif
#else
Write(18,2,STR_YOUWIN);
Write(TIMEX,TIMEY-2,STR_TOTALTIME);
Write(12,RATIOY-2,"averages");
#ifdef SPANISH
Write(RATIOX+2, RATIOY, STR_RATKILL);
Write(RATIOX+2, RATIOY+2, STR_RATSECRET);
Write(RATIOX+2, RATIOY+4,STR_RATTREASURE);
#else
Write(RATIOX+8,RATIOY, STR_RATKILL);
Write(RATIOX+4,RATIOY+2, STR_RATSECRET);
Write(RATIOX, RATIOY+4,STR_RATTREASURE);
#endif
#endif
#ifndef JAPDEMO
VWB_DrawPic (8,4,L_BJWINSPIC);
#endif
#ifndef SPEAR
for (kr = sr = tr = sec = i = 0;i < 8;i++)
#else
for (kr = sr = tr = sec = i = 0;i < 20;i++)
#endif
{
sec += LevelRatios[i].time;
kr += LevelRatios[i].kill;
sr += LevelRatios[i].secret;
tr += LevelRatios[i].treasure;
}
#ifndef SPEAR
kr /= 8;
sr /= 8;
tr /= 8;
#else
kr /= 14;
sr /= 14;
tr /= 14;
#endif
min = sec/60;
sec %= 60;
if (min > 99)
min = sec = 99;
i = TIMEX*8+1;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(min/10));
i += 2*8;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(min%10));
i += 2*8;
Write(i/8,TIMEY,":");
i += 1*8;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(sec/10));
i += 2*8;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(sec%10));
VW_UpdateScreen ();
itoa(kr,tempstr,10);
x=RATIOX+24-strlen(tempstr)*2;
Write(x,RATIOY,tempstr);
itoa(sr,tempstr,10);
x=RATIOX+24-strlen(tempstr)*2;
Write(x,RATIOY+2,tempstr);
itoa(tr,tempstr,10);
x=RATIOX+24-strlen(tempstr)*2;
Write(x,RATIOY+4,tempstr);
#ifndef SPANISH
#ifndef UPLOAD
#ifndef SPEAR
//
// TOTAL TIME VERIFICATION CODE
//
if (gamestate.difficulty>=gd_medium)
{
VWB_DrawPic (30*8,TIMEY*8,C_TIMECODEPIC);
fontnumber = 0;
fontcolor = READHCOLOR;
PrintX = 30*8-3;
PrintY = TIMEY*8+8;
PrintX+=4;
tempstr[0] = (((min/10)^(min%10))^0xa)+'A';
tempstr[1] = (((sec/10)^(sec%10))^0xa)+'A';
tempstr[2] = (tempstr[0]^tempstr[1])+'A';
tempstr[3] = 0;
US_Print(tempstr);
}
#endif
#endif
#endif
fontnumber = 1;
VW_UpdateScreen ();
VW_FadeIn ();
IN_Ack();
#ifndef SPEAR
if (Keyboard[sc_P] && MS_CheckParm("goobers"))
PicturePause();
#endif
VW_FadeOut ();
#ifndef SPEAR
UNCACHEGRCHUNK(C_TIMECODEPIC);
#endif
UnCacheLump(LEVELEND_LUMP_START,LEVELEND_LUMP_END);
#ifndef SPEAR
EndText();
#else
EndSpear();
#endif
#endif // SPEARDEMO
}
void Victory()
{
#ifndef SPEARDEMO
long sec;
int i,min,kr,sr,tr,x;
char tempstr[8];
#define RATIOX 6
#define RATIOY 14
#define TIMEX 14
#define TIMEY 8
#ifdef SPEAR
StartCPMusic(XTHEEND_MUS);
CA_CacheGrChunk(BJCOLLAPSE1PIC);
CA_CacheGrChunk(BJCOLLAPSE2PIC);
CA_CacheGrChunk(BJCOLLAPSE3PIC);
CA_CacheGrChunk(BJCOLLAPSE4PIC);
VW_Bar(0,0,320,200,VIEWCOLOR);
VWB_DrawPic (124,44,BJCOLLAPSE1PIC);
VW_UpdateScreen ();
VW_FadeIn ();
VW_WaitVBL(2*70);
VWB_DrawPic (124,44,BJCOLLAPSE2PIC);
VW_UpdateScreen ();
VW_WaitVBL(105);
VWB_DrawPic (124,44,BJCOLLAPSE3PIC);
VW_UpdateScreen ();
VW_WaitVBL(105);
VWB_DrawPic (124,44,BJCOLLAPSE4PIC);
VW_UpdateScreen ();
VW_WaitVBL(3*70);
CA_UnCacheGrChunk(BJCOLLAPSE1PIC);
CA_UnCacheGrChunk(BJCOLLAPSE2PIC);
CA_UnCacheGrChunk(BJCOLLAPSE3PIC);
CA_UnCacheGrChunk(BJCOLLAPSE4PIC);
VL_FadeOut (0,255,0,17,17,5);
#endif
StartCPMusic (URAHERO_MUS);
ClearSplitVWB ();
CacheLump(LEVELEND_LUMP_START,LEVELEND_LUMP_END);
CA_CacheGrChunk(STARTFONT);
VW_Bar (0,0,320,200-STATUSLINES,127);
Write(18,2,STR_YOUWIN);
Write(TIMEX,TIMEY-2,STR_TOTALTIME);
Write(12,RATIOY-2,"averages");
Write(RATIOX+8,RATIOY, STR_RATKILL);
Write(RATIOX+4,RATIOY+2, STR_RATSECRET);
Write(RATIOX, RATIOY+4,STR_RATTREASURE);
VWB_DrawPic (8,4,L_BJWINSPIC);
#ifndef SPEAR
for (kr = sr = tr = sec = i = 0;i < 8;i++)
#else
for (kr = sr = tr = sec = i = 0;i < 20;i++)
#endif
{
sec += LevelRatios[i].time;
kr += LevelRatios[i].kill;
sr += LevelRatios[i].secret;
tr += LevelRatios[i].treasure;
}
#ifndef SPEAR
kr /= 8;
sr /= 8;
tr /= 8;
#else
kr /= 14;
sr /= 14;
tr /= 14;
#endif
min = sec/60;
sec %= 60;
if (min > 99)
min = sec = 99;
i = TIMEX*8+1;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(min/10));
i += 2*8;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(min%10));
i += 2*8;
Write(i/8,TIMEY,":");
i += 1*8;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(sec/10));
i += 2*8;
VWB_DrawPic(i,TIMEY*8,L_NUM0PIC+(sec%10));
VW_UpdateScreen ();
itoa(kr,tempstr,10);
x=RATIOX+24-strlen(tempstr)*2;
Write(x,RATIOY,tempstr);
itoa(sr,tempstr,10);
x=RATIOX+24-strlen(tempstr)*2;
Write(x,RATIOY+2,tempstr);
itoa(tr,tempstr,10);
x=RATIOX+24-strlen(tempstr)*2;
Write(x,RATIOY+4,tempstr);
fontnumber = 1;
VW_UpdateScreen ();
VW_FadeIn ();
IN_Ack();
#ifndef SPEAR
if (IN_KeyDown(sc_P) && MS_CheckParm("debugmode"))
PicturePause();
#endif
VW_FadeOut ();
UnCacheLump(LEVELEND_LUMP_START,LEVELEND_LUMP_END);
#ifndef SPEAR
EndText();
#else
EndSpear();
#endif
#endif /* SPEARDEMO */
}
static int DemoLoop(unsigned id)
{
static int LastDemo = 0;
switch (id)
{
case JE_NONE:
/* check for launch from ted */
if (param_tedlevel != -1)
{
param_nowait = true;
EnableEndGameMenuItem();
NewGame(param_difficulty,0);
gamestate.episode = 0;
gamestate.mapon = param_tedlevel;
#ifndef SPEAR
gamestate.episode = param_tedlevel/10;
gamestate.mapon %= 10;
#endif
return JE_LOOP2;
}
/* main game cycle */
#ifndef DEMOTEST
#ifndef UPLOAD
#ifndef GOODTIMES
#ifndef SPEAR
#ifndef JAPAN
if (!param_nowait)
NonShareware();
#endif
#else
#ifndef GOODTIMES
#ifndef SPEARDEMO
extern void CopyProtection(void);
if(!param_goodtimes)
CopyProtection();
#endif
#endif
#endif
#endif
#endif
StartCPMusic(INTROSONG);
#ifndef JAPAN
if (!param_nowait)
PG13 ();
#endif
#endif
return JE_LOOP;
case JE_LOOP:
while (!param_nowait)
{
#ifndef DEMOTEST
#ifdef SPEAR
LR_Color pal[256];
/* title page */
CA_CacheGrChunk (TITLEPALETTE);
VL_ConvertPalette(grsegs[TITLEPALETTE], pal, 256);
CA_CacheGrChunk (TITLE1PIC);
VWB_DrawPic (0,0,TITLE1PIC);
UNCACHEGRCHUNK (TITLE1PIC);
CA_CacheGrChunk (TITLE2PIC);
VWB_DrawPic (0,80,TITLE2PIC);
UNCACHEGRCHUNK (TITLE2PIC);
VW_UpdateScreen ();
VL_FadeIn(0,255,pal,30);
UNCACHEGRCHUNK (TITLEPALETTE);
#else
CA_CacheScreen (TITLEPIC);
VW_UpdateScreen ();
VW_FadeIn();
#endif
if (IN_UserInput(TickBase*15))
break;
VW_FadeOut();
/* credits page */
CA_CacheScreen (CREDITSPIC);
VW_UpdateScreen();
VW_FadeIn ();
if (IN_UserInput(TickBase*10))
break;
VW_FadeOut ();
DrawHighScores ();
VW_UpdateScreen ();
VW_FadeIn ();
if (IN_UserInput(TickBase*10))
break;
#endif
/* demo */
#ifndef SPEARDEMO
PlayDemo (LastDemo++%4);
#else
PlayDemo (0);
#endif
if (playstate == EX_ABORT)
return JE_QUIT;
VW_FadeOut();
if(screenHeight % 200 != 0)
VL_ClearScreen(0);
StartCPMusic(INTROSONG);
}
VW_FadeOut ();
#ifdef DEBUGKEYS
if (Keyboard[sc_Tab] && param_debugmode)
RecordDemo ();
else
#endif
US_ControlPanel (0);
if (startgame || loadedgame)
return JE_LOOP2;
break;
case JE_LOOP2:
id = GameLoop();
if (param_tedlevel == -1 && id == -1)
{
if(!param_nowait)
{
VW_FadeOut();
StartCPMusic(INTROSONG);
}
}
break;
}
return JE_LOOP2;
}
void CheckKeys (void)
{
ScanCode scan;
if (screenfaded || demoplayback) // don't do anything with a faded screen
return;
scan = LastScan;
#ifdef SPEAR
//
// SECRET CHEAT CODE: TAB-G-F10
//
if (Keyboard[sc_Tab] && Keyboard[sc_G] && Keyboard[sc_F10])
{
WindowH = 160;
if (godmode)
{
Message ("God mode OFF");
SD_PlaySound (NOBONUSSND);
}
else
{
Message ("God mode ON");
SD_PlaySound (ENDBONUS2SND);
}
IN_Ack ();
godmode ^= 1;
DrawPlayBorderSides ();
IN_ClearKeysDown ();
return;
}
#endif
//
// SECRET CHEAT CODE: 'MLI'
//
if (Keyboard[sc_M] && Keyboard[sc_L] && Keyboard[sc_I])
{
gamestate.health = 100;
gamestate.ammo = 99;
gamestate.keys = 3;
gamestate.score = 0;
gamestate.TimeCount += 42000L;
GiveWeapon (wp_chaingun);
DrawWeapon ();
DrawHealth ();
DrawKeys ();
DrawAmmo ();
DrawScore ();
ClearMemory ();
CA_CacheGrChunk (STARTFONT + 1);
ClearSplitVWB ();
Message (STR_CHEATER1 "\n"
STR_CHEATER2 "\n\n" STR_CHEATER3 "\n" STR_CHEATER4 "\n" STR_CHEATER5);
UNCACHEGRCHUNK (STARTFONT + 1);
IN_ClearKeysDown ();
IN_Ack ();
if (viewsize < 17)
DrawPlayBorder ();
}
//
// OPEN UP DEBUG KEYS
//
#ifdef DEBUGKEYS
if (Keyboard[sc_BackSpace] && Keyboard[sc_LShift] && Keyboard[sc_Alt] && param_debugmode)
{
ClearMemory ();
CA_CacheGrChunk (STARTFONT + 1);
ClearSplitVWB ();
Message ("Debugging keys are\nnow available!");
UNCACHEGRCHUNK (STARTFONT + 1);
IN_ClearKeysDown ();
IN_Ack ();
DrawPlayBorderSides ();
DebugOk = 1;
}
#endif
//
// TRYING THE KEEN CHEAT CODE!
//
if (Keyboard[sc_B] && Keyboard[sc_A] && Keyboard[sc_T])
{
ClearMemory ();
CA_CacheGrChunk (STARTFONT + 1);
ClearSplitVWB ();
Message ("Commander Keen is also\n"
"available from Apogee, but\n"
"then, you already know\n" "that - right, Cheatmeister?!");
UNCACHEGRCHUNK (STARTFONT + 1);
IN_ClearKeysDown ();
IN_Ack ();
if (viewsize < 18)
DrawPlayBorder ();
}
//
// pause key weirdness can't be checked as a scan code
//
if(buttonstate[bt_pause]) Paused = true;
if(Paused)
{
int lastoffs = StopMusic();
LatchDrawPic (20 - 4, 80 - 2 * 8, PAUSEDPIC);
VH_UpdateScreen();
IN_Ack ();
Paused = false;
ContinueMusic(lastoffs);
if (MousePresent && IN_IsInputGrabbed())
IN_CenterMouse(); // Clear accumulated mouse movement
lasttimecount = GetTimeCount();
return;
}
//
// F1-F7/ESC to enter control panel
//
if (
#ifndef DEBCHECK
scan == sc_F10 ||
#endif
scan == sc_F9 || scan == sc_F7 || scan == sc_F8) // pop up quit dialog
{
short oldmapon = gamestate.mapon;
short oldepisode = gamestate.episode;
ClearMemory ();
ClearSplitVWB ();
US_ControlPanel (scan);
DrawPlayBorderSides ();
SETFONTCOLOR (0, 15);
IN_ClearKeysDown ();
return;
}
if ((scan >= sc_F1 && scan <= sc_F9) || scan == sc_Escape || buttonstate[bt_esc])
{
int lastoffs = StopMusic ();
ClearMemory ();
VW_FadeOut ();
US_ControlPanel (buttonstate[bt_esc] ? sc_Escape : scan);
SETFONTCOLOR (0, 15);
IN_ClearKeysDown ();
VW_FadeOut();
if(viewsize != 21)
DrawPlayScreen ();
if (!startgame && !loadedgame)
ContinueMusic (lastoffs);
if (loadedgame)
playstate = ex_abort;
lasttimecount = GetTimeCount();
if (MousePresent && IN_IsInputGrabbed())
IN_CenterMouse(); // Clear accumulated mouse movement
return;
}
//
// TAB-? debug keys
//
#ifdef DEBUGKEYS
if (Keyboard[sc_Tab] && DebugOk)
{
CA_CacheGrChunk (STARTFONT);
fontnumber = 0;
SETFONTCOLOR (0, 15);
if (DebugKeys () && viewsize < 20)
DrawPlayBorder (); // dont let the blue borders flash
if (MousePresent && IN_IsInputGrabbed())
IN_CenterMouse(); // Clear accumulated mouse movement
lasttimecount = GetTimeCount();
return;
}
#endif
}
void CheckKeys (void)
{
//extern id0_boolean_t autofire;
if (screenfaded) // don't do anything with a faded screen
return;
#if 0
//
// pause key wierdness can't be checked as a scan code
//
if (Paused)
{
CenterWindow (8,3);
US_PrintCentered ("PAUSED");
VW_UpdateScreen ();
// SD_MusicOff();
IN_Ack();
// SD_MusicOn();
Paused = false;
// (REFKEEN) Minor difference from vanilla Catacomb
if (MousePresent) BE_ST_GetEmuAccuMouseMotion(NULL, NULL); // Clear accumulated mouse movement
//if (MousePresent) Mouse(MDelta); // Clear accumulated mouse movement
}
else
if (Keyboard[sc_Enter]) // P = pause with no screen disruptioon
{
// SD_MusicOff();
DisplaySMsg("PAUSED",NULL);
IN_Ack();
// SD_MusicOn();
// (REFKEEN) Minor difference from vanilla Catacomb
if (MousePresent) BE_ST_GetEmuAccuMouseMotion(NULL, NULL); // Clear accumulated mouse movement
//if (MousePresent) Mouse(MDelta); // Clear accumulated mouse movement
}
else
if (Keyboard[sc_S])
{
id0_char_t *Text[] = {{"Slow Mode ON"},{"Slow Mode OFF"}};
SlowMode ^= 1;
extravbls = SlowMode << 3;
CenterWindow (8,3);
US_PrintCentered (Text[SlowMode]);
VW_UpdateScreen ();
// SD_MusicOff();
IN_Ack();
// SD_MusicOn();
// (REFKEEN) Minor difference from vanilla Catacomb
if (MousePresent) BE_ST_GetEmuAccuMouseMotion(NULL, NULL); // Clear accumulated mouse movement
//if (MousePresent) Mouse(MDelta); // Clear accumulated mouse movement
}
#endif
// F2 - SOUND OPTIONS
//
if (Keyboard[sc_F2])
{
id0_int_t height=7;
id0_boolean_t ChoiceMade = false;
if (AdLibPresent)
height++;
VW_FixRefreshBuffer();
CenterWindow(22,height);
US_Print( "\n 1 ) NO SOUND \n");
US_Print( " 2 ) PC AUDIO \n");
if (AdLibPresent)
US_Print(" 3 ) ADLIB AUDIO\n");
US_Print( "\n ESC) EXIT ");
VW_UpdateScreen();
// REFKEEN - Alternative controllers support
extern BE_ST_ControllerMapping g_ingame_altcontrol_mapping_soundoptions;
g_ingame_altcontrol_mapping_soundoptions.buttons[BE_ST_CTRL_BUT_X].mapClass = AdLibPresent ? BE_ST_CTRL_MAP_KEYSCANCODE : BE_ST_CTRL_MAP_NONE; // A bit of patching
BE_ST_AltControlScheme_Push();
BE_ST_AltControlScheme_PrepareControllerMapping(&g_ingame_altcontrol_mapping_soundoptions);
// Switch audio device ON/OFF & load sounds if there
// was a change in the device.
do {
if (Keyboard[1]) // ESC - Exit
ChoiceMade = true;
else
if (Keyboard[2]) // 1 - No Sound
{
SD_SetSoundMode(sdm_Off);
ChoiceMade = true;
}
else
if (Keyboard[3]) // 2 - PC Audio
{
SD_SetSoundMode(sdm_PC);
// if (oldsoundmode != sdm_PC)
CA_LoadAllSounds();
ChoiceMade = true;
}
else
if ((Keyboard[4]) && AdLibPresent) // 3 - AdLib Audio
{
SD_SetSoundMode(sdm_AdLib);
// if (oldsoundmode != sdm_AdLib)
CA_LoadAllSounds();
ChoiceMade = true;
}
BE_ST_ShortSleep();
} while (!ChoiceMade);
// REFKEEN - Alternative controllers support
BE_ST_AltControlScheme_Pop();
tics = realtics = 1;
IN_ClearKeysDown();
}
// F5 - CALIBRATE JOYSTICK
//
if (Keyboard[sc_F5])
{
CalibrateJoystick(0);
tics = realtics = 1;
IN_ClearKeysDown();
}
deadloop:;
// ESCAPE - quits game
//
if ((Keyboard[sc_Escape]) || (Flags & FL_DEAD))
{
id0_char_t ch;
DisplaySMsg("Options", NULL);
status_flag = S_NONE;
if (Flags & FL_DEAD)
{
id0_char_t choices[] = {sc_Escape,sc_R,sc_N,sc_Q,0};
ch = DisplayMsg("Restore New Quit",choices);
}
else
{
id0_char_t choices[] = {sc_Escape,sc_S,sc_R,sc_N,sc_Q,0};
ch = DisplayMsg("Save Restore New Quit",choices);
}
DrawText(true);
switch (ch)
{
case sc_S:
if (!(Flags & FL_DEAD))
Keyboard[sc_F3] = true;
break;
case sc_R:
Keyboard[sc_F4] = true;
break;
case sc_N:
DisplaySMsg("Starting anew", NULL);
VW_WaitVBL(60);
playstate = ex_resetgame;
Flags &= ~FL_DEAD;
break;
case sc_Q:
// REFKEEN - Alternative controllers support
{
extern BE_ST_ControllerMapping g_ingame_altcontrol_mapping_inackback;
BE_ST_AltControlScheme_Push();
BE_ST_AltControlScheme_PrepareControllerMapping(&g_ingame_altcontrol_mapping_inackback);
// REFKEEN - We don't pop this since we quit...
}
DisplaySMsg("FARE THEE WELL!", NULL);
VW_WaitVBL(120);
if (!Flags & FL_QUICK)
VW_FadeOut();
NormalScreen();
FreeUpMemory();
Quit(NULL);
break;
}
tics = realtics = 1;
}
// F1 - DISPLAY HELP
//
if (Keyboard[sc_F1])
{
PrintHelp();
#ifdef TEXT_PRESENTER
extern PresenterInfo MainHelpText;
VW_FadeOut();
FreeUpMemory();
if (!LoadPresenterScript("HELP.TXT",&MainHelpText))
{
VW_FadeIn();
CenterWindow(30,5);
US_CPrint("\nError loading HELP file.\n");
US_CPrint("Press any key.");
IN_Ack();
VW_FadeOut();
}
else
{
VW_SetSplitScreen(200);
bufferofs = displayofs = screenloc[0];
VW_Bar(0,0,320,200,0);
Display640();
Presenter(&MainHelpText);
Display320();
}
FreePresenterScript(&MainHelpText);
#endif
VW_SetSplitScreen(120);
VW_SetScreen(screenloc[0],0);
screenpage = 0;
CacheScaleds();
bufferofs = 0;
RedrawStatusWindow();
ThreeDRefresh();
VW_FadeIn();
Keyboard[sc_F1] = false;
tics = realtics = 1;
IN_ClearKeysDown();
}
// F3 - SAVE GAME
//
if ((Keyboard[sc_F3]) && (!(Flags & FL_DEAD)))
{
PreFullDisplay();
GE_SaveGame();
PostFullDisplay(true);
tics = realtics = 1;
IN_ClearKeysDown();
}
// F4 - LOAD GAME
//
if (Keyboard[sc_F4])
{
PreFullDisplay();
if (GE_LoadGame())
{
loadedgame = true;
playstate = ex_loadedgame;
Flags &= ~FL_DEAD;
lasttext = -1;
PostFullDisplay(false);
}
else
if (playstate == ex_victorious)
{
PostFullDisplay(false);
Victory(false);
IN_Ack();
// gamestate.mapon++;
}
else
PostFullDisplay(true);
Keyboard[sc_F5] = false;
tics = realtics = 1;
IN_ClearKeysDown();
}
if (Flags & FL_DEAD)
goto deadloop;
//
// F10-? debug keys
//
if (Keyboard[sc_BackSpace])
{
DebugKeys();
// (REFKEEN) Minor difference from vanilla Catacomb
if (MousePresent) BE_ST_GetEmuAccuMouseMotion(NULL, NULL); // Clear accumulated mouse movement
//if (MousePresent) Mouse(MDelta); // Clear accumulated mouse movement
lasttimecount = SD_GetTimeCount();
}
}
/*
===================
=
= GameLoop
=
===================
This function controls the flow between states of the game.
It loads previous saved games, setup levels states, controls the
flow between levels, including when player loses or when completes the game,
and checks if the result of the current game is a highscore.
The "real" game loop (player actions in like moving, killing, etc.) is in the
PlayLoop function.
*/
void GameLoop (void)
{
int i,xl,yl,xh,yh;
char num[20];
boolean died;
#ifdef MYPROFILE
/* clock_t type variables
may register times,
start and and times
could be used to measure
the speed of the graphics system.
Speed is measured in fps- frames per second.
*/
clock_t start,end;
#endif
restartgame:
ClearMemory ();
SETFONTCOLOR(0,15);
DrawPlayScreen ();
died = false;
restart:
do
{
if (!loadedgame)
gamestate.score = gamestate.oldscore;
DrawScore();
startgame = false;
if (loadedgame)
loadedgame = false;
else
SetupGameLevel ();
#ifdef SPEAR
if (gamestate.mapon == 20) // give them the key allways
{
gamestate.keys |= 1;
DrawKeys ();
}
#endif
ingame = true;
StartMusic ();
PM_CheckMainMem ();
if (!died)
PreloadGraphics ();
else
died = false;
fizzlein = true;
DrawLevel ();
startplayloop:
PlayLoop ();
#ifdef SPEAR
if (spearflag)
{
SD_StopSound();
SD_PlaySound(GETSPEARSND);
if (DigiMode != sds_Off)
{
long lasttimecount = TimeCount;
while(TimeCount < lasttimecount+150)
//while(DigiPlaying!=false)
SD_Poll();
}
else
SD_WaitSoundDone();
ClearMemory ();
gamestate.oldscore = gamestate.score;
gamestate.mapon = 20;
SetupGameLevel ();
StartMusic ();
PM_CheckMainMem ();
player->x = spearx;
player->y = speary;
player->angle = spearangle;
spearflag = false;
Thrust (0,0);
goto startplayloop;
}
#endif
StopMusic ();
ingame = false;
if (demorecord && playstate != ex_warped)
FinishDemoRecord ();
if (startgame || loadedgame)
goto restartgame;
switch (playstate)
{
case ex_completed:
case ex_secretlevel:
gamestate.keys = 0;
DrawKeys ();
VW_FadeOut ();
ClearMemory ();
LevelCompleted (); // do the intermission
#ifdef SPEARDEMO
if (gamestate.mapon == 1)
{
died = true; // don't "get psyched!"
VW_FadeOut ();
ClearMemory ();
CheckHighScore (gamestate.score,gamestate.mapon+1);
#pragma warn -sus
#ifndef JAPAN
_fstrcpy(MainMenu[viewscores].string,STR_VS);
#endif
MainMenu[viewscores].routine = CP_ViewScores;
#pragma warn +sus
return;
}
#endif
#ifdef JAPDEMO
if (gamestate.mapon == 3)
{
died = true; // don't "get psyched!"
VW_FadeOut ();
ClearMemory ();
CheckHighScore (gamestate.score,gamestate.mapon+1);
#pragma warn -sus
#ifndef JAPAN
_fstrcpy(MainMenu[viewscores].string,STR_VS);
#endif
MainMenu[viewscores].routine = CP_ViewScores;
#pragma warn +sus
return;
}
#endif
gamestate.oldscore = gamestate.score;
#ifndef SPEAR
//
// COMING BACK FROM SECRET LEVEL
//
if (gamestate.mapon == 9)
gamestate.mapon = ElevatorBackTo[gamestate.episode]; // back from secret
else
//
// GOING TO SECRET LEVEL
//
if (playstate == ex_secretlevel)
gamestate.mapon = 9;
#else
#define FROMSECRET1 3
#define FROMSECRET2 11
//
// GOING TO SECRET LEVEL
//
if (playstate == ex_secretlevel)
switch(gamestate.mapon)
{
case FROMSECRET1: gamestate.mapon = 18; break;
case FROMSECRET2: gamestate.mapon = 19; break;
}
else
//
// COMING BACK FROM SECRET LEVEL
//
if (gamestate.mapon == 18 || gamestate.mapon == 19)
switch(gamestate.mapon)
{
case 18: gamestate.mapon = FROMSECRET1+1; break;
case 19: gamestate.mapon = FROMSECRET2+1; break;
}
#endif
else
//
// GOING TO NEXT LEVEL
//
gamestate.mapon++;
break;
case ex_died:
Died ();
died = true; // don't "get psyched!"
if (gamestate.lives > -1)
break; // more lives left
VW_FadeOut ();
ClearMemory ();
CheckHighScore (gamestate.score,gamestate.mapon+1);
#pragma warn -sus
#ifndef JAPAN
_fstrcpy(MainMenu[viewscores].string,STR_VS);
#endif
MainMenu[viewscores].routine = CP_ViewScores;
#pragma warn +sus
return;
case ex_victorious:
#ifndef SPEAR
VW_FadeOut ();
#else
VL_FadeOut (0,255,0,17,17,300);
#endif
ClearMemory ();
Victory ();
ClearMemory ();
CheckHighScore (gamestate.score,gamestate.mapon+1);
#pragma warn -sus
#ifndef JAPAN
_fstrcpy(MainMenu[viewscores].string,STR_VS);
#endif
MainMenu[viewscores].routine = CP_ViewScores;
#pragma warn +sus
return;
default:
ClearMemory ();
break;
}
} while (1);
}
