SCI: included stub for kPalVary to make Pharkas work a little bit more (currently crashes in kMessage)

svn-id: r45102
This commit is contained in:
Martin Kiewitz 2009-10-15 06:37:05 +00:00
parent d4d1346ceb
commit 942dc2ce84
3 changed files with 10 additions and 1 deletions

View File

@ -336,9 +336,11 @@ SciKernelFunction kfunct_mappers[] = {
DEFUN("TextColors", kTextColors, ".*"),
DEFUN("TextFonts", kTextFonts, ".*"),
// its a stub, but its needed for Pharkas to work
DEFUN("PalVary", kPalVary, "ii*"),
#if 0
// Stub functions
DEFUN("PalVary", kPalVary, "ii*"),
DEFUN("ShiftScreen", kShiftScreen, ".*"),
DEFUN("MemorySegment", kMemorySegment, ".*"),
DEFUN("ListOps", kListOps, ".*"),

View File

@ -298,6 +298,7 @@ reg_t kStrCmp(EngineState *s, int argc, reg_t *argv);
reg_t kSetSynonyms(EngineState *s, int argc, reg_t *argv);
reg_t kLock(EngineState *s, int argc, reg_t *argv);
reg_t kPalette(EngineState *s, int argc, reg_t *argv);
reg_t kPalVary(EngineState *s, int argc, reg_t *argv);
reg_t kNumCels(EngineState *s, int argc, reg_t *argv);
reg_t kNumLoops(EngineState *s, int argc, reg_t *argv);
reg_t kDrawCel(EngineState *s, int argc, reg_t *argv);

View File

@ -615,6 +615,12 @@ reg_t kPalette(EngineState *s, int argc, reg_t *argv) {
return s->r_acc;
}
// This here is needed to make Pharkas work
reg_t kPalVary(EngineState *s, int argc, reg_t *argv) {
warning("kPalVary() called parameters = %d", argc);
return NULL_REG;
}
static void disableCertainButtons(SegManager *segMan, Common::String gameName, reg_t obj) {
reg_t text_pos = GET_SEL32(obj, text);
Common::String text;