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 VW_FixRefreshBuffer (void)
{
#if GRMODE == EGAGR
VW_ScreenToScreen (displayofs,bufferofs,PORTTILESWIDE*4*CHARWIDTH,
(PORTTILESHIGH-1)*16);
#endif
}
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);
}
}
//-------------------------------------------------------------------------
// 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_FixRefreshBuffer (void)
{
if (GRMODE == EGAGR)
VW_ScreenToScreen (displayofs,bufferofs,PORTTILESWIDE*4*CHARWIDTH_EGA,
PORTTILESHIGH*16);
}
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 CheckKeys (void)
{
int i;
byte scan;
unsigned temp;
if (screenfaded || demoplayback) // don't do anything with a faded screen
return;
scan = LastScan;
#ifdef SPEAR
//
// SECRET CHEAT CODE: TAB-G-F10
//
if (Keyboard[sc_Tab] &&
Keyboard[sc_G] &&
Keyboard[sc_F10])
{
WindowH = 160;
if (godmode)
{
Message ("God mode OFF");
SD_PlaySound (NOBONUSSND);
}
else
{
Message ("God mode ON");
SD_PlaySound (ENDBONUS2SND);
}
IN_Ack();
godmode ^= 1;
DrawAllPlayBorderSides ();
IN_ClearKeysDown();
return;
}
#endif
//
// SECRET CHEAT CODE: 'MLI'
//
if (Keyboard[sc_M] &&
Keyboard[sc_L] &&
Keyboard[sc_I])
{
gamestate.health = 100;
gamestate.ammo = 99;
gamestate.keys = 3;
gamestate.score = 0;
gamestate.TimeCount += 42000L;
GiveWeapon (wp_chaingun);
DrawWeapon();
DrawHealth();
DrawKeys();
DrawAmmo();
DrawScore();
ClearMemory ();
CA_CacheGrChunk (STARTFONT+1);
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
Message(STR_CHEATER1"\n"
STR_CHEATER2"\n\n"
STR_CHEATER3"\n"
STR_CHEATER4"\n"
STR_CHEATER5);
UNCACHEGRCHUNK(STARTFONT+1);
PM_CheckMainMem ();
IN_ClearKeysDown();
IN_Ack();
DrawAllPlayBorder ();
}
//
// OPEN UP DEBUG KEYS
//
#ifndef SPEAR
if (Keyboard[sc_BackSpace] &&
Keyboard[sc_LShift] &&
Keyboard[sc_Alt] &&
MS_CheckParm("goobers"))
#else
if (Keyboard[sc_BackSpace] &&
Keyboard[sc_LShift] &&
Keyboard[sc_Alt] &&
MS_CheckParm("debugmode"))
#endif
{
ClearMemory ();
CA_CacheGrChunk (STARTFONT+1);
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
Message("Debugging keys are\nnow available!");
UNCACHEGRCHUNK(STARTFONT+1);
PM_CheckMainMem ();
IN_ClearKeysDown();
IN_Ack();
DrawAllPlayBorderSides ();
DebugOk=1;
}
//
// TRYING THE KEEN CHEAT CODE!
//
if (Keyboard[sc_B] &&
Keyboard[sc_A] &&
Keyboard[sc_T])
{
ClearMemory ();
CA_CacheGrChunk (STARTFONT+1);
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
Message("Commander Keen is also\n"
"available from Apogee, but\n"
"then, you already know\n"
"that - right, Cheatmeister?!");
UNCACHEGRCHUNK(STARTFONT+1);
PM_CheckMainMem ();
IN_ClearKeysDown();
IN_Ack();
DrawAllPlayBorder ();
}
//
// pause key weirdness can't be checked as a scan code
//
if (Paused)
{
bufferofs = displayofs;
LatchDrawPic (20-4,80-2*8,PAUSEDPIC);
SD_MusicOff();
IN_Ack();
IN_ClearKeysDown ();
SD_MusicOn();
Paused = False;
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
return;
}
//
// F1-F7/ESC to enter control panel
//
if (
#ifndef DEBCHECK
scan == sc_F10 ||
#endif
scan == sc_F9 ||
scan == sc_F7 ||
scan == sc_F8) // pop up quit dialog
{
ClearMemory ();
ClearSplitVWB ();
VW_ScreenToScreen (displayofs,bufferofs,80,160);
US_ControlPanel(scan);
DrawAllPlayBorderSides ();
if (scan == sc_F9)
StartMusic ();
PM_CheckMainMem ();
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
return;
}
if ( (scan >= sc_F1 && scan <= sc_F9) || scan == sc_Escape)
{
StopMusic ();
ClearMemory ();
VW_FadeOut ();
US_ControlPanel(scan);
SETFONTCOLOR(0,15);
IN_ClearKeysDown();
DrawPlayScreen ();
if (!startgame && !loadedgame)
{
VW_FadeIn ();
StartMusic ();
}
if (loadedgame)
playstate = ex_abort;
lasttimecount = TimeCount;
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
PM_CheckMainMem ();
return;
}
//
// TAB-? debug keys
//
if (Keyboard[sc_Tab] && DebugOk)
{
CA_CacheGrChunk (STARTFONT);
fontnumber=0;
SETFONTCOLOR(0,15);
DebugKeys();
//if (MousePresent) // PORT
// Mouse(MDelta); // Clear accumulated mouse movement
lasttimecount = TimeCount;
return;
}
}
void CheckKeys (void)
{
boolean one_eighty=false;
Uint8 scan;
static boolean Plus_KeyReleased;
static boolean Minus_KeyReleased;
static boolean I_KeyReleased;
static boolean S_KeyReleased;
#if IN_DEVELOPMENT || BETA_TEST
// if (DebugOk && (Keyboard[sc_p] || PP_step))
// PicturePause ();
#endif
if (screenfaded || demoplayback) // don't do anything with a faded screen
return;
scan = LastScan;
#if IN_DEVELOPMENT
#ifdef ACTIVATE_TERMINAL
if (Keyboard[sc_9] && Keyboard[sc_0])
ActivateTerminal(true);
#endif
#endif
//
// SECRET CHEAT CODE: 'JAM'
//
#if GAME_VERSION != SHAREWARE_VERSION
if (Keyboard[sc_j] || Keyboard[sc_a] || Keyboard[sc_m])
{
if (jam_buff[sizeof(jam_buff_cmp)-1] != LastScan)
{
memcpy(jam_buff,jam_buff+1,sizeof(jam_buff_cmp)-1);
jam_buff[sizeof(jam_buff_cmp)-1] = LastScan;
}
}
#endif
CheckMusicToggle();
if (gamestate.rpower)
{
if (in_is_binding_pressed(e_bi_radar_magnify))
{
if (Plus_KeyReleased && gamestate.rzoom<2)
{
UpdateRadarGuage();
gamestate.rzoom++;
Plus_KeyReleased=false;
}
}
else
Plus_KeyReleased=true;
if (in_is_binding_pressed(e_bi_radar_minify))
{
if (Minus_KeyReleased && gamestate.rzoom)
{
UpdateRadarGuage();
gamestate.rzoom--;
Minus_KeyReleased=false;
}
}
else
Minus_KeyReleased=true;
}
if (in_is_binding_pressed(e_bi_sfx)) {
if (S_KeyReleased)
{
if ((SoundMode != sdm_Off) || (DigiMode!=sds_Off))
{
if (SoundMode != sdm_Off)
{
SD_WaitSoundDone();
SD_SetSoundMode(sdm_Off);
}
if (DigiMode!=sds_Off)
SD_SetDigiDevice(sds_Off);
memcpy((char *)&SoundOn[55],"OFF.",4);
}
else
{
ClearMemory();
if (SoundBlasterPresent || AdLibPresent)
SD_SetSoundMode(sdm_AdLib);
else
SD_SetSoundMode(sdm_Off);
if (SoundBlasterPresent)
SD_SetDigiDevice(sds_SoundBlaster);
else
if (SoundSourcePresent)
SD_SetDigiDevice(sds_SoundSource);
else
SD_SetDigiDevice(sds_Off);
CA_LoadAllSounds();
memcpy((char *)&SoundOn[55],"ON. ",4);
}
DISPLAY_TIMED_MSG(SoundOn,MP_BONUS,MT_GENERAL);
S_KeyReleased=false;
}
}
else
S_KeyReleased=true;
if (Keyboard[sc_return])
{
#if (GAME_VERSION != SHAREWARE_VERSION) || GEORGE_CHEAT
char loop;
if ((!memcmp(jam_buff,jam_buff_cmp,sizeof(jam_buff_cmp))))
{
jam_buff[0]=0;
for (loop=0; loop<NUMKEYS; loop++)
if (gamestate.numkeys[static_cast<int>(loop)] < MAXKEYS)
gamestate.numkeys[static_cast<int>(loop)]=1;
gamestate.health = 100;
gamestate.ammo = MAX_AMMO;
gamestate.rpower = MAX_RADAR_ENERGY;
if (!DebugOk)
{
gamestate.score = 0;
gamestate.nextextra = EXTRAPOINTS;
}
gamestate.TimeCount += 42000L;
for (loop=0; loop<NUMWEAPONS-1; loop++)
GiveWeapon(loop);
DrawWeapon();
DrawHealth();
DrawKeys();
DrawScore();
DISPLAY_TIMED_MSG("\r\r YOU CHEATER!",MP_INTERROGATE,MT_GENERAL);
ForceUpdateStatusBar();
ClearMemory ();
ClearSplitVWB ();
VW_ScreenToScreen (static_cast<Uint16>(displayofs),static_cast<Uint16>(bufferofs),80,160);
Message("\n NOW you're jammin'!! \n");
IN_ClearKeysDown();
IN_Ack();
CleanDrawPlayBorder();
}
else if (!in_use_modern_bindings)
#endif
one_eighty=true;
}
// Handle quick turning!
//
if (!gamestate.turn_around)
{
// 90 degrees left
//
if (in_is_binding_pressed(e_bi_quick_left))
{
gamestate.turn_around = -90;
gamestate.turn_angle = player->angle + 90;
if (gamestate.turn_angle > 359)
gamestate.turn_angle -= ANGLES;
}
// 180 degrees right
//
if (in_is_binding_pressed(e_bi_turn_around) || one_eighty)
{
gamestate.turn_around = 180;
gamestate.turn_angle = player->angle + 180;
if (gamestate.turn_angle > 359)
gamestate.turn_angle -= ANGLES;
}
// 90 degrees right
//
if (in_is_binding_pressed(e_bi_quick_right))
{
gamestate.turn_around = 90;
gamestate.turn_angle = player->angle - 90;
if (gamestate.turn_angle < 0)
gamestate.turn_angle += ANGLES;
}
}
//
// pause key weirdness can't be checked as a scan code
//
if (in_is_binding_pressed(e_bi_pause)) {
SD_MusicOff();
fontnumber = 4;
BMAmsg(PAUSED_MSG);
IN_Ack();
IN_ClearKeysDown();
fontnumber = 2;
RedrawStatusAreas();
SD_MusicOn();
Paused = false;
::in_clear_mouse_deltas();
return;
}
#if IN_DEVELOPMENT
if (TestQuickSave)
{
// TestQuickSave--;
scan = sc_f8;
}
if (TestAutoMapper)
PopupAutoMap();
#endif
scan = sc_none;
if (Keyboard[sc_escape])
scan = sc_escape;
else if (in_is_binding_pressed(e_bi_help))
scan = sc_f1;
if (in_is_binding_pressed(e_bi_save))
scan = sc_f2;
else if (in_is_binding_pressed(e_bi_load))
scan = sc_f3;
else if (in_is_binding_pressed(e_bi_sound))
scan = sc_f4;
else if (in_is_binding_pressed(e_bi_controls))
scan = sc_f6;
else if (in_is_binding_pressed(e_bi_end_game))
scan = sc_f7;
else if (in_is_binding_pressed(e_bi_quick_save))
scan = sc_f8;
else if (in_is_binding_pressed(e_bi_quick_load))
scan = sc_f9;
else if (in_is_binding_pressed(e_bi_quick_exit))
scan = sc_f10;
switch (scan) {
case sc_f7: // END GAME
case sc_f10: // QUIT TO DOS
FinishPaletteShifts();
ClearMemory();
US_ControlPanel(scan);
CleanDrawPlayBorder();
return;
case sc_f2: // SAVE MISSION
case sc_f8: // QUICK SAVE
// Make sure there's room to save...
//
ClearMemory();
FinishPaletteShifts();
if (!CheckDiskSpace(DISK_SPACE_NEEDED, CANT_SAVE_GAME_TXT, cds_id_print)) {
CleanDrawPlayBorder();
break;
}
case sc_f1: // HELP
case sc_f3: // LOAD MISSION
case sc_f4: // SOUND MENU
case sc_f5: // RESIZE VIEW
case sc_f6: // CONTROLS MENU
case sc_f9: // QUICK LOAD
case sc_escape: // MAIN MENU
refresh_screen = true;
if (scan < sc_f8)
VW_FadeOut();
StopMusic();
ClearMemory();
ClearSplitVWB();
US_ControlPanel(scan);
if (refresh_screen) {
boolean old = loadedgame;
loadedgame = false;
DrawPlayScreen(false);
loadedgame = old;
}
ClearMemory();
if (!sqActive || !loadedgame)
StartMusic(false);
IN_ClearKeysDown();
if (loadedgame) {
PreloadGraphics();
loadedgame = false;
DrawPlayScreen(false);
} else
if (!refresh_screen)
CleanDrawPlayBorder();
if (!sqActive)
StartMusic(false);
return;
}
scan = sc_none;
if (in_is_binding_pressed(e_bi_stats))
PopupAutoMap();
if (Keyboard[sc_back_quote])
{
Keyboard[sc_back_quote] = 0;
TryDropPlasmaDetonator();
}
if ((DebugOk || gamestate.flags & GS_MUSIC_TEST) && (Keyboard[sc_backspace]))
{
Uint8 old_num=music_num;
if (gamestate.flags & GS_MUSIC_TEST)
{
if (Keyboard[sc_left_arrow])
{
if (music_num)
music_num--;
Keyboard[sc_left_arrow]=false;
}
else
if (Keyboard[sc_right_arrow])
{
if (music_num < LASTMUSIC-1)
music_num++;
Keyboard[sc_right_arrow]=false;
}
if (old_num != music_num)
{
ClearMemory();
delete [] audiosegs[STARTMUSIC + old_num];
audiosegs[STARTMUSIC + old_num] = NULL;
StartMusic(false);
DrawScore();
}
}
if (old_num == music_num)
{
fontnumber=4;
SETFONTCOLOR(0,15);
if (DebugKeys())
{
CleanDrawPlayBorder();
}
::in_clear_mouse_deltas();
lasttimecount = TimeCount;
return;
}
}
if (in_is_binding_pressed(e_bi_attack_info))
{
if (I_KeyReleased)
{
gamestate.flags ^= GS_ATTACK_INFOAREA;
if (gamestate.flags & GS_ATTACK_INFOAREA)
DISPLAY_TIMED_MSG(attacker_info_enabled,MP_ATTACK_INFO,MT_GENERAL);
else
DISPLAY_TIMED_MSG(attacker_info_disabled,MP_ATTACK_INFO,MT_GENERAL);
I_KeyReleased = false;
}
}
else
I_KeyReleased = true;
#ifdef CEILING_FLOOR_COLORS
if (in_is_binding_pressed(e_bi_ceiling))
{
gamestate.flags ^= GS_DRAW_CEILING;
in_reset_binding_state(e_bi_ceiling);
}
if (in_is_binding_pressed(e_bi_flooring))
{
ThreeDRefresh();
ThreeDRefresh();
gamestate.flags ^= GS_DRAW_FLOOR;
in_reset_binding_state(e_bi_flooring);
#if DUAL_SWAP_FILES
ChangeSwapFiles(true);
#endif
}
#endif
if (in_is_binding_pressed(e_bi_lightning))
{
in_reset_binding_state(e_bi_lightning);
gamestate.flags ^= GS_LIGHTING;
}
}
