/* ScummVM - Scumm Interpreter * Copyright (C) 2006 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. * * $URL$ * $Id$ * */ #include "parallaction/parallaction.h" #include "parallaction/disk.h" #include "parallaction/inventory.h" #include "parallaction/graphics.h" #include "parallaction/zone.h" #include "common/savefile.h" #include "gui/widget.h" #include "gui/ListWidget.h" #include "gui/message.h" /* Nippon Safes savefiles are called 'game.0' to 'game.9'. The game conventiently allows users to * give meanigful name to savegames, and it uses an extra file 'savegame' to keep track of these * names. * * This re-implementation disposes of the extra file to make moving of savefiles easier. Debugging * will benefit from this, too. The savegame name is written as the first line of the savefile * itself, thus breaking compatibility with the original version. Who cares anyway? */ namespace Parallaction { extern char _gameNames[][20]; void Parallaction::doLoadGame(uint16 slot) { _introSarcData3 = 200; _introSarcData2 = 1; char filename[PATH_LEN]; sprintf(filename, "game.%i", slot); Common::InSaveFile *f = _saveFileMan->openForLoading(filename); if (!f) return; char s[30]; f->readLine(s, 29); f->readLine(_vm->_characterName, 15); f->readLine(_location, 15); strcat(_location, "."); f->readLine(s, 15); _firstPosition._x = atoi(s); f->readLine(s, 15); _firstPosition._y = atoi(s); f->readLine(s, 15); _score = atoi(s); f->readLine(s, 15); _commandFlags = atoi(s); f->readLine(s, 15); _engineFlags |= kEngineQuit; freeZones(_zones._next); freeNodeList(_zones._next); _zones._next = NULL; _engineFlags &= ~kEngineQuit; _numLocations = atoi(s); uint16 _si; for (_si = 0; _si < _numLocations; _si++) { f->readLine(s, 20); s[strlen(s)] = '\0'; strcpy(_locationNames[_si], s); f->readLine(s, 15); _localFlags[_si] = atoi(s); } _locationNames[_si][0] = '\0'; for (_si = 0; _si < 30; _si++) { f->readLine(s, 15); _inventory[_si]._id = atoi(s); f->readLine(s, 15); _inventory[_si]._index = atoi(s); } delete f; _engineFlags &= ~kEngineMiniDonna; if (!scumm_stricmp(_vm->_characterName, "donnatras")) { _engineFlags |= kEngineMiniDonna; strcpy(_vm->_characterName, "donna"); } if (!scumm_stricmp(_vm->_characterName, "minidonnatras")) { _engineFlags |= kEngineMiniDonna; strcpy(_vm->_characterName, "minidonna"); } if (_vm->_characterName[0] == 'm') { strcpy(filename, _vm->_characterName+4); } else { strcpy(filename, _vm->_characterName); } strcat(filename, ".tab"); freeTable(_objectsNames); initTable(filename, _objectsNames); refreshInventory(_vm->_characterName); parseLocation("common"); _archive.close(); strcat(_location, _vm->_characterName); _engineFlags |= kEngineChangeLocation; #if 0 printf("game loaded: character %s, location %s\n", _vm->_characterName, _location); #endif return; } void Parallaction::doSaveGame(uint16 slot, const char* name) { char path[PATH_LEN]; sprintf(path, "game.%i", slot); Common::OutSaveFile *f = _saveFileMan->openForSaving(path); if (f == 0) { char buf[32]; sprintf(buf, "Can't save game in slot %i\n\n(%s)", slot, path); GUI::MessageDialog dialog(buf); dialog.runModal(); return; } char s[30]; if (!name || name[0] == '\0') { sprintf(s, "default_%i", slot); } else { strncpy(s, name, 29); } f->writeString(s); f->writeString("\n"); if (_engineFlags & kEngineMiniDonna) { sprintf(s, "%stras\n", _vm->_characterName); } else { sprintf(s, "%s\n", _vm->_characterName); } f->writeString(s); sprintf(s, "%s\n", _saveData1); f->writeString(s); sprintf(s, "%d\n", _yourself._zone.pos._position._x); f->writeString(s); sprintf(s, "%d\n", _yourself._zone.pos._position._y); f->writeString(s); sprintf(s, "%d\n", _score); f->writeString(s); sprintf(s, "%u\n", _commandFlags); f->writeString(s); sprintf(s, "%d\n", _numLocations); f->writeString(s); for (uint16 _si = 0; _si < _numLocations; _si++) { sprintf(s, "%s\n%u\n", _locationNames[_si], _localFlags[_si]); f->writeString(s); } for (uint16 _si = 0; _si < 30; _si++) { sprintf(s, "%u\n%d\n", _inventory[_si]._id, _inventory[_si]._index); f->writeString(s); } delete f; refreshInventory(_vm->_characterName); return; } // FIXME: only to be implemented for text mode selection void textModeFunc1( char *) { } #if 0 int16 selectSaveFile(uint16 arg_0) { REGISTERS pregs; pregs._ax = (void*)(uint32)dos_videomode; int86(0x10, &pregs); // window(0 ,0, 23, 79); puts(" FILE NAME "); if (arg_0 != 0) { printf("(Use \x18 \x19 \x10 to edit then press enter)\n\n"); } else { puts("\n"); } uint16 _si; for (_si = 0; _si < 11; _si++) { printf(" %s \n", _gameNames[_si]); } int16 _di = editSaveFileName(3, 13, 0, 12, 1, arg_0); pregs._ax = (void*)0x93; int86(0x10, &pregs); set_vga_mode_x(0); byte palette[PALETTE_SIZE]; _vm->_graphics->getBlackPalette(palette); _vm->_graphics->setPalette(palette); _vm->_graphics->copyScreen(Graphics::kBit2, Graphics::kBitBack); _vm->_graphics->copyScreen(Graphics::kBitBack, Graphics::kBitFront); if (arg_0 != 0) { _vm->_graphics->setPalette(_palette); } _vm->_graphics->swapBuffers(); return _si; } int16 editSaveFileName(uint16 arg_0, uint16 arg_2, uint16 arg_4, uint16 arg_6, uint16 arg_8, uint16 arg_A) { uint16 _di = arg_0; uint16 _si = _di; uint16 v4 = _di; uint16 v1 = 0; do { set_cursor(_si, arg_4); while (v1 == 0) { int16 v6 = get_kb(); byte _al = v6 & 0xFF; if (_al == 0) { _al = (v6 & 0xFF00) >> 8; if (_al == 'H') { if (_si<=_di) _si = arg_2; else _si = _si - arg_8; v1 = 1; } else if (_al == 'M') { } else if (_al == 'P') { if (_si>=arg_2) _si = _di; else _si = _si + arg_8; v1 = 1; } if (_si != 0xD && arg_A != 0) { set_cursor(_si, arg_4+1); v1 = 1; textModeFunc1( _gameNames[(_si - _di)/arg_8] ); return (_si - _di)/arg_8 + 1; } } else if (_al == 0xD) return (_si - _di)/arg_8 + 1; } v1 = 0; set_cursor(v4, arg_4); v4 = _si; } while (true); return 0; } #endif #if 0 void loadGame() { uint16 v6 = 0; uint16 v4 = 0; uint16 v2 = 0; uint16 _bx; FILE* stream = fopen("savegame", "r"); if (stream) { for (uint16 _si = 0; _si < 10; _si++) { fgets(_gameNames[_si], 18, stream); _bx = strlen(_gameNames[_si]) - 1; _gameNames[_si][_bx] = '\0'; } fclose(stream); } int16 _di = selectSaveFile( 0 ); if (_di > 10) return; _introSarcData3 = 200; _introSarcData2 = 1; _moveSarcExaZones[0] = 0; _moveSarcZones[0] = 0; char filename[PATH_LEN]; sprintf(filename, "game.%d", _di); stream = fopen(filename, "r"); if (!stream) return; fgets(_vm->_characterName, 15, stream); _vm->_characterName[strlen(_vm->_characterName)] = '\0'; fgets(_location, 15, stream); _location[strlen(_location)] = '.'; char s[20]; fgets(s, 15, stream); _firstPosition._x = atoi(s); fgets(s, 15, stream); _firstPosition._y = atoi(s); fgets(s, 15, stream); _score = atoi(s); fgets(s, 15, stream); _commandFlags = atoi(s); fgets(s, 15, stream); _engineFlags |= kEngineQuit; freeZones(_zones._next); freeNodeList(_zones._next); _zones._next = NULL; _engineFlags &= ~kEngineQuit; _numLocations = atoi(s); uint16 _si; for (_si = 0; _si < _numLocations; _si++) { fgets(s, 20, stream); s[strlen(s)] = '\0'; strcpy(_locationNames[_si], s); fgets(s, 15, stream); _localFlags[_si] = atoi(s); } _locationNames[_si] = '\0'; for (_si = 0; _si < 30; _si++) { fgets(s, 15, stream); _inventory[_si]._id = atoi(s); fgets(s, 15, stream); _inventory[_si]._index = atoi(s); } fclose(stream); _engineFlags &= ~kEngineMiniDonna; if (!scumm_stricmp(_vm->_characterName, "donnatras")) { _engineFlags |= kEngineMiniDonna; strcpy(_vm->_characterName, "donna"); } if (!scumm_stricmp(_vm->_characterName, "minidonnatras")) { _engineFlags |= kEngineMiniDonna; strcpy(_vm->_characterName, "minidonna"); } if (_vm->_characterName[0] == 'm') { strcpy(filename, _vm->_characterName+4); } else { strcpy(filename, _vm->_characterName); } strcat(filename, ".tab"); freeTable(_objectsNames); initTable(filename, _objectsNames); refreshInventory(); parseLocation("common"); closeArchive(); strcat(_location, _vm->_characterName); _engineFlags |= kEngineChangeLocation; return; } int16 get_kb() { REGISTERS pregs; pregs._ax = 0; int86(0x16, &pregs); return (int16)(int32)pregs._ax; } #endif #if 0 void saveGame() { // strcpy(v30, asc_1C91A); uint16 v8 = 0, v6 = 0; int16 v4 = -1; int16 v2 = 0; if (!scumm_stricmp(_location, "caveau")) return; FILE* stream = fopen("savegame", "r"); if (stream) { for (uint16 _si = 0; _si < 10; _si++) { fgets(_gameNames[_si], 18, stream); uint16 _bx = strlen(_gameNames[_si]) - 1; _gameNames[_si][_bx] = '\0'; } fclose(stream); } int16 _di = selectSaveFile( 1 ); if (_di > 10) return; stream = fopen("savegame", "w"); if (stream) { for (uint16 _si = 0; _si < 10; _si++) { fputs(_gameNames[_si], stream); fputs("\n", stream); } fclose(stream); } char path[PATH_LEN]; sprintf(path, "game.%d", _di); stream = fopen(path, "w"); if (!stream) return; if (_engineFlags & kEngineMiniDonna) { fprintf(stream, "%stras\n", _vm->_characterName); } else { fprintf(stream, "%s\n", _vm->_characterName); } fprintf(stream, "%s\n", _saveData1); fprintf(stream, "%d\n", _yourself._zone.pos._position._x); fprintf(stream, "%d\n", _yourself._zone.pos._position._y); fprintf(stream, "%d\n", _score); fprintf(stream, "%ld\n", _commandFlags); fprintf(stream, "%d\n", _numLocations); for (uint16 _si = 0; _si < _numLocations; _si++) { fprintf(stream, "%s\n%ld\n", _locationNames[_si], _localFlags[_si]); } for (uint16 _si = 0; _si < 30; _si++) { fprintf(stream, "%ld\n%d\n", _inventory[_si]._id, _inventory[_si]._index); } fclose(stream); refreshInventory(); return; } #endif enum { kSaveCmd = 'SAVE', kLoadCmd = 'LOAD', kPlayCmd = 'PLAY', kOptionsCmd = 'OPTN', kHelpCmd = 'HELP', kAboutCmd = 'ABOU', kQuitCmd = 'QUIT', kChooseCmd = 'CHOS' }; SaveLoadChooser::SaveLoadChooser(const String &title, const String &buttonLabel, Parallaction *engine) : Dialog("scummsaveload"), _list(0), _chooseButton(0), _gfxWidget(0), _vm(engine) { // _drawingHints |= GUI::THEME_HINT_SPECIAL_COLOR; new GUI::StaticTextWidget(this, "scummsaveload_title", title); // Add choice list _list = new GUI::ListWidget(this, "scummsaveload_list"); _list->setEditable(true); _list->setNumberingMode(GUI::kListNumberingOne); _container = new GUI::ContainerWidget(this, 0, 0, 10, 10); _container->setHints(GUI::THEME_HINT_USE_SHADOW); _gfxWidget = new GUI::GraphicsWidget(this, 0, 0, 10, 10); _date = new GUI::StaticTextWidget(this, 0, 0, 10, 10, "No date saved", GUI::kTextAlignCenter); _time = new GUI::StaticTextWidget(this, 0, 0, 10, 10, "No time saved", GUI::kTextAlignCenter); _playtime = new GUI::StaticTextWidget(this, 0, 0, 10, 10, "No playtime saved", GUI::kTextAlignCenter); // Buttons new GUI::ButtonWidget(this, "scummsaveload_cancel", "Cancel", GUI::kCloseCmd, 0); _chooseButton = new GUI::ButtonWidget(this, "scummsaveload_choose", buttonLabel, kChooseCmd, 0); _chooseButton->setEnabled(false); } SaveLoadChooser::~SaveLoadChooser() { } const Common::String &SaveLoadChooser::getResultString() const { return _list->getSelectedString(); } void SaveLoadChooser::setList(const StringList& list) { _list->setList(list); } int SaveLoadChooser::runModal() { if (_gfxWidget) _gfxWidget->setGfx(0); int ret = GUI::Dialog::runModal(); return ret; } void SaveLoadChooser::handleCommand(GUI::CommandSender *sender, uint32 cmd, uint32 data) { int selItem = _list->getSelected(); switch (cmd) { case GUI::kListItemActivatedCmd: case GUI::kListItemDoubleClickedCmd: if (selItem >= 0) { if (!getResultString().empty()) { _list->endEditMode(); setResult(selItem); close(); } } break; case kChooseCmd: _list->endEditMode(); setResult(selItem); close(); break; case GUI::kListSelectionChangedCmd: { if (_gfxWidget) { updateInfos(); } _list->startEditMode(); // Disable button if nothing is selected, or (in load mode) if an empty // list item is selected. We allow choosing an empty item in save mode // because we then just assign a default name. _chooseButton->setEnabled(selItem >= 0 && (!getResultString().empty())); _chooseButton->draw(); } break; case GUI::kCloseCmd: setResult(-1); default: Dialog::handleCommand(sender, cmd, data); } } void SaveLoadChooser::reflowLayout() { _container->setFlags(GUI::WIDGET_INVISIBLE); _gfxWidget->setFlags(GUI::WIDGET_INVISIBLE); _date->setFlags(GUI::WIDGET_INVISIBLE); _time->setFlags(GUI::WIDGET_INVISIBLE); _playtime->setFlags(GUI::WIDGET_INVISIBLE); Dialog::reflowLayout(); } void SaveLoadChooser::updateInfos() { /* int selItem = _list->getSelected(); Graphics::Surface *thumb; thumb = _vm->loadThumbnailFromSlot(selItem + 1); if (thumb) { _gfxWidget->setGfx(thumb); _gfxWidget->useAlpha(256); thumb->free(); } else { _gfxWidget->setGfx(-1, -1, _fillR, _fillG, _fillB); } delete thumb; _gfxWidget->draw(); InfoStuff infos; memset(&infos, 0, sizeof(InfoStuff)); char buffer[32]; if (_vm->loadInfosFromSlot(selItem + 1, &infos)) { snprintf(buffer, 32, "Date: %.2d.%.2d.%.4d", (infos.date >> 24) & 0xFF, (infos.date >> 16) & 0xFF, infos.date & 0xFFFF); _date->setLabel(buffer); _date->draw(); snprintf(buffer, 32, "Time: %.2d:%.2d", (infos.time >> 8) & 0xFF, infos.time & 0xFF); _time->setLabel(buffer); _time->draw(); int minutes = infos.playtime / 60; int hours = minutes / 60; minutes %= 60; snprintf(buffer, 32, "Playtime: %.2d:%.2d", hours & 0xFF, minutes & 0xFF); _playtime->setLabel(buffer); _playtime->draw(); } else { snprintf(buffer, 32, "No date saved"); _date->setLabel(buffer); _date->draw(); snprintf(buffer, 32, "No time saved"); _time->setLabel(buffer); _time->draw(); snprintf(buffer, 32, "No playtime saved"); _playtime->setLabel(buffer); _playtime->draw(); } */ } int Parallaction::buildSaveFileList(Common::StringList& l) { char name[16]; char buf[30]; int count = 0; for (int i = 0; i < 10; i++) { sprintf(name, "game.%i", i); buf[0] = '\0'; Common::InSaveFile *f = _saveFileMan->openForLoading(name); if (f) { f->readLine(buf, 29); delete f; count++; } l.push_back(buf); } return count; } int Parallaction::selectSaveFile(uint16 arg_0, const char* caption, const char* button) { SaveLoadChooser* slc = new SaveLoadChooser(caption, button, _vm); Common::StringList l; /*int count = */ buildSaveFileList(l); slc->setList(l); int idx = slc->runModal(); if (idx >= 0) { _saveFileName = slc->getResultString(); } delete slc; return idx; } void Parallaction::loadGame() { int _di = selectSaveFile( 0, "Load file", "Load" ); if (_di == -1) { return; } doLoadGame(_di); GUI::TimedMessageDialog dialog("Loading game...", 1500); dialog.runModal(); changeCursor(kCursorArrow); return; } void Parallaction::saveGame() { // strcpy(v30, asc_1C91A); if (!scumm_stricmp(_location, "caveau")) return; int slot = selectSaveFile( 1, "Save file", "Save" ); if (slot == -1) { return; } doSaveGame(slot, _saveFileName.c_str()); GUI::TimedMessageDialog dialog("Saving game...", 1500); dialog.runModal(); return; } } // namespace Parallaction