scummvm/sky/control.cpp
2005-05-10 23:17:38 +00:00

1648 lines
53 KiB
C++

/* ScummVM - Scumm Interpreter
* Copyright (C) 2003-2005 The ScummVM project
*
* 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* $Header$
*
*/
#include "stdafx.h"
#include "common/config-manager.h"
#include "common/file.h"
#include "common/system.h"
#include "common/savefile.h"
#include "common/util.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(void) {
free(_oldScreen);
}
void TextResource::flushForRedraw(void) {
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) {
doMask = true;
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(void) {
if (_textData)
free(_textData);
delete _statusText;
}
void ControlStatus::setToText(const char *newText) {
char tmpLine[256];
strcpy(tmpLine, newText);
if (_textData) {
_statusText->flushForRedraw();
free(_textData);
}
displayText_t 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) {
_skyText->getText(textNum);
if (_textData)
free(_textData);
displayText_t disText = _skyText->displayText(NULL, true, STATUS_WIDTH, 255);
_textData = (dataFileHeader *)disText.textData;
_statusText->setSprite(_textData);
_statusText->drawToScreen(WITH_MASK);
}
void ControlStatus::drawToScreen(void) {
_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(void) {
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 _savePanButton; delete _dosPanButton;
delete _restartPanButton; delete _fxPanButton;
delete _musicPanButton; delete _bodge;
delete _yesNo; delete _text;
delete _statusBar;
}
void Control::initPanel(void) {
_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);
if (SkyEngine::_systemVars.systemFlags & SF_FX_OFF)
_fxPanButton = createResource( _sprites.button, 3, 0, 58, 99, 87, TOGGLE_FX, MAINPANEL);
else
_fxPanButton = createResource( _sprites.button, 3, 2, 58, 99, 86, 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);
}
void Control::buttonControl(ConResource *pButton) {
char autoSave[] = "Restore Autosave";
if (pButton == NULL) {
if (_textSprite) free(_textSprite);
_textSprite = NULL;
_curButtonText = 0;
_text->setSprite(NULL);
return ;
}
if (_curButtonText != pButton->_text) {
if (_textSprite) free(_textSprite);
_textSprite = NULL;
_curButtonText = pButton->_text;
if (pButton->_text) {
displayText_t textRes;
if (pButton->_text == 0xFFFF) { // text for autosave button
textRes = _skyText->displayText(autoSave, NULL, false, PAN_LINE_WIDTH, 255);
} else {
_skyText->getText(pButton->_text);
textRes = _skyText->displayText(NULL, false, PAN_LINE_WIDTH, 255);
}
_textSprite = (dataFileHeader *)textRes.textData;
_text->setSprite(_textSprite);
} else _text->setSprite(NULL);
}
_text->setXY(_mouseX + 12, _mouseY - 16);
}
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(void) {
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(void) {
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(0);
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
_lastButton = -1;
_curButtonText = 0;
_textSprite = NULL;
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(void) {
if (SkyEngine::isDemo()) {
return ;
}
initPanel();
_savedCharSet = _skyText->giveCurrentCharSet();
_skyText->fnSetFont(0);
_skyScreen->clearScreen();
if (SkyEngine::_systemVars.gameVersion < 331)
_skyScreen->setPalette(60509);
else
_skyScreen->setPalette(60510);
drawMainPanel();
_savedMouse = _skyMouse->giveCurrentMouseType();
_skyMouse->spriteMouse(MOUSE_NORMAL, 0, 0);
bool quitPanel = false;
_lastButton = -1;
_curButtonText = 0;
_textSprite = NULL;
uint16 clickRes = 0;
while (!quitPanel) {
_text->drawToScreen(WITH_MASK);
_system->updateScreen();
_mouseClicked = false;
delay(50);
if (_keyPressed == 27) { // escape pressed
_mouseClicked = false;
quitPanel = true;
}
bool haveButton = false;
for (uint8 lookCnt = 0; lookCnt < 9; lookCnt++) {
if (_controlPanLookList[lookCnt]->isMouseOver(_mouseX, _mouseY)) {
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);
_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();
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:
return toggleFx(pButton);
case TOGGLE_MS:
animClick(pButton);
toggleMusic();
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)) {
showGameQuitMsg(false);
delay(1500);
_system->quit();
}
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) {
displayText_t 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);
if ((_mouseY >= 83) && (_mouseY <= 110)) {
if ((_mouseX >= 77) && (_mouseX <= 114)) { // over 'yes'
wantMouse = MOUSE_CROSS;
if (_mouseClicked) {
quitPanel = true;
retVal = true;
}
} else if ((_mouseX >= 156) && (_mouseX <= 193)) { // over 'no'
wantMouse = MOUSE_CROSS;
if (_mouseClicked) {
quitPanel = true;
retVal = false;
}
} else
wantMouse = MOUSE_NORMAL;
} else
wantMouse = MOUSE_NORMAL;
}
_mouseClicked = false;
if (dlgTextDat)
free(dlgTextDat);
delete dlgText;
return retVal;
}
uint16 Control::doMusicSlide(void) {
int ofsY = _slide2->_y - _mouseY;
uint8 volume;
while (_mouseClicked) {
delay(50);
int newY = ofsY + _mouseY;
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(void) {
int ofsY = _slide->_y - _mouseY;
uint16 speedDelay = _slide->_y - (MPNL_Y + 93);
speedDelay *= SPEED_MULTIPLY;
speedDelay += 2;
while (_mouseClicked) {
delay(50);
int newY = ofsY + _mouseY;
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;
}
uint16 Control::toggleFx(ConResource *pButton) {
SkyEngine::_systemVars.systemFlags ^= SF_FX_OFF;
if (SkyEngine::_systemVars.systemFlags & SF_FX_OFF) {
pButton->_curSprite = 0;
pButton->_text = 0x7000 + 87;
_statusBar->setToText(0x7000 + 87);
} else {
pButton->_curSprite = 2;
pButton->_text = 0x7000 + 86;
_statusBar->setToText(0x7000 + 86);
}
pButton->drawToScreen(WITH_MASK);
buttonControl(pButton);
_system->updateScreen();
return TOGGLED;
}
uint16 Control::toggleText(void) {
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.set("subtitles", (flags & SF_ALLOW_TEXT) != 0);
SkyEngine::_systemVars.systemFlags |= flags;
drawTextCross(flags);
_system->updateScreen();
return TOGGLED;
}
void Control::toggleMusic(void) {
if (SkyEngine::_systemVars.systemFlags & SF_MUS_OFF) {
SkyEngine::_systemVars.systemFlags &= ~SF_MUS_OFF;
_skyMusic->startMusic(SkyEngine::_systemVars.currentMusic);
_statusBar->setToText(0x7000 + 88);
} else {
SkyEngine::_systemVars.systemFlags |= SF_MUS_OFF;
_skyMusic->startMusic(0);
_statusBar->setToText(0x7000 + 89);
}
}
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(void) {
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 = 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);
uint8 *saveGameTexts = (uint8 *)malloc(MAX_SAVE_GAMES * MAX_TEXT_LEN);
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) {
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 == 27) { // escape pressed
_mouseClicked = false;
clickRes = CANCEL_PRESSED;
quitPanel = true;
} else if ((_keyPressed == 13) || (_keyPressed == 15)) {
clickRes = handleClick(lookList[0]);
if (clickRes == GAME_SAVED)
saveDescriptions(saveGameTexts);
quitPanel = true;
_mouseClicked = false;
_keyPressed = 0;
} if (allowSave && _keyPressed) {
handleKeyPress(_keyPressed, _selectedGame * MAX_TEXT_LEN + saveGameTexts);
refreshNames = true;
_keyPressed = 0;
}
bool haveButton = false;
for (cnt = 0; cnt < lookListLen; cnt++)
if (lookList[cnt]->isMouseOver(_mouseX, _mouseY)) {
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 game in directory '%s'", _saveFileMan->getSavePath());
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 ((_mouseX >= GAME_NAME_X) && (_mouseX <= GAME_NAME_X + PAN_LINE_WIDTH) &&
(_mouseY >= GAME_NAME_Y) && (_mouseY <= GAME_NAME_Y + PAN_CHAR_HEIGHT * MAX_ON_SCREEN)) {
_selectedGame = (_mouseY - 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]);
free(saveGameTexts);
if (allowSave) {
_system->setFeatureState(OSystem::kFeatureVirtualKeyboard, false);
}
return clickRes;
}
bool Control::checkKeyList(uint8 key) {
static const uint8 charList[14] = " ,().='-&+!?\"";
for (uint chCnt = 0; chCnt < ARRAYSIZE(charList); chCnt++)
if (charList[chCnt] == key) return true;
return false;
}
void Control::handleKeyPress(uint8 key, uint8 *textBuf) {
if (key == 8) { // backspace
for (uint8 cnt = 0; cnt < 6; cnt++)
if (!textBuf[cnt]) return;
while (textBuf[1])
textBuf++;
textBuf[0] = 0;
} else {
if (_enteredTextWidth >= PAN_LINE_WIDTH - 10)
return;
if (((key >= 'A') && (key <= 'Z')) || ((key >= 'a') && (key <= 'z')) ||
((key >= '0') && (key <= '9')) || checkKeyList(key)) {
uint8 strLen = 0;
while (textBuf[0]) {
textBuf++;
strLen++;
}
if (strLen < MAX_TEXT_LEN) {
textBuf[0] = key;
textBuf[1] = 0;
}
}
}
}
void Control::setUpGameSprites(uint8 *nameBuf, dataFileHeader **nameSprites, uint16 firstNum, uint16 selectedGame) {
char cursorChar[2] = "-";
nameBuf += firstNum * MAX_TEXT_LEN;
displayText_t 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++) {
if (firstNum + cnt == selectedGame)
textSpr = _skyText->displayText((char*)nameBuf, NULL, false, PAN_LINE_WIDTH, 0);
else
textSpr = _skyText->displayText((char*)nameBuf, NULL, false, PAN_LINE_WIDTH, 37);
nameBuf += MAX_TEXT_LEN;
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(uint8 *destBuf) {
memset(destBuf, 0, MAX_SAVE_GAMES * MAX_TEXT_LEN);
Common::InSaveFile *inf;
inf = _saveFileMan->openForLoading("SKY-VM.SAV");
if (inf != NULL) {
uint8 *tmpBuf = (uint8 *)malloc(MAX_SAVE_GAMES * MAX_TEXT_LEN);
inf->read(tmpBuf, MAX_SAVE_GAMES * MAX_TEXT_LEN);
uint8 *destPos = destBuf;
uint8 *inPos = tmpBuf;
for (uint16 cnt = 0; cnt < MAX_SAVE_GAMES; cnt++) {
sprintf((char*)destPos,"%3d: ", cnt + 1);
uint8 nameCnt = 0;
while ((destPos[nameCnt + 5] = inPos[nameCnt]))
nameCnt++;
destPos += MAX_TEXT_LEN;
inPos += nameCnt + 1;
}
free(tmpBuf);
delete inf;
} else {
uint8 *destPos = destBuf;
for (uint16 cnt = 0; cnt < MAX_SAVE_GAMES; cnt++) {
sprintf((char*)destPos,"%3d: ", cnt + 1);
destPos += MAX_TEXT_LEN;
}
}
}
bool Control::loadSaveAllowed(void) {
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(uint8 *srcBuf) {
uint8 *tmpBuf = (uint8 *)malloc(MAX_SAVE_GAMES * MAX_TEXT_LEN);
uint8 *tmpPos = tmpBuf;
uint8 *srcPos = srcBuf;
for (uint16 cnt = 0; cnt < MAX_SAVE_GAMES; cnt++) {
uint8 namePos = 5;
while (srcPos[namePos]) {
if (srcPos[namePos] != '_') {
*tmpPos = srcPos[namePos];
tmpPos++;
}
namePos++;
}
*tmpPos = 0;
tmpPos++;
srcPos += MAX_TEXT_LEN;
}
Common::OutSaveFile *outf;
outf = _saveFileMan->openForSaving("SKY-VM.SAV");
if (outf != NULL) {
outf->write(tmpBuf, tmpPos - tmpBuf);
delete outf;
}
free(tmpBuf);
}
void Control::doAutoSave(void) {
char fName[20];
if (SkyEngine::isCDVersion())
strcpy(fName, "SKY-VM-CD.ASD");
else
sprintf(fName, "SKY-VM%03d.ASD", SkyEngine::_systemVars.gameVersion);
Common::OutSaveFile *outf;
outf = _saveFileMan->openForSaving(fName);
if (outf == NULL) {
displayMessage(0, "Unable to create autosave file '%s' in directory '%s'", fName, _saveFileMan->getSavePath());
return;
}
uint8 *saveData = (uint8 *)malloc(0x20000);
uint32 fSize = prepareSaveData(saveData);
if (outf->write(saveData, fSize) != fSize)
displayMessage(0, "Unable to write autosave file '%s' in directory '%s'. Disk full?", fName, _saveFileMan->getSavePath());
delete outf;
free(saveData);
}
uint16 Control::saveGameToFile(void) {
char fName[20];
sprintf(fName,"SKY-VM.%03d", _selectedGame);
Common::OutSaveFile *outf;
outf = _saveFileMan->openForSaving(fName);
if (outf == NULL) {
return NO_DISK_SPACE;
}
uint8 *saveData = (uint8 *)malloc(0x20000);
uint32 fSize = prepareSaveData(saveData);
if (outf->write(saveData, fSize) != fSize) {
free(saveData);
delete outf;
return NO_DISK_SPACE;
}
delete outf;
free(saveData);
return GAME_SAVED;
}
#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)!\n", name, numElems);
if ((saveType & SAVE_MEGA0) && (numElems < 54 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)!\n", name, numElems);
if ((saveType & SAVE_MEGA1) && (numElems < 54 + 13 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)!\n", name, numElems);
if ((saveType & SAVE_MEGA2) && (numElems < 54 + 13 + 13 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)!\n", name, numElems);
if ((saveType & SAVE_MEGA3) && (numElems < 54 + 13 + 13 + 13))
error("Cpt %s: Savedata doesn't match cpt size (%d)!\n", 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->spColour);
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]);
}
if (srcPos - srcBuf != (int32)size)
error("Restore failed! Savegame data = %d bytes. Expected size: %d", 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(0);
_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(void) {
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) {
OSystem::Event event;
uint32 start = _system->getMillis();
uint32 cur = start;
_keyPressed = 0; //reset
do {
while (_system->pollEvent(event)) {
switch (event.type) {
case OSystem::EVENT_KEYDOWN:
// Make sure backspace works right (this fixes a small issue on OS X)
if (event.kbd.keycode == 8)
_keyPressed = 8;
else
_keyPressed = (byte)event.kbd.ascii;
break;
case OSystem::EVENT_MOUSEMOVE:
_mouseX = event.mouse.x;
_mouseY = event.mouse.y;
break;
case OSystem::EVENT_LBUTTONDOWN:
#ifdef __PALM_OS__
_mouseX = event.mouse.x;
_mouseY = event.mouse.y;
#endif
_mouseClicked = true;
break;
case OSystem::EVENT_LBUTTONUP:
_mouseClicked = false;
break;
case OSystem::EVENT_RBUTTONDOWN:
break;
case OSystem::EVENT_QUIT:
if (!SkyEngine::_systemVars.quitting)
showGameQuitMsg(false);
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(bool useScreen) {
SkyEngine::_systemVars.quitting = true;
_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 (useScreen) {
if (_skyScreen->sequenceRunning())
_skyScreen->stopSequence();
screenData = _skyScreen->giveCurrent();
} else
screenData = _screenBuf;
_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);
// __tom (FIXME): This is a poor method of turning
// off music. ~GmMusic, ~AdlibMusic, and ~MT32Music
// should do it themselves so the appropriate MIDI
// controller events (e.g. 123/'All Notes Off') can
// be sent. However, that requires a re-write of
// other code and for now this fixes hanging notes
// on MT-32 + other external GMIDI synths.
_skyMusic->stopMusic();
delay(1500);
ConfMan.flushToDisk();
_system->quit();
}
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