static void ShowFader(FaderIntermissionAction *fader)
{
switch(fader->Fade)
{
case FaderIntermissionAction::FADEIN:
ShowImage(fader, true);
VL_FadeIn(0, 255, fader->Time);
break;
case FaderIntermissionAction::FADEOUT:
// We want to hold whatever may have been drawn in the previous page during the fade, so we don't need to draw.
VL_FadeOut(0, 255, 0, 0, 0, fader->Time);
break;
}
}
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
}
/*
===================
=
= 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);
}
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 */
}
//------------------------------------------------------------------------
// PreDemo()
//------------------------------------------------------------------------
void PreDemo()
{
#if !SKIP_TITLE_AND_CREDITS
#if TECH_SUPPORT_VERSION
fontnumber=4;
SETFONTCOLOR(0,15*3);
CenterWindow (26,7);
US_Print(EnterBetaCode);
VW_UpdateScreen();
CA_LoadAllSounds();
PM_CheckMainMem();
SD_PlaySound(INFORMDEATH2SND); // Nooooo!
IN_UserInput(TickBase*20);
ClearMemory();
#elif BETA_TEST
boolean param=false;
for (i=1; i<g_argc; i++)
switch (US_CheckParm(g_argv[i],MainStrs))
{
case 13:
param=true;
break;
}
if (!param)
{
char buffer[15] = {0};
fontnumber=4;
CenterWindow (26,7);
US_Print(EnterBetaCode);
VW_UpdateScreen();
SETFONTCOLOR(0,15*3);
US_LineInput(24*8,92,buffer,buffer,true,14,100);
if (_fstricmp(buffer,bc_buffer))
Quit("Bad beta code!");
}
#endif
#if GAME_VERSION == SHAREWARE_VERSION
#if IN_DEVELOPMENT || GEORGE_CHEAT
if (!MS_CheckParm("nochex"))
#endif
{
#if (!SKIP_CHECKSUMS)
// CheckValidity("MAPTEMP.",MAPTEMP_CHECKSUM,"LEVELS");
CheckValidity("MAPTEMP.",MAPTEMP_CHECKSUM);
#endif
}
#else
#if (!SKIP_CHECKSUMS)
if (ChecksumFile("FILE_ID.DIZ",0) != DIZFILE_CHECKSUM)
gamestate.flags |= GS_BAD_DIZ_FILE;
#endif
#endif
VL_SetPaletteIntensity(0,255,vgapal,0);
if (!(gamestate.flags & GS_NOWAIT))
{
#if (0) // GAME_VERSION != SHAREWARE_VERSION
//---------------------
// Anti-piracy screen
//---------------------
// Cache pic
//
CA_CacheScreen(PIRACYPIC);
// Cache and set palette. AND Fade it in!
//
CA_CacheGrChunk(PIRACYPALETTE);
VL_SetPalette (0,256,grsegs[PIRACYPALETTE]);
VL_SetPaletteIntensity(0,255,grsegs[PIRACYPALETTE],0);
VW_UpdateScreen();
VL_FadeOut (0, 255, 0, 0, 25, 20);
VL_FadeIn(0,255,grsegs[PIRACYPALETTE],30);
// Wait a little
//
IN_UserInput(TickBase*20);
// Free palette
//
UNCACHEGRCHUNK(PIRACYPALETTE);
VL_FadeOut (0, 255, 0, 0, 25, 20);
VW_FadeOut();
// Cleanup screen for upcoming SetPalette call
//
{
Uint16 old_bufferofs=bufferofs;
bufferofs=displayofs;
VL_Bar(0,0,320,200,0);
bufferofs=old_bufferofs;
}
#endif
//---------------------
// Apogee presents
//---------------------
// ISG --> this fixes intro timing
IN_UserInput(TickBase*1);
// Cache pic
//
CA_CacheScreen(APOGEEPIC);
// Load and start music
//
CA_CacheAudioChunk(STARTMUSIC+APOGFNFM_MUS);
::SD_StartMusic(APOGFNFM_MUS);
// Cache and set palette. AND Fade it in!
//
CA_CacheGrChunk(APOGEEPALETTE);
VL_SetPalette (0,256,static_cast<const Uint8*>(grsegs[APOGEEPALETTE]));
VL_SetPaletteIntensity(0,255,static_cast<const Uint8*>(grsegs[APOGEEPALETTE]),0);
VW_UpdateScreen();
VL_FadeOut (0, 255, 25, 29, 53, 20);
VL_FadeIn(0,255,static_cast<const Uint8*>(grsegs[APOGEEPALETTE]),30);
// Wait for end of fanfare
//
if (MusicMode==smm_AdLib)
{
IN_StartAck();
while ((!sqPlayedOnce) && (!IN_CheckAck()));
}
else
IN_UserInput(TickBase*6);
SD_MusicOff();
// Free palette and music. AND Restore palette
//
UNCACHEGRCHUNK(APOGEEPALETTE);
delete [] audiosegs[STARTMUSIC + APOGFNFM_MUS];
audiosegs[STARTMUSIC + APOGFNFM_MUS] = NULL;
// Do A Blue Flash!
VL_FadeOut (0, 255, 25, 29, 53, 20);
VL_FadeOut (0, 255, 0, 0, 0, 30);
//---------------------
// JAM logo intro
//---------------------
// Load and start music
//
CA_CacheAudioChunk(STARTMUSIC+TITLE_LOOP_MUSIC);
::SD_StartMusic(TITLE_LOOP_MUSIC);
// Show JAM logo
//
if (!DoMovie(mv_intro,0))
MAIN_ERROR(PREDEMO_NOJAM);
if (PowerBall)
{
Sint16 i;
for (i=0;i<60 && (!DebugOk);i++)
{
VL_WaitVBL(1);
// BBi
::in_handle_events();
if (Keyboard[sc_left_shift] && Keyboard[sc_right_shift])
{
CA_LoadAllSounds();
SD_MusicOff();
::sd_play_player_sound(SHOOTDOORSND, bstone::AC_ITEM);
SD_WaitSoundDone();
ClearMemory();
DebugOk = 1;
CA_CacheAudioChunk(STARTMUSIC+TITLE_LOOP_MUSIC);
::SD_StartMusic(TITLE_LOOP_MUSIC);
}
}
}
//---------------------
// PC-13
//---------------------
VL_Bar(0,0,320,200,0x14);
CacheDrawPic(0,64,PC13PIC);
VW_UpdateScreen();
VW_FadeIn();
IN_UserInput(TickBase*2);
// Do A Red Flash!
VL_FadeOut (0, 255, 39, 0, 0, 20);
VW_FadeOut();
}
#endif // SKIP_TITLE_AND_CREDITS
}
