void BasicOverhead (void)
{
int x, y, z, offx, offy;
z = 128/MAPSIZE; // zoom scale
offx = 320/2;
offy = (160-MAPSIZE*z)/2;
#ifdef MAPBORDER
int temp = viewsize;
NewViewSize(16);
DrawPlayBorder();
#endif
// right side (raw)
for(x=0;x<MAPSIZE;x++)
for(y=0;y<MAPSIZE;y++)
VWB_Bar(x*z+offx, y*z+offy,z,z,(unsigned)(uintptr_t)actorat[x][y]);
// left side (filtered)
uintptr_t tile;
int color;
offx -= 128;
for(x=0;x<MAPSIZE;x++)
{
for(y=0;y<MAPSIZE;y++)
{
tile = (uintptr_t)actorat[x][y];
if (ISPOINTER(tile) && ((objtype *)tile)->flags&FL_SHOOTABLE) color = 72; // enemy
else if (!tile || ISPOINTER(tile))
{
if (spotvis[x][y]) color = 111; // visable
else color = 0; // nothing
}
else if (MAPSPOT(x,y,1) == PUSHABLETILE) color = 171; // pushwall
else if (tile == 64) color = 158; // solid obj
else if (tile < 128) color = 154; // walls
else if (tile < 256) color = 146; // doors
VWB_Bar(x*z+offx, y*z+offy,z,z,color);
}
}
VWB_Bar(player->tilex*z+offx,player->tiley*z+offy,z,z,15); // player
// resize the border to match
VW_UpdateScreen();
IN_Ack();
#ifdef MAPBORDER
NewViewSize(temp);
DrawPlayBorder();
#endif
}
void DrawPlayBorderSides (void)
{
int xl,yl;
xl = 160-viewwidth/2;
yl = (200-STATUSLINES-viewheight)/2;
VWB_Bar (0,0,xl-1,200-STATUSLINES,127);
VWB_Bar (xl+viewwidth+1,0,xl-2,200-STATUSLINES,127);
VWB_Vlin (yl-1,yl+viewheight,xl-1,0);
VWB_Vlin (yl-1,yl+viewheight,xl+viewwidth,125);
}
void DrawPlayBorder (void)
{
int xl,yl;
VWB_Bar (0,0,320,200-STATUSLINES,127);
xl = 160-viewwidth/2;
yl = (200-STATUSLINES-viewheight)/2;
VWB_Bar (xl,yl,viewwidth,viewheight,0);
VWB_Hlin (xl-1,xl+viewwidth,yl-1,0);
VWB_Hlin (xl-1,xl+viewwidth,yl+viewheight,125);
VWB_Vlin (yl-1,yl+viewheight,xl-1,0);
VWB_Vlin (yl-1,yl+viewheight,xl+viewwidth,125);
VWB_Plot (xl-1,yl+viewheight,124);
}
///////////////////////////////////////////////////////////////////////////
//
// US_ClearWindow() - Clears the current window to white and homes the
// cursor
//
///////////////////////////////////////////////////////////////////////////
void
US_ClearWindow(void)
{
VWB_Bar(WindowX,WindowY,WindowW,WindowH,WHITE);
PrintX = WindowX;
PrintY = WindowY;
}
///////////////////////////////////////////////////////////////////////////
//
// US_ClearWindow() - Clears the current window to white and homes the
// cursor
//
///////////////////////////////////////////////////////////////////////////
void
US_ClearWindow(void)
{
VWB_Bar(WindowX,WindowY,WindowW,WindowH,LT_GREY);
PrintX = WindowX;
PrintY = WindowY;
}
void DisplayPrepingMsg(
const char* text)
{
// Bomb out if FILE_ID.DIZ is bad!!
//
if (!::is_aog_sw()) {
if (((gamestate.mapon != 1) || (gamestate.episode != 0)) &&
(gamestate.flags & GS_BAD_DIZ_FILE))
{
Quit();
}
}
// Cache-in font
//
fontnumber = 1;
CA_CacheGrChunk(STARTFONT + 1);
BMAmsg(text);
UNCACHEGRCHUNK(STARTFONT + 1);
// BBi No progress bars
#if 0
// Set thermometer boundaries
//
WindowX = 36;
WindowY = 188;
WindowW = 260;
WindowH = 32;
// Init MAP and GFX thermometer areas
//
VWB_Bar(WindowX, WindowY - 7, WindowW - 10, 2, BORDER_LO_COLOR);
VWB_Bar(WindowX, WindowY - 7, WindowW - 11, 1, BORDER_TEXT_COLOR - 15);
VWB_Bar(WindowX, WindowY, WindowW - 10, 2, BORDER_LO_COLOR);
VWB_Bar(WindowX, WindowY, WindowW - 11, 1, BORDER_TEXT_COLOR - 15);
#endif
// Update screen and fade in
//
VW_UpdateScreen();
if (screenfaded) {
VW_FadeIn();
}
}
void PreloadUpdate(unsigned current, unsigned total)
{
unsigned w=WindowW-10;
if (current > total)
current=total;
w = ((long)w * current) / total;
if (w)
VWB_Bar(WindowX,WindowY,w-1,1,BORDER_TEXT_COLOR);
VW_UpdateScreen();
}
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 EndSpear(void)
{
EndScreen (END1PALETTE, ENDSCREEN11PIC);
CA_CacheScreen (ENDSCREEN3PIC);
VW_UpdateScreen ();
CA_CacheGrChunk (END3PALETTE);
VL_FadeIn(0,255,grsegs[END3PALETTE],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_StartAck ();
TimeCount = 0;
while (!IN_CheckAck () && TimeCount < 700);
PrintX = 0;
PrintY = 180;
VWB_Bar(0,180,320,20,0);
US_CPrint (STR_ENDGAME3"\n");
US_CPrint (STR_ENDGAME4);
VW_UpdateScreen ();
IN_StartAck ();
TimeCount = 0;
while (!IN_CheckAck () && 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
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 DreamsIntro::render()
{
if(mStep == 1)
{
VW_ScreenToScreen (64*200,0,40,200);
}
else if(mStep == 2)
{
VW_ScreenToScreen (64*200,0,40,200);
}
else
{
displayofs = 0;
VWB_Bar(0,0,320,200,FIRSTCOLOR);
US_DisplayHighScores(-1);
}
}
void PreloadUpdate(
uint16_t current,
uint16_t total)
{
// BBi No progress bars
#if 0
uint16_t w = WindowW - 10;
if (current > total) {
current = total;
}
w = ((int32_t)w * current) / total;
if (w) {
VWB_Bar(WindowX, WindowY, w - 1, 1, BORDER_TEXT_COLOR);
}
VW_UpdateScreen();
#else
static_cast<void>(current);
static_cast<void>(total);
#endif
}
void ShowArticle (char *article)
{
// unsigned oldfontnumber;
// unsigned temp;
boolean newpage,firstpage;
GFX_STRT = (W_GetNumForName ("TEXTSTRT"))+1;
text = article;
// CA_MarkGrChunk(STARTFONT);
VWB_Bar (0, 0, 320, 200, BACKCOLOR);
CacheLayoutGraphics ();
newpage = true;
firstpage = true;
do
{
if (newpage)
{
newpage = false;
// CA_CacheScreen(enames[which*2 + pagenum - 1]);
PageLayout (true);
VW_UpdateScreen ();
if (firstpage)
{
MenuFadeIn ();
firstpage = false;
}
}
LastScan = 0;
while (!LastScan)
;
switch (LastScan)
{
case sc_UpArrow:
case sc_PgUp:
case sc_LeftArrow:
if (pagenum>1)
{
BackPage ();
BackPage ();
newpage = true;
}
break;
case sc_Enter:
case sc_DownArrow:
case sc_PgDn:
case sc_RightArrow: // the text allready points at next page
if (pagenum<numpages)
{
newpage = true;
}
break;
}
} while (LastScan != sc_Escape);
IN_ClearKeysDown ();
// fontnumber = oldfontnumber;
}
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 TestSprites(void)
{
id0_int_t hx,hy,sprite,oldsprite,bottomy,topx,shift;
spritetabletype id0_far *spr;
spritetype id0_seg *block;
id0_unsigned_t mem,scan;
VW_FixRefreshBuffer ();
US_CenterWindow (30,17);
US_CPrint ("Sprite Test");
US_CPrint ("-----------");
hy=PrintY;
hx=(PrintX+56)&(~7);
topx = hx+TEXTWIDTH;
US_Print ("Chunk:\nWidth:\nHeight:\nOrgx:\nOrgy:\nXl:\nYl:\nXh:\nYh:\n"
"Shifts:\nMem:\n");
bottomy = PrintY;
sprite = STARTSPRITES;
shift = 0;
do
{
if (sprite>=STARTTILE8)
sprite = STARTTILE8-1;
else if (sprite<STARTSPRITES)
sprite = STARTSPRITES;
spr = &spritetable[sprite-STARTSPRITES];
block = (spritetype id0_seg *)grsegs[sprite];
VWB_Bar (hx,hy,TEXTWIDTH,bottomy-hy,WHITE);
PrintX=hx;
PrintY=hy;
US_PrintUnsigned (sprite);US_Print ("\n");PrintX=hx;
US_PrintUnsigned (spr->width);US_Print ("\n");PrintX=hx;
US_PrintUnsigned (spr->height);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->orgx);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->orgy);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->xl);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->yl);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->xh);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->yh);US_Print ("\n");PrintX=hx;
US_PrintSigned (spr->shifts);US_Print ("\n");PrintX=hx;
if (!block)
{
US_Print ("-----");
}
else
{
mem = block->sourceoffset[3]+5*block->planesize[3];
mem = (mem+15)&(~15); // round to paragraphs
US_PrintUnsigned (mem);
}
oldsprite = sprite;
do
{
//
// draw the current shift, then wait for key
//
VWB_Bar(topx,hy,DISPWIDTH,bottomy-hy,WHITE);
if (block)
{
PrintX = topx;
PrintY = hy;
US_Print ("Shift:");
US_PrintUnsigned (shift);
US_Print ("\n");
VWB_DrawSprite (topx+16+shift*2,PrintY,sprite);
}
VW_UpdateScreen();
scan = IN_WaitForKey ();
switch (scan)
{
case sc_UpArrow:
sprite++;
break;
case sc_DownArrow:
sprite--;
break;
case sc_LeftArrow:
if (--shift == -1)
shift = 3;
break;
case sc_RightArrow:
if (++shift == 4)
shift = 0;
break;
case sc_Escape:
return;
}
} while (sprite == oldsprite);
} while (1);
}
// 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
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();
}
}
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 ShowArticle (char *article)
#endif
{
#ifdef JAPAN
int snames[10] = { H_HELP1PIC,
H_HELP2PIC,
H_HELP3PIC,
H_HELP4PIC,
H_HELP5PIC,
H_HELP6PIC,
H_HELP7PIC,
H_HELP8PIC,
H_HELP9PIC,
H_HELP10PIC};
int enames[14] = {
0,0,
#ifndef JAPDEMO
C_ENDGAME1APIC,
C_ENDGAME1BPIC,
C_ENDGAME2APIC,
C_ENDGAME2BPIC,
C_ENDGAME3APIC,
C_ENDGAME3BPIC,
C_ENDGAME4APIC,
C_ENDGAME4BPIC,
C_ENDGAME5APIC,
C_ENDGAME5BPIC,
C_ENDGAME6APIC,
C_ENDGAME6BPIC
#endif
};
#endif
unsigned oldfontnumber;
unsigned temp;
boolean newpage,firstpage;
#ifdef JAPAN
pagenum = 1;
if (!which)
numpages = 10;
else
numpages = 2;
#else
text = article;
oldfontnumber = fontnumber;
fontnumber = 0;
CA_MarkGrChunk(STARTFONT);
VWB_Bar (0,0,320,200,BACKCOLOR);
CacheLayoutGraphics ();
#endif
newpage = True;
firstpage = True;
do
{
if (newpage)
{
newpage = False;
#ifdef JAPAN
if (!which)
CA_CacheScreen(snames[pagenum - 1]);
else
CA_CacheScreen(enames[which*2 + pagenum - 1]);
#else
PageLayout (True);
#endif
VW_UpdateScreen ();
if (firstpage)
{
VL_FadeIn(0,255,&gamepal,10);
// VW_FadeIn ()
firstpage = False;
}
}
LastScan = 0;
while (!LastScan)
;
switch (LastScan)
{
case sc_UpArrow:
case sc_PgUp:
case sc_LeftArrow:
if (pagenum>1)
{
#ifndef JAPAN
BackPage ();
BackPage ();
#else
pagenum--;
#endif
newpage = True;
}
break;
case sc_Enter:
case sc_DownArrow:
case sc_PgDn:
case sc_RightArrow: // the text allready points at next page
if (pagenum<numpages)
{
newpage = True;
#ifdef JAPAN
pagenum++;
#endif
}
break;
}
#ifndef SPEAR
if (Keyboard[sc_Tab] && Keyboard[sc_P] && MS_CheckParm("goobers"))
PicturePause();
#endif
} while (LastScan != sc_Escape);
IN_ClearKeysDown ();
fontnumber = oldfontnumber;
}
void PageLayout (boolean shownumber)
{
int i,oldfontcolor;
char ch;
oldfontcolor = fontcolor;
fontcolor = 0;
//
// clear the screen
//
VWB_Bar (0,0,320,200,BACKCOLOR);
VWB_DrawPic (0,0,H_TOPWINDOWPIC);
VWB_DrawPic (0,8,H_LEFTWINDOWPIC);
VWB_DrawPic (312,8,H_RIGHTWINDOWPIC);
VWB_DrawPic (8,176,H_BOTTOMINFOPIC);
for (i=0;i<TEXTROWS;i++)
{
leftmargin[i] = LEFTMARGIN;
rightmargin[i] = SCREENPIXWIDTH-RIGHTMARGIN;
}
px = LEFTMARGIN;
py = TOPMARGIN;
rowon = 0;
layoutdone = False;
//
// make sure we are starting layout text (^P first command)
//
while (*text <= 32)
text++;
if (*text != '^' || toupper(*++text) != 'P')
Quit ("PageLayout: Text not headed with ^P");
while (*text++ != '\n')
;
//
// process text stream
//
do
{
ch = *text;
if (ch == '^')
HandleCommand ();
else
if (ch == 9)
{
px = (px+8)&0xf8;
text++;
}
else if (ch <= 32)
HandleCtrls ();
else
HandleWord ();
} while (!layoutdone);
pagenum++;
if (shownumber)
{
#ifdef SPANISH
strcpy (str,"Hoja ");
itoa (pagenum,str2,10);
strcat (str,str2);
strcat (str," de ");
py = 183;
px = 208;
#else
strcpy (str,"pg ");
_itoa (pagenum,str2,10);
strcat (str,str2);
strcat (str," of ");
py = 183;
px = 213;
#endif
_itoa (numpages,str2,10);
strcat (str,str2);
fontcolor = 0x4f; //12^BACKCOLOR;
VWB_DrawPropString (str);
}
fontcolor = oldfontcolor;
}
void HandleCommand (void)
{
int i,margin,top,bottom;
int picwidth,picheight,picmid;
switch (toupper(*++text))
{
case 'B':
picy=ParseNumber();
picx=ParseNumber();
picwidth=ParseNumber();
picheight=ParseNumber();
VWB_Bar(picx,picy,picwidth,picheight,BACKCOLOR);
RipToEOL();
break;
case ';': // comment
RipToEOL();
break;
case 'P': // ^P is start of next page, ^E is end of file
case 'E':
layoutdone = True;
text--; // back up to the '^'
break;
case 'C': // ^c<hex digit> changes text color
i = toupper(*++text);
if (i>='0' && i<='9')
fontcolor = i-'0';
else if (i>='A' && i<='F')
fontcolor = i-'A'+10;
fontcolor *= 16;
i = toupper(*++text);
if (i>='0' && i<='9')
fontcolor += i-'0';
else if (i>='A' && i<='F')
fontcolor += i-'A'+10;
text++;
break;
case '>':
px = 160;
text++;
break;
case 'L':
py=ParseNumber();
rowon = (py-TOPMARGIN)/FONTHEIGHT;
py = TOPMARGIN+rowon*FONTHEIGHT;
px=ParseNumber();
while (*text++ != '\n') // scan to end of line
;
break;
case 'T': // ^Tyyy,xxx,ppp,ttt waits ttt tics, then draws pic
TimedPicCommand ();
break;
case 'G': // ^Gyyy,xxx,ppp draws graphic
ParsePicCommand ();
VWB_DrawPic (picx&~7,picy,picnum);
picwidth = pictable[picnum-STARTPICS].width;
picheight = pictable[picnum-STARTPICS].height;
//
// adjust margins
//
picmid = picx + picwidth/2;
if (picmid > SCREENMID)
margin = picx-PICMARGIN; // new right margin
else
margin = picx+picwidth+PICMARGIN; // new left margin
top = (picy-TOPMARGIN)/FONTHEIGHT;
if (top<0)
top = 0;
bottom = (picy+picheight-TOPMARGIN)/FONTHEIGHT;
if (bottom>=TEXTROWS)
bottom = TEXTROWS-1;
for (i=top;i<=bottom;i++)
if (picmid > SCREENMID)
rightmargin[i] = margin;
else
leftmargin[i] = margin;
//
// adjust this line if needed
//
if (px < leftmargin[rowon])
px = leftmargin[rowon];
break;
}
}
