Removed obsolete file

svn-id: r32101
This commit is contained in:
Filippos Karapetis 2008-05-14 07:17:27 +00:00
parent 8c5d09bcf7
commit c3bdf1c75f

View File

@ -1,866 +0,0 @@
/* 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.
*
* $URL$
* $Id$
*
*/
#include "common/endian.h"
#include "common/util.h"
#include "common/events.h"
#include "graphics/cursorman.h"
#include "made/made.h"
#include "made/resource.h"
#include "made/database.h"
#include "made/screen.h"
#include "made/script.h"
#include "made/pmvplayer.h"
#include "made/scriptfuncs.h"
#include "made/music.h"
namespace Made {
int16 ScriptFunctions::callFunction(uint16 index, int16 argc, int16 *argv) {
if (index >= _externalFuncs.size()) {
// TODO: ERROR!
return 0;
}
fflush(stdout);
//g_system->delayMillis(2000);
return (*_externalFuncs[index])(argc, argv);
}
typedef Common::Functor2Mem<int16, int16*, int16, ScriptFunctionsRtz> ExternalFuncRtz;
#define External(x) ExternalFuncRtz(this, &ScriptFunctionsRtz::x)
void ScriptFunctionsRtz::setupExternalsTable() {
static const ExternalFuncRtz externalsTable[] = {
External(o1_SYSTEM),
External(o1_INITGRAF),
External(o1_RESTOREGRAF),
External(o1_DRAWPIC),
External(o1_CLS),
External(o1_SHOWPAGE),
External(o1_EVENT),
External(o1_EVENTX),
External(o1_EVENTY),
External(o1_EVENTKEY),
External(o1_VISUALFX),
External(o1_PLAYSND),
External(o1_PLAYMUS),
External(o1_STOPMUS),
External(o1_ISMUS),
External(o1_TEXTPOS),
External(o1_FLASH),
External(o1_PLAYNOTE),
External(o1_STOPNOTE),
External(o1_PLAYTELE),
External(o1_STOPTELE),
External(o1_HIDECURS),
External(o1_SHOWCURS),
External(o1_MUSICBEAT),
External(o1_SCREENLOCK),
External(o1_ADDSPRITE),
External(o1_FREEANIM),
External(o1_DRAWSPRITE),
External(o1_ERASESPRITES),
External(o1_UPDATESPRITES),
External(o1_GETTIMER),
External(o1_SETTIMER),
External(o1_RESETTIMER),
External(o1_ALLOCTIMER),
External(o1_FREETIMER),
External(o1_PALETTELOCK),
External(o1_FONT),
External(o1_DRAWTEXT),
External(o1_HOMETEXT),
External(o1_TEXTRECT),
External(o1_TEXTXY),
External(o1_DROPSHADOW),
External(o1_TEXTCOLOR),
External(o1_OUTLINE),
External(o1_LOADCURSOR),
External(o1_SETGROUND),
External(o1_RESTEXT),
External(o1_CLIPAREA),
External(o1_SETCLIP),
External(o1_ISSND),
External(o1_STOPSND),
External(o1_PLAYVOICE),
External(o1_CDPLAY),
External(o1_STOPCD),
External(o1_CDSTATUS),
External(o1_CDTIME),
External(o1_CDPLAYSEG),
External(o1_PRINTF),
External(o1_MONOCLS),
External(o1_SNDENERGY),
External(o1_CLEARTEXT),
External(o1_ANIMTEXT),
External(o1_TEXTWIDTH),
External(o1_PLAYMOVIE),
External(o1_LOADSND),
External(o1_LOADMUS),
External(o1_LOADPIC),
External(o1_MUSICVOL),
External(o1_RESTARTEVENTS),
External(o1_PLACESPRITE),
External(o1_PLACETEXT),
External(o1_DELETECHANNEL),
External(o1_CHANNELTYPE),
External(o1_SETSTATE),
External(o1_SETLOCATION),
External(o1_SETCONTENT),
External(o1_EXCLUDEAREA),
External(o1_SETEXCLUDE),
External(o1_GETSTATE),
External(o1_PLACEANIM),
External(o1_SETFRAME),
External(o1_GETFRAME),
External(o1_GETFRAMECOUNT),
External(o1_PICWIDTH),
External(o1_PICHEIGHT),
External(o1_SOUNDRATE),
External(o1_DRAWANIMPIC),
External(o1_LOADANIM),
External(o1_READTEXT),
External(o1_READMENU),
External(o1_DRAWMENU),
External(o1_MENUCOUNT),
External(o1_SAVEGAME),
External(o1_LOADGAME),
External(o1_GAMENAME),
External(o1_SHAKESCREEN),
External(o1_PLACEMENU),
External(o1_SETVOLUME),
External(o1_WHATSYNTH),
External(o1_SLOWSYSTEM)
};
for (int i = 0; i < ARRAYSIZE(externalsTable); ++i)
_externalFuncs.push_back(&externalsTable[i]);
}
#undef External
int16 ScriptFunctionsRtz::o1_SYSTEM(int16 argc, int16 *argv) {
// This opcode is empty.
return 0;
}
int16 ScriptFunctionsRtz::o1_INITGRAF(int16 argc, int16 *argv) {
// This opcode is empty.
return 0;
}
int16 ScriptFunctionsRtz::o1_RESTOREGRAF(int16 argc, int16 *argv) {
// This opcode is empty.
return 0;
}
int16 ScriptFunctionsRtz::o1_DRAWPIC(int16 argc, int16 *argv) {
return _vm->_screen->drawPic(argv[4], argv[3], argv[2], argv[1], argv[0]);
}
int16 ScriptFunctionsRtz::o1_CLS(int16 argc, int16 *argv) {
_vm->_screen->clearScreen();
return 0;
}
int16 ScriptFunctionsRtz::o1_SHOWPAGE(int16 argc, int16 *argv) {
_vm->_screen->show();
return 0;
}
int16 ScriptFunctionsRtz::o1_EVENT(int16 argc, int16 *argv) {
Common::Event event;
Common::EventManager *eventMan = g_system->getEventManager();
int16 eventNum = 0;
if (eventMan->pollEvent(event)) {
switch (event.type) {
case Common::EVENT_MOUSEMOVE:
_vm->_eventMouseX = event.mouse.x;
_vm->_eventMouseY = event.mouse.y;
break;
case Common::EVENT_LBUTTONDOWN:
eventNum = 1;
break;
case Common::EVENT_RBUTTONDOWN:
eventNum = 3;
break;
case Common::EVENT_KEYDOWN:
_vm->_eventKey = event.kbd.ascii;
eventNum = 5;
break;
case Common::EVENT_QUIT:
// TODO: Exit more gracefully.
g_system->quit();
break;
default:
break;
}
}
_vm->_system->updateScreen();
return eventNum;
}
int16 ScriptFunctionsRtz::o1_EVENTX(int16 argc, int16 *argv) {
return _vm->_eventMouseX;
}
int16 ScriptFunctionsRtz::o1_EVENTY(int16 argc, int16 *argv) {
return _vm->_eventMouseY;
}
int16 ScriptFunctionsRtz::o1_EVENTKEY(int16 argc, int16 *argv) {
return _vm->_eventKey;
}
int16 ScriptFunctionsRtz::o1_VISUALFX(int16 argc, int16 *argv) {
_vm->_screen->setVisualEffectNum(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_PLAYSND(int16 argc, int16 *argv) {
int soundNum = argv[0];
bool loop = false;
if (argc > 1) {
soundNum = argv[1];
loop = (argv[0] == 1);
}
if (soundNum > 0) {
if (!_vm->_mixer->isSoundHandleActive(_audioStreamHandle)) {
_vm->_mixer->playInputStream(Audio::Mixer::kPlainSoundType, &_audioStreamHandle,
_vm->_res->getSound(soundNum)->getAudioStream(_vm->_soundRate, loop));
}
}
return 0;
}
int16 ScriptFunctionsRtz::o1_PLAYMUS(int16 argc, int16 *argv) {
int16 musicNum = argv[0];
if (musicNum > 0) {
XmidiResource *xmidi = _vm->_res->getXmidi(musicNum);
_vm->_music->play(xmidi);
_vm->_res->freeResource(xmidi);
}
return 0;
}
int16 ScriptFunctionsRtz::o1_STOPMUS(int16 argc, int16 *argv) {
_vm->_music->stop();
return 0;
}
int16 ScriptFunctionsRtz::o1_ISMUS(int16 argc, int16 *argv) {
if (_vm->_music->isPlaying())
return 1;
else
return 0;
}
int16 ScriptFunctionsRtz::o1_TEXTPOS(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_TEXTPOS");
// This seems to be some kind of low-level opcode.
// The original engine calls int 10h to set the VGA cursor position.
return 0;
}
int16 ScriptFunctionsRtz::o1_FLASH(int16 argc, int16 *argv) {
_vm->_screen->flash(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_PLAYNOTE(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_PLAYNOTE");
return 0;
}
int16 ScriptFunctionsRtz::o1_STOPNOTE(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_STOPNOTE");
return 0;
}
int16 ScriptFunctionsRtz::o1_PLAYTELE(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_PLAYTELE");
return 0;
}
int16 ScriptFunctionsRtz::o1_STOPTELE(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_STOPTELE");
return 0;
}
int16 ScriptFunctionsRtz::o1_HIDECURS(int16 argc, int16 *argv) {
_vm->_system->showMouse(false);
return 0;
}
int16 ScriptFunctionsRtz::o1_SHOWCURS(int16 argc, int16 *argv) {
_vm->_system->showMouse(true);
return 0;
}
int16 ScriptFunctionsRtz::o1_MUSICBEAT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_MUSICBEAT");
return 0;
}
int16 ScriptFunctionsRtz::o1_SCREENLOCK(int16 argc, int16 *argv) {
_vm->_screen->setScreenLock(argv[0] != 0);
return 0;
}
int16 ScriptFunctionsRtz::o1_ADDSPRITE(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_ADDSPRITE");
//_vm->_screen->addSprite(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_FREEANIM(int16 argc, int16 *argv) {
_vm->_screen->clearChannels();
return 0;
}
int16 ScriptFunctionsRtz::o1_DRAWSPRITE(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_DRAWSPRITE");
return 0;
}
int16 ScriptFunctionsRtz::o1_ERASESPRITES(int16 argc, int16 *argv) {
_vm->_screen->clearChannels();
return 0;
}
int16 ScriptFunctionsRtz::o1_UPDATESPRITES(int16 argc, int16 *argv) {
_vm->_screen->updateSprites();
return 0;
}
int16 ScriptFunctionsRtz::o1_GETTIMER(int16 argc, int16 *argv) {
return _vm->getTimer(argv[0]);
}
int16 ScriptFunctionsRtz::o1_SETTIMER(int16 argc, int16 *argv) {
_vm->setTimer(argv[1], argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_RESETTIMER(int16 argc, int16 *argv) {
_vm->resetTimer(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_ALLOCTIMER(int16 argc, int16 *argv) {
int16 timerNum = _vm->allocTimer();
return timerNum;
}
int16 ScriptFunctionsRtz::o1_FREETIMER(int16 argc, int16 *argv) {
_vm->freeTimer(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_PALETTELOCK(int16 argc, int16 *argv) {
_vm->_screen->setPaletteLock(argv[0] != 0);
return 0;
}
int16 ScriptFunctionsRtz::o1_FONT(int16 argc, int16 *argv) {
_vm->_screen->setFont(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_DRAWTEXT(int16 argc, int16 *argv) {
Object *obj = _vm->_dat->getObject(argv[argc - 1]);
const char *text = obj->getString();
_vm->_screen->printText(text);
return 0;
}
int16 ScriptFunctionsRtz::o1_HOMETEXT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_HOMETEXT");
return 0;
}
int16 ScriptFunctionsRtz::o1_TEXTRECT(int16 argc, int16 *argv) {
int16 x1 = CLIP<int16>(argv[4], 1, 318);
int16 y1 = CLIP<int16>(argv[3], 1, 198);
int16 x2 = CLIP<int16>(argv[2], 1, 318);
int16 y2 = CLIP<int16>(argv[1], 1, 198);
//int16 textValue = argv[0];
// TODO: textValue
_vm->_screen->setTextRect(Common::Rect(x1, y1, x2, y2));
return 0;
}
int16 ScriptFunctionsRtz::o1_TEXTXY(int16 argc, int16 *argv) {
int16 x = CLIP<int16>(argv[1], 1, 318);
int16 y = CLIP<int16>(argv[0], 1, 198);
_vm->_screen->setTextXY(x, y);
return 0;
}
int16 ScriptFunctionsRtz::o1_DROPSHADOW(int16 argc, int16 *argv) {
// if the drop shadow color is -1, then text drop shadow is disabled
// when font drop shadow is enabled, outline is disabled
_vm->_screen->setDropShadowColor(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_TEXTCOLOR(int16 argc, int16 *argv) {
_vm->_screen->setTextColor(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_OUTLINE(int16 argc, int16 *argv) {
// if the outline color is -1, then text outline is disabled
// when font outline is enabled, drop shadow is disabled
_vm->_screen->setOutlineColor(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_LOADCURSOR(int16 argc, int16 *argv) {
PictureResource *flex = _vm->_res->getPicture(argv[2]);
Graphics::Surface *surf = flex->getPicture();
CursorMan.replaceCursor((const byte *)surf->pixels, surf->w, surf->h, argv[1], argv[0], 0);
CursorMan.showMouse(true);
_vm->_res->freeResource(flex);
return 0;
}
int16 ScriptFunctionsRtz::o1_SETGROUND(int16 argc, int16 *argv) {
_vm->_screen->setGround(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_RESTEXT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_RESTEXT");
return 0;
}
int16 ScriptFunctionsRtz::o1_CLIPAREA(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_CLIPAREA");
return 0;
}
int16 ScriptFunctionsRtz::o1_SETCLIP(int16 argc, int16 *argv) {
_vm->_screen->setClip(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_ISSND(int16 argc, int16 *argv) {
if (_vm->_mixer->isSoundHandleActive(_audioStreamHandle))
return 1;
else
return 0;
}
int16 ScriptFunctionsRtz::o1_STOPSND(int16 argc, int16 *argv) {
_vm->_mixer->stopHandle(_audioStreamHandle);
return 0;
}
int16 ScriptFunctionsRtz::o1_PLAYVOICE(int16 argc, int16 *argv) {
if (argv[0] > 0) {
if (!_vm->_mixer->isSoundHandleActive(_voiceStreamHandle)) {
_vm->_mixer->playInputStream(Audio::Mixer::kPlainSoundType, &_voiceStreamHandle,
_vm->_res->getSound(argv[0])->getAudioStream(_vm->_soundRate, false));
}
}
return 0;
}
int16 ScriptFunctionsRtz::o1_CDPLAY(int16 argc, int16 *argv) {
// This one is called loads of times, so it has been commented out to reduce spam
//warning("Unimplemented opcode: o1_CDPLAY");
return 0;
}
int16 ScriptFunctionsRtz::o1_STOPCD(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_STOPCD");
return 0;
}
int16 ScriptFunctionsRtz::o1_CDSTATUS(int16 argc, int16 *argv) {
// This one is called loads of times, so it has been commented out to reduce spam
//warning("Unimplemented opcode: o1_CDSTATUS");
return 0;
}
int16 ScriptFunctionsRtz::o1_CDTIME(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_CDTIME");
return 0;
}
int16 ScriptFunctionsRtz::o1_CDPLAYSEG(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_CDPLAYSEG");
return 0;
}
int16 ScriptFunctionsRtz::o1_PRINTF(int16 argc, int16 *argv) {
Object *obj = _vm->_dat->getObject(argv[argc - 1]);
const char *text = obj->getString();
debug(4, "--> text = %s", text);
return 0;
}
int16 ScriptFunctionsRtz::o1_MONOCLS(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_MONOCLS");
return 0;
}
int16 ScriptFunctionsRtz::o1_SNDENERGY(int16 argc, int16 *argv) {
// This is called while in-game voices are played
// Not sure what it's used for
// -> It's used to animate mouths when NPCs are talking
// Commented out to reduce spam
//warning("Unimplemented opcode: o1_SNDENERGY");
return 0;
}
int16 ScriptFunctionsRtz::o1_CLEARTEXT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_CLEARTEXT");
return 1;
}
int16 ScriptFunctionsRtz::o1_ANIMTEXT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_ANIMTEXT");
return 0;
}
int16 ScriptFunctionsRtz::o1_TEXTWIDTH(int16 argc, int16 *argv) {
int16 width = 0;
if (argv[1] > 0) {
Object *obj = _vm->_dat->getObject(argv[1]);
const char *text = obj->getString();
width = _vm->_screen->getTextWidth(argv[0], text);
}
return width;
}
int16 ScriptFunctionsRtz::o1_PLAYMOVIE(int16 argc, int16 *argv) {
const char *movieName = _vm->_dat->getObject(argv[1])->getString();
_vm->_pmvPlayer->play(movieName);
return 0;
}
int16 ScriptFunctionsRtz::o1_LOADSND(int16 argc, int16 *argv) {
SoundResource *sound = _vm->_res->getSound(argv[0]);
if (sound) {
_vm->_res->freeResource(sound);
return 1;
}
return 0;
}
int16 ScriptFunctionsRtz::o1_LOADMUS(int16 argc, int16 *argv) {
XmidiResource *xmidi = _vm->_res->getXmidi(argv[0]);
if (xmidi) {
_vm->_res->freeResource(xmidi);
return 1;
}
return 0;
}
int16 ScriptFunctionsRtz::o1_LOADPIC(int16 argc, int16 *argv) {
PictureResource *flex = _vm->_res->getPicture(argv[0]);
if (flex) {
_vm->_res->freeResource(flex);
return 1;
}
return 0;
}
int16 ScriptFunctionsRtz::o1_MUSICVOL(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_MUSICVOL");
return 0;
}
int16 ScriptFunctionsRtz::o1_RESTARTEVENTS(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_RESTARTEVENTS");
return 0;
}
int16 ScriptFunctionsRtz::o1_PLACESPRITE(int16 argc, int16 *argv) {
return _vm->_screen->placeSprite(argv[3], argv[2], argv[1], argv[0]);
}
int16 ScriptFunctionsRtz::o1_PLACETEXT(int16 argc, int16 *argv) {
return _vm->_screen->placeText(argv[6], argv[5], argv[4], argv[3], argv[2], argv[1], argv[0]);
}
int16 ScriptFunctionsRtz::o1_DELETECHANNEL(int16 argc, int16 *argv) {
_vm->_screen->deleteChannel(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_CHANNELTYPE(int16 argc, int16 *argv) {
return _vm->_screen->getChannelType(argv[0]);
}
int16 ScriptFunctionsRtz::o1_SETSTATE(int16 argc, int16 *argv) {
_vm->_screen->setChannelState(argv[1], argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_SETLOCATION(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_SETLOCATION");
return 0;
}
int16 ScriptFunctionsRtz::o1_SETCONTENT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_SETCONTENT");
return 0;
}
int16 ScriptFunctionsRtz::o1_EXCLUDEAREA(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_EXCLUDEAREA");
return 0;
}
int16 ScriptFunctionsRtz::o1_SETEXCLUDE(int16 argc, int16 *argv) {
_vm->_screen->setExclude(argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_GETSTATE(int16 argc, int16 *argv) {
return _vm->_screen->getChannelState(argv[0]);
}
int16 ScriptFunctionsRtz::o1_PLACEANIM(int16 argc, int16 *argv) {
return _vm->_screen->placeAnim(argv[4], argv[3], argv[2], argv[1], argv[0]);
}
int16 ScriptFunctionsRtz::o1_SETFRAME(int16 argc, int16 *argv) {
_vm->_screen->setAnimFrame(argv[1], argv[0]);
return 0;
}
int16 ScriptFunctionsRtz::o1_GETFRAME(int16 argc, int16 *argv) {
return _vm->_screen->getAnimFrame(argv[0]);
}
int16 ScriptFunctionsRtz::o1_GETFRAMECOUNT(int16 argc, int16 *argv) {
debug(4, "anim = %04X\n", argv[0]);
int16 frameCount = _vm->_screen->getAnimFrameCount(argv[0]);
debug(4, "frameCount = %04X\n", frameCount);
return frameCount;
}
int16 ScriptFunctionsRtz::o1_PICWIDTH(int16 argc, int16 *argv) {
int16 width = 0;
PictureResource *flex = _vm->_res->getPicture(argv[0]);
if (flex) {
width = flex->getPicture()->w;
_vm->_res->freeResource(flex);
}
return width;
}
int16 ScriptFunctionsRtz::o1_PICHEIGHT(int16 argc, int16 *argv) {
int16 height = 0;
PictureResource *flex = _vm->_res->getPicture(argv[0]);
if (flex) {
height = flex->getPicture()->h;
_vm->_res->freeResource(flex);
}
return height;
}
int16 ScriptFunctionsRtz::o1_SOUNDRATE(int16 argc, int16 *argv) {
_vm->_soundRate = argv[0];
return 1;
}
int16 ScriptFunctionsRtz::o1_DRAWANIMPIC(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_DRAWANIMPIC");
return 0;
}
int16 ScriptFunctionsRtz::o1_LOADANIM(int16 argc, int16 *argv) {
AnimationResource *anim = _vm->_res->getAnimation(argv[0]);
if (anim) {
_vm->_res->freeResource(anim);
return 1;
}
return 0;
}
int16 ScriptFunctionsRtz::o1_READTEXT(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_READTEXT");
return 0;
}
int16 ScriptFunctionsRtz::o1_READMENU(int16 argc, int16 *argv) {
int16 objectIndex = argv[2];
int16 menuIndex = argv[1];
int16 textIndex = argv[0];
int16 length = 0;
MenuResource *menu = _vm->_res->getMenu(menuIndex);
if (menu) {
const char *text = menu->getString(textIndex);
debug(4, "objectIndex = %04X; text = %s\n", objectIndex, text);
Object *obj = _vm->_dat->getObject(objectIndex);
obj->setString(text);
_vm->_res->freeResource(menu);
if (text)
length = strlen(text);
}
return length;
}
int16 ScriptFunctionsRtz::o1_DRAWMENU(int16 argc, int16 *argv) {
int16 menuIndex = argv[1];
int16 textIndex = argv[0];
MenuResource *menu = _vm->_res->getMenu(menuIndex);
if (menu) {
const char *text = menu->getString(textIndex);
if (text)
_vm->_screen->printText(text);
_vm->_res->freeResource(menu);
}
return 0;
}
int16 ScriptFunctionsRtz::o1_MENUCOUNT(int16 argc, int16 *argv) {
int16 menuIndex = argv[0];
int16 count = 0;
MenuResource *menu = _vm->_res->getMenu(menuIndex);
if (menu) {
count = menu->getCount();
_vm->_res->freeResource(menu);
}
return count;
}
int16 ScriptFunctionsRtz::o1_SAVEGAME(int16 argc, int16 *argv) {
int16 saveNum = argv[2];
int16 descObjectIndex = argv[1];
int16 version = argv[0];
if (saveNum > 999)
return 6;
Object *obj = _vm->_dat->getObject(descObjectIndex);
const char *description = obj->getString();
// TODO: Use better filename
char filename[256];
snprintf(filename, 256, "rtz.%03d", saveNum);
return _vm->_dat->savegame(filename, description, version);
}
int16 ScriptFunctionsRtz::o1_LOADGAME(int16 argc, int16 *argv) {
int16 saveNum = argv[1];
int16 version = argv[0];
if (saveNum > 999)
return 1;
// TODO: Use better filename
char filename[256];
snprintf(filename, 256, "rtz.%03d", saveNum);
return _vm->_dat->loadgame(filename, version);
}
int16 ScriptFunctionsRtz::o1_GAMENAME(int16 argc, int16 *argv) {
int16 descObjectIndex = argv[2];
int16 saveNum = argv[1];
/*int16 version = argv[0];*/
Common::String description;
if (saveNum > 999)
return 1;
// TODO: Use better filename
char filename[256];
snprintf(filename, 256, "rtz.%03d", saveNum);
Object *obj = _vm->_dat->getObject(descObjectIndex);
if (_vm->_dat->getSavegameDescription(filename, description)) {
obj->setString(description.c_str());
return 0;
} else {
obj->setString("");
return 1;
}
}
int16 ScriptFunctionsRtz::o1_SHAKESCREEN(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_SHAKESCREEN");
return 0;
}
int16 ScriptFunctionsRtz::o1_PLACEMENU(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_PLACEMENU");
return 0;
}
int16 ScriptFunctionsRtz::o1_SETVOLUME(int16 argc, int16 *argv) {
_vm->_mixer->setVolumeForSoundType(Audio::Mixer::kSFXSoundType, argv[0] * 25);
_vm->_mixer->setVolumeForSoundType(Audio::Mixer::kSpeechSoundType, argv[0] * 25);
return 0;
}
int16 ScriptFunctionsRtz::o1_WHATSYNTH(int16 argc, int16 *argv) {
// 0 = Default
// 1 = PCSPKR
// 2 = SBFM/ADLIB
// 3 = ADLIBG
// 4 = MT32MPU
warning("Unimplemented opcode: o1_WHATSYNTH");
return 0;
}
int16 ScriptFunctionsRtz::o1_SLOWSYSTEM(int16 argc, int16 *argv) {
warning("Unimplemented opcode: o1_SLOWSYSTEM");
return 0;
}
} // End of namespace Made