//-------------------------------------------------------------------------
// Display640()
//-------------------------------------------------------------------------
void Display640(void)
{
// Can you believe it takes all this just to change to 640 mode!!???!
//
VW_ScreenToScreen(0,FREESTART-STATUSLEN,40,80);
VW_SetLineWidth(80);
MoveScreen(0,0);
VW_Bar (0,0,640,200,0);
VW_SetScreenMode(EGA640GR);
VW_SetLineWidth(80);
BlackPalette();
}
//-------------------------------------------------------------------------
// 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 VW_Shutdown (void)
{
VW_SetScreenMode (TEXTGR);
#if GRMODE == EGAGR
VW_SetLineWidth (80);
#endif
}
void VW_SetScreenMode (id0_int_t grmode)
{
switch (grmode)
{
case TEXTGR:
BE_ST_SetScreenMode(3);
screenseg=BE_ST_GetTextModeMemoryPtr();
break;
case CGAGR:
BE_ST_SetScreenMode(4);
// screenseg is actually a main mem buffer
break;
case EGAGR:
BE_ST_SetScreenMode(0xd);
// REFKEEN no need to obtain screenseg
// - different EGA planes are accessed with new functions
break;
#ifdef VGAGAME
case VGAGR:{
id0_char_t extern VGAPAL; // deluxepaint vga pallet .OBJ file
void id0_far *vgapal = &VGAPAL;
SetCool256 (); // custom 256 color mode
screenseg=0xa000;
_ES = FP_SEG(vgapal);
_DX = FP_OFF(vgapal);
_BX = 0;
_CX = 0x100;
_AX = 0x1012;
geninterrupt(0x10); // set the deluxepaint pallet
break;
#endif
}
VW_SetLineWidth(SCREENWIDTH);
}
/*
=============================================================================
SCREEN FADES
=============================================================================
*/
id0_char_t colors[7][17]=
{{0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
{0,0,0,0,0,0,0,0,0,1,2,3,4,5,6,7,0},
{0,0,0,0,0,0,0,0,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,0},
{0,1,2,3,4,5,6,7,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,0},
{0,1,2,3,4,5,6,7,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0},
{0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f}};
// REFKEEN - Patch for 2015 port
static id0_char_t fakecgacolors[17] =
{0,0x1b,0x1d,0x1f,0,0x1b,0x1d,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0};
void VW_ColorBorder (id0_int_t color)
{
BE_ST_SetBorderColor(color);
bordercolor = color;
}
void PicturePause (void)
{
id0_int_t y;
id0_unsigned_t source;
source = displayofs+panadjust;
// VW_ColorBorder (15);
VW_SetLineWidth (40);
VW_SetScreen (0,0);
if (source<0x10000l-200*64)
{
//
// copy top line first
//
for (y=0;y<200;y++)
VW_ScreenToScreen (source+y*64,y*40,40,1);
}
else
{
//
// copy bottom line first
//
for (y=199;y>=0;y--)
VW_ScreenToScreen (source+y*64,y*40,40,1);
}
IN_Shutdown ();
VW_WaitVBL(70);
BE_ST_BiosScanCode(0);
VW_WaitVBL(70);
Quit (NULL);
}
void MM_ShowMemory (void)
{
mmblocktype id0_far *scan;
id0_unsigned_t color,temp;
id0_long_t end;
VW_SetLineWidth(40);
temp = bufferofs;
bufferofs = 0;
VW_SetScreen_EGA (0,0); // REFKEEN - We're in an EGA-only function anyway...
scan = mmhead;
end = -1;
while (scan)
{
if (scan->attributes & PURGEBITS)
color = 5; // dark purple = purgable
else
color = 9; // medium blue = non purgable
if (scan->attributes & LOCKBIT)
color = 12; // red = locked
if (scan->start<=end)
Quit ("MM_ShowMemory: Memory block order currupted!");
end = scan->start+scan->length-1;
// REFKEEN - Again we're in an EGA-only function
VW_Hlin_EGA(scan->start,(id0_unsigned_t)end,0,color);
VW_Plot_EGA(scan->start,0,15);
if (scan->next->start > end+1)
VW_Hlin_EGA(end+1,scan->next->start,0,0); // black = free
scan = scan->next;
}
IN_Ack();
VW_SetLineWidth(64);
bufferofs = temp;
}
void InitGame (void)
{
//id0_unsigned_t segstart,seglength;
id0_int_t i,x,y;
id0_unsigned_t *blockstart;
if (refkeen_current_gamever == BE_GAMEVER_CAT3D100)
{
US_TextScreen();
}
MM_Startup ();
VW_Startup ();
#ifndef PROFILE
IN_Startup ();
SD_Startup ();
#endif
US_Startup ();
if (refkeen_current_gamever == BE_GAMEVER_CAT3D100)
{
US_UpdateTextScreen();
}
CA_Startup ();
US_Setup ();
US_SetLoadSaveHooks(LoadTheGame,SaveTheGame,ResetGame);
//
// load in and lock down some basic chunks
//
CA_ClearMarks ();
CA_MarkGrChunk(STARTFONT);
CA_MarkGrChunk(STARTTILE8);
CA_MarkGrChunk(STARTTILE8M);
CA_MarkGrChunk(HAND1PICM);
CA_MarkGrChunk(HAND2PICM);
CA_MarkGrChunk(ENTERPLAQUEPIC);
CA_CacheMarks (NULL);
MM_SetLock (&grsegs[STARTFONT],true);
MM_SetLock (&grsegs[STARTTILE8],true);
MM_SetLock (&grsegs[STARTTILE8M],true);
MM_SetLock (&grsegs[HAND1PICM],true);
MM_SetLock (&grsegs[HAND2PICM],true);
MM_SetLock (&grsegs[ENTERPLAQUEPIC],true);
fontcolor = WHITE;
//
// build some tables
//
for (i=0;i<MAPSIZE;i++)
nearmapylookup[i] = &tilemap[0][0]+MAPSIZE*i;
for (i=0;i<PORTTILESHIGH;i++)
uwidthtable[i] = UPDATEWIDE*i;
blockstart = &blockstarts[0];
for (y=0;y<UPDATEHIGH;y++)
for (x=0;x<UPDATEWIDE;x++)
*blockstart++ = SCREENWIDTH*16*y+x*TILEWIDTH;
BuildTables (); // 3-d tables
SetupScaling ();
#ifndef PROFILE
if (refkeen_current_gamever == BE_GAMEVER_CAT3D100)
{
US_FinishTextScreen();
}
#endif
//
// reclaim the memory from the linked in text screen
//
// REFKEEN DIFFERENCE (FIXME: Should we "fix" this at all?)
// - Don't handle this, a bit more complicated with our setup and the
// difference is (probably) insignificant with well-defined behaviors
// anyway...
#if 0
segstart = FP_SEG(&introscn);
seglength = 4000/16;
if (FP_OFF(&introscn))
{
segstart++;
seglength--;
}
MML_UseSpace (segstart,seglength);
#endif
VW_SetScreenMode (GRMODE);
VW_ColorBorder (3);
VW_ClearVideo (BLACK);
//
// initialize variables
//
updateptr = &update[0];
// REFKEEN - Safe unaligned accesses
*(updateptr + UPDATEWIDE*PORTTILESHIGH) = 1;
*(updateptr + UPDATEWIDE*PORTTILESHIGH + 1) = 3;
//*(id0_unsigned_t *)(updateptr + UPDATEWIDE*PORTTILESHIGH) = UPDATETERMINATE;
bufferofs = 0;
displayofs = 0;
VW_SetLineWidth(SCREENWIDTH);
}
void VW_SetScreenMode (id0_int_t grmode)
{
switch (grmode)
{
case TEXTGR:
BE_ST_SetScreenMode(3);
screenseg=BE_ST_GetTextModeMemoryPtr();
break;
case CGAGR:
BE_ST_SetScreenMode(4);
// screenseg is actually a main mem buffer
break;
case EGAGR:
#ifdef REFKEEN_VER_CATADVENTURES
case EGA320GR: // MDM start (GAMERS EDGE)
MaxX=320;
MaxY=200;
#endif
BE_ST_SetScreenMode(0xd/*|128 for EGA320GR, MDM*/);
// REFKEEN no need to obtain screenseg
// - different EGA planes are accessed with new functions
break;
#ifdef REFKEEN_VER_CATADVENTURES
case EGA640GR:
MaxX=640;
MaxY=200;
BE_ST_SetScreenMode(0xe/*|128*/);
// REFKEEN no need to obtain screenseg
// - different EGA planes are accessed with new functions
break; // MDM end
#endif
#ifdef VGAGAME
case VGAGR:{
id0_char_t extern VGAPAL; // deluxepaint vga pallet .OBJ file
void id0_far *vgapal = &VGAPAL;
SetCool256 (); // custom 256 color mode
screenseg=0xa000;
_ES = FP_SEG(vgapal);
_DX = FP_OFF(vgapal);
_BX = 0;
_CX = 0x100;
_AX = 0x1012;
geninterrupt(0x10); // set the deluxepaint pallet
break;
#endif
}
VW_SetLineWidth(SCREENWIDTH);
}
/*
=============================================================================
SCREEN FADES
=============================================================================
*/
id0_char_t colors[7][17]=
{{0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},
{0,0,0,0,0,0,0,0,0,1,2,3,4,5,6,7,0},
{0,0,0,0,0,0,0,0,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,0},
{0,1,2,3,4,5,6,7,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,0},
{0,1,2,3,4,5,6,7,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0},
{0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f,0x1f}};
void VW_ColorBorder (id0_int_t color)
{
BE_ST_SetBorderColor(color);
bordercolor = color;
}
void VW_Shutdown (void)
{
VW_SetScreenMode (TEXTGR);
if (GRMODE == EGAGR)
VW_SetLineWidth (80);
}
void InitGame (void)
{
//id0_unsigned_t segstart,seglength;
id0_int_t i,x,y;
id0_unsigned_t *blockstart;
// US_TextScreen();
MM_Startup ();
VW_Startup ();
#ifndef PROFILE
IN_Startup ();
SD_Startup ();
#endif
US_Startup ();
CA_Startup ();
US_Setup ();
US_SetLoadSaveHooks(LoadTheGame,SaveTheGame,ResetGame);
//
// load in and lock down some basic chunks
//
CA_ClearMarks ();
CA_MarkGrChunk(STARTFONT);
CA_MarkGrChunk(STARTTILE8);
CA_MarkGrChunk(STARTTILE8M);
CA_MarkGrChunk(HAND1PICM);
CA_MarkGrChunk(NORTHICONSPR);
CA_CacheMarks (NULL);
MM_SetLock (&grsegs[STARTFONT],true);
MM_SetLock (&grsegs[STARTTILE8],true);
MM_SetLock (&grsegs[STARTTILE8M],true);
MM_SetLock (&grsegs[HAND1PICM],true);
fontcolor = WHITE;
//
// build some tables
//
for (i=0;i<MAPSIZE;i++)
nearmapylookup[i] = &tilemap[0][0]+MAPSIZE*i;
for (i=0;i<PORTTILESHIGH;i++)
uwidthtable[i] = UPDATEWIDE*i;
blockstart = &blockstarts[0];
for (y=0;y<UPDATEHIGH;y++)
for (x=0;x<UPDATEWIDE;x++)
*blockstart++ = SCREENWIDTH*16*y+x*TILEWIDTH;
BuildTables (); // 3-d tables
SetupScaling ();
#ifndef PROFILE
// US_FinishTextScreen();
#endif
#if 0
//
// reclaim the memory from the linked in text screen
//
segstart = FP_SEG(&introscn);
seglength = 4000/16;
if (FP_OFF(&introscn))
{
segstart++;
seglength--;
}
MML_UseSpace (segstart,seglength);
#endif
VW_SetScreenMode (GRMODE);
ge_textmode = false;
// VW_ColorBorder (3);
VW_ClearVideo (BLACK);
//
// initialize variables
//
updateptr = &update[0];
// REFKEEN - Safe unaligned accesses
*(updateptr + UPDATEWIDE*PORTTILESHIGH) = 1;
*(updateptr + UPDATEWIDE*PORTTILESHIGH + 1) = 3;
//*(id0_unsigned_t *)(updateptr + UPDATEWIDE*PORTTILESHIGH) = UPDATETERMINATE;
bufferofs = 0;
displayofs = 0;
VW_SetLineWidth(SCREENWIDTH);
}
