///////////////////////////////////////////////////////////////////////////
//
// US_FinishTextScreen() - After the main program has finished its initial
// loading, this routine waits for a keypress and then clears the screen
//
///////////////////////////////////////////////////////////////////////////
void
US_FinishTextScreen(void)
{
static byte colors[] = {4,6,13,15,15,15,15,15,15};
boolean up;
int i,c;
// Change Loading... to Press a Key
if (!(tedlevel || NoWait))
{
IN_ClearKeysDown();
for (i = 0,up = true;!IN_UserInput(4,true);)
{
c = colors[i];
if (up)
{
if (++i == 9)
i = 8,up = false;
}
else
{
if (--i < 0)
i = 1,up = true;
}
USL_ScreenDraw(29,22," Ready - Press a Key ",0x00 + c);
}
}
else
USL_ScreenDraw(29,22," Ready - Press a Key ",0x9a);
IN_ClearKeysDown();
USL_ClearTextScreen();
}
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;
}
static bool WaitIntermission(unsigned int time)
{
if(time)
{
return IN_UserInput(time);
}
else
{
IN_ClearKeysDown ();
IN_Ack ();
return true;
}
}
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 ();
}
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 ();
}
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();
}
void ChangeSwapFiles(boolean display)
{
ClearMemory();
if (display)
{
WindowX=WindowY=0;
WindowW=320;
WindowH=200;
Message(Computing);
}
PM_Shutdown();
PM_Startup ();
PM_CheckMainMem();
if (display)
{
IN_UserInput(50);
CleanDrawPlayBorder();
IN_ClearKeysDown();
}
}
// REFKEEN - Rename different versions of DemoLoop for multi-ver support
void
DemoLoop_Old (void)
{
const id0_char_t *s;
//id0_word_t move;
//id0_longword_t lasttime;
WindowRec mywin;
#if FRILLS
//
// check for launch from ted
//
if (tedlevel)
{
NewGame();
gamestate.mapon = tedlevelnum;
GameLoop();
TEDDeath();
}
#endif
//
// demo loop
//
// REFKEEN - Alternative controllers support
BE_ST_AltControlScheme_Push();
BE_ST_AltControlScheme_PrepareControllerMapping(&g_ingame_altcontrol_mapping_demoloop);
US_SetLoadSaveHooks(LoadGame,SaveGame,ResetGame);
restartgame = gd_Continue;
while (true)
{
// Load the Title map
gamestate.mapon = 20; // title map number
loadedgame = false;
SetupGameLevel(true);
while (!restartgame && !loadedgame)
{
VW_InitDoubleBuffer();
IN_ClearKeysDown();
while (true)
{
// Display the Title map
RF_NewPosition((5 * TILEGLOBAL) + (TILEGLOBAL / 2),
(TILEGLOBAL * 2) + (TILEGLOBAL / 2)
+ (TILEGLOBAL / 4));
RF_ForceRefresh();
RF_Refresh();
RF_Refresh();
if (Wait(TickBase * 2))
break;
mywin.x = (16 * 13) + 4;
mywin.y = 0;
mywin.w = 16 * 7;
mywin.h = 200;
mywin.px = mywin.x + 0;
mywin.py = mywin.y + 10;
s = "Game\n"
"John Carmack\n"
"\n"
"Utilities\n"
"John Romero\n"
"\n"
"Interface/Sound\n"
"Jason Blochowiak\n"
"\n"
"Creative Director\n"
"Tom Hall\n"
"\n"
"Art\n"
"Adrian Carmack\n";
if (ShowText((9 * TILEGLOBAL) - (PIXGLOBAL * 2),&mywin,s))
break;
mywin.x = 4;
mywin.y = 0;
mywin.w = 16 * 7;
mywin.h = 200;
mywin.px = mywin.x + 0;
mywin.py = mywin.y + 10;
if (refkeen_current_gamever == BE_GAMEVER_KDREAMSC105)
s = "\n"
"\"Keen Dreams\"\n"
"Copyright 1991-93\n"
"Softdisk, Inc.\n"
"\n"
"\n"
"\n"
"\n"
"Commander Keen\n"
"Copyright 1990-91\n"
"Id Software, Inc.\n"
"\n"
"Press F1 for Help\n"
"SPACE to Start\n";
else
s = "Gamer's Edge\n"
"\"Keen Dreams\"\n"
"Copyright 1991\n"
"Softdisk, Inc.\n"
"\n"
"Subscriptions\n"
"1-800-831-2694\n"
"\n"
"Commander Keen\n"
"Copyright 1990-91\n"
"Id Software, Inc.\n"
"\n"
"Press F1 for Help\n"
"SPACE to Start\n";
if (ShowText((2 * TILEGLOBAL) + (PIXGLOBAL * 2),&mywin,s))
break;
if (MoveTitleTo((5 * TILEGLOBAL) + (TILEGLOBAL / 2)))
break;
if (Wait(TickBase * 3))
break;
VWB_Bar(0,0,320,200,FIRSTCOLOR);
US_DisplayHighScores(-1);
if (IN_UserInput(TickBase * 8,false))
break;
}
US_ControlPanel ();
}
if (!loadedgame)
NewGame();
GameLoop();
}
// REFKEEN - Alternative controllers support
BE_ST_AltControlScheme_Pop();
}
void CheckHighScore (long score,word other)
{
word i,j;
int n;
HighScore myscore;
US_CursorStruct TermCursor = {'@',0,HIGHLIGHT_TEXT_COLOR,2};
// Check for cheaters
if (DebugOk)
{
SD_PlaySound(NOWAYSND);
return;
}
strcpy(myscore.name,"");
myscore.score = score;
myscore.episode = gamestate.episode;
myscore.completed = other;
myscore.ratio = ShowStats(0,0,ss_justcalc,&gamestuff.level[gamestate.mapon].stats);
for (i = 0,n = -1;i < MaxScores;i++)
{
if ((myscore.score > Scores[i].score) || ((myscore.score == Scores[i].score)
&& (myscore.completed > Scores[i].completed)))
{
for (j = MaxScores;--j > i;)
Scores[j] = Scores[j - 1];
Scores[i] = myscore;
n = i;
break;
}
}
StartCPMusic (ROSTER_MUS);
DrawHighScores ();
VW_FadeIn ();
if (n != -1)
{
//
// got a high score
//
DrawInstructions(IT_ENTER_HIGHSCORE);
SETFONTCOLOR(HIGHLIGHT_TEXT_COLOR,TERM_BACK_COLOR);
PrintY = 68+(SCORE_Y_SPACING * n);
PrintX = 45;
use_custom_cursor = true;
allcaps = true;
US_CustomCursor = TermCursor;
US_LineInput(PrintX,PrintY,Scores[n].name,nil,true,MaxHighName,100);
}
else
{
IN_ClearKeysDown ();
IN_UserInput(500);
}
StopMusic();
use_custom_cursor = false;
}
/**
*
* \name Died()
*
* Died
* This function perfoms the process of animation the character's death and restart the level
* if you still have lives.
*
*/
void Died (void)
{
float fangle;
long dx,dy;
int iangle,curangle,clockwise,counter,change;
/* -1 means the player has no weapon */
gamestate.weapon = -1; // take away weapon
/* We need another way to play sounds */
SD_PlaySound (PLAYERDEATHSND);
//
// swing around to face attacker
//
/*
could be a function for this animation
like: died_animation() or died_rotated_animation()
*/
dx = killerobj->x - player->x;
dy = player->y - killerobj->y;
fangle = atan2(dy,dx); // returns -pi to pi
if (fangle<0)
fangle = M_PI*2+fangle;
iangle = fangle/(M_PI*2)*ANGLES;
if (player->angle > iangle)
{
counter = player->angle - iangle;
clockwise = ANGLES-player->angle + iangle;
}
else
{
clockwise = iangle - player->angle;
counter = player->angle + ANGLES-iangle;
}
curangle = player->angle;
if (clockwise<counter)
{
//
// rotate clockwise
//
if (curangle>iangle)
curangle -= ANGLES;
do
{
change = tics*DEATHROTATE;
if (curangle + change > iangle)
change = iangle-curangle;
curangle += change;
player->angle += change;
if (player->angle >= ANGLES)
player->angle -= ANGLES;
ThreeDRefresh ();
CalcTics ();
} while (curangle != iangle);
}
else
{
//
// rotate counterclockwise
//
if (curangle<iangle)
curangle += ANGLES;
do
{
change = -tics*DEATHROTATE;
if (curangle + change < iangle)
change = iangle-curangle;
curangle += change;
player->angle += change;
if (player->angle < 0)
player->angle += ANGLES;
ThreeDRefresh ();
CalcTics ();
} while (curangle != iangle);
}
/* FINISH of rotation animation */
//
// fade to red
//
FinishPaletteShifts ();
bufferofs += screenofs;
VW_Bar (0,0,viewwidth,viewheight,4);
IN_ClearKeysDown ();
FizzleFade(bufferofs,displayofs+screenofs,viewwidth,viewheight,70,false);
bufferofs -= screenofs;
IN_UserInput(100);
SD_WaitSoundDone ();
if (tedlevel == false) // SO'S YA DON'T GET KILLED WHILE LAUNCHING!
gamestate.lives--;
if (gamestate.lives > -1) //if the character has lives, set a new level
{
gamestate.health = 100;
gamestate.weapon = gamestate.bestweapon
= gamestate.chosenweapon = wp_pistol;
gamestate.ammo = STARTAMMO;
gamestate.keys = 0;
gamestate.attackframe = gamestate.attackcount =
gamestate.weaponframe = 0;
/* We need to change those Draw function
to Draw3D functions. */
DrawKeys ();
DrawWeapon ();
DrawAmmo ();
DrawHealth ();
DrawFace ();
DrawLives ();
}
}
void Died (void)
{
float fangle;
long dx,dy;
int iangle,curangle,clockwise,counter,change;
gamestate.weapon = (weapontype)-1; // take away weapon
SD_PlaySound (PLAYERDEATHSND);
//
// swing around to face attacker
//
dx = killerobj->x - player->x;
dy = player->y - killerobj->y;
fangle = atan2((float)dy,(float)dx); // returns -pi to pi // PORT add float cast
if (fangle<0)
fangle = M_PI*2+fangle;
iangle = fangle/(M_PI*2)*ANGLES;
if (player->angle > iangle)
{
counter = player->angle - iangle;
clockwise = ANGLES-player->angle + iangle;
}
else
{
clockwise = iangle - player->angle;
counter = player->angle + ANGLES-iangle;
}
curangle = player->angle;
if (clockwise<counter)
{
//
// rotate clockwise
//
if (curangle>iangle)
curangle -= ANGLES;
do
{
change = tics*DEATHROTATE;
if (curangle + change > iangle)
change = iangle-curangle;
curangle += change;
player->angle += change;
if (player->angle >= ANGLES)
player->angle -= ANGLES;
ThreeDRefresh ();
CalcTics ();
} while (curangle != iangle);
}
else
{
//
// rotate counterclockwise
//
if (curangle<iangle)
curangle += ANGLES;
do
{
change = -tics*DEATHROTATE;
if (curangle + change < iangle)
change = iangle-curangle;
curangle += change;
player->angle += change;
if (player->angle < 0)
player->angle += ANGLES;
ThreeDRefresh ();
CalcTics ();
} while (curangle != iangle);
}
//
// fade to red
//
FinishPaletteShifts ();
bufferofs += screenofs;
VW_Bar (0,0,viewwidth,viewheight,4);
IN_ClearKeysDown ();
FizzleFade(bufferofs,displayofs+screenofs,viewwidth,viewheight,70,False);
bufferofs -= screenofs;
IN_UserInput(100);
SD_WaitSoundDone ();
if (tedlevel == False) // SO'S YA DON'T GET KILLED WHILE LAUNCHING!
gamestate.lives--;
if (gamestate.lives > -1)
{
gamestate.health = 100;
gamestate.weapon = gamestate.bestweapon
= gamestate.chosenweapon = wp_pistol;
gamestate.ammo = STARTAMMO;
gamestate.keys = 0;
gamestate.attackframe = gamestate.attackcount =
gamestate.weaponframe = 0;
DrawKeys ();
DrawWeapon ();
DrawAmmo ();
DrawHealth ();
DrawFace ();
DrawLives ();
}
}
static void DemoLoop()
{
int LastDemo = 0;
//
// check for launch from ted
//
if (param_tedlevel != -1)
{
param_nowait = true;
EnableEndGameMenuItem();
NewGame(param_difficulty,0);
#ifndef SPEAR
gamestate.episode = param_tedlevel/10;
gamestate.mapon = param_tedlevel%10;
#else
gamestate.episode = 0;
gamestate.mapon = param_tedlevel;
#endif
GameLoop();
Quit (NULL);
}
//
// 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
while (1)
{
while (!param_nowait)
{
//
// title page
//
#ifndef DEMOTEST
#ifdef SPEAR
SDL_Color pal[256];
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 ();
//
// high scores
//
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)
break;
VW_FadeOut();
if(screenHeight % 200 != 0)
VL_ClearScreen(0);
StartCPMusic(INTROSONG);
}
VW_FadeOut ();
#ifdef DEBUGKEYS
if (Keyboard[sc_Tab] && param_debugmode)
RecordDemo ();
else
US_ControlPanel (0);
#else
US_ControlPanel (0);
#endif
if (startgame || loadedgame)
{
GameLoop ();
if(!param_nowait)
{
VW_FadeOut();
StartCPMusic(INTROSONG);
}
}
}
}
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;
}
//------------------------------------------------------------------------
// 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
}
void
DemoLoop_New (void)
{
//id0_char_t *s;
//id0_word_t move;
//id0_longword_t lasttime;
// REFKEEN - Add FakeCGA shape for 2015 port
const id0_char_t *FileName0;
struct Shape FileShape0;
const id0_char_t *FileName1;
struct Shape FileShape1;
// REFKEEN - CREDITS is now a variable, set based on version
//#if CREDITS
const id0_char_t *FileName2;
struct Shape FileShape2;
// REFKEEN - Add second credits shape for 2015 port
const id0_char_t *FileName3;
struct Shape FileShape3;
//#endif
//struct ffblk ffblk;
//WindowRec mywin;
id0_int_t bufsave = bufferofs;
id0_int_t dissave = displayofs;
#if FRILLS
//
// check for launch from ted
//
if (tedlevel)
{
NewGame();
gamestate.mapon = tedlevelnum;
GameLoop();
TEDDeath();
}
#endif
//
// demo loop
//
// REFKEEN - Alternative controllers support
BE_ST_AltControlScheme_Push();
BE_ST_AltControlScheme_PrepareControllerMapping(&g_ingame_altcontrol_mapping_demoloop);
US_SetLoadSaveHooks(LoadGame,SaveGame,ResetGame);
restartgame = gd_Continue;
BE_FILE_T handle = BE_Cross_open_readonly_for_reading("KDREAMS.CMP");
//int handle = open("KDREAMS.CMP" ,O_BINARY | O_RDONLY);
if (!BE_Cross_IsFileValid(handle))
//if (handle == -1)
Quit("Couldn't find KDREAMS.CMP");
BE_Cross_close(handle);
#if 0
if (findfirst("KDREAMS.CMP", &ffblk, 0) == -1)
Quit("Couldn't find KDREAMS.CMP");
#endif
while (true)
{
loadedgame = false;
if (refkeen_current_gamever == BE_GAMEVER_KDREAMS2015)
{
FileName0 = "TITLECGA.LBM";
if (LoadLIBShape("KDREAMS.CMP", FileName0, &FileShape0))
Quit("Can't load TITLE SCREEN");
}
FileName1 = "TITLESCR.LBM";
if (LoadLIBShape("KDREAMS.CMP", FileName1, &FileShape1))
Quit("Can't load TITLE SCREEN");
if (CREDITS)
{
// REFKEEN - Instead of loading just "CREDITS.LBM"
// (which never happened with the original EXEs in practice),
// load "CREDITS1.LBM" and "CREDITS2.LBM", as available
// in the 2015 release
FileName2 = "CREDITS1.LBM";
if (LoadLIBShape("KDREAMS.CMP", FileName2, &FileShape2))
Quit("Can't load CREDITS SCREEN 1");
if (refkeen_current_gamever == BE_GAMEVER_KDREAMS2015)
FileName3 = "CREDITS2.LBM";
if (LoadLIBShape("KDREAMS.CMP", FileName3, &FileShape3))
Quit("Can't load CREDITS SCREEN 3");
}
while (!restartgame && !loadedgame)
{
VW_InitDoubleBuffer();
IN_ClearKeysDown();
while (true)
{
// REFKEEN - We're in an EGA-only function anyway,
// so use EGA versions of VW functions...
VW_SetScreen_EGA(0, 0);
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(fakecgamode ? &FileShape0 : &FileShape1, 0, 0);
VW_ScreenToScreen_EGA (64*200,0,40,200);
if (IN_UserInput(CREDITS ? (TickBase * 8) : (TickBase * 4), false))
break;
// REFKEEN - Patch for 2015 port
if (!fakecgamode)
{
if (CREDITS)
{
// REFKEEN - Show two credits screens
// as present in the 2015 release
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&FileShape2, 0, 0);
VW_ScreenToScreen_EGA (64*200,0,40,200);
if (IN_UserInput(TickBase * 7, false))
break;
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&FileShape3, 0, 0);
VW_ScreenToScreen_EGA (64*200,0,40,200);
if (IN_UserInput(TickBase * 7, false))
break;
}
else
{
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&FileShape1, 0, 0);
VW_ScreenToScreen_EGA (64*200,0,40,200);
if (IN_UserInput(TickBase * 3, false))
break;
}
}
displayofs = 0;
VWB_Bar(0,0,320,200,FIRSTCOLOR);
US_DisplayHighScores(-1);
if (IN_UserInput(TickBase * 6, false))
break;
}
bufferofs = bufsave;
displayofs = dissave;
VW_FixRefreshBuffer();
US_ControlPanel ();
}
if (!loadedgame)
NewGame();
if (refkeen_current_gamever == BE_GAMEVER_KDREAMS2015)
FreeShape(&FileShape0);
FreeShape(&FileShape1);
if (CREDITS)
{
// REFKEEN - Free two credits screens as present in the 2015 release
FreeShape(&FileShape2);
FreeShape(&FileShape3);
}
GameLoop();
}
// REFKEEN - Alternative controllers support
BE_ST_AltControlScheme_Pop();
}
void DemoLoop (void)
{
id0_int_t i,level;
//
// check for launch from ted
//
if (tedlevel)
{
NewGame();
gamestate.mapon = tedlevelnum;
restartgame = gd_Normal;
for (i = 1;i < id0_argc;i++)
{
if ( (level = US_CheckParm(id0_argv[i],ParmStrings)) == -1)
continue;
// REFKEEN - Cast for C++
restartgame = (GameDiff)(gd_Easy+level);
break;
}
GameLoop();
TEDDeath();
}
//
// main game cycle
//
displayofs = bufferofs = 0;
VW_Bar (0,0,320,200,0);
while (1)
{
CA_CacheGrChunk (TITLEPIC);
bufferofs = SCREEN2START;
displayofs = SCREEN1START;
VWB_DrawPic (0,0,TITLEPIC);
MM_SetPurge (&grsegs[TITLEPIC],3);
UNMARKGRCHUNK(TITLEPIC);
FizzleFade (bufferofs,displayofs,320,200,true);
if (!IN_UserInput(TickBase*3,false))
{
CA_CacheGrChunk (CREDITSPIC);
VWB_DrawPic (0,0,CREDITSPIC);
MM_SetPurge (&grsegs[CREDITSPIC],3);
UNMARKGRCHUNK(CREDITSPIC);
FizzleFade (bufferofs,displayofs,320,200,true);
}
if (!IN_UserInput(TickBase*3,false))
{
highscores:
DrawHighScores ();
FizzleFade (bufferofs,displayofs,320,200,true);
IN_UserInput(TickBase*3,false);
}
if (IN_IsUserInput())
{
US_ControlPanel ();
if (restartgame || loadedgame)
{
GameLoop ();
goto highscores;
}
}
}
}
void
DemoLoop (void)
{
//id0_char_t *s;
//id0_word_t move;
//id0_longword_t lasttime;
const id0_char_t *FileName1;
struct Shape FileShape1;
#if CREDITS
const id0_char_t *FileName2;
struct Shape FileShape2;
#endif
//struct ffblk ffblk;
//WindowRec mywin;
id0_int_t bufsave = bufferofs;
id0_int_t dissave = displayofs;
#if FRILLS
//
// check for launch from ted
//
if (tedlevel)
{
NewGame();
gamestate.mapon = tedlevelnum;
GameLoop();
TEDDeath();
}
#endif
//
// demo loop
//
US_SetLoadSaveHooks(LoadGame,SaveGame,ResetGame);
restartgame = gd_Continue;
BE_FILE_T handle = BE_Cross_open_for_reading("KDREAMS.CMP");
//int handle = open("KDREAMS.CMP" ,O_BINARY | O_RDONLY);
if (!BE_Cross_IsFileValid(handle))
//if (handle == -1)
Quit("Couldn't find KDREAMS.CMP");
BE_Cross_close(handle);
#if 0
if (findfirst("KDREAMS.CMP", &ffblk, 0) == -1)
Quit("Couldn't find KDREAMS.CMP");
#endif
while (true)
{
loadedgame = false;
FileName1 = "TITLESCR.LBM";
if (LoadLIBShape("KDREAMS.CMP", FileName1, &FileShape1))
Quit("Can't load TITLE SCREEN");
#if CREDITS
FileName2 = "CREDITS.LBM";
if (LoadLIBShape("KDREAMS.CMP", FileName2, &FileShape2))
Quit("Can't load CREDITS SCREEN");
#endif
while (!restartgame && !loadedgame)
{
VW_InitDoubleBuffer();
IN_ClearKeysDown();
while (true)
{
VW_SetScreen(0, 0);
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&FileShape1, 0, 0);
VW_ScreenToScreen (64*200,0,40,200);
#if CREDITS
if (IN_UserInput(TickBase * 8, false))
break;
#else
if (IN_UserInput(TickBase * 4, false))
break;
#endif
#if CREDITS
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&FileShape2, 0, 0);
VW_ScreenToScreen (64*200,0,40,200);
if (IN_UserInput(TickBase * 7, false))
break;
#else
MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&FileShape1, 0, 0);
VW_ScreenToScreen (64*200,0,40,200);
if (IN_UserInput(TickBase * 3, false))
break;
#endif
displayofs = 0;
VWB_Bar(0,0,320,200,FIRSTCOLOR);
US_DisplayHighScores(-1);
if (IN_UserInput(TickBase * 6, false))
break;
}
bufferofs = bufsave;
displayofs = dissave;
VW_FixRefreshBuffer();
US_ControlPanel ();
}
if (!loadedgame)
NewGame();
FreeShape(&FileShape1);
#if CREDITS
FreeShape(&FileShape2);
#endif
GameLoop();
}
}
