void VW_CGAFullUpdate (void)
{
id0_byte_t *update;
id0_boolean_t halftile;
id0_unsigned_t x,y,middlerows,middlecollumns;
displayofs = bufferofs+panadjust;
uint8_t *srcPtr = &screenseg[displayofs];
uint8_t *destPtr = BE_ST_GetCGAMemoryPtr();
id0_unsigned_t linePairsToCopy = 100; // pairs of scan lines to copy
do
{
BE_Cross_WrappedToLinear_MemCopy(destPtr, screenseg, srcPtr, 80);
//memcpy(destPtr, srcPtr, 80);
BE_Cross_Wrapped_Add(screenseg, &srcPtr, linewidth);
//srcPtr += linewidth;
destPtr += 0x2000; // go to the interlaced bank
BE_Cross_WrappedToLinear_MemCopy(destPtr, screenseg, srcPtr, 80);
//memcpy(destPtr, srcPtr, 80);
BE_Cross_Wrapped_Add(screenseg, &srcPtr, linewidth);
//srcPtr += linewidth;
destPtr -= (0x2000 - 80); // go to the non interlaced bank
} while (--linePairsToCopy);
// clear out the update matrix
memset(baseupdateptr, 0, UPDATEWIDE*UPDATEHIGH);
updateptr = baseupdateptr;
*(id0_unsigned_t *)(updateptr + UPDATEWIDE*PORTTILESHIGH) = UPDATETERMINATE;
// Rather than BE_ST_MarkGfxForPendingUpdate()...
BE_ST_MarkGfxForUpdate();
#if 0
id0_byte_t *update;
id0_boolean_t halftile;
id0_unsigned_t x,y,middlerows,middlecollumns;
displayofs = bufferofs+panadjust;
asm mov ax,0xb800
asm mov es,ax
asm mov si,[displayofs]
asm xor di,di
asm mov bx,100 // pairs of scan lines to copy
asm mov dx,[linewidth]
asm sub dx,80
asm mov ds,[screenseg]
asm test si,1
asm jz evenblock
//
// odd source
//
asm mov ax,39 // words accross screen
copytwolineso:
asm movsb
asm mov cx,ax
asm rep movsw
asm movsb
asm add si,dx
asm add di,0x2000-80 // go to the interlaced bank
asm movsb
asm mov cx,ax
asm rep movsw
asm movsb
asm add si,dx
asm sub di,0x2000 // go to the non interlaced bank
asm dec bx
asm jnz copytwolineso
asm jmp blitdone
//
// even source
//
evenblock:
asm mov ax,40 // words accross screen
copytwolines:
asm mov cx,ax
asm rep movsw
asm add si,dx
asm add di,0x2000-80 // go to the interlaced bank
asm mov cx,ax
asm rep movsw
asm add si,dx
asm sub di,0x2000 // go to the non interlaced bank
asm dec bx
asm jnz copytwolines
blitdone:
asm mov ax,ss
asm mov ds,ax
asm mov es,ax
asm xor ax,ax // clear out the update matrix
asm mov cx,UPDATEWIDE*UPDATEHIGH/2
asm mov di,[baseupdateptr]
asm rep stosw
updateptr = baseupdateptr;
*(id0_unsigned_t *)(updateptr + UPDATEWIDE*PORTTILESHIGH) = UPDATETERMINATE;
#endif
}
void loadscn_exe_main (void)
{
id0_int_t step;
id0_boolean_t pressedkey = false;
if (!BE_Cross_strcasecmp(id0_argv[1], "/?"))
{
BE_ST_clrscr();
BE_ST_textcolor(15);
BE_ST_textbackground(1);
BE_ST_cprintf("\xD5\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xB8\r\n");
BE_ST_cprintf("\xB3 LOADSCN \xB3\r\n");
BE_ST_cprintf("\xB3 by Nolan Martin \xB3\r\n");
BE_ST_cprintf("\xB3 Copyright 1992 - Softdisk Publishing \xB3\r\n");
BE_ST_cprintf("\xD4\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xBE\r\n");
BE_ST_printf("\n");
BE_ST_printf("/VER - version number\n");
BE_ST_printf("/? - this help\n");
BE_ST_HandleExit(0);
}
if (!BE_Cross_strcasecmp(id0_argv[1], "/VER"))
{
BE_ST_clrscr();
BE_ST_textcolor(15);
BE_ST_textbackground(1);
BE_ST_cprintf("\xD5\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xB8\r\n");
BE_ST_cprintf("\xB3 LOADSCN \xB3\r\n");
BE_ST_cprintf("\xB3 by Nolan Martin \xB3\r\n");
BE_ST_cprintf("\xB3 Copyright 1992 - Softdisk Publishing \xB3\r\n");
BE_ST_cprintf("\xD4\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xCD\xBE\r\n");
BE_ST_printf("\n");
BE_ST_printf("%s %s\n", "LOADSCN ", " VERSION 1.10s QA[0]");
BE_ST_printf("\n");
BE_ST_printf("This program requires an EGA monitor or better,\n");
BE_ST_printf(" 640K, and MS-DOS 3.0 or better.\n");
BE_ST_HandleExit(0);
}
if (BE_Cross_strcasecmp(id0_argv[1], "LAST.SHL"))
TrashProg("You must type START [ENTER] to run this program.\n");
videocard = VideoID();
if ((videocard != 3) && (videocard != 5))
TrashProg("You need an EGA or VGA monitor to run this program.");
screenmode = 3;
SetScreenMode(screenmode);
SetScreen(0,0);
if (ext_LoadShape("ARMAPC.ABS", &imagetoshow))
TrashProg("ERROR : Can't load image.");
ext_MoveGfxDst(0, 200);
UnpackEGAShapeToScreen(&imagetoshow, 0, 0);
// REFKEEN - Alternative controllers support
extern BE_ST_ControllerMapping g_ingame_altcontrol_mapping_inackback;
BE_ST_AltControlScheme_PrepareControllerMapping(&g_ingame_altcontrol_mapping_inackback);
// (REFKEEN) Add an artificial delay (screen not shown immediately on older machines)
BE_ST_Delay(250);
ScreenToScreen(8000, 0, 40, 200);
for (step = 0; step < 10; ++step)
{
BE_ST_Delay(500);
if (IsKeyPressed())
{
pressedkey = true;
WaitForKeyRelease();
}
}
if (!pressedkey)
BE_ST_BiosScanCode(0);
if (!ext_BLoad("LAST.ABS", &endscreen))
TrashProg("Can't load Compressed Text - Possibly corrupt file!");
screenmode = 1;
SetScreenMode(screenmode);
memcpy(BE_ST_GetTextModeMemoryPtr(), (id0_byte_t *)endscreen+7, 4000);
BE_ST_MarkGfxForUpdate();
//_fmemcpy(MK_FP(0xB800,0), (byte far *)endscreen+7, 4000);
BE_ST_MoveTextCursorTo(0, 23); // gotoxy(1, 24)
BE_ST_HandleExit(0);
}
void Quit (const id0_char_t *error, ...)
{
id0_short_t exit_code=0;
#ifndef CATALOG
void *finscreen;
//id0_unsigned_t finscreen;
#endif
va_list ap;
va_start(ap,error);
#ifndef CATALOG
if (!error)
{
CA_SetAllPurge ();
CA_CacheGrChunk (PIRACY);
finscreen = grsegs[PIRACY];
//finscreen = (id0_unsigned_t)grsegs[PIRACY];
}
#endif
ShutdownId ();
if (error && *error)
{
BE_ST_vprintf(error,ap);
exit_code = 1;
}
#ifndef CATALOG
else
if (!NoWait)
{
memcpy(BE_ST_GetTextModeMemoryPtr(), finscreen, 4000);
BE_ST_MarkGfxForUpdate();
//movedata (finscreen,0,0xb800,0,4000);
BE_ST_BiosScanCode(0);
}
#endif
va_end(ap);
#ifndef CATALOG
if (!error)
{
id0_argc = 2;
id0_argv[1] = "LAST.SHL";
id0_argv[2] = "ENDSCN.SCN";
id0_argv[3] = NULL;
#if 0
if (execv("LOADSCN.EXE", id0_argv) == -1)
{
BE_ST_clrscr();
BE_ST_puts("Couldn't find executable LOADSCN.EXE.\n");
BE_ST_HandleExit(1);
}
#endif
void loadscn_exe_main(void);
BE_Cross_Bexecv(loadscn_exe_main, id0_argv, NULL, false);
}
#endif
BE_ST_HandleExit(exit_code);
}
void Quit (const id0_char_t *error, ...)
{
id0_short_t exit_code=0;
void *finscreen;
//id0_unsigned_t finscreen;
va_list ap;
va_start(ap,error);
if (!error)
{
CA_SetAllPurge ();
if (!refkeen_compat_c4_main_def_catalog)
{
CA_CacheGrChunk (PIRACY);
finscreen = grsegs[PIRACY];
//finscreen = (id0_unsigned_t)grsegs[PIRACY];
}
}
ShutdownId ();
if (error && *error)
{
BE_ST_vprintf(error,ap);
exit_code = 1;
}
else if (!refkeen_compat_c4_main_def_catalog)
{
if ((refkeen_current_gamever == BE_GAMEVER_CATABYSS124) || !NoWait)
{
memcpy(BE_ST_GetTextModeMemoryPtr(), finscreen, 4000);
BE_ST_MarkGfxForUpdate();
//movedata (finscreen,0,0xb800,0,4000);
if (refkeen_current_gamever == BE_GAMEVER_CATABYSS124)
{
if (BE_ST_KbHit())
{
while (BE_ST_KbHit())
BE_ST_BiosScanCode(0);
}
}
BE_ST_BiosScanCode(0);
}
}
va_end(ap);
if (!refkeen_compat_c4_main_def_catalog)
{
if (!error)
{
id0_argc = 2;
id0_argv[1] = "LAST.SHL";
id0_argv[2] = "ENDSCN.SCN";
id0_argv[3] = NULL;
#if 0
if (execv("LOADSCN.EXE", id0_argv) == -1)
{
BE_ST_clrscr();
BE_ST_puts("Couldn't find executable LOADSCN.EXE.\n");
BE_ST_HandleExit(1);
}
#endif
void loadscn_exe_main(void);
BE_Cross_Bexecv(loadscn_exe_main, id0_argv, NULL, false);
}
}
BE_ST_HandleExit(exit_code);
}
