mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-20 16:59:06 +00:00
1802 lines
40 KiB
C++
1802 lines
40 KiB
C++
/* ScummVM - Graphic Adventure Engine
|
|
*
|
|
* ScummVM is the legal property of its developers, whose names
|
|
* are too numerous to list here. Please refer to the COPYRIGHT
|
|
* file distributed with this source distribution.
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
*
|
|
*/
|
|
|
|
/*
|
|
* This code is based on original Soltys source code
|
|
* Copyright (c) 1994-1995 Janus B. Wisniewski and L.K. Avalon
|
|
*/
|
|
|
|
#include "common/scummsys.h"
|
|
#include "common/memstream.h"
|
|
#include "common/savefile.h"
|
|
#include "common/serializer.h"
|
|
#include "common/str.h"
|
|
#include "graphics/palette.h"
|
|
#include "graphics/scaler.h"
|
|
#include "graphics/thumbnail.h"
|
|
#include "cge/general.h"
|
|
#include "cge/sound.h"
|
|
#include "cge/startup.h"
|
|
#include "cge/config.h"
|
|
#include "cge/vga13h.h"
|
|
#include "cge/snail.h"
|
|
#include "cge/text.h"
|
|
#include "cge/game.h"
|
|
#include "cge/events.h"
|
|
#include "cge/cfile.h"
|
|
#include "cge/vol.h"
|
|
#include "cge/talk.h"
|
|
#include "cge/vmenu.h"
|
|
#include "cge/gettext.h"
|
|
#include "cge/mixer.h"
|
|
#include "cge/cge_main.h"
|
|
#include "cge/cge.h"
|
|
#include "cge/walk.h"
|
|
|
|
namespace CGE {
|
|
|
|
#define STACK_SIZ (K(2))
|
|
#define SVGCHKSUM (1956 + _now + _oldLev + _game + _music + _demoText)
|
|
|
|
#define SVG0NAME ("{{INIT}}" SVG_EXT)
|
|
#define SVG0FILE INI_FILE
|
|
|
|
uint16 _stklen = (STACK_SIZ * 2);
|
|
|
|
Vga *_vga;
|
|
Heart *_heart;
|
|
System *_sys;
|
|
Sprite *_pocLight;
|
|
EventManager *_eventManager;
|
|
Keyboard *_keyboard;
|
|
Mouse *_mouse;
|
|
Sprite *_pocket[POCKET_NX];
|
|
Sprite *_sprite;
|
|
Sprite *_miniCave;
|
|
Sprite *_shadow;
|
|
HorizLine *_horzLine;
|
|
InfoLine *_infoLine;
|
|
Sprite *_cavLight;
|
|
InfoLine *_debugLine;
|
|
|
|
Snail *_snail;
|
|
Snail *_snail_;
|
|
|
|
// 0.75 - 17II95 - full sound support
|
|
// 0.76 - 18II95 - small MiniEMS in DEMO,
|
|
// unhide CavLight in SNLEVEL
|
|
// keyclick suppress in startup
|
|
// keyclick on key service in: SYSTEM, GET_TEXT
|
|
// 1.01 - 17VII95 - default savegame with sound ON
|
|
// coditionals EVA for 2-month evaluation version
|
|
|
|
const char *SAVEGAME_STR = "SCUMMVM_CGE";
|
|
#define SAVEGAME_STR_SIZE 11
|
|
|
|
//--------------------------------------------------------------------------
|
|
|
|
static bool _finis = false;
|
|
int _offUseCount;
|
|
uint16 *_intStackPtr = false;
|
|
|
|
Hxy _heroXY[CAVE_MAX] = {{0, 0}};
|
|
Bar _barriers[1 + CAVE_MAX] = { { 0xFF, 0xFF } };
|
|
|
|
extern Dac _stdPal[58];
|
|
|
|
void CGEEngine::syncHeader(Common::Serializer &s) {
|
|
int i;
|
|
|
|
s.syncAsUint16LE(_now);
|
|
s.syncAsUint16LE(_oldLev);
|
|
s.syncAsUint16LE(_demoText);
|
|
for (i = 0; i < 5; ++i)
|
|
s.syncAsUint16LE(_game);
|
|
s.syncAsSint16LE(i); // unused VGA::Mono variable
|
|
s.syncAsUint16LE(_music);
|
|
s.syncBytes(_volume, 2);
|
|
for (i = 0; i < 4; ++i)
|
|
s.syncAsUint16LE(_flag[i]);
|
|
|
|
for (i = 0; i < CAVE_MAX; ++i) {
|
|
s.syncAsSint16LE(_heroXY[i]._x);
|
|
s.syncAsUint16LE(_heroXY[i]._y);
|
|
}
|
|
for (i = 0; i < 1 + CAVE_MAX; ++i) {
|
|
s.syncAsByte(_barriers[i]._horz);
|
|
s.syncAsByte(_barriers[i]._vert);
|
|
}
|
|
for (i = 0; i < POCKET_NX; ++i)
|
|
s.syncAsUint16LE(_pocref[i]);
|
|
|
|
if (s.isSaving()) {
|
|
// Write checksum
|
|
int checksum = SVGCHKSUM;
|
|
s.syncAsUint16LE(checksum);
|
|
} else {
|
|
// Read checksum and validate it
|
|
uint16 checksum;
|
|
s.syncAsUint16LE(checksum);
|
|
if (checksum != SVGCHKSUM)
|
|
error("%s", _text->getText(BADSVG_TEXT));
|
|
}
|
|
}
|
|
|
|
bool CGEEngine::loadGame(int slotNumber, SavegameHeader *header, bool tiny) {
|
|
Common::MemoryReadStream *readStream;
|
|
SavegameHeader saveHeader;
|
|
|
|
if (slotNumber == -1) {
|
|
// Loading the data for the initial game state
|
|
SVG0FILE file = SVG0FILE(SVG0NAME);
|
|
int size = file.size();
|
|
byte *dataBuffer = (byte *)malloc(size);
|
|
file.read(dataBuffer, size);
|
|
readStream = new Common::MemoryReadStream(dataBuffer, size, DisposeAfterUse::YES);
|
|
|
|
} else {
|
|
// Open up the savgame file
|
|
Common::String slotName = generateSaveName(slotNumber);
|
|
Common::InSaveFile *saveFile = g_system->getSavefileManager()->openForLoading(slotName);
|
|
|
|
// Read the data into a data buffer
|
|
int size = saveFile->size();
|
|
byte *dataBuffer = (byte *)malloc(size);
|
|
saveFile->read(dataBuffer, size);
|
|
readStream = new Common::MemoryReadStream(dataBuffer, size, DisposeAfterUse::YES);
|
|
}
|
|
|
|
// Check to see if it's a ScummVM savegame or not
|
|
char buffer[SAVEGAME_STR_SIZE + 1];
|
|
readStream->read(buffer, SAVEGAME_STR_SIZE + 1);
|
|
|
|
if (strncmp(buffer, SAVEGAME_STR, SAVEGAME_STR_SIZE + 1) != 0) {
|
|
// It's not, so rewind back to the start
|
|
readStream->seek(0);
|
|
|
|
if (header)
|
|
// Header wanted where none exists, so return false
|
|
return false;
|
|
} else {
|
|
// Found header
|
|
if (!readSavegameHeader(readStream, saveHeader)) {
|
|
delete readStream;
|
|
return false;
|
|
}
|
|
|
|
if (header) {
|
|
*header = saveHeader;
|
|
delete readStream;
|
|
return true;
|
|
}
|
|
|
|
// Delete the thumbnail
|
|
delete saveHeader.thumbnail;
|
|
|
|
// If we're loading the auto-save slot, load the name
|
|
if (slotNumber == 0)
|
|
strncpy(_usrFnam, saveHeader.saveName.c_str(), 8);
|
|
}
|
|
|
|
// Get in the savegame
|
|
syncGame(readStream, NULL, tiny);
|
|
|
|
delete readStream;
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Returns true if a given savegame exists
|
|
*/
|
|
bool CGEEngine::savegameExists(int slotNumber) {
|
|
Common::String slotName = generateSaveName(slotNumber);
|
|
|
|
Common::InSaveFile *saveFile = g_system->getSavefileManager()->openForLoading(slotName);
|
|
bool result = saveFile != NULL;
|
|
delete saveFile;
|
|
return result;
|
|
}
|
|
|
|
/**
|
|
* Support method that generates a savegame name
|
|
* @param slot Slot number
|
|
*/
|
|
Common::String CGEEngine::generateSaveName(int slot) {
|
|
return Common::String::format("%s.%03d", _targetName.c_str(), slot);
|
|
}
|
|
|
|
Common::Error CGEEngine::loadGameState(int slot) {
|
|
// Clear current game activity
|
|
caveDown();
|
|
|
|
// Load the game
|
|
loadGame(slot, NULL, true);
|
|
caveUp();
|
|
loadGame(slot, NULL);
|
|
|
|
return Common::kNoError;
|
|
}
|
|
|
|
Common::Error CGEEngine::saveGameState(int slot, const Common::String &desc) {
|
|
saveGame(slot, desc);
|
|
return Common::kNoError;
|
|
}
|
|
|
|
|
|
void CGEEngine::saveSound() {
|
|
warning("STUB: CGEEngine::saveSound");
|
|
/* Convert to saving any such needed data in ScummVM configuration file
|
|
|
|
CFile cfg(usrPath(progName(CFG_EXT)), WRI);
|
|
if (!cfg._error)
|
|
cfg.write(&_sndDrvInfo, sizeof(_sndDrvInfo) - sizeof(_sndDrvInfo.Vol2));
|
|
*/
|
|
}
|
|
|
|
void CGEEngine::saveGame(int slotNumber, const Common::String &desc) {
|
|
// Set up the serializer
|
|
Common::String slotName = generateSaveName(slotNumber);
|
|
Common::OutSaveFile *saveFile = g_system->getSavefileManager()->openForSaving(slotName);
|
|
|
|
// Write out the ScummVM savegame header
|
|
SavegameHeader header;
|
|
header.saveName = desc;
|
|
header.version = CGE_SAVEGAME_VERSION;
|
|
writeSavegameHeader(saveFile, header);
|
|
|
|
// Write out the data of the savegame
|
|
syncGame(NULL, saveFile);
|
|
|
|
// Finish writing out game data
|
|
saveFile->finalize();
|
|
delete saveFile;
|
|
}
|
|
|
|
void CGEEngine::writeSavegameHeader(Common::OutSaveFile *out, SavegameHeader &header) {
|
|
// Write out a savegame header
|
|
out->write(SAVEGAME_STR, SAVEGAME_STR_SIZE + 1);
|
|
|
|
out->writeByte(CGE_SAVEGAME_VERSION);
|
|
|
|
// Write savegame name
|
|
out->write(header.saveName.c_str(), header.saveName.size() + 1);
|
|
|
|
// Get the active palette
|
|
uint8 thumbPalette[256 * 3];
|
|
g_system->getPaletteManager()->grabPalette(thumbPalette, 0, 256);
|
|
|
|
// Create a thumbnail and save it
|
|
Graphics::Surface *thumb = new Graphics::Surface();
|
|
Graphics::Surface *s = _vga->_page[0];
|
|
::createThumbnail(thumb, (const byte *)s->pixels, SCR_WID, SCR_HIG, thumbPalette);
|
|
Graphics::saveThumbnail(*out, *thumb);
|
|
delete thumb;
|
|
|
|
// Write out the save date/time
|
|
TimeDate td;
|
|
g_system->getTimeAndDate(td);
|
|
out->writeSint16LE(td.tm_year + 1900);
|
|
out->writeSint16LE(td.tm_mon + 1);
|
|
out->writeSint16LE(td.tm_mday);
|
|
out->writeSint16LE(td.tm_hour);
|
|
out->writeSint16LE(td.tm_min);
|
|
}
|
|
|
|
void CGEEngine::syncGame(Common::SeekableReadStream *readStream, Common::WriteStream *writeStream, bool tiny) {
|
|
Sprite *spr;
|
|
int i;
|
|
|
|
Common::Serializer s(readStream, writeStream);
|
|
|
|
if (s.isSaving()) {
|
|
for (i = 0; i < POCKET_NX; i++) {
|
|
register Sprite *s = _pocket[i];
|
|
_pocref[i] = (s) ? s->_ref : -1;
|
|
}
|
|
|
|
_volume[0] = _sndDrvInfo.Vol2._d;
|
|
_volume[1] = _sndDrvInfo.Vol2._m;
|
|
}
|
|
|
|
// Synchronise header data
|
|
syncHeader(s);
|
|
|
|
if (s.isSaving()) {
|
|
// Loop through saving the sprite data
|
|
for (spr = _vga->_spareQ->first(); spr; spr = spr->_next) {
|
|
if ((spr->_ref >= 1000) && !s.err())
|
|
spr->sync(s);
|
|
}
|
|
} else {
|
|
// Loading game
|
|
if (Startup::_core < CORE_HIG)
|
|
_music = false;
|
|
|
|
if (Startup::_soundOk == 1 && Startup::_mode == 0) {
|
|
_sndDrvInfo.Vol2._d = _volume[0];
|
|
_sndDrvInfo.Vol2._m = _volume[1];
|
|
sndSetVolume();
|
|
}
|
|
|
|
if (! tiny) { // load sprites & pocket
|
|
while (readStream->pos() < readStream->size()) {
|
|
Sprite S(this, NULL);
|
|
S.sync(s);
|
|
|
|
S._prev = S._next = NULL;
|
|
spr = (scumm_stricmp(S._file + 2, "MUCHA") == 0) ? new Fly(this, NULL)
|
|
: new Sprite(this, NULL);
|
|
if (spr == NULL)
|
|
error("No core");
|
|
*spr = S;
|
|
_vga->_spareQ->append(spr);
|
|
}
|
|
|
|
for (i = 0; i < POCKET_NX; i++) {
|
|
register int r = _pocref[i];
|
|
delete _pocket[i];
|
|
_pocket[i] = (r < 0) ? NULL : _vga->_spareQ->locate(r);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
bool CGEEngine::readSavegameHeader(Common::InSaveFile *in, SavegameHeader &header) {
|
|
header.thumbnail = NULL;
|
|
|
|
// Get the savegame version
|
|
header.version = in->readByte();
|
|
if (header.version > CGE_SAVEGAME_VERSION)
|
|
return false;
|
|
|
|
// Read in the string
|
|
header.saveName.clear();
|
|
char ch;
|
|
while ((ch = (char)in->readByte()) != '\0') header.saveName += ch;
|
|
|
|
// Get the thumbnail
|
|
header.thumbnail = new Graphics::Surface();
|
|
if (!Graphics::loadThumbnail(*in, *header.thumbnail)) {
|
|
delete header.thumbnail;
|
|
header.thumbnail = NULL;
|
|
return false;
|
|
}
|
|
|
|
// Read in save date/time
|
|
header.saveYear = in->readSint16LE();
|
|
header.saveMonth = in->readSint16LE();
|
|
header.saveDay = in->readSint16LE();
|
|
header.saveHour = in->readSint16LE();
|
|
header.saveMinutes = in->readSint16LE();
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
void CGEEngine::heroCover(int cvr) {
|
|
SNPOST(SNCOVER, 1, cvr, NULL);
|
|
}
|
|
|
|
void CGEEngine::trouble(int seq, int txt) {
|
|
_hero->park();
|
|
SNPOST(SNWAIT, -1, -1, _hero);
|
|
SNPOST(SNSEQ, -1, seq, _hero);
|
|
SNPOST(SNSOUND, -1, 2, _hero);
|
|
SNPOST(SNWAIT, -1, -1, _hero);
|
|
SNPOST(SNSAY, 1, txt, _hero);
|
|
}
|
|
|
|
void CGEEngine::offUse() {
|
|
trouble(OFF_USE, OFF_USE_TEXT + new_random(_offUseCount));
|
|
}
|
|
|
|
void CGEEngine::tooFar() {
|
|
trouble(TOO_FAR, TOO_FAR_TEXT);
|
|
}
|
|
|
|
void CGEEngine::loadHeroXY() {
|
|
INI_FILE cf(progName(".HXY"));
|
|
memset(_heroXY, 0, sizeof(_heroXY));
|
|
if (!cf._error)
|
|
cf.CFREAD(&_heroXY);
|
|
}
|
|
|
|
void CGEEngine::loadMapping() {
|
|
if (_now <= CAVE_MAX) {
|
|
INI_FILE cf(progName(".TAB"));
|
|
if (!cf._error) {
|
|
memset(Cluster::_map, 0, sizeof(Cluster::_map));
|
|
cf.seek((_now - 1) * sizeof(Cluster::_map));
|
|
cf.read((uint8 *) Cluster::_map, sizeof(Cluster::_map));
|
|
}
|
|
}
|
|
}
|
|
|
|
class SQUARE : public Sprite {
|
|
public:
|
|
SQUARE(CGEEngine *vm);
|
|
virtual void touch(uint16 mask, int x, int y);
|
|
private:
|
|
CGEEngine *_vm;
|
|
};
|
|
|
|
|
|
SQUARE::SQUARE(CGEEngine *vm)
|
|
: Sprite(vm, NULL), _vm(vm) {
|
|
_flags._kill = true;
|
|
_flags._bDel = false;
|
|
|
|
BMP_PTR *MB = new BMP_PTR[2];
|
|
MB[0] = new Bitmap("BRICK", true);
|
|
MB[1] = NULL;
|
|
setShapeList(MB);
|
|
}
|
|
|
|
|
|
void SQUARE::touch(uint16 mask, int x, int y) {
|
|
Sprite::touch(mask, x, y);
|
|
if (mask & L_UP) {
|
|
XZ(_x + x, _y + y).cell() = 0;
|
|
SNPOST_(SNKILL, -1, 0, this);
|
|
}
|
|
}
|
|
|
|
|
|
void CGEEngine::setMapBrick(int x, int z) {
|
|
SQUARE *s = new SQUARE(this);
|
|
if (s) {
|
|
static char n[] = "00:00";
|
|
s->gotoxy(x * MAP_XGRID, MAP_TOP + z * MAP_ZGRID);
|
|
wtom(x, n + 0, 10, 2);
|
|
wtom(z, n + 3, 10, 2);
|
|
Cluster::_map[z][x] = 1;
|
|
s->setName(n);
|
|
_vga->_showQ->insert(s, _vga->_showQ->first());
|
|
}
|
|
}
|
|
|
|
//static void switchDebug();
|
|
//static void pullSprite();
|
|
//static void NextStep();
|
|
|
|
void CGEEngine::keyClick() {
|
|
SNPOST_(SNSOUND, -1, 5, NULL);
|
|
}
|
|
|
|
|
|
void CGEEngine::resetQSwitch() {
|
|
SNPOST_(SNSEQ, 123, 0, NULL);
|
|
keyClick();
|
|
}
|
|
|
|
|
|
void CGEEngine::quit() {
|
|
static Choice QuitMenu[] = {
|
|
{ NULL, &CGEEngine::startCountDown },
|
|
{ NULL, &CGEEngine::resetQSwitch },
|
|
{ NULL, &CGEEngine::dummy }
|
|
};
|
|
|
|
if (_snail->idle() && !_hero->_flags._hide) {
|
|
if (Vmenu::_addr) {
|
|
SNPOST_(SNKILL, -1, 0, Vmenu::_addr);
|
|
resetQSwitch();
|
|
} else {
|
|
QuitMenu[0]._text = _text->getText(QUIT_TEXT);
|
|
QuitMenu[1]._text = _text->getText(NOQUIT_TEXT);
|
|
(new Vmenu(this, QuitMenu, -1, -1))->setName(_text->getText(QUIT_TITLE));
|
|
SNPOST_(SNSEQ, 123, 1, NULL);
|
|
keyClick();
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
static void AltCtrlDel() {
|
|
SNPOST_(SNSAY, -1, A_C_D_TEXT, _hero);
|
|
}
|
|
|
|
void CGEEngine::miniStep(int stp) {
|
|
if (stp < 0)
|
|
_miniCave->_flags._hide = true;
|
|
else {
|
|
*_miniShp[0] = *_miniShpList[stp];
|
|
if (_fx._current)
|
|
&*(_fx._current->eAddr());
|
|
|
|
_miniCave->_flags._hide = false;
|
|
}
|
|
}
|
|
|
|
|
|
static void postMiniStep(int stp) {
|
|
static int recent = -2;
|
|
if (_miniCave && stp != recent)
|
|
SNPOST2_(SNEXEC, -1, recent = stp, kMiniStep);
|
|
}
|
|
|
|
void System::setPal() {
|
|
uint i;
|
|
Dac *p = Vga::_sysPal + 256 - ArrayCount(_stdPal);
|
|
for (i = 0; i < ArrayCount(_stdPal); i++) {
|
|
p[i]._r = _stdPal[i]._r >> 2;
|
|
p[i]._g = _stdPal[i]._g >> 2;
|
|
p[i]._b = _stdPal[i]._b >> 2;
|
|
}
|
|
}
|
|
|
|
|
|
void System::funTouch() {
|
|
uint16 n = (PAIN) ? HEROFUN1 : HEROFUN0;
|
|
if (_talk == NULL || n > _funDel)
|
|
_funDel = n;
|
|
}
|
|
|
|
|
|
static void ShowBak(int ref) {
|
|
Sprite *spr = _vga->_spareQ->locate(ref);
|
|
if (spr) {
|
|
Bitmap::_pal = Vga::_sysPal;
|
|
spr->expand();
|
|
Bitmap::_pal = NULL;
|
|
spr->show(2);
|
|
_vga->copyPage(1, 2);
|
|
_sys->setPal();
|
|
spr->contract();
|
|
}
|
|
}
|
|
|
|
|
|
void CGEEngine::caveUp() {
|
|
int BakRef = 1000 * _now;
|
|
if (_music)
|
|
loadMidi(_now);
|
|
|
|
ShowBak(BakRef);
|
|
loadMapping();
|
|
_text->preload(BakRef, BakRef + 1000);
|
|
Sprite *spr = _vga->_spareQ->first();
|
|
while (spr) {
|
|
Sprite *n = spr->_next;
|
|
if (spr->_cave == _now || spr->_cave == 0)
|
|
if (spr->_ref != BakRef) {
|
|
if (spr->_flags._back)
|
|
spr->backShow();
|
|
else
|
|
expandSprite(spr);
|
|
}
|
|
spr = n;
|
|
}
|
|
if (_sndDrvInfo._dDev) {
|
|
_sound.stop();
|
|
_fx.clear();
|
|
_fx.preload(0);
|
|
_fx.preload(BakRef);
|
|
}
|
|
|
|
if (_hero) {
|
|
_hero->gotoxy(_heroXY[_now - 1]._x, _heroXY[_now - 1]._y);
|
|
// following 2 lines trims Hero's Z position!
|
|
_hero->tick();
|
|
_hero->_time = 1;
|
|
_hero->_flags._hide = false;
|
|
}
|
|
|
|
if (!_dark)
|
|
_vga->sunset();
|
|
|
|
_vga->copyPage(0, 1);
|
|
selectPocket(-1);
|
|
if (_hero)
|
|
_vga->_showQ->insert(_vga->_showQ->remove(_hero));
|
|
|
|
if (_shadow) {
|
|
_vga->_showQ->remove(_shadow);
|
|
_shadow->makeXlat(glass(Vga::_sysPal, 204, 204, 204));
|
|
_vga->_showQ->insert(_shadow, _hero);
|
|
_shadow->_z = _hero->_z;
|
|
}
|
|
feedSnail(_vga->_showQ->locate(BakRef + 999), kTake);
|
|
_vga->show();
|
|
_vga->copyPage(1, 0);
|
|
_vga->show();
|
|
_vga->sunrise(Vga::_sysPal);
|
|
_dark = false;
|
|
if (!_startupMode)
|
|
_mouse->on();
|
|
|
|
_heart->_enable = true;
|
|
}
|
|
|
|
|
|
void CGEEngine::caveDown() {
|
|
Sprite *spr;
|
|
if (!_horzLine->_flags._hide)
|
|
switchMapping();
|
|
|
|
for (spr = _vga->_showQ->first(); spr;) {
|
|
Sprite *n = spr->_next;
|
|
if (spr->_ref >= 1000 /*&& spr->_cave*/) {
|
|
if (spr->_ref % 1000 == 999)
|
|
feedSnail(spr, kTake);
|
|
_vga->_spareQ->append(_vga->_showQ->remove(spr));
|
|
}
|
|
spr = n;
|
|
}
|
|
_text->clear(1000);
|
|
}
|
|
|
|
|
|
void CGEEngine::xCave() {
|
|
caveDown();
|
|
caveUp();
|
|
}
|
|
|
|
|
|
void CGEEngine::qGame() {
|
|
caveDown();
|
|
_oldLev = _lev;
|
|
saveSound();
|
|
|
|
// Write out the user's progress
|
|
saveGame(0, _usrFnam);
|
|
|
|
_vga->sunset();
|
|
_finis = true;
|
|
}
|
|
|
|
|
|
void CGEEngine::switchCave(int cav) {
|
|
if (cav != _now) {
|
|
_heart->_enable = false;
|
|
if (cav < 0) {
|
|
SNPOST(SNLABEL, -1, 0, NULL); // wait for repaint
|
|
SNPOST2(SNEXEC, -1, 0, kQGame); // switch cave
|
|
} else {
|
|
_now = cav;
|
|
_mouse->off();
|
|
if (_hero) {
|
|
_hero->park();
|
|
_hero->step(0);
|
|
if (!_isDemo)
|
|
///// protection: auto-destruction on! ----------------------
|
|
_vga->_spareQ->_show = Startup::_summa * (cav <= CAVE_MAX);
|
|
/////--------------------------------------------------------
|
|
}
|
|
_cavLight->gotoxy(CAVE_X + ((_now - 1) % CAVE_NX) * CAVE_DX + CAVE_SX,
|
|
CAVE_Y + ((_now - 1) / CAVE_NX) * CAVE_DY + CAVE_SY);
|
|
killText();
|
|
if (!_startupMode)
|
|
keyClick();
|
|
SNPOST(SNLABEL, -1, 0, NULL); // wait for repaint
|
|
SNPOST2(SNEXEC, 0, 0, kXCave); // switch cave
|
|
}
|
|
}
|
|
}
|
|
|
|
System::System(CGEEngine *vm) : Sprite(vm, NULL), _vm(vm) {
|
|
_funDel = HEROFUN0;
|
|
setPal();
|
|
tick();
|
|
}
|
|
|
|
void System::touch(uint16 mask, int x, int y) {
|
|
static int pp = 0;
|
|
|
|
funTouch();
|
|
|
|
if (mask & KEYB) {
|
|
int pp0;
|
|
_vm->keyClick();
|
|
killText();
|
|
if (_vm->_startupMode == 1) {
|
|
SNPOST(SNCLEAR, -1, 0, NULL);
|
|
return;
|
|
}
|
|
pp0 = pp;
|
|
switch (x) {
|
|
case Del:
|
|
if (_keyboard->_key[ALT] && _keyboard->_key[CTRL])
|
|
AltCtrlDel();
|
|
else
|
|
_vm->killSprite();
|
|
break;
|
|
case 'F':
|
|
if (_keyboard->_key[ALT]) {
|
|
Sprite *m = _vga->_showQ->locate(17001);
|
|
if (m) {
|
|
m->step(1);
|
|
m->_time = 216; // 3s
|
|
}
|
|
}
|
|
break;
|
|
case PgUp:
|
|
_vm->pushSprite();
|
|
break;
|
|
case PgDn:
|
|
_vm->pullSprite();
|
|
break;
|
|
case '+':
|
|
_vm->nextStep();
|
|
break;
|
|
case '`':
|
|
if (_keyboard->_key[ALT])
|
|
_vm->saveMapping();
|
|
else
|
|
_vm->switchMapping();
|
|
break;
|
|
case F1:
|
|
_vm->switchDebug();
|
|
break;
|
|
case F3:
|
|
_hero->step(TSEQ + 4);
|
|
break;
|
|
case F4:
|
|
_hero->step(TSEQ + 5);
|
|
break;
|
|
case F5:
|
|
_hero->step(TSEQ + 0);
|
|
break;
|
|
case F6:
|
|
_hero->step(TSEQ + 1);
|
|
break;
|
|
case F7:
|
|
_hero->step(TSEQ + 2);
|
|
break;
|
|
case F8:
|
|
_hero->step(TSEQ + 3);
|
|
break;
|
|
case F9:
|
|
_sys->_funDel = 1;
|
|
break;
|
|
case 'X':
|
|
if (_keyboard->_key[ALT])
|
|
_finis = true;
|
|
break;
|
|
case '0':
|
|
case '1':
|
|
case '2':
|
|
case '3':
|
|
case '4':
|
|
if (_keyboard->_key[ALT]) {
|
|
SNPOST(SNLEVEL, -1, x - '0', NULL);
|
|
break;
|
|
}
|
|
case '5':
|
|
case '6':
|
|
case '7':
|
|
case '8':
|
|
case '9':
|
|
if (_sprite)
|
|
_sprite->step(x - '0');
|
|
break;
|
|
case F10 :
|
|
if (_snail->idle() && !_hero->_flags._hide)
|
|
_vm->startCountDown();
|
|
break;
|
|
case 'J':
|
|
if (pp == 0)
|
|
pp++;
|
|
break;
|
|
case 'B':
|
|
if (pp == 1)
|
|
pp++;
|
|
break;
|
|
case 'W':
|
|
if (pp == 2)
|
|
_vm->_jbw = !_vm->_jbw;
|
|
break;
|
|
}
|
|
if (pp == pp0)
|
|
pp = 0;
|
|
} else {
|
|
if (_vm->_startupMode)
|
|
return;
|
|
int cav = 0;
|
|
_infoLine->update(NULL);
|
|
if (y >= WORLD_HIG) {
|
|
if (x < BUTTON_X) { // select cave?
|
|
if (y >= CAVE_Y && y < CAVE_Y + CAVE_NY * CAVE_DY &&
|
|
x >= CAVE_X && x < CAVE_X + CAVE_NX * CAVE_DX && !_vm->_game) {
|
|
cav = ((y - CAVE_Y) / CAVE_DY) * CAVE_NX + (x - CAVE_X) / CAVE_DX + 1;
|
|
if (cav > _vm->_maxCave)
|
|
cav = 0;
|
|
} else {
|
|
cav = 0;
|
|
}
|
|
} else if (mask & L_UP) {
|
|
if (y >= POCKET_Y && y < POCKET_Y + POCKET_NY * POCKET_DY &&
|
|
x >= POCKET_X && x < POCKET_X + POCKET_NX * POCKET_DX) {
|
|
int n = ((y - POCKET_Y) / POCKET_DY) * POCKET_NX + (x - POCKET_X) / POCKET_DX;
|
|
_vm->selectPocket(n);
|
|
}
|
|
}
|
|
}
|
|
|
|
postMiniStep(cav - 1);
|
|
|
|
if (mask & L_UP) {
|
|
if (cav && _snail->idle() && _hero->_tracePtr < 0)
|
|
_vm->switchCave(cav);
|
|
|
|
if (!_horzLine->_flags._hide) {
|
|
if (y >= MAP_TOP && y < MAP_TOP + MAP_HIG) {
|
|
int8 x1, z1;
|
|
XZ(x, y).split(x1, z1);
|
|
Cluster::_map[z1][x1] = 1;
|
|
_vm->setMapBrick(x1, z1);
|
|
}
|
|
} else
|
|
{
|
|
if (!_talk && _snail->idle() && _hero
|
|
&& y >= MAP_TOP && y < MAP_TOP + MAP_HIG && !_vm->_game) {
|
|
_hero->findWay(XZ(x, y));
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void System::tick() {
|
|
if (!_vm->_startupMode)
|
|
if (--_funDel == 0) {
|
|
killText();
|
|
if (_snail->idle()) {
|
|
if (PAIN)
|
|
_vm->heroCover(9);
|
|
else if (Startup::_core >= CORE_MID) {
|
|
int n = new_random(100);
|
|
if (n > 96)
|
|
_vm->heroCover(6 + (_hero->_x + _hero->_w / 2 < SCR_WID / 2));
|
|
else {
|
|
if (n > 90)
|
|
_vm->heroCover(5);
|
|
else {
|
|
if (n > 60)
|
|
_vm->heroCover(4);
|
|
else
|
|
_vm->heroCover(3);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
funTouch();
|
|
}
|
|
_time = SYSTIMERATE;
|
|
}
|
|
|
|
|
|
/*
|
|
static void SpkOpen() {
|
|
asm in al,0x61
|
|
asm or al,0x03
|
|
asm out 0x61,al
|
|
asm mov al,0x90
|
|
asm out 0x43,al
|
|
}
|
|
|
|
|
|
static void SpkClose() {
|
|
asm in al,0x61
|
|
asm and al,0xFC
|
|
asm out 0x61,al
|
|
}
|
|
|
|
*/
|
|
|
|
|
|
void CGEEngine::switchColorMode() {
|
|
SNPOST_(SNSEQ, 121, _vga->_mono = !_vga->_mono, NULL);
|
|
keyClick();
|
|
_vga->setColors(Vga::_sysPal, 64);
|
|
}
|
|
|
|
|
|
|
|
void CGEEngine::switchMusic() {
|
|
if (_keyboard->_key[ALT]) {
|
|
if (Vmenu::_addr)
|
|
SNPOST_(SNKILL, -1, 0, Vmenu::_addr);
|
|
else {
|
|
SNPOST_(SNSEQ, 122, (_music = false), NULL);
|
|
SNPOST2(SNEXEC, -1, 0, kSelectSound);
|
|
}
|
|
} else {
|
|
if (Startup::_core < CORE_HIG)
|
|
SNPOST(SNINF, -1, NOMUSIC_TEXT, NULL);
|
|
else {
|
|
SNPOST_(SNSEQ, 122, (_music = !_music), NULL);
|
|
keyClick();
|
|
}
|
|
}
|
|
if (_music)
|
|
loadMidi(_now);
|
|
else
|
|
killMidi();
|
|
}
|
|
|
|
|
|
void CGEEngine::startCountDown() {
|
|
//SNPOST(SNSEQ, 123, 0, NULL);
|
|
switchCave(-1);
|
|
}
|
|
|
|
|
|
void CGEEngine::takeName() {
|
|
if (GetText::_ptr)
|
|
SNPOST_(SNKILL, -1, 0, GetText::_ptr);
|
|
else {
|
|
memset(_usrFnam, 0, 15);
|
|
GetText *tn = new GetText(this, _text->getText(GETNAME_PROMPT), _usrFnam, 8);
|
|
if (tn) {
|
|
tn->setName(_text->getText(GETNAME_TITLE));
|
|
tn->center();
|
|
tn->gotoxy(tn->_x, tn->_y - 10);
|
|
tn->_z = 126;
|
|
_vga->_showQ->insert(tn);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void CGEEngine::switchMapping() {
|
|
if (_horzLine->_flags._hide) {
|
|
int i;
|
|
for (i = 0; i < MAP_ZCNT; i++) {
|
|
int j;
|
|
for (j = 0; j < MAP_XCNT; j++) {
|
|
if (Cluster::_map[i][j])
|
|
setMapBrick(j, i);
|
|
}
|
|
}
|
|
} else {
|
|
Sprite *s;
|
|
for (s = _vga->_showQ->first(); s; s = s->_next)
|
|
if (s->_w == MAP_XGRID && s->_h == MAP_ZGRID)
|
|
SNPOST_(SNKILL, -1, 0, s);
|
|
}
|
|
_horzLine->_flags._hide = !_horzLine->_flags._hide;
|
|
}
|
|
|
|
void CGEEngine::killSprite() {
|
|
_sprite->_flags._kill = true;
|
|
_sprite->_flags._bDel = true;
|
|
SNPOST_(SNKILL, -1, 0, _sprite);
|
|
_sprite = NULL;
|
|
}
|
|
|
|
void CGEEngine::pushSprite() {
|
|
Sprite *spr = _sprite->_prev;
|
|
if (spr) {
|
|
_vga->_showQ->insert(_vga->_showQ->remove(_sprite), spr);
|
|
while (_sprite->_z > _sprite->_next->_z)
|
|
_sprite->_z--;
|
|
} else
|
|
SNPOST_(SNSOUND, -1, 2, NULL);
|
|
}
|
|
|
|
void CGEEngine::pullSprite() {
|
|
bool ok = false;
|
|
Sprite *spr = _sprite->_next;
|
|
if (spr) {
|
|
spr = spr->_next;
|
|
if (spr)
|
|
ok = (!spr->_flags._slav);
|
|
}
|
|
if (ok) {
|
|
_vga->_showQ->insert(_vga->_showQ->remove(_sprite), spr);
|
|
if (_sprite->_prev)
|
|
while (_sprite->_z < _sprite->_prev->_z)
|
|
_sprite->_z++;
|
|
} else
|
|
SNPOST_(SNSOUND, -1, 2, NULL);
|
|
}
|
|
|
|
void CGEEngine::nextStep() {
|
|
SNPOST_(SNSTEP, 0, 0, _sprite);
|
|
}
|
|
|
|
void CGEEngine::saveMapping() {
|
|
{
|
|
IoHand cf(progName(".TAB"), UPD);
|
|
if (!cf._error) {
|
|
cf.seek((_now - 1) * sizeof(Cluster::_map));
|
|
cf.write((uint8 *) Cluster::_map, sizeof(Cluster::_map));
|
|
}
|
|
}
|
|
{
|
|
IoHand cf(progName(".HXY"), WRI);
|
|
if (!cf._error) {
|
|
_heroXY[_now - 1]._x = _hero->_x;
|
|
_heroXY[_now - 1]._y = _hero->_y;
|
|
cf.write((uint8 *) _heroXY, sizeof(_heroXY));
|
|
}
|
|
}
|
|
}
|
|
|
|
// 1111111111222222222233333333 334444444444555555555566666666667777777777
|
|
// 01234567890123456789012345678901234567 890123456789012345678901234567890123456789
|
|
static char DebugText[] = " N=00000 F=000000 X=000 Y=000 FPS=0000\0S=00:00 000:000:000 000:000 00 ";
|
|
|
|
#define NFRE (DebugText + 3)
|
|
#define FFRE (DebugText + 11)
|
|
#define ABSX (DebugText + 20)
|
|
#define ABSY (DebugText + 26)
|
|
#define FRPS (DebugText + 34)
|
|
#define XSPR (DebugText + 38)
|
|
#define SP_N (DebugText + 41)
|
|
#define SP_S (DebugText + 44)
|
|
|
|
#define SP_X (DebugText + 47)
|
|
#define SP_Y (DebugText + 51)
|
|
#define SP_Z (DebugText + 55)
|
|
#define SP_W (DebugText + 59)
|
|
#define SP_H (DebugText + 63)
|
|
#define SP_F (DebugText + 67)
|
|
#define SP__ (DebugText + 70)
|
|
|
|
void CGEEngine::sayDebug() {
|
|
if (!_debugLine->_flags._hide) {
|
|
static long t = -1L;
|
|
long t1 = timer();
|
|
|
|
if (t1 - t >= 18) {
|
|
static uint32 old = 0L;
|
|
uint32 now = _vga->_frmCnt;
|
|
dwtom(now - old, FRPS, 10, 4);
|
|
old = now;
|
|
t = t1;
|
|
}
|
|
|
|
dwtom(_mouse->_x, ABSX, 10, 3);
|
|
dwtom(_mouse->_y, ABSY, 10, 3);
|
|
// dwtom(coreleft(), NFRE, 10, 5);
|
|
// dwtom(farcoreleft(), FFRE, 10, 6);
|
|
|
|
// sprite queue size
|
|
uint16 n = 0;
|
|
Sprite *spr;
|
|
for (spr = _vga->_showQ->first(); spr; spr = spr->_next) {
|
|
++ n;
|
|
if (spr == _sprite) {
|
|
*XSPR = ' ';
|
|
dwtom(n, SP_N, 10, 2);
|
|
dwtom(_sprite->_x, SP_X, 10, 3);
|
|
dwtom(_sprite->_y, SP_Y, 10, 3);
|
|
dwtom(_sprite->_z, SP_Z, 10, 3);
|
|
dwtom(_sprite->_w, SP_W, 10, 3);
|
|
dwtom(_sprite->_h, SP_H, 10, 3);
|
|
dwtom(*(uint16 *)(&_sprite->_flags), SP_F, 16, 2);
|
|
}
|
|
}
|
|
dwtom(n, SP_S, 10, 2);
|
|
// *SP__ = (heapcheck() < 0) ? '!' : ' ';
|
|
_debugLine->update(DebugText);
|
|
}
|
|
}
|
|
|
|
|
|
void CGEEngine::switchDebug() {
|
|
_debugLine->_flags._hide = !_debugLine->_flags._hide;
|
|
}
|
|
|
|
|
|
void CGEEngine::optionTouch(int opt, uint16 mask) {
|
|
switch (opt) {
|
|
case 1 :
|
|
if (mask & L_UP)
|
|
switchColorMode();
|
|
break;
|
|
case 2 :
|
|
if (mask & L_UP)
|
|
switchMusic();
|
|
else if (mask & R_UP)
|
|
if (!Mixer::_appear) {
|
|
Mixer::_appear = true;
|
|
new Mixer(this, BUTTON_X, BUTTON_Y);
|
|
}
|
|
break;
|
|
case 3 :
|
|
if (mask & L_UP)
|
|
quit();
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
#pragma argsused
|
|
void Sprite::touch(uint16 mask, int x, int y) {
|
|
_sys->funTouch();
|
|
if ((mask & ATTN) == 0) {
|
|
_infoLine->update(name());
|
|
if (mask & (R_DN | L_DN))
|
|
_sprite = this;
|
|
if (_ref / 10 == 12) {
|
|
_vm->optionTouch(_ref % 10, mask);
|
|
return;
|
|
}
|
|
if (_flags._syst)
|
|
return; // cannot access system sprites
|
|
if (_vm->_game) if (mask & L_UP) {
|
|
mask &= ~L_UP;
|
|
mask |= R_UP;
|
|
}
|
|
if ((mask & R_UP) && _snail->idle()) {
|
|
Sprite *ps = (_pocLight->_seqPtr) ? _pocket[_vm->_pocPtr] : NULL;
|
|
if (ps) {
|
|
if (_flags._kept || _hero->distance(this) < MAX_DISTANCE) {
|
|
if (works(ps)) {
|
|
_vm->feedSnail(ps, kTake);
|
|
} else
|
|
_vm->offUse();
|
|
_vm->selectPocket(-1);
|
|
} else
|
|
_vm->tooFar();
|
|
} else {
|
|
if (_flags._kept)
|
|
mask |= L_UP;
|
|
else {
|
|
if (_hero->distance(this) < MAX_DISTANCE) {
|
|
///
|
|
if (_flags._port) {
|
|
if (_vm->findPocket(NULL) < 0)
|
|
_vm->pocFul();
|
|
else {
|
|
SNPOST(SNREACH, -1, -1, this);
|
|
SNPOST(SNKEEP, -1, -1, this);
|
|
_flags._port = false;
|
|
}
|
|
} else {
|
|
if (_takePtr != NO_PTR) {
|
|
if (snList(kTake)[_takePtr]._com == SNNEXT)
|
|
_vm->offUse();
|
|
else
|
|
_vm->feedSnail(this, kTake);
|
|
} else
|
|
_vm->offUse();
|
|
}
|
|
}///
|
|
else
|
|
_vm->tooFar();
|
|
}
|
|
}
|
|
}
|
|
if ((mask & L_UP) && _snail->idle()) {
|
|
if (_flags._kept) {
|
|
int n;
|
|
for (n = 0; n < POCKET_NX; n++) {
|
|
if (_pocket[n] == this) {
|
|
_vm->selectPocket(n);
|
|
break;
|
|
}
|
|
}
|
|
} else
|
|
SNPOST(SNWALK, -1, -1, this); // Hero->FindWay(this);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void CGEEngine::loadSprite(const char *fname, int ref, int cav, int col = 0, int row = 0, int pos = 0) {
|
|
static const char *Comd[] = { "Name", "Type", "Phase", "East",
|
|
"Left", "Right", "Top", "Bottom",
|
|
"Seq", "Near", "Take",
|
|
"Portable", "Transparent",
|
|
NULL
|
|
};
|
|
static const char *Type[] = { "DEAD", "AUTO", "WALK", "NEWTON", "LISSAJOUS",
|
|
"FLY", NULL
|
|
};
|
|
char line[LINE_MAX];
|
|
|
|
int shpcnt = 0;
|
|
int type = 0; // DEAD
|
|
bool east = false;
|
|
bool port = false;
|
|
bool tran = false;
|
|
int i, lcnt = 0;
|
|
uint16 len;
|
|
|
|
mergeExt(line, fname, SPR_EXT);
|
|
if (INI_FILE::exist(line)) { // sprite description file exist
|
|
INI_FILE sprf(line);
|
|
if (sprf._error)
|
|
error("Bad SPR [%s]", line);
|
|
|
|
while ((len = sprf.read((uint8 *)line)) != 0) {
|
|
++ lcnt;
|
|
if (len && line[len - 1] == '\n')
|
|
line[-- len] = '\0';
|
|
if (len == 0 || *line == '.')
|
|
continue;
|
|
|
|
if ((i = takeEnum(Comd, strtok(line, " =\t"))) < 0)
|
|
error("Bad line %d [%s]", lcnt, fname);
|
|
|
|
|
|
switch (i) {
|
|
case 0 : // Name - will be taken in Expand routine
|
|
break;
|
|
case 1 : // Type
|
|
if ((type = takeEnum(Type, strtok(NULL, " \t,;/"))) < 0)
|
|
error("Bad line %d [%s]", lcnt, fname);
|
|
break;
|
|
case 2 : // Phase
|
|
++ shpcnt;
|
|
break;
|
|
case 3 : // East
|
|
east = (atoi(strtok(NULL, " \t,;/")) != 0);
|
|
break;
|
|
case 11 : // Portable
|
|
port = (atoi(strtok(NULL, " \t,;/")) != 0);
|
|
break;
|
|
case 12 : // Transparent
|
|
tran = (atoi(strtok(NULL, " \t,;/")) != 0);
|
|
break;
|
|
}
|
|
}
|
|
if (! shpcnt)
|
|
error("No shapes [%s]", fname);
|
|
} else { // no sprite description: mono-shaped sprite with only .BMP file
|
|
++shpcnt;
|
|
}
|
|
|
|
// make sprite of choosen type
|
|
switch (type) {
|
|
case 1 : { // AUTO
|
|
_sprite = new Sprite(this, NULL);
|
|
if (_sprite) {
|
|
_sprite->gotoxy(col, row);
|
|
//Sprite->Time = 1;//-----------$$$$$$$$$$$$$$$$
|
|
}
|
|
break;
|
|
}
|
|
case 2 : { // WALK
|
|
WALK *w = new WALK(this, NULL);
|
|
if (w && ref == 1) {
|
|
w->gotoxy(col, row);
|
|
if (_hero)
|
|
error("2nd HERO [%s]", fname);
|
|
_hero = w;
|
|
}
|
|
_sprite = w;
|
|
break;
|
|
}
|
|
/*
|
|
case 3 : // NEWTON
|
|
NEWTON * n = new NEWTON(NULL);
|
|
if (n)
|
|
{
|
|
n->Ay = (bottom-n->H);
|
|
n->By = 90;
|
|
n->Cy = 3;
|
|
n->Bx = 99;
|
|
n->Cx = 3;
|
|
n->Goto(col, row);
|
|
}
|
|
_sprite = n;
|
|
break;
|
|
*/
|
|
case 4 : { // LISSAJOUS
|
|
error("Bad type [%s]", fname);
|
|
/*
|
|
LISSAJOUS * l = new LISSAJOUS(NULL);
|
|
if (l)
|
|
{
|
|
l->Ax = SCR_WID/2;
|
|
l->Ay = SCR_HIG/2;
|
|
l->Bx = 7;
|
|
l->By = 13;
|
|
l->Cx = 300;
|
|
l->Cy = 500;
|
|
*(long *) &l->Dx = 0; // movex * cnt
|
|
l->Goto(col, row);
|
|
}
|
|
_sprite = l;
|
|
*/
|
|
break;
|
|
}
|
|
case 5 : { // FLY
|
|
Fly *f = new Fly(this, NULL);
|
|
_sprite = f;
|
|
//////Sprite->Time = 1;//-----------$$$$$$$$$$$$$$
|
|
break;
|
|
}
|
|
default: { // DEAD
|
|
_sprite = new Sprite(this, NULL);
|
|
if (_sprite)
|
|
_sprite->gotoxy(col, row);
|
|
break;
|
|
}
|
|
}
|
|
if (_sprite) {
|
|
_sprite->_ref = ref;
|
|
_sprite->_cave = cav;
|
|
_sprite->_z = pos;
|
|
_sprite->_flags._east = east;
|
|
_sprite->_flags._port = port;
|
|
_sprite->_flags._tran = tran;
|
|
_sprite->_flags._kill = true;
|
|
_sprite->_flags._bDel = true;
|
|
|
|
// Extract the filename, without the extension
|
|
strcpy(_sprite->_file, fname);
|
|
char *p = strchr(_sprite->_file, '.');
|
|
if (p)
|
|
*p = '\0';
|
|
|
|
_sprite->_shpCnt = shpcnt;
|
|
_vga->_spareQ->append(_sprite);
|
|
}
|
|
}
|
|
|
|
|
|
void CGEEngine::loadScript(const char *fname) {
|
|
char line[LINE_MAX];
|
|
char *SpN;
|
|
int SpI, SpA, SpX, SpY, SpZ;
|
|
bool BkG = false;
|
|
INI_FILE scrf(fname);
|
|
int lcnt = 0;
|
|
bool ok = true;
|
|
|
|
if (scrf._error)
|
|
return;
|
|
|
|
while (scrf.read((uint8 *)line) != 0) {
|
|
char *p;
|
|
|
|
lcnt++;
|
|
if (*line == 0 || *line == '\n' || *line == '.')
|
|
continue;
|
|
|
|
ok = false; // not OK if break
|
|
// sprite ident number
|
|
if ((p = strtok(line, " \t\n")) == NULL)
|
|
break;
|
|
SpI = atoi(p);
|
|
// sprite file name
|
|
if ((SpN = strtok(NULL, " ,;/\t\n")) == NULL)
|
|
break;
|
|
// sprite cave
|
|
if ((p = strtok(NULL, " ,;/\t\n")) == NULL)
|
|
break;
|
|
SpA = atoi(p);
|
|
// sprite column
|
|
if ((p = strtok(NULL, " ,;/\t\n")) == NULL)
|
|
break;
|
|
SpX = atoi(p);
|
|
// sprite row
|
|
if ((p = strtok(NULL, " ,;/\t\n")) == NULL)
|
|
break;
|
|
SpY = atoi(p);
|
|
// sprite Z pos
|
|
if ((p = strtok(NULL, " ,;/\t\n")) == NULL)
|
|
break;
|
|
SpZ = atoi(p);
|
|
// sprite life
|
|
if ((p = strtok(NULL, " ,;/\t\n")) == NULL)
|
|
break;
|
|
BkG = atoi(p) == 0;
|
|
|
|
ok = true; // no break: OK
|
|
|
|
_sprite = NULL;
|
|
loadSprite(SpN, SpI, SpA, SpX, SpY, SpZ);
|
|
if (_sprite && BkG)
|
|
_sprite->_flags._back = true;
|
|
}
|
|
if (! ok)
|
|
error("Bad INI line %d [%s]", lcnt, fname);
|
|
}
|
|
|
|
#define GAME_FRAME_DELAY (1000 / 50)
|
|
|
|
void CGEEngine::mainLoop() {
|
|
sayDebug();
|
|
|
|
if (_isDemo) {
|
|
// static uint32 tc = 0;
|
|
if (/* FIXME: TimerCount - tc >= ((182L * 6L) * 5L) && */ _talk == NULL && _snail->idle()) {
|
|
if (_text->getText(_demoText)) {
|
|
SNPOST(SNSOUND, -1, 4, NULL); // drumla
|
|
SNPOST(SNINF, -1, _demoText, NULL);
|
|
SNPOST(SNLABEL, -1, -1, NULL);
|
|
if (_text->getText(++_demoText) == NULL)
|
|
_demoText = DEMO_TEXT + 1;
|
|
}
|
|
//FIXME: tc = TimerCount;
|
|
}
|
|
}
|
|
_vga->show();
|
|
_snail_->runCom();
|
|
_snail->runCom();
|
|
|
|
// Game frame delay
|
|
uint32 millis = g_system->getMillis();
|
|
while (!_eventManager->_quitFlag && (millis < (_lastFrame + GAME_FRAME_DELAY))) {
|
|
// Handle any pending events
|
|
_eventManager->poll();
|
|
|
|
// Slight delay
|
|
g_system->delayMillis(10);
|
|
millis = g_system->getMillis();
|
|
}
|
|
_lastFrame = millis;
|
|
|
|
// Dispatch the tick to any active objects
|
|
tick();
|
|
|
|
// Handle any pending events
|
|
_eventManager->poll();
|
|
}
|
|
|
|
void CGEEngine::tick() {
|
|
for (Sprite *spr = _vga->_showQ->first(); spr; spr = spr->_next) {
|
|
if (spr->_time) {
|
|
if (!spr->_flags._hide) {
|
|
if (--spr->_time == 0)
|
|
spr->tick();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void CGEEngine::loadUser() {
|
|
// set scene
|
|
if (Startup::_mode == 0) {
|
|
// user .SVG file found - load it from slot 0
|
|
loadGame(0, NULL);
|
|
} else {
|
|
if (Startup::_mode == 1) {
|
|
// Load either initial game state savegame or launcher specified savegame
|
|
loadGame(_startGameSlot, NULL);
|
|
} else {
|
|
error("Creating setup savegames not supported");
|
|
}
|
|
}
|
|
loadScript(progName(IN0_EXT));
|
|
}
|
|
|
|
|
|
void CGEEngine::runGame() {
|
|
if (_eventManager->_quitFlag)
|
|
return;
|
|
|
|
_text->clear();
|
|
_text->preload(100, 1000);
|
|
loadHeroXY();
|
|
|
|
_cavLight->_flags._tran = true;
|
|
_vga->_showQ->append(_cavLight);
|
|
_cavLight->_flags._hide = true;
|
|
|
|
const Seq pocSeq[] = {
|
|
{ 0, 0, 0, 0, 20 },
|
|
{ 1, 2, 0, 0, 4 },
|
|
{ 2, 3, 0, 0, 4 },
|
|
{ 3, 4, 0, 0, 16 },
|
|
{ 2, 5, 0, 0, 4 },
|
|
{ 1, 6, 0, 0, 4 },
|
|
{ 0, 1, 0, 0, 16 },
|
|
};
|
|
Seq *seq = (Seq *)malloc(7 * sizeof(Seq));
|
|
Common::copy(pocSeq, pocSeq + 7, seq);
|
|
_pocLight->setSeq(seq);
|
|
|
|
_pocLight->_flags._tran = true;
|
|
_pocLight->_time = 1;
|
|
_pocLight->_z = 120;
|
|
_vga->_showQ->append(_pocLight);
|
|
selectPocket(-1);
|
|
|
|
_vga->_showQ->append(_mouse);
|
|
|
|
// ___________
|
|
loadUser();
|
|
// ~~~~~~~~~~~
|
|
|
|
if ((_sprite = _vga->_spareQ->locate(121)) != NULL)
|
|
SNPOST_(SNSEQ, -1, _vga->_mono, _sprite);
|
|
if ((_sprite = _vga->_spareQ->locate(122)) != NULL)
|
|
_sprite->step(_music);
|
|
SNPOST_(SNSEQ, -1, _music, _sprite);
|
|
if (!_music)
|
|
killMidi();
|
|
|
|
if (_mini && INI_FILE::exist("MINI.SPR")) {
|
|
_miniShp = new BMP_PTR[2];
|
|
_miniShp[0] = _miniShp[1] = NULL;
|
|
|
|
uint8 *ptr = (uint8 *) &*_mini;
|
|
if (ptr != NULL) {
|
|
loadSprite("MINI", -1, 0, MINI_X, MINI_Y);
|
|
expandSprite(_miniCave = _sprite); // NULL is ok
|
|
if (_miniCave) {
|
|
_miniCave->_flags._kill = false;
|
|
_miniCave->_flags._hide = true;
|
|
_miniCave->moveShapes(ptr);
|
|
_miniShp[0] = new Bitmap(*_miniCave->shp());
|
|
_miniShpList = _miniCave->setShapeList(_miniShp);
|
|
postMiniStep(-1);
|
|
}
|
|
}
|
|
}
|
|
|
|
if (_hero) {
|
|
expandSprite(_hero);
|
|
_hero->gotoxy(_heroXY[_now - 1]._x, _heroXY[_now - 1]._y);
|
|
if (INI_FILE::exist("00SHADOW.SPR")) {
|
|
loadSprite("00SHADOW", -1, 0, _hero->_x + 14, _hero->_y + 51);
|
|
delete _shadow;
|
|
if ((_shadow = _sprite) != NULL) {
|
|
_shadow->_ref = 2;
|
|
_shadow->_flags._tran = true;
|
|
_shadow->_flags._kill = false;
|
|
_hero->_flags._shad = true;
|
|
_vga->_showQ->insert(_vga->_spareQ->remove(_shadow), _hero);
|
|
}
|
|
}
|
|
}
|
|
|
|
_infoLine->gotoxy(INFO_X, INFO_Y);
|
|
_infoLine->_flags._tran = true;
|
|
_infoLine->update(NULL);
|
|
_vga->_showQ->insert(_infoLine);
|
|
|
|
_debugLine->_z = 126;
|
|
_vga->_showQ->insert(_debugLine);
|
|
|
|
_horzLine->_y = MAP_TOP - (MAP_TOP > 0);
|
|
_horzLine->_z = 126;
|
|
_vga->_showQ->insert(_horzLine);
|
|
|
|
_mouse->_busy = _vga->_spareQ->locate(BUSY_REF);
|
|
if (_mouse->_busy)
|
|
expandSprite(_mouse->_busy);
|
|
|
|
_startupMode = 0;
|
|
|
|
SNPOST(SNLEVEL, -1, _oldLev, &_cavLight);
|
|
_cavLight->gotoxy(CAVE_X + ((_now - 1) % CAVE_NX) * CAVE_DX + CAVE_SX,
|
|
CAVE_Y + ((_now - 1) / CAVE_NX) * CAVE_DY + CAVE_SY);
|
|
caveUp();
|
|
|
|
_keyboard->setClient(_sys);
|
|
// main loop
|
|
while (!_finis && !_eventManager->_quitFlag) {
|
|
if (_finis)
|
|
SNPOST2(SNEXEC, -1, 0, kQGame);
|
|
mainLoop();
|
|
}
|
|
|
|
_keyboard->setClient(NULL);
|
|
_heart->_enable = false;
|
|
SNPOST(SNCLEAR, -1, 0, NULL);
|
|
SNPOST_(SNCLEAR, -1, 0, NULL);
|
|
_mouse->off();
|
|
_vga->_showQ->clear();
|
|
_vga->_spareQ->clear();
|
|
_hero = NULL;
|
|
_shadow = NULL;
|
|
}
|
|
|
|
|
|
void CGEEngine::movie(const char *ext) {
|
|
if (_eventManager->_quitFlag)
|
|
return;
|
|
|
|
const char *fn = progName(ext);
|
|
if (INI_FILE::exist(fn)) {
|
|
loadScript(fn);
|
|
expandSprite(_vga->_spareQ->locate(999));
|
|
feedSnail(_vga->_showQ->locate(999), kTake);
|
|
|
|
_vga->_showQ->append(_mouse);
|
|
|
|
_heart->_enable = true;
|
|
_keyboard->setClient(_sys);
|
|
while (!_snail->idle() && !_eventManager->_quitFlag)
|
|
mainLoop();
|
|
|
|
_keyboard->setClient(NULL);
|
|
_heart->_enable = false;
|
|
SNPOST(SNCLEAR, -1, 0, NULL);
|
|
SNPOST_(SNCLEAR, -1, 0, NULL);
|
|
_vga->_showQ->clear();
|
|
_vga->_spareQ->clear();
|
|
}
|
|
}
|
|
|
|
|
|
bool CGEEngine::showTitle(const char *name) {
|
|
if (_eventManager->_quitFlag)
|
|
return false;
|
|
|
|
Bitmap::_pal = Vga::_sysPal;
|
|
BMP_PTR *LB = new BMP_PTR[2];
|
|
LB[0] = new Bitmap(name, true);
|
|
LB[1] = NULL;
|
|
Bitmap::_pal = NULL;
|
|
bool usr_ok = false;
|
|
|
|
Sprite D(this, LB);
|
|
D._flags._kill = true;
|
|
D._flags._bDel = true;
|
|
D.center();
|
|
D.show(2);
|
|
|
|
if (Startup::_mode == 2) {
|
|
inf(SVG0NAME);
|
|
_talk->show(2);
|
|
}
|
|
|
|
_vga->sunset();
|
|
_vga->copyPage(1, 2);
|
|
_vga->copyPage(0, 1);
|
|
selectPocket(-1);
|
|
_vga->sunrise(Vga::_sysPal);
|
|
|
|
if (Startup::_mode < 2 && !Startup::_soundOk) {
|
|
_vga->copyPage(1, 2);
|
|
_vga->copyPage(0, 1);
|
|
_vga->_showQ->append(_mouse);
|
|
_heart->_enable = true;
|
|
_mouse->on();
|
|
for (selectSound(); !_snail->idle() || Vmenu::_addr;) {
|
|
mainLoop();
|
|
if (_eventManager->_quitFlag)
|
|
return false;
|
|
}
|
|
|
|
_mouse->off();
|
|
_heart->_enable = false;
|
|
_vga->_showQ->clear();
|
|
_vga->copyPage(0, 2);
|
|
Startup::_soundOk = 2;
|
|
if (_music)
|
|
loadMidi(0);
|
|
}
|
|
|
|
if (Startup::_mode < 2) {
|
|
if (_isDemo) {
|
|
strcpy(_usrFnam, progName(SVG_EXT));
|
|
usr_ok = true;
|
|
} else {
|
|
//-----------------------------------------
|
|
#ifndef EVA
|
|
#ifdef CD
|
|
Startup::_summa |= (0xC0 + (DriveCD(0) << 6)) & 0xFF;
|
|
#else
|
|
// At this point the game originally read the boot sector to get
|
|
// the serial number for it's copy protection check
|
|
#endif
|
|
//-----------------------------------------
|
|
movie("X00"); // paylist
|
|
_vga->copyPage(1, 2);
|
|
_vga->copyPage(0, 1);
|
|
_vga->_showQ->append(_mouse);
|
|
//Mouse.On();
|
|
|
|
// For ScummVM, skip prompting for name if a savegame in slot 0 already exists
|
|
if ((_startGameSlot == -1) && savegameExists(0)) {
|
|
strcpy(_usrFnam, "User");
|
|
usr_ok = true;
|
|
} else {
|
|
_heart->_enable = true;
|
|
for (takeName(); GetText::_ptr;) {
|
|
mainLoop();
|
|
if (_eventManager->_quitFlag)
|
|
return false;
|
|
}
|
|
_heart->_enable = false;
|
|
if (_keyboard->last() == Enter && *_usrFnam)
|
|
usr_ok = true;
|
|
}
|
|
//Mouse.Off();
|
|
_vga->_showQ->clear();
|
|
_vga->copyPage(0, 2);
|
|
#endif
|
|
}
|
|
|
|
if (usr_ok && Startup::_mode == 0) {
|
|
if (savegameExists(0)) {
|
|
// Load the savegame
|
|
loadGame(0, NULL, true); // only system vars
|
|
_vga->setColors(Vga::_sysPal, 64);
|
|
_vga->update();
|
|
if (_flag[3]) { //flag FINIS
|
|
Startup::_mode++;
|
|
_flag[3] = false;
|
|
}
|
|
} else
|
|
Startup::_mode++;
|
|
}
|
|
}
|
|
|
|
if (Startup::_mode < 2)
|
|
movie("X01"); // wink
|
|
|
|
_vga->copyPage(0, 2);
|
|
|
|
if (_isDemo)
|
|
return true;
|
|
else
|
|
return (Startup::_mode == 2 || usr_ok);
|
|
}
|
|
|
|
|
|
/*
|
|
void StkDump () {
|
|
CFILE f("!STACK.DMP", BFW);
|
|
f.Write((uint8 *) (intStackPtr-STACK_SIZ/2), STACK_SIZ*2);
|
|
}
|
|
*/
|
|
|
|
|
|
void CGEEngine::cge_main() {
|
|
uint16 intStack[STACK_SIZ / 2];
|
|
_intStackPtr = intStack;
|
|
|
|
//Debug( memset((void *) (-K(2)), 0, K(1)); )
|
|
//Debug( memset((void *) (-K(4)), 0, K(1)); )
|
|
memset(_barriers, 0xFF, sizeof(_barriers));
|
|
|
|
if (!_mouse->_exist)
|
|
error("%s", _text->getText(NO_MOUSE_TEXT));
|
|
|
|
if (!SVG0FILE::exist(SVG0NAME))
|
|
Startup::_mode = 2;
|
|
|
|
_debugLine->_flags._hide = true;
|
|
_horzLine->_flags._hide = true;
|
|
|
|
if (_music && Startup::_soundOk)
|
|
loadMidi(0);
|
|
|
|
if (_startGameSlot != -1) {
|
|
// Starting up a savegame from the launcher
|
|
Startup::_mode++;
|
|
runGame();
|
|
|
|
_startupMode = 2;
|
|
if (_flag[3]) // Flag FINIS
|
|
movie("X03");
|
|
} else {
|
|
if (Startup::_mode < 2)
|
|
movie(LGO_EXT);
|
|
|
|
if (showTitle("WELCOME")) {
|
|
if ((!_isDemo) && (Startup::_mode == 1))
|
|
movie("X02"); // intro
|
|
runGame();
|
|
_startupMode = 2;
|
|
if (_flag[3]) // Flag FINIS
|
|
movie("X03");
|
|
} else
|
|
_vga->sunset();
|
|
}
|
|
}
|
|
|
|
} // End of namespace CGE
|