scummvm/engines/sky/control.cpp
Willem Jan Palenstijn 9ffe3e11d9 Merge pull request #182 from fingolfin/forbid-ctype
ALL: Avoid using is* macros from ctype.h
2012-02-21 11:33:32 -08:00

1624 lines
54 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.
*
*/
#include "common/endian.h"
#include "common/config-manager.h"
#include "common/events.h"
#include "common/system.h"
#include "common/savefile.h"
#include "common/textconsole.h"
#include "gui/message.h"
#include "sky/compact.h"
#include "sky/control.h"
#include "sky/disk.h"
#include "sky/logic.h"
#include "sky/music/musicbase.h"
#include "sky/mouse.h"
#include "sky/screen.h"
#include "sky/sky.h"
#include "sky/skydefs.h"
#include "sky/sound.h"
#include "sky/struc.h"
#include "sky/text.h"
#include "sky/compact.h"
namespace Sky {
ConResource::ConResource(void *pSpData, uint32 pNSprites, uint32 pCurSprite, uint16 pX, uint16 pY, uint32 pText, uint8 pOnClick, OSystem *system, uint8 *screen) {
_spriteData = (DataFileHeader *)pSpData;
_numSprites = pNSprites;
_curSprite = pCurSprite;
_x = pX;
_y = pY;
_text = pText;
_onClick = pOnClick;
_system = system;
_screen = screen;
}
bool ConResource::isMouseOver(uint32 mouseX, uint32 mouseY) {
if ((mouseX >= _x) && (mouseY >= _y) && ((uint16)mouseX <= _x + _spriteData->s_width) && ((uint16)mouseY <= _y + _spriteData->s_height))
return true;
else
return false;
}
void ConResource::drawToScreen(bool doMask) {
uint8 *screenPos = _y * GAME_SCREEN_WIDTH + _x + _screen;
uint8 *updatePos = screenPos;
if (!_spriteData)
return;
uint8 *spriteData = ((uint8 *)_spriteData) + sizeof(DataFileHeader);
spriteData += _spriteData->s_sp_size * _curSprite;
if (doMask) {
for (uint16 cnty = 0; cnty < _spriteData->s_height; cnty++) {
for (uint16 cntx = 0; cntx < _spriteData->s_width; cntx++) {
if (spriteData[cntx]) screenPos[cntx] = spriteData[cntx];
}
screenPos += GAME_SCREEN_WIDTH;
spriteData += _spriteData->s_width;
}
} else {
for (uint16 cnty = 0; cnty < _spriteData->s_height; cnty++) {
memcpy(screenPos, spriteData, _spriteData->s_width);
screenPos += GAME_SCREEN_WIDTH;
spriteData += _spriteData->s_width;
}
}
_system->copyRectToScreen(updatePos, GAME_SCREEN_WIDTH, _x, _y, _spriteData->s_width, _spriteData->s_height);
}
TextResource::TextResource(void *pSpData, uint32 pNSprites, uint32 pCurSprite, uint16 pX, uint16 pY, uint32 pText, uint8 pOnClick, OSystem *system, uint8 *screen) :
ConResource(pSpData, pNSprites, pCurSprite, pX, pY, pText, pOnClick, system, screen) {
_oldScreen = (uint8 *)malloc(PAN_CHAR_HEIGHT * 3 * PAN_LINE_WIDTH);
_oldY = 0;
_oldX = GAME_SCREEN_WIDTH;
}
TextResource::~TextResource() {
free(_oldScreen);
}
void TextResource::flushForRedraw() {
if (_oldX < GAME_SCREEN_WIDTH) {
uint16 cpWidth = (PAN_LINE_WIDTH > (GAME_SCREEN_WIDTH - _oldX))?(GAME_SCREEN_WIDTH - _oldX):(PAN_LINE_WIDTH);
for (uint8 cnty = 0; cnty < PAN_CHAR_HEIGHT; cnty++)
memcpy(_screen + (cnty + _oldY) * GAME_SCREEN_WIDTH + _oldX, _oldScreen + cnty * PAN_LINE_WIDTH, cpWidth);
}
_oldX = GAME_SCREEN_WIDTH;
}
void TextResource::drawToScreen(bool doMask) {
(void)doMask;
uint16 cnty, cntx, cpWidth, cpHeight;
if ((_oldX == _x) && (_oldY == _y) && (_spriteData))
return;
if (_oldX < GAME_SCREEN_WIDTH) {
cpWidth = (PAN_LINE_WIDTH > (GAME_SCREEN_WIDTH - _oldX))?(GAME_SCREEN_WIDTH - _oldX):(PAN_LINE_WIDTH);
if (_spriteData && (cpWidth > _spriteData->s_width))
cpWidth = _spriteData->s_width;
if (_spriteData)
cpHeight = (_spriteData->s_height > (GAME_SCREEN_HEIGHT - _oldY))?(GAME_SCREEN_HEIGHT - _oldY):(_spriteData->s_height);
else
cpHeight = PAN_CHAR_HEIGHT;
for (cnty = 0; cnty < cpHeight; cnty++)
memcpy(_screen + (cnty + _oldY) * GAME_SCREEN_WIDTH + _oldX, _oldScreen + cnty * PAN_LINE_WIDTH, cpWidth);
_system->copyRectToScreen(_screen + _oldY * GAME_SCREEN_WIDTH + _oldX, GAME_SCREEN_WIDTH, _oldX, _oldY, cpWidth, PAN_CHAR_HEIGHT);
}
if (!_spriteData) {
_oldX = GAME_SCREEN_WIDTH;
return;
}
_oldX = _x;
_oldY = _y;
cpWidth = (PAN_LINE_WIDTH > (GAME_SCREEN_WIDTH - _x))?(GAME_SCREEN_WIDTH - _x):(PAN_LINE_WIDTH);
if (cpWidth > _spriteData->s_width)
cpWidth = _spriteData->s_width;
cpHeight = (_spriteData->s_height > (GAME_SCREEN_HEIGHT - _y))?(GAME_SCREEN_HEIGHT - _y):(_spriteData->s_height);
uint8 *screenPos = _screen + _y * GAME_SCREEN_WIDTH + _x;
uint8 *copyDest = _oldScreen;
uint8 *copySrc = ((uint8 *)_spriteData) + sizeof(DataFileHeader);
for (cnty = 0; cnty < cpHeight; cnty++) {
memcpy(copyDest, screenPos, cpWidth);
for (cntx = 0; cntx < cpWidth; cntx++)
if (copySrc[cntx]) screenPos[cntx] = copySrc[cntx];
copySrc += _spriteData->s_width;
copyDest += PAN_LINE_WIDTH;
screenPos += GAME_SCREEN_WIDTH;
}
_system->copyRectToScreen(_screen + _y * GAME_SCREEN_WIDTH + _x, GAME_SCREEN_WIDTH, _x, _y, cpWidth, cpHeight);
}
ControlStatus::ControlStatus(Text *skyText, OSystem *system, uint8 *scrBuf) {
_skyText = skyText;
_system = system;
_screenBuf = scrBuf;
_textData = NULL;
_statusText = new TextResource(NULL, 2, 1, 64, 163, 0, DO_NOTHING, _system, _screenBuf);
}
ControlStatus::~ControlStatus() {
free(_textData);
delete _statusText;
}
void ControlStatus::setToText(const char *newText) {
char tmpLine[256];
strcpy(tmpLine, newText);
if (_textData) {
_statusText->flushForRedraw();
free(_textData);
}
DisplayedText disText = _skyText->displayText(tmpLine, NULL, true, STATUS_WIDTH, 255);
_textData = (DataFileHeader *)disText.textData;
_statusText->setSprite(_textData);
_statusText->drawToScreen(WITH_MASK);
}
void ControlStatus::setToText(uint16 textNum) {
free(_textData);
DisplayedText disText = _skyText->displayText(textNum, NULL, true, STATUS_WIDTH, 255);
_textData = (DataFileHeader *)disText.textData;
_statusText->setSprite(_textData);
_statusText->drawToScreen(WITH_MASK);
}
void ControlStatus::drawToScreen() {
_statusText->flushForRedraw();
_statusText->drawToScreen(WITH_MASK);
}
Control::Control(Common::SaveFileManager *saveFileMan, Screen *screen, Disk *disk, Mouse *mouse, Text *text, MusicBase *music, Logic *logic, Sound *sound, SkyCompact *skyCompact, OSystem *system) {
_saveFileMan = saveFileMan;
_skyScreen = screen;
_skyDisk = disk;
_skyMouse = mouse;
_skyText = text;
_skyMusic = music;
_skyLogic = logic;
_skySound = sound;
_skyCompact = skyCompact;
_system = system;
}
ConResource *Control::createResource(void *pSpData, uint32 pNSprites, uint32 pCurSprite, int16 pX, int16 pY, uint32 pText, uint8 pOnClick, uint8 panelType) {
if (pText) pText += 0x7000;
if (panelType == MAINPANEL) {
pX += MPNL_X;
pY += MPNL_Y;
} else {
pX += SPNL_X;
pY += SPNL_Y;
}
return new ConResource(pSpData, pNSprites, pCurSprite, pX, pY, pText, pOnClick, _system, _screenBuf);
}
void Control::removePanel() {
free(_screenBuf);
free(_sprites.controlPanel); free(_sprites.button);
free(_sprites.buttonDown); free(_sprites.savePanel);
free(_sprites.yesNo); free(_sprites.slide);
free(_sprites.slide2); free(_sprites.slode);
free(_sprites.slode2); free(_sprites.musicBodge);
delete _controlPanel; delete _exitButton;
delete _slide; delete _slide2;
delete _slode; delete _restorePanButton;
delete _savePanel; delete _saveButton;
delete _downFastButton; delete _downSlowButton;
delete _upFastButton; delete _upSlowButton;
delete _quitButton; delete _autoSaveButton;
delete _savePanButton; delete _dosPanButton;
delete _restartPanButton; delete _fxPanButton;
delete _musicPanButton; delete _bodge;
delete _yesNo; delete _text;
delete _statusBar; delete _restoreButton;
if (_textSprite) {
free(_textSprite);
_textSprite = NULL;
}
}
void Control::initPanel() {
_screenBuf = (uint8 *)malloc(GAME_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
memset(_screenBuf, 0, GAME_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
uint16 volY = (127 - _skyMusic->giveVolume()) / 4 + 59 - MPNL_Y; // volume slider's Y coordinate
uint16 spdY = (SkyEngine::_systemVars.gameSpeed - 2) / SPEED_MULTIPLY;
spdY += MPNL_Y + 83; // speed slider's initial position
_sprites.controlPanel = _skyDisk->loadFile(60500);
_sprites.button = _skyDisk->loadFile(60501);
_sprites.buttonDown = _skyDisk->loadFile(60502);
_sprites.savePanel = _skyDisk->loadFile(60503);
_sprites.yesNo = _skyDisk->loadFile(60504);
_sprites.slide = _skyDisk->loadFile(60505);
_sprites.slode = _skyDisk->loadFile(60506);
_sprites.slode2 = _skyDisk->loadFile(60507);
_sprites.slide2 = _skyDisk->loadFile(60508);
if (SkyEngine::_systemVars.gameVersion < 368)
_sprites.musicBodge = NULL;
else
_sprites.musicBodge = _skyDisk->loadFile(60509);
//Main control panel: X Y Text OnClick
_controlPanel = createResource(_sprites.controlPanel, 1, 0, 0, 0, 0, DO_NOTHING, MAINPANEL);
_exitButton = createResource( _sprites.button, 3, 0, 16, 125, 50, EXIT, MAINPANEL);
_slide = createResource( _sprites.slide2, 1, 0, 19,spdY, 95, SPEED_SLIDE, MAINPANEL);
_slide2 = createResource( _sprites.slide2, 1, 0, 19,volY, 14, MUSIC_SLIDE, MAINPANEL);
_slode = createResource( _sprites.slode2, 1, 0, 9, 49, 0, DO_NOTHING, MAINPANEL);
_restorePanButton = createResource( _sprites.button, 3, 0, 58, 19, 51, REST_GAME_PANEL, MAINPANEL);
_savePanButton = createResource( _sprites.button, 3, 0, 58, 39, 48, SAVE_GAME_PANEL, MAINPANEL);
_dosPanButton = createResource( _sprites.button, 3, 0, 58, 59, 93, QUIT_TO_DOS, MAINPANEL);
_restartPanButton = createResource( _sprites.button, 3, 0, 58, 79, 94, RESTART, MAINPANEL);
_fxPanButton = createResource( _sprites.button, 3, 0, 58, 99, 90, TOGGLE_FX, MAINPANEL);
if (SkyEngine::isCDVersion()) { // CD Version: Toggle text/speech
_musicPanButton = createResource( _sprites.button, 3, 0, 58, 119, 52, TOGGLE_TEXT, MAINPANEL);
} else { // disk version: toggle music on/off
_musicPanButton = createResource( _sprites.button, 3, 0, 58, 119, 91, TOGGLE_MS, MAINPANEL);
}
_bodge = createResource( _sprites.musicBodge, 2, 1, 98, 115, 0, DO_NOTHING, MAINPANEL);
_yesNo = createResource( _sprites.yesNo, 1, 0, -2, 40, 0, DO_NOTHING, MAINPANEL);
_text = new TextResource(NULL, 1, 0, 15, 137, 0, DO_NOTHING, _system, _screenBuf);
_controlPanLookList[0] = _exitButton;
_controlPanLookList[1] = _restorePanButton;
_controlPanLookList[2] = _savePanButton;
_controlPanLookList[3] = _dosPanButton;
_controlPanLookList[4] = _restartPanButton;
_controlPanLookList[5] = _fxPanButton;
_controlPanLookList[6] = _musicPanButton;
_controlPanLookList[7] = _slide;
_controlPanLookList[8] = _slide2;
// save/restore panel
_savePanel = createResource( _sprites.savePanel, 1, 0, 0, 0, 0, DO_NOTHING, SAVEPANEL);
_saveButton = createResource( _sprites.button, 3, 0, 29, 129, 48, SAVE_A_GAME, SAVEPANEL);
_downFastButton = createResource(_sprites.buttonDown, 1, 0, 212, 114, 0, SHIFT_DOWN_FAST, SAVEPANEL);
_downSlowButton = createResource(_sprites.buttonDown, 1, 0, 212, 104, 0, SHIFT_DOWN_SLOW, SAVEPANEL);
_upFastButton = createResource(_sprites.buttonDown, 1, 0, 212, 10, 0, SHIFT_UP_FAST, SAVEPANEL);
_upSlowButton = createResource(_sprites.buttonDown, 1, 0, 212, 21, 0, SHIFT_UP_SLOW, SAVEPANEL);
_quitButton = createResource( _sprites.button, 3, 0, 72, 129, 49, SP_CANCEL, SAVEPANEL);
_restoreButton = createResource( _sprites.button, 3, 0, 29, 129, 51, RESTORE_A_GAME, SAVEPANEL);
_autoSaveButton = createResource( _sprites.button, 3, 0, 115, 129, 0x8FFF, RESTORE_AUTO, SAVEPANEL);
_savePanLookList[0] = _saveButton;
_restorePanLookList[0] = _restoreButton;
_restorePanLookList[1] = _savePanLookList[1] = _downSlowButton;
_restorePanLookList[2] = _savePanLookList[2] = _downFastButton;
_restorePanLookList[3] = _savePanLookList[3] = _upFastButton;
_restorePanLookList[4] = _savePanLookList[4] = _upSlowButton;
_restorePanLookList[5] = _savePanLookList[5] = _quitButton;
_restorePanLookList[6] = _autoSaveButton;
_statusBar = new ControlStatus(_skyText, _system, _screenBuf);
_textSprite = NULL;
}
void Control::buttonControl(ConResource *pButton) {
char autoSave[] = "Restore Autosave";
if (pButton == NULL) {
free(_textSprite);
_textSprite = NULL;
_curButtonText = 0;
_text->setSprite(NULL);
return;
}
if (_curButtonText != pButton->_text) {
free(_textSprite);
_textSprite = NULL;
_curButtonText = pButton->_text;
if (pButton->_text) {
DisplayedText textRes;
if (pButton->_text == 0xFFFF) // text for autosave button
textRes = _skyText->displayText(autoSave, NULL, false, PAN_LINE_WIDTH, 255);
else
textRes = _skyText->displayText(pButton->_text, NULL, false, PAN_LINE_WIDTH, 255);
_textSprite = (DataFileHeader *)textRes.textData;
_text->setSprite(_textSprite);
} else
_text->setSprite(NULL);
}
Common::Point mouse = _system->getEventManager()->getMousePos();
int destY = (mouse.y - 16 >= 0) ? mouse.y - 16 : 0;
_text->setXY(mouse.x + 12, destY);
}
void Control::drawTextCross(uint32 flags) {
_bodge->drawToScreen(NO_MASK);
if (!(flags & SF_ALLOW_SPEECH))
drawCross(151, 124);
if (!(flags & SF_ALLOW_TEXT))
drawCross(173, 124);
}
void Control::drawCross(uint16 x, uint16 y) {
_text->flushForRedraw();
uint8 *bufPos, *crossPos;
bufPos = _screenBuf + y * GAME_SCREEN_WIDTH + x;
crossPos = _crossImg;
for (uint16 cnty = 0; cnty < CROSS_SZ_Y; cnty++) {
for (uint16 cntx = 0; cntx < CROSS_SZ_X; cntx++)
if (crossPos[cntx] != 0xFF)
bufPos[cntx] = crossPos[cntx];
bufPos += GAME_SCREEN_WIDTH;
crossPos += CROSS_SZ_X;
}
bufPos = _screenBuf + y * GAME_SCREEN_WIDTH + x;
_system->copyRectToScreen(bufPos, GAME_SCREEN_WIDTH, x, y, CROSS_SZ_X, CROSS_SZ_Y);
_text->drawToScreen(WITH_MASK);
}
void Control::animClick(ConResource *pButton) {
if (pButton->_curSprite != pButton->_numSprites -1) {
pButton->_curSprite++;
_text->flushForRedraw();
pButton->drawToScreen(NO_MASK);
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
delay(150);
pButton->_curSprite--;
_text->flushForRedraw();
pButton->drawToScreen(NO_MASK);
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
}
}
void Control::drawMainPanel() {
memset(_screenBuf, 0, GAME_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
_system->copyRectToScreen(_screenBuf, GAME_SCREEN_WIDTH, 0, 0, GAME_SCREEN_WIDTH, FULL_SCREEN_HEIGHT);
_controlPanel->drawToScreen(NO_MASK);
_exitButton->drawToScreen(NO_MASK);
_savePanButton->drawToScreen(NO_MASK);
_restorePanButton->drawToScreen(NO_MASK);
_dosPanButton->drawToScreen(NO_MASK);
_restartPanButton->drawToScreen(NO_MASK);
_fxPanButton->drawToScreen(NO_MASK);
_musicPanButton->drawToScreen(NO_MASK);
_slode->drawToScreen(WITH_MASK);
_slide->drawToScreen(WITH_MASK);
_slide2->drawToScreen(WITH_MASK);
_bodge->drawToScreen(WITH_MASK);
if (SkyEngine::isCDVersion())
drawTextCross(SkyEngine::_systemVars.systemFlags & TEXT_FLAG_MASK);
_statusBar->drawToScreen();
}
void Control::doLoadSavePanel() {
if (SkyEngine::isDemo())
return; // I don't think this can even happen
initPanel();
_skyScreen->clearScreen();
if (SkyEngine::_systemVars.gameVersion < 331)
_skyScreen->setPalette(60509);
else
_skyScreen->setPalette(60510);
_savedMouse = _skyMouse->giveCurrentMouseType();
_savedCharSet = _skyText->giveCurrentCharSet();
_skyText->fnSetFont(2);
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
_lastButton = -1;
_curButtonText = 0;
saveRestorePanel(false);
memset(_screenBuf, 0, GAME_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
_system->copyRectToScreen(_screenBuf, GAME_SCREEN_WIDTH, 0, 0, GAME_SCREEN_WIDTH, FULL_SCREEN_HEIGHT);
_system->updateScreen();
_skyScreen->forceRefresh();
_skyScreen->setPaletteEndian((uint8 *)_skyCompact->fetchCpt(SkyEngine::_systemVars.currentPalette));
removePanel();
_skyMouse->spriteMouse(_savedMouse, 0, 0);
_skyText->fnSetFont(_savedCharSet);
}
void Control::doControlPanel() {
if (SkyEngine::isDemo()) {
return;
}
initPanel();
_savedCharSet = _skyText->giveCurrentCharSet();
_skyText->fnSetFont(2);
_skyScreen->clearScreen();
if (SkyEngine::_systemVars.gameVersion < 331)
_skyScreen->setPalette(60509);
else
_skyScreen->setPalette(60510);
// Set initial button lights
_fxPanButton->_curSprite =
(SkyEngine::_systemVars.systemFlags & SF_FX_OFF ? 0 : 2);
// music button only available in floppy version
if (!SkyEngine::isCDVersion())
_musicPanButton->_curSprite =
(SkyEngine::_systemVars.systemFlags & SF_MUS_OFF ? 0 : 2);
drawMainPanel();
_savedMouse = _skyMouse->giveCurrentMouseType();
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
bool quitPanel = false;
_lastButton = -1;
_curButtonText = 0;
uint16 clickRes = 0;
while (!quitPanel && !Engine::shouldQuit()) {
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
_mouseClicked = false;
delay(50);
if (_keyPressed.keycode == Common::KEYCODE_ESCAPE) { // escape pressed
_mouseClicked = false;
quitPanel = true;
}
bool haveButton = false;
Common::Point mouse = _system->getEventManager()->getMousePos();
for (uint8 lookCnt = 0; lookCnt < 9; lookCnt++) {
if (_controlPanLookList[lookCnt]->isMouseOver(mouse.x, mouse.y)) {
haveButton = true;
buttonControl(_controlPanLookList[lookCnt]);
if (_mouseClicked && _controlPanLookList[lookCnt]->_onClick) {
clickRes = handleClick(_controlPanLookList[lookCnt]);
_text->flushForRedraw();
drawMainPanel();
_text->drawToScreen(WITH_MASK);
if ((clickRes == QUIT_PANEL) || (clickRes == GAME_SAVED) ||
(clickRes == GAME_RESTORED))
quitPanel = true;
}
_mouseClicked = false;
}
}
if (!haveButton)
buttonControl(NULL);
}
memset(_screenBuf, 0, GAME_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
_system->copyRectToScreen(_screenBuf, GAME_SCREEN_WIDTH, 0, 0, GAME_SCREEN_WIDTH, FULL_SCREEN_HEIGHT);
if (!Engine::shouldQuit())
_system->updateScreen();
_skyScreen->forceRefresh();
_skyScreen->setPaletteEndian((uint8 *)_skyCompact->fetchCpt(SkyEngine::_systemVars.currentPalette));
removePanel();
_skyMouse->spriteMouse(_savedMouse, 0, 0);
_skyText->fnSetFont(_savedCharSet);
}
uint16 Control::handleClick(ConResource *pButton) {
char quitDos[] = "Quit to DOS?";
char restart[] = "Restart?";
switch (pButton->_onClick) {
case DO_NOTHING:
return 0;
case REST_GAME_PANEL:
if (!loadSaveAllowed())
return CANCEL_PRESSED; // can't save/restore while choosing
animClick(pButton);
return saveRestorePanel(false); // texts can't be edited
case SAVE_GAME_PANEL:
if (!loadSaveAllowed())
return CANCEL_PRESSED; // can't save/restore while choosing
animClick(pButton);
return saveRestorePanel(true); // texts can be edited
case SAVE_A_GAME:
animClick(pButton);
return saveGameToFile(true);
case RESTORE_A_GAME:
animClick(pButton);
return restoreGameFromFile(false);
case RESTORE_AUTO:
animClick(pButton);
return restoreGameFromFile(true);
case SP_CANCEL:
animClick(pButton);
return CANCEL_PRESSED;
case SHIFT_DOWN_FAST:
animClick(pButton);
return shiftDown(FAST);
case SHIFT_DOWN_SLOW:
animClick(pButton);
return shiftDown(SLOW);
case SHIFT_UP_FAST:
animClick(pButton);
return shiftUp(FAST);
case SHIFT_UP_SLOW:
animClick(pButton);
return shiftUp(SLOW);
case SPEED_SLIDE:
_mouseClicked = true;
return doSpeedSlide();
case MUSIC_SLIDE:
_mouseClicked = true;
return doMusicSlide();
case TOGGLE_FX:
toggleFx(pButton);
return TOGGLED;
case TOGGLE_MS:
toggleMusic(pButton);
return TOGGLED;
case TOGGLE_TEXT:
animClick(pButton);
return toggleText();
case EXIT:
animClick(pButton);
return QUIT_PANEL;
case RESTART:
animClick(pButton);
if (getYesNo(restart)) {
restartGame();
return GAME_RESTORED;
} else
return 0;
case QUIT_TO_DOS:
animClick(pButton);
if (getYesNo(quitDos))
Engine::quitGame();
return 0;
default:
error("Control::handleClick: unknown routine: %X",pButton->_onClick);
}
}
bool Control::getYesNo(char *text) {
bool retVal = false;
bool quitPanel = false;
uint8 mouseType = MOUSE_NORMAL;
uint8 wantMouse = MOUSE_NORMAL;
DataFileHeader *dlgTextDat;
uint16 textY = MPNL_Y;
_yesNo->drawToScreen(WITH_MASK);
if (text) {
DisplayedText dlgLtm = _skyText->displayText(text, NULL, true, _yesNo->_spriteData->s_width - 8, 37);
dlgTextDat = (DataFileHeader *)dlgLtm.textData;
textY = MPNL_Y + 44 + (28 - dlgTextDat->s_height) / 2;
} else
dlgTextDat = NULL;
TextResource *dlgText = new TextResource(dlgTextDat, 1, 0, MPNL_X+2, textY, 0, DO_NOTHING, _system, _screenBuf);
dlgText->drawToScreen(WITH_MASK);
while (!quitPanel) {
if (mouseType != wantMouse) {
mouseType = wantMouse;
_skyMouse->spriteMouse(mouseType, 0, 0);
}
_system->updateScreen();
delay(50);
Common::Point mouse = _system->getEventManager()->getMousePos();
if ((mouse.y >= 83) && (mouse.y <= 110)) {
if ((mouse.x >= 77) && (mouse.x <= 114)) { // over 'yes'
wantMouse = MOUSE_CROSS;
if (_mouseClicked) {
quitPanel = true;
retVal = true;
}
} else if ((mouse.x >= 156) && (mouse.x <= 193)) { // over 'no'
wantMouse = MOUSE_CROSS;
if (_mouseClicked) {
quitPanel = true;
retVal = false;
}
} else
wantMouse = MOUSE_NORMAL;
} else
wantMouse = MOUSE_NORMAL;
}
_mouseClicked = false;
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
free(dlgTextDat);
delete dlgText;
return retVal;
}
uint16 Control::doMusicSlide() {
Common::Point mouse = _system->getEventManager()->getMousePos();
int ofsY = _slide2->_y - mouse.y;
uint8 volume;
while (_mouseClicked) {
delay(50);
mouse = _system->getEventManager()->getMousePos();
int newY = ofsY + mouse.y;
if (newY < 59) newY = 59;
if (newY > 91) newY = 91;
if (newY != _slide2->_y) {
_slode->drawToScreen(NO_MASK);
_slide2->setXY(_slide2->_x, (uint16)newY);
_slide2->drawToScreen(WITH_MASK);
_slide->drawToScreen(WITH_MASK);
volume = (newY - 59) * 4;
if (volume >= 128) volume = 0;
else volume = 127 - volume;
_skyMusic->setVolume(volume);
}
buttonControl(_slide2);
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
}
return 0;
}
uint16 Control::doSpeedSlide() {
Common::Point mouse = _system->getEventManager()->getMousePos();
int ofsY = _slide->_y - mouse.y;
uint16 speedDelay = _slide->_y - (MPNL_Y + 93);
speedDelay *= SPEED_MULTIPLY;
speedDelay += 2;
while (_mouseClicked) {
delay(50);
mouse = _system->getEventManager()->getMousePos();
int newY = ofsY + mouse.y;
if (newY < MPNL_Y + 93) newY = MPNL_Y + 93;
if (newY > MPNL_Y + 104) newY = MPNL_Y + 104;
if ((newY == 110) || (newY == 108)) newY = 109;
if (newY != _slide->_y) {
_slode->drawToScreen(NO_MASK);
_slide->setXY(_slide->_x, (uint16)newY);
_slide->drawToScreen(WITH_MASK);
_slide2->drawToScreen(WITH_MASK);
speedDelay = newY - (MPNL_Y + 93);
speedDelay *= SPEED_MULTIPLY;
speedDelay += 2;
}
buttonControl(_slide);
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
}
SkyEngine::_systemVars.gameSpeed = speedDelay;
return SPEED_CHANGED;
}
void Control::toggleFx(ConResource *pButton) {
SkyEngine::_systemVars.systemFlags ^= SF_FX_OFF;
if (SkyEngine::_systemVars.systemFlags & SF_FX_OFF) {
pButton->_curSprite = 0;
_statusBar->setToText(0x7000 + 87);
} else {
pButton->_curSprite = 2;
_statusBar->setToText(0x7000 + 86);
}
ConfMan.setBool("sfx_mute", (SkyEngine::_systemVars.systemFlags & SF_FX_OFF) != 0);
pButton->drawToScreen(WITH_MASK);
_system->updateScreen();
}
uint16 Control::toggleText() {
uint32 flags = SkyEngine::_systemVars.systemFlags & TEXT_FLAG_MASK;
SkyEngine::_systemVars.systemFlags &= ~TEXT_FLAG_MASK;
if (flags == SF_ALLOW_TEXT) {
flags = SF_ALLOW_SPEECH;
_statusBar->setToText(0x7000 + 21); // speech only
} else if (flags == SF_ALLOW_SPEECH) {
flags = SF_ALLOW_SPEECH | SF_ALLOW_TEXT;
_statusBar->setToText(0x7000 + 52); // text and speech
} else {
flags = SF_ALLOW_TEXT;
_statusBar->setToText(0x7000 + 35); // text only
}
ConfMan.setBool("subtitles", (flags & SF_ALLOW_TEXT) != 0);
ConfMan.setBool("speech_mute", (flags & SF_ALLOW_SPEECH) == 0);
SkyEngine::_systemVars.systemFlags |= flags;
drawTextCross(flags);
_system->updateScreen();
return TOGGLED;
}
void Control::toggleMusic(ConResource *pButton) {
SkyEngine::_systemVars.systemFlags ^= SF_MUS_OFF;
if (SkyEngine::_systemVars.systemFlags & SF_MUS_OFF) {
_skyMusic->startMusic(0);
pButton->_curSprite = 0;
_statusBar->setToText(0x7000 + 89);
} else {
_skyMusic->startMusic(SkyEngine::_systemVars.currentMusic);
pButton->_curSprite = 2;
_statusBar->setToText(0x7000 + 88);
}
ConfMan.setBool("music_mute", (SkyEngine::_systemVars.systemFlags & SF_MUS_OFF) != 0);
pButton->drawToScreen(WITH_MASK);
_system->updateScreen();
}
uint16 Control::shiftDown(uint8 speed) {
if (speed == SLOW) {
if (_firstText >= MAX_SAVE_GAMES - MAX_ON_SCREEN)
return 0;
_firstText++;
} else {
if (_firstText <= MAX_SAVE_GAMES - 2 * MAX_ON_SCREEN)
_firstText += MAX_ON_SCREEN;
else if (_firstText < MAX_SAVE_GAMES - MAX_ON_SCREEN)
_firstText = MAX_SAVE_GAMES - MAX_ON_SCREEN;
else
return 0;
}
return SHIFTED;
}
uint16 Control::shiftUp(uint8 speed) {
if (speed == SLOW) {
if (_firstText > 0)
_firstText--;
else
return 0;
} else {
if (_firstText >= MAX_ON_SCREEN)
_firstText -= MAX_ON_SCREEN;
else if (_firstText > 0)
_firstText = 0;
else
return 0;
}
return SHIFTED;
}
bool Control::autoSaveExists() {
bool test = false;
Common::InSaveFile *f;
char fName[20];
if (SkyEngine::isCDVersion())
strcpy(fName, "SKY-VM-CD.ASD");
else
sprintf(fName, "SKY-VM%03d.ASD", SkyEngine::_systemVars.gameVersion);
f = _saveFileMan->openForLoading(fName);
if (f != NULL) {
test = true;
delete f;
}
return test;
}
uint16 Control::saveRestorePanel(bool allowSave) {
_keyPressed.reset();
_mouseWheel = 0;
buttonControl(NULL);
_text->drawToScreen(WITH_MASK); // flush text restore buffer
ConResource **lookList;
uint16 cnt;
uint8 lookListLen;
if (allowSave) {
lookList = _savePanLookList;
lookListLen = 6;
_system->setFeatureState(OSystem::kFeatureVirtualKeyboard, true);
} else {
lookList = _restorePanLookList;
if (autoSaveExists())
lookListLen = 7;
else
lookListLen = 6;
}
bool withAutoSave = (lookListLen == 7);
Common::StringArray saveGameTexts;
DataFileHeader *textSprites[MAX_ON_SCREEN + 1];
for (cnt = 0; cnt < MAX_ON_SCREEN + 1; cnt++)
textSprites[cnt] = NULL;
_firstText = 0;
loadDescriptions(saveGameTexts);
_selectedGame = 0;
bool quitPanel = false;
bool refreshNames = true;
bool refreshAll = true;
uint16 clickRes = 0;
while (!quitPanel && !Engine::shouldQuit()) {
clickRes = 0;
if (refreshNames || refreshAll) {
if (refreshAll) {
_text->flushForRedraw();
_savePanel->drawToScreen(NO_MASK);
_quitButton->drawToScreen(NO_MASK);
if (withAutoSave)
_autoSaveButton->drawToScreen(NO_MASK);
refreshAll = false;
}
for (cnt = 0; cnt < MAX_ON_SCREEN; cnt++)
if (textSprites[cnt])
free(textSprites[cnt]);
setUpGameSprites(saveGameTexts, textSprites, _firstText, _selectedGame);
showSprites(textSprites, allowSave);
refreshNames = false;
}
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
_mouseClicked = false;
delay(50);
if (_keyPressed.keycode == Common::KEYCODE_ESCAPE) { // escape pressed
_mouseClicked = false;
clickRes = CANCEL_PRESSED;
quitPanel = true;
} else if ((_keyPressed.keycode == Common::KEYCODE_RETURN) || (_keyPressed.keycode == Common::KEYCODE_KP_ENTER)) {
clickRes = handleClick(lookList[0]);
if (clickRes == GAME_SAVED)
saveDescriptions(saveGameTexts);
else if (clickRes == NO_DISK_SPACE)
displayMessage(0, "Could not save the game. (%s)", _saveFileMan->popErrorDesc().c_str());
quitPanel = true;
_mouseClicked = false;
_keyPressed.reset();
} if (allowSave && _keyPressed.keycode) {
handleKeyPress(_keyPressed, saveGameTexts[_selectedGame]);
refreshNames = true;
_keyPressed.reset();
}
if (_mouseWheel) {
if (_mouseWheel < 0)
clickRes = shiftUp(SLOW);
else if (_mouseWheel > 0)
clickRes = shiftDown(SLOW);
_mouseWheel = 0;
if (clickRes == SHIFTED) {
_selectedGame = _firstText;
refreshNames = true;
}
}
bool haveButton = false;
Common::Point mouse = _system->getEventManager()->getMousePos();
for (cnt = 0; cnt < lookListLen; cnt++)
if (lookList[cnt]->isMouseOver(mouse.x, mouse.y)) {
buttonControl(lookList[cnt]);
haveButton = true;
if (_mouseClicked && lookList[cnt]->_onClick) {
_mouseClicked = false;
clickRes = handleClick(lookList[cnt]);
if (clickRes == SHIFTED) {
_selectedGame = _firstText;
refreshNames = true;
}
if (clickRes == NO_DISK_SPACE) {
displayMessage(0, "Could not save the game. (%s)", _saveFileMan->popErrorDesc().c_str());
quitPanel = true;
}
if ((clickRes == CANCEL_PRESSED) || (clickRes == GAME_RESTORED))
quitPanel = true;
if (clickRes == GAME_SAVED) {
saveDescriptions(saveGameTexts);
quitPanel = true;
}
if (clickRes == RESTORE_FAILED)
refreshAll = true;
}
}
if (_mouseClicked) {
if ((mouse.x >= GAME_NAME_X) && (mouse.x <= GAME_NAME_X + PAN_LINE_WIDTH) &&
(mouse.y >= GAME_NAME_Y) && (mouse.y <= GAME_NAME_Y + PAN_CHAR_HEIGHT * MAX_ON_SCREEN)) {
_selectedGame = (mouse.y - GAME_NAME_Y) / PAN_CHAR_HEIGHT + _firstText;
refreshNames = true;
}
}
if (!haveButton)
buttonControl(NULL);
}
for (cnt = 0; cnt < MAX_ON_SCREEN + 1; cnt++)
free(textSprites[cnt]);
if (allowSave) {
_system->setFeatureState(OSystem::kFeatureVirtualKeyboard, false);
}
return clickRes;
}
void Control::handleKeyPress(Common::KeyState kbd, Common::String &textBuf) {
if (kbd.keycode == Common::KEYCODE_BACKSPACE) { // backspace
if (textBuf.size() > 0)
textBuf.deleteLastChar();
} else if (kbd.ascii) {
// Cannot enter text wider than the save/load panel
if (_enteredTextWidth >= PAN_LINE_WIDTH - 10)
return;
// Cannot enter text longer than MAX_TEXT_LEN-1 chars, since
// the storage is only so big. Note: The code used to incorrectly
// allow up to MAX_TEXT_LEN, which caused an out of bounds access,
// overwriting the next entry in the list of savegames partially.
// This could be triggered by e.g. entering lots of periods ".".
if (textBuf.size() >= MAX_TEXT_LEN - 1)
return;
// Allow the key only if is a letter, a digit, or one of a selected
// list of extra characters
if (Common::isAlnum(kbd.ascii) || strchr(" ,().='-&+!?\"", kbd.ascii) != 0) {
textBuf += kbd.ascii;
}
}
}
void Control::setUpGameSprites(const Common::StringArray &saveGameNames, DataFileHeader **nameSprites, uint16 firstNum, uint16 selectedGame) {
char cursorChar[2] = "-";
DisplayedText textSpr;
if (!nameSprites[MAX_ON_SCREEN]) {
textSpr = _skyText->displayText(cursorChar, NULL, false, 15, 0);
nameSprites[MAX_ON_SCREEN] = (DataFileHeader *)textSpr.textData;
}
for (uint16 cnt = 0; cnt < MAX_ON_SCREEN; cnt++) {
char nameBuf[MAX_TEXT_LEN + 10];
sprintf(nameBuf, "%3d: %s", firstNum + cnt + 1, saveGameNames[firstNum + cnt].c_str());
if (firstNum + cnt == selectedGame)
textSpr = _skyText->displayText(nameBuf, NULL, false, PAN_LINE_WIDTH, 0);
else
textSpr = _skyText->displayText(nameBuf, NULL, false, PAN_LINE_WIDTH, 37);
nameSprites[cnt] = (DataFileHeader *)textSpr.textData;
if (firstNum + cnt == selectedGame) {
nameSprites[cnt]->flag = 1;
_enteredTextWidth = (uint16)textSpr.textWidth;
} else
nameSprites[cnt]->flag = 0;
}
}
void Control::showSprites(DataFileHeader **nameSprites, bool allowSave) {
ConResource *drawResource = new ConResource(NULL, 1, 0, 0, 0, 0, 0, _system, _screenBuf);
for (uint16 cnt = 0; cnt < MAX_ON_SCREEN; cnt++) {
drawResource->setSprite(nameSprites[cnt]);
drawResource->setXY(GAME_NAME_X, GAME_NAME_Y + cnt * PAN_CHAR_HEIGHT);
if (nameSprites[cnt]->flag) { // name is highlighted
for (uint16 cnty = GAME_NAME_Y + cnt * PAN_CHAR_HEIGHT; cnty < GAME_NAME_Y + (cnt + 1) * PAN_CHAR_HEIGHT - 1; cnty++)
memset(_screenBuf + cnty * GAME_SCREEN_WIDTH + GAME_NAME_X, 37, PAN_LINE_WIDTH);
drawResource->drawToScreen(WITH_MASK);
if (allowSave) {
drawResource->setSprite(nameSprites[MAX_ON_SCREEN]);
drawResource->setXY(GAME_NAME_X + _enteredTextWidth + 1, GAME_NAME_Y + cnt * PAN_CHAR_HEIGHT + 4);
drawResource->drawToScreen(WITH_MASK);
}
_system->copyRectToScreen(_screenBuf + (GAME_NAME_Y + cnt * PAN_CHAR_HEIGHT) * GAME_SCREEN_WIDTH + GAME_NAME_X, GAME_SCREEN_WIDTH, GAME_NAME_X, GAME_NAME_Y + cnt * PAN_CHAR_HEIGHT, PAN_LINE_WIDTH, PAN_CHAR_HEIGHT);
} else
drawResource->drawToScreen(NO_MASK);
}
delete drawResource;
}
void Control::loadDescriptions(Common::StringArray &savenames) {
savenames.resize(MAX_SAVE_GAMES);
Common::InSaveFile *inf;
inf = _saveFileMan->openForLoading("SKY-VM.SAV");
if (inf != NULL) {
char *tmpBuf = new char[MAX_SAVE_GAMES * MAX_TEXT_LEN];
char *tmpPtr = tmpBuf;
inf->read(tmpBuf, MAX_SAVE_GAMES * MAX_TEXT_LEN);
for (int i = 0; i < MAX_SAVE_GAMES; ++i) {
savenames[i] = tmpPtr;
tmpPtr += savenames[i].size() + 1;
}
delete inf;
delete[] tmpBuf;
}
}
bool Control::loadSaveAllowed() {
if (SkyEngine::_systemVars.systemFlags & SF_CHOOSING)
return false; // texts get lost during load/save, so don't allow it during choosing
if (Logic::_scriptVariables[SCREEN] >= 101)
return false; // same problem with LINC terminals
if ((Logic::_scriptVariables[SCREEN] >= 82) &&
(Logic::_scriptVariables[SCREEN] != 85) &&
(Logic::_scriptVariables[SCREEN] < 90))
return false; // don't allow saving in final rooms
return true;
}
int Control::displayMessage(const char *altButton, const char *message, ...) {
char buf[STRINGBUFLEN];
va_list va;
va_start(va, message);
vsnprintf(buf, STRINGBUFLEN, message, va);
va_end(va);
GUI::MessageDialog dialog(buf, "OK", altButton);
int result = dialog.runModal();
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
return result;
}
void Control::saveDescriptions(const Common::StringArray &list) {
Common::OutSaveFile *outf;
outf = _saveFileMan->openForSaving("SKY-VM.SAV");
bool ioFailed = true;
if (outf) {
for (uint16 cnt = 0; cnt < MAX_SAVE_GAMES; cnt++) {
outf->write(list[cnt].c_str(), list[cnt].size() + 1);
}
outf->finalize();
if (!outf->err())
ioFailed = false;
delete outf;
}
if (ioFailed)
displayMessage(NULL, "Unable to store Savegame names to file SKY-VM.SAV. (%s)", _saveFileMan->popErrorDesc().c_str());
}
void Control::doAutoSave() {
char fName[20];
if (SkyEngine::isCDVersion())
strcpy(fName, "SKY-VM-CD.ASD");
else
sprintf(fName, "SKY-VM%03d.ASD", SkyEngine::_systemVars.gameVersion);
uint16 res = saveGameToFile(false, fName);
if (res != GAME_SAVED)
displayMessage(0, "Unable to perform autosave to '%s'. (%s)", fName, _saveFileMan->popErrorDesc().c_str());
}
uint16 Control::saveGameToFile(bool fromControlPanel, const char *filename) {
char fName[20];
if (!filename) {
sprintf(fName,"SKY-VM.%03d", _selectedGame);
filename = fName;
}
Common::OutSaveFile *outf;
outf = _saveFileMan->openForSaving(filename);
if (outf == NULL)
return NO_DISK_SPACE;
if (!fromControlPanel) {
// These variables are usually set when entering the control panel,
// but not when using the GMM.
_savedCharSet = _skyText->giveCurrentCharSet();
_savedMouse = _skyMouse->giveCurrentMouseType();
}
uint8 *saveData = (uint8 *)malloc(0x20000);
uint32 fSize = prepareSaveData(saveData);
uint32 writeRes = outf->write(saveData, fSize);
outf->finalize();
if (outf->err())
writeRes = 0;
free(saveData);
delete outf;
return (writeRes == fSize) ? GAME_SAVED : NO_DISK_SPACE;
}
#define STOSD(ptr, val) { *(uint32 *)(ptr) = TO_LE_32(val); (ptr) += 4; }
#define STOSW(ptr, val) { *(uint16 *)(ptr) = TO_LE_16(val); (ptr) += 2; }
uint32 Control::prepareSaveData(uint8 *destBuf) {
uint32 cnt;
memset(destBuf, 0, 4); // space for data size
uint8 *destPos = destBuf + 4;
STOSD(destPos, SAVE_FILE_REVISION);
STOSD(destPos, SkyEngine::_systemVars.gameVersion);
STOSW(destPos, _skySound->_saveSounds[0]);
STOSW(destPos, _skySound->_saveSounds[1]);
STOSD(destPos, _skyMusic->giveCurrentMusic());
STOSD(destPos, _savedCharSet);
STOSD(destPos, _savedMouse);
STOSD(destPos, SkyEngine::_systemVars.currentPalette);
for (cnt = 0; cnt < 838; cnt++)
STOSD(destPos, Logic::_scriptVariables[cnt]);
uint32 *loadedFilesList = _skyDisk->giveLoadedFilesList();
for (cnt = 0; cnt < 60; cnt++)
STOSD(destPos, loadedFilesList[cnt]);
for (cnt = 0; cnt < _skyCompact->_numSaveIds; cnt++) {
uint16 numElems;
uint16 *rawCpt = (uint16 *)_skyCompact->fetchCptInfo(_skyCompact->_saveIds[cnt], &numElems, NULL, NULL);
for (uint16 elemCnt = 0; elemCnt < numElems; elemCnt++)
STOSW(destPos, rawCpt[elemCnt]);
}
*(uint32 *)destBuf = TO_LE_32(destPos - destBuf); // save size
return destPos - destBuf;
}
#undef STOSD
#undef STOSW
#define LODSD(strPtr, val) { val = READ_LE_UINT32(strPtr); (strPtr) += 4; }
#define LODSW(strPtr, val) { val = READ_LE_UINT16(strPtr); (strPtr) += 2; }
void Control::importOldMegaSet(uint8 **srcPos, MegaSet *mega) {
LODSW(*srcPos, mega->gridWidth);
LODSW(*srcPos, mega->colOffset);
LODSW(*srcPos, mega->colWidth);
LODSW(*srcPos, mega->lastChr);
}
void Control::importOldCompact(Compact* destCpt, uint8 **srcPos, uint16 numElems, uint16 type, char *name) {
uint16 saveType;
LODSW(*srcPos, saveType);
if ((saveType & (SAVE_EXT | SAVE_TURNP)) && (numElems < 54))
error("Cpt %s: Savedata doesn't match cpt size (%d)", name, numElems);
if ((saveType & SAVE_MEGA0) && (numElems < 54 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)", name, numElems);
if ((saveType & SAVE_MEGA1) && (numElems < 54 + 13 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)", name, numElems);
if ((saveType & SAVE_MEGA2) && (numElems < 54 + 13 + 13 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)", name, numElems);
if ((saveType & SAVE_MEGA3) && (numElems < 54 + 13 + 13 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)", name, numElems);
if (saveType & SAVE_GRAFX) {
uint16 graphType, target, pos;
LODSW(*srcPos, graphType);
LODSW(*srcPos, target);
LODSW(*srcPos, pos);
// convert to new compact system..
destCpt->grafixProgPos = pos;
if (graphType == OG_PTR_NULL)
destCpt->grafixProgId = 0;
else if (graphType == OG_AUTOROUTE)
destCpt->grafixProgId = destCpt->animScratchId;
else if (graphType == OG_COMPACT)
destCpt->grafixProgId = target;
else if (graphType == OG_TALKTABLE)
destCpt->grafixProgId = ((uint16 *)_skyCompact->fetchCpt(CPT_TALK_TABLE_LIST))[target];
else if (graphType == OG_COMPACTELEM)
destCpt->grafixProgId = *(uint16 *)_skyCompact->getCompactElem(destCpt, target);
else
error("Illegal GrafixProg type encountered for compact %s", name);
}
if (saveType & SAVE_TURNP) {
// basically impossible to import these. simply set it to end-of-turn and hope the script
// will take care of it.
destCpt->turnProgId = 0x13B;
destCpt->turnProgPos = 1;
uint16 turnSkipLen;
LODSW(*srcPos, turnSkipLen);
*srcPos += 2 * turnSkipLen;
} else if (numElems >= 49) {
destCpt->turnProgId = 0;
destCpt->turnProgPos = 0;
}
LODSW(*srcPos, destCpt->logic);
LODSW(*srcPos, destCpt->status);
LODSW(*srcPos, destCpt->sync);
LODSW(*srcPos, destCpt->screen);
LODSW(*srcPos, destCpt->place);
// getToTable
LODSW(*srcPos, destCpt->xcood);
LODSW(*srcPos, destCpt->ycood);
LODSW(*srcPos, destCpt->frame);
LODSW(*srcPos, destCpt->cursorText);
LODSW(*srcPos, destCpt->mouseOn);
LODSW(*srcPos, destCpt->mouseOff);
LODSW(*srcPos, destCpt->mouseClick);
LODSW(*srcPos, destCpt->mouseRelX);
LODSW(*srcPos, destCpt->mouseRelY);
LODSW(*srcPos, destCpt->mouseSizeX);
LODSW(*srcPos, destCpt->mouseSizeY);
LODSW(*srcPos, destCpt->actionScript);
LODSW(*srcPos, destCpt->upFlag);
LODSW(*srcPos, destCpt->downFlag);
LODSW(*srcPos, destCpt->getToFlag);
LODSW(*srcPos, destCpt->flag);
LODSW(*srcPos, destCpt->mood);
// grafixProg
LODSW(*srcPos, destCpt->offset);
LODSW(*srcPos, destCpt->mode);
LODSW(*srcPos, destCpt->baseSub);
LODSW(*srcPos, destCpt->baseSub_off);
if (saveType & SAVE_EXT) {
LODSW(*srcPos, destCpt->actionSub);
LODSW(*srcPos, destCpt->actionSub_off);
LODSW(*srcPos, destCpt->getToSub);
LODSW(*srcPos, destCpt->getToSub_off);
LODSW(*srcPos, destCpt->extraSub);
LODSW(*srcPos, destCpt->extraSub_off);
LODSW(*srcPos, destCpt->dir);
LODSW(*srcPos, destCpt->stopScript);
LODSW(*srcPos, destCpt->miniBump);
LODSW(*srcPos, destCpt->leaving);
LODSW(*srcPos, destCpt->atWatch);
LODSW(*srcPos, destCpt->atWas);
LODSW(*srcPos, destCpt->alt);
LODSW(*srcPos, destCpt->request);
LODSW(*srcPos, destCpt->spWidth_xx);
LODSW(*srcPos, destCpt->spColor);
LODSW(*srcPos, destCpt->spTextId);
LODSW(*srcPos, destCpt->spTime);
LODSW(*srcPos, destCpt->arAnimIndex);
// turnProg
LODSW(*srcPos, destCpt->waitingFor);
LODSW(*srcPos, destCpt->arTargetX);
LODSW(*srcPos, destCpt->arTargetY);
// animScratch
LODSW(*srcPos, destCpt->megaSet);
if (saveType & SAVE_MEGA0)
importOldMegaSet(srcPos, &(destCpt->megaSet0));
if (saveType & SAVE_MEGA1)
importOldMegaSet(srcPos, &(destCpt->megaSet1));
if (saveType & SAVE_MEGA2)
importOldMegaSet(srcPos, &(destCpt->megaSet2));
if (saveType & SAVE_MEGA3)
importOldMegaSet(srcPos, &(destCpt->megaSet3));
}
}
uint16 Control::parseSaveData(uint8 *srcBuf) {
uint32 reloadList[60];
uint32 cnt;
uint8 *srcPos = srcBuf;
uint32 size;
uint32 saveRev;
uint32 gameVersion;
LODSD(srcPos, size);
LODSD(srcPos, saveRev);
if (saveRev > SAVE_FILE_REVISION) {
displayMessage(0, "Unknown save file revision (%d)", saveRev);
return RESTORE_FAILED;
} else if (saveRev < OLD_SAVEGAME_TYPE) {
displayMessage(0, "This savegame version is unsupported.");
return RESTORE_FAILED;
}
LODSD(srcPos, gameVersion);
if (gameVersion != SkyEngine::_systemVars.gameVersion) {
if ((!SkyEngine::isCDVersion()) || (gameVersion < 365)) { // cd versions are compatible
displayMessage(NULL, "This savegame was created by\n"
"Beneath a Steel Sky v0.0%03d\n"
"It cannot be loaded by this version (v0.0%3d)",
gameVersion, SkyEngine::_systemVars.gameVersion);
return RESTORE_FAILED;
}
}
SkyEngine::_systemVars.systemFlags |= SF_GAME_RESTORED;
LODSW(srcPos, _skySound->_saveSounds[0]);
LODSW(srcPos, _skySound->_saveSounds[1]);
_skySound->restoreSfx();
uint32 music, mouseType, palette;
LODSD(srcPos, music);
LODSD(srcPos, _savedCharSet);
LODSD(srcPos, mouseType);
LODSD(srcPos, palette);
_skyLogic->parseSaveData((uint32 *)srcPos);
srcPos += NUM_SKY_SCRIPTVARS * sizeof(uint32);
for (cnt = 0; cnt < 60; cnt++)
LODSD(srcPos, reloadList[cnt]);
if (saveRev == SAVE_FILE_REVISION) {
for (cnt = 0; cnt < _skyCompact->_numSaveIds; cnt++) {
uint16 numElems;
uint16 *rawCpt = (uint16 *)_skyCompact->fetchCptInfo(_skyCompact->_saveIds[cnt], &numElems, NULL, NULL);
for (uint16 elemCnt = 0; elemCnt < numElems; elemCnt++)
LODSW(srcPos, rawCpt[elemCnt]);
}
} else { // import old savegame revision
for (cnt = 0; cnt < (uint32)(_skyCompact->_numSaveIds - 2); cnt++) {
uint16 numElems;
uint16 type;
char name[128];
uint16 *rawCpt = (uint16 *)_skyCompact->fetchCptInfo(_skyCompact->_saveIds[cnt], &numElems, &type, name);
if (type == COMPACT) {
importOldCompact((Compact *)rawCpt, &srcPos, numElems, type, name);
} else if (type == ROUTEBUF) {
assert(numElems == 32);
for (uint32 elemCnt = 0; elemCnt < numElems; elemCnt++)
LODSW(srcPos, rawCpt[elemCnt]);
}
}
uint16 *rawCpt = (uint16 *)_skyCompact->fetchCpt(0xBF);
for (cnt = 0; cnt < 3; cnt++)
LODSW(srcPos, rawCpt[cnt]);
rawCpt = (uint16 *)_skyCompact->fetchCpt(0xC2);
for (cnt = 0; cnt < 13; cnt++)
LODSW(srcPos, rawCpt[cnt]);
}
// make sure all text compacts are off
for (cnt = CPT_TEXT_1; cnt <= CPT_TEXT_11; cnt++)
_skyCompact->fetchCpt(cnt)->status = 0;
if (srcPos - srcBuf != (int32)size)
error("Restore failed! Savegame data = %lu bytes. Expected size: %d", (long)(srcPos-srcBuf), size);
_skyDisk->refreshFilesList(reloadList);
SkyEngine::_systemVars.currentMusic = (uint16)music;
if (!(SkyEngine::_systemVars.systemFlags & SF_MUS_OFF))
_skyMusic->startMusic((uint16)music);
_savedMouse = (uint16)mouseType;
SkyEngine::_systemVars.currentPalette = palette; // will be set when doControlPanel ends
return GAME_RESTORED;
}
uint16 Control::restoreGameFromFile(bool autoSave) {
char fName[20];
if (autoSave) {
if (SkyEngine::isCDVersion())
strcpy(fName, "SKY-VM-CD.ASD");
else
sprintf(fName, "SKY-VM%03d.ASD", SkyEngine::_systemVars.gameVersion);
} else
sprintf(fName,"SKY-VM.%03d", _selectedGame);
Common::InSaveFile *inf;
inf = _saveFileMan->openForLoading(fName);
if (inf == NULL) {
return RESTORE_FAILED;
}
uint32 infSize = inf->readUint32LE();
if (infSize < 4) infSize = 4;
uint8 *saveData = (uint8 *)malloc(infSize);
*(uint32 *)saveData = TO_LE_32(infSize);
if (inf->read(saveData+4, infSize-4) != infSize-4) {
displayMessage(NULL, "Can't read from file '%s'", fName);
free(saveData);
delete inf;
return RESTORE_FAILED;
}
uint16 res = parseSaveData(saveData);
SkyEngine::_systemVars.pastIntro = true;
delete inf;
free(saveData);
return res;
}
uint16 Control::quickXRestore(uint16 slot) {
uint16 result;
initPanel();
_mouseClicked = false;
_savedCharSet = _skyText->giveCurrentCharSet();
_skyText->fnSetFont(2);
_system->copyRectToScreen(_screenBuf, GAME_SCREEN_WIDTH, 0, 0, FULL_SCREEN_WIDTH, FULL_SCREEN_HEIGHT);
_system->updateScreen();
if (SkyEngine::_systemVars.gameVersion < 331)
_skyScreen->setPalette(60509);
else
_skyScreen->setPalette(60510);
_savedMouse = _skyMouse->giveCurrentMouseType();
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
if (slot == 0)
result = restoreGameFromFile(true);
else {
_selectedGame = slot - 1;
result = restoreGameFromFile(false);
}
if (result == GAME_RESTORED) {
memset(_skyScreen->giveCurrent(), 0, GAME_SCREEN_WIDTH * GAME_SCREEN_HEIGHT);
_skyScreen->showScreen(_skyScreen->giveCurrent());
_skyScreen->forceRefresh();
_skyScreen->setPaletteEndian((uint8 *)_skyCompact->fetchCpt(SkyEngine::_systemVars.currentPalette));
} else {
memset(_screenBuf, 0, FULL_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
_system->copyRectToScreen(_screenBuf, GAME_SCREEN_WIDTH, 0, 0, GAME_SCREEN_WIDTH, FULL_SCREEN_HEIGHT);
_system->updateScreen();
_skyScreen->showScreen(_skyScreen->giveCurrent());
_skyScreen->setPalette(60111);
}
_skyMouse->spriteMouse(_savedMouse, 0, 0);
_skyText->fnSetFont(_savedCharSet);
removePanel();
return result;
}
void Control::restartGame() {
if (SkyEngine::_systemVars.gameVersion <= 267)
return; // no restart for floppy demo
uint8 *resetData = _skyCompact->createResetData((uint16)SkyEngine::_systemVars.gameVersion);
parseSaveData((uint8 *)resetData);
free(resetData);
_skyScreen->forceRefresh();
memset(_skyScreen->giveCurrent(), 0, GAME_SCREEN_WIDTH * FULL_SCREEN_HEIGHT);
_skyScreen->showScreen(_skyScreen->giveCurrent());
_skyScreen->setPaletteEndian((uint8 *)_skyCompact->fetchCpt(SkyEngine::_systemVars.currentPalette));
_skyMouse->spriteMouse(_savedMouse, 0, 0);
SkyEngine::_systemVars.pastIntro = true;
}
void Control::delay(unsigned int amount) {
Common::Event event;
uint32 start = _system->getMillis();
uint32 cur = start;
_keyPressed.reset();
do {
Common::EventManager *eventMan = _system->getEventManager();
while (eventMan->pollEvent(event)) {
switch (event.type) {
case Common::EVENT_KEYDOWN:
_keyPressed = event.kbd;
break;
case Common::EVENT_MOUSEMOVE:
if (!(SkyEngine::_systemVars.systemFlags & SF_MOUSE_LOCKED))
_skyMouse->mouseMoved(event.mouse.x, event.mouse.y);
break;
case Common::EVENT_LBUTTONDOWN:
_mouseClicked = true;
break;
case Common::EVENT_LBUTTONUP:
_mouseClicked = false;
break;
case Common::EVENT_RBUTTONDOWN:
break;
case Common::EVENT_WHEELUP:
_mouseWheel = -1;
break;
case Common::EVENT_WHEELDOWN:
_mouseWheel = 1;
break;
default:
break;
}
}
uint this_delay = 20; // 1?
#ifdef _WIN32_WCE
this_delay = 10;
#endif
if (this_delay > amount)
this_delay = amount;
if (this_delay > 0) _system->delayMillis(this_delay);
cur = _system->getMillis();
} while (cur < start + amount);
}
void Control::showGameQuitMsg() {
_skyText->fnSetFont(0);
uint8 *textBuf1 = (uint8 *)malloc(GAME_SCREEN_WIDTH * 14 + sizeof(DataFileHeader));
uint8 *textBuf2 = (uint8 *)malloc(GAME_SCREEN_WIDTH * 14 + sizeof(DataFileHeader));
uint8 *screenData;
if (_skyScreen->sequenceRunning())
_skyScreen->stopSequence();
screenData = _skyScreen->giveCurrent();
_skyText->displayText(_quitTexts[SkyEngine::_systemVars.language * 2 + 0], textBuf1, true, 320, 255);
_skyText->displayText(_quitTexts[SkyEngine::_systemVars.language * 2 + 1], textBuf2, true, 320, 255);
uint8 *curLine1 = textBuf1 + sizeof(DataFileHeader);
uint8 *curLine2 = textBuf2 + sizeof(DataFileHeader);
uint8 *targetLine = screenData + GAME_SCREEN_WIDTH * 80;
for (uint8 cnty = 0; cnty < PAN_CHAR_HEIGHT; cnty++) {
for (uint16 cntx = 0; cntx < GAME_SCREEN_WIDTH; cntx++) {
if (curLine1[cntx])
targetLine[cntx] = curLine1[cntx];
if (curLine2[cntx])
(targetLine + 24 * GAME_SCREEN_WIDTH)[cntx] = curLine2[cntx];
}
curLine1 += GAME_SCREEN_WIDTH;
curLine2 += GAME_SCREEN_WIDTH;
targetLine += GAME_SCREEN_WIDTH;
}
_skyScreen->halvePalette();
_skyScreen->showScreen(screenData);
free(textBuf1);
free(textBuf2);
}
char Control::_quitTexts[16][35] = {
"Game over player one",
"BE VIGILANT",
"Das Spiel ist aus.",
"SEI WACHSAM",
"Game over joueur 1",
"SOYEZ VIGILANTS",
"Game over player one",
"BE VIGILANT",
"SPELET \x2Ar SLUT, Agent 1.",
"VAR VAKSAM",
"Game over giocatore 1",
"SIATE VIGILANTI",
"Fim de jogo para o jogador um",
"BE VIGILANT",
"Game over player one",
"BE VIGILANT"
};
uint8 Control::_crossImg[594] = {
0xFF, 0xFF, 0xFF, 0xFF, 0x09, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x0B, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0x4F, 0x4D, 0x61,
0x01, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0x08, 0x4E, 0x53, 0x50, 0x4F, 0x0C, 0x4D, 0x4E, 0x51, 0x58, 0x58, 0x54, 0x4E, 0x08, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4E, 0x54, 0x58, 0x50, 0x4E, 0xFF,
0xFF, 0xFF, 0xFF, 0x50, 0x4E, 0x54, 0x58, 0x58, 0x54, 0x4E, 0x0C, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0x61, 0x53, 0x58, 0x54, 0x4E, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0x50, 0x4E, 0x55, 0x58, 0x58, 0x53, 0x4E, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x05, 0x51, 0x58, 0x58,
0x51, 0x50, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4F, 0x51, 0x58,
0x59, 0x58, 0x51, 0x61, 0xFF, 0xFF, 0x61, 0x54, 0x58, 0x58, 0x4F, 0x52, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4E, 0x55, 0x58, 0x58, 0x57, 0x4E,
0x4F, 0x56, 0x58, 0x57, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4F, 0x51, 0x58, 0x58, 0x58, 0x58, 0x58, 0x54, 0x4E, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0x6A, 0x4F, 0x58, 0x58, 0x58, 0x58, 0x52, 0x06, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x04, 0x54, 0x58,
0x58, 0x58, 0x58, 0x57, 0x53, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x04, 0x09, 0x58, 0x58, 0x58, 0x57, 0x56, 0x58, 0x58, 0x58,
0x57, 0x4F, 0x0A, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0x61, 0x55, 0x58, 0x58, 0x58, 0x58, 0x4E, 0x64, 0x57, 0x58, 0x58, 0x58, 0x58, 0x53, 0x61, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0x57, 0x58, 0x58, 0x58, 0x58,
0x50, 0xFF, 0xFF, 0x4E, 0x57, 0x58, 0x58, 0x58, 0x58, 0x56, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0x58, 0x58, 0x58, 0x58, 0x58, 0x53, 0x09, 0xFF, 0xFF, 0xFF, 0x4E,
0x57, 0x58, 0x58, 0x58, 0x58, 0x58, 0x0B, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0x57,
0x58, 0x58, 0x58, 0x58, 0x56, 0x4E, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0x58, 0x58, 0x58, 0x58,
0x58, 0x57, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x04, 0x55, 0x58, 0x58, 0x58, 0x58, 0x58, 0x4E,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4F, 0x58, 0x58, 0x58, 0x58, 0x4E, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0x06, 0x58, 0x58, 0x58, 0x58, 0x58, 0x52, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0x0C, 0x52, 0x58, 0x58, 0x51, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0x56, 0x58,
0x58, 0x58, 0x58, 0x56, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0x56,
0x58, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x0F, 0x4D, 0x4D, 0x51, 0x56, 0x58, 0x58, 0x50, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4F, 0x54, 0x09, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x4E, 0x50, 0x54, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x06, 0x50, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF, 0xFF, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
0xFF, 0x61, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0xFF,
0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x61, 0xFF, 0xFF, 0xFF,
0xFF, 0xFF
};
} // End of namespace Sky