scummvm/engines/dreamweb/stubs.cpp
2011-12-27 02:42:33 +02:00

3712 lines
91 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 "dreamweb/dreamweb.h"
#include "common/config-manager.h"
namespace DreamGen {
// Keyboard buffer. data.word(kBufferin) and data.word(kBufferout) are indexes
// into this, making it a ring buffer
uint8 g_keyBuffer[16];
const Room g_roomData[] = {
{ "DREAMWEB.R00", // Ryan's apartment
5,255,33,10,
255,255,255,0,
1,6,2,255,3,255,255,255,255,255,0 },
{ "DREAMWEB.R01",
1,255,44,10,
255,255,255,0,
7,2,255,255,255,255,6,255,255,255,1 },
{ "DREAMWEB.R02",
2,255,33,0,
255,255,255,0,
1,0,255,255,1,255,3,255,255,255,2 },
{ "DREAMWEB.R03",
5,255,33,10,
255,255,255,0,
2,2,0,2,4,255,0,255,255,255,3 },
{ "DREAMWEB.R04",
23,255,11,30,
255,255,255,0,
1,4,0,5,255,255,3,255,255,255,4 },
{ "DREAMWEB.R05",
5,255,22,30, // if demo: 22,255,22,30,
255,255,255,0,
1,2,0,4,255,255,3,255,255,255,5 },
{ "DREAMWEB.R06",
5,255,11,30,
255,255,255,0,
1,0,0,1,2,255,0,255,255,255,6 },
{ "DREAMWEB.R07",
255,255,0,20,
255,255,255,0,
2,2,255,255,255,255,0,255,255,255,7 },
{ "DREAMWEB.R08",
8,255,0,10,
255,255,255,0,
1,2,255,255,255,255,0,11,40,0,8 },
{ "DREAMWEB.R09",
9,255,22,10,
255,255,255,0,
4,6,255,255,255,255,0,255,255,255,9 },
{ "DREAMWEB.R10",
10,255,33,30,
255,255,255,0,
2,0,255,255,2,2,4,22,30,255,10 }, // 22,30,0 switches
// off path 0 in skip
{ "DREAMWEB.R11",
11,255,11,20,
255,255,255,0,
0,4,255,255,255,255,255,255,255,255,11 },
{ "DREAMWEB.R12",
12,255,22,20,
255,255,255,0,
1,4,255,255,255,255,255,255,255,255,12 },
{ "DREAMWEB.R13",
12,255,22,20,
255,255,255,0,
1,4,255,255,255,255,255,255,255,255,13 },
{ "DREAMWEB.R14",
14,255,44,20,
255,255,255,0,
0,6,255,255,255,255,255,255,255,255,14 },
{ "", 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 },
{ "", 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 },
{ "", 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 },
{ "", 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 },
{ "DREAMWEB.R19",
19,255,0,0,
255,255,255,0,
0,4,255,255,255,255,255,255,255,255,19 },
{ "DREAMWEB.R20",
22,255,0,20,
255,255,255,0,
1,4,2,15,255,255,255,255,255,255,20 },
{ "DREAMWEB.R21",
5,255,11,10, // if demo: 22,255,11,10,
255,255,255,0,
1,4,2,15,1,255,255,255,255,255,21 },
{ "DREAMWEB.R22",
22,255,22,10,
255,255,255,0,
0,4,255,255,1,255,255,255,255,255,22 },
{ "DREAMWEB.R23",
23,255,22,30,
255,255,255,0,
1,4,2,15,3,255,255,255,255,255,23 },
{ "DREAMWEB.R24",
5,255,44,0,
255,255,255,0,
1,6,2,15,255,255,255,255,255,255,24 },
{ "DREAMWEB.R25",
22,255,11,40,
255,255,255,0,
1,0,255,255,255,255,255,255,255,255,25 },
{ "DREAMWEB.R26",
9,255,22,20,
255,255,255,0,
4,2,255,255,255,255,255,255,255,255,26 },
{ "DREAMWEB.R27",
22,255,11,20,
255,255,255,0,
0,6,255,255,255,255,255,255,255,255,27 },
{ "DREAMWEB.R28",
5,255,11,30,
255,255,255,0,
0,0,255,255,2,255,255,255,255,255,28 },
{ "DREAMWEB.R29",
22,255,11,10,
255,255,255,0,
0,2,255,255,255,255,255,255,255,255,29 },
{ "DREAMWEB.R05", // Duplicate of hotel lobby, but emerging from the lift.
5,255,22,10, // if demo: 22,255,22,10
255,255,255,0,
1,4,1,15,255,255,255,255,255,255,5 },
{ "DREAMWEB.R04", // Duplicate of pool hall lobby,
23,255,22,20, // but emerging from the lift.
255,255,255,0,
1,4,2,15,255,255,255,255,255,255,4 },
{ "DREAMWEB.R10", // entering alley via skip
10,255,22,30,
255,255,255,0,
3,6,255,255,255,255,255,255,255,255,10 },
{ "DREAMWEB.R12", // on the beach, getting up.
12,255,22,20,
255,255,255,0,
0,2,255,255,255,255,255,255,255,255,12 },
{ "DREAMWEB.R03", // Duplicate of Eden's lobby
5,255,44,0, // but emerging from the lift
255,255,255,0,
1,6,2,255,4,255,255,255,255,255,3 },
{ "DREAMWEB.R24", // Duplicate of Eden's flat
5,255,22,0, // but starting on the bed
255,255,255,0,
3,6,0,255,255,255,255,33,0,3,24 }, // 33,0,3 turns off path for lift
{ "DREAMWEB.R22", // Duplicate
22,255,22,20, // of hotel but in pool room
255,255,255,0,
1,4,255,255,255,255,255,255,255,255,22 },
{ "DREAMWEB.R22", // Duplicate
22,255,22,20, // of hotel but in pool room
255,255,255,0, // coming out of bedroom
0,2,255,255,255,255,255,255,255,255,22 },
{ "DREAMWEB.R11", // Duplicate
11,255,22,30, // of carpark but getting
255,255,255,0, // up off the floor
0,0,255,255,255,255,255,255,255,255,11 },
{ "DREAMWEB.R28",
5,255,11,20,
255,255,255,0,
0,6,255,255,2,255,255,255,255,255,28 },
{ "DREAMWEB.R21",
5,255,11,10, // if demo: 22,255,11,10
255,255,255,0,
1,4,2,15,1,255,255,255,255,255,21 },
{ "DREAMWEB.R26",
9,255,0,40,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,26 },
{ "DREAMWEB.R19",
19,255,0,0,
255,255,255,0,
2,2,255,255,255,255,255,255,255,255,19 },
{ "DREAMWEB.R08", // leaving tvstudio into street
8,255,11,40,
255,255,255,0,
0,4,255,255,255,255,255,255,255,255,8 },
{ "DREAMWEB.R01",
1,255,44,10,
255,255,255,0,
3,6,255,255,255,255,255,255,255,255,1 },
{ "DREAMWEB.R45", // Dream room
35,255,22,30,
255,255,255,0,
0,6,255,255,255,255,255,255,255,255,45 },
{ "DREAMWEB.R46", // Dream room
35,255,22,40,
255,255,255,0,
0,4,255,255,255,255,255,255,255,255,46 },
{ "DREAMWEB.R47", // Dream room
35,255,0,0,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,47 },
{ "DREAMWEB.R45", // Dream room
35,255,22,30,
255,255,255,0,
4,0,255,255,255,255,255,255,255,255,45 },
{ "DREAMWEB.R46", // Dream room
35,255,22,50,
255,255,255,0,
0,4,255,255,255,255,255,255,255,255,46 },
{ "DREAMWEB.R50", // Intro sequence one
35,255,22,30,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,50 },
{ "DREAMWEB.R51", // Intro sequence two
35,255,11,30,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,51 },
{ "DREAMWEB.R52", // Intro sequence three
35,255,22,30,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,52 },
{ "DREAMWEB.R53", // Intro sequence four
35,255,33,0,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,53 },
{ "DREAMWEB.R54", // Intro sequence five - wasteland
35,255,0,0,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,54 },
{ "DREAMWEB.R55", // End sequence
14,255,44,0,
255,255,255,0,
0,0,255,255,255,255,255,255,255,255,55 }
};
static const Atmosphere g_atmosphereList[] = {
// location,map x,y,sound,repeat
{ 0,33,10,15,255 },
{ 0,22,10,15,255 },
{ 0,22,0,15,255 },
{ 0,11,0,15,255 },
{ 0,11,10,15,255 },
{ 0,0,10,15,255 },
{ 1,44,10,6,255 },
{ 1,44,0,13,255 },
{ 2,33,0,6,255 },
{ 2,22,0,5,255 },
{ 2,22,10,16,255 },
{ 2,11,10,16,255 },
{ 3,44,0,15,255 },
{ 3,33,10,6,255 },
{ 3,33,0,5,255 },
{ 4,11,30,6,255 },
{ 4,22,30,5,255 },
{ 4,22,20,13,255 },
{ 10,33,30,6,255 },
{ 10,22,30,6,255 },
{ 9,22,10,6,255 },
{ 9,22,20,16,255 },
{ 9,22,30,16,255 },
{ 9,22,40,16,255 },
{ 9,22,50,16,255 },
{ 6,11,30,6,255 },
{ 6,0,10,15,255 },
{ 6,0,20,15,255 },
{ 6,11,20,15,255 },
{ 6,22,20,15,255 },
{ 7,11,20,6,255 },
{ 7,0,20,6,255 },
{ 7,0,30,6,255 },
{ 55,44,0,5,255 },
{ 55,44,10,5,255 },
{ 5,22,30,6,255 },
{ 5,22,20,15,255 }, // if demo: { 5,22,20,16,255 },
{ 5,22,10,15,255 }, // if demo: { 5,22,10,16,255 },
{ 24,22,0,15,255 },
{ 24,33,0,15,255 },
{ 24,44,0,15,255 },
{ 24,33,10,15,255 },
{ 8,0,10,6,255 },
{ 8,11,10,6,255 },
{ 8,22,10,6,255 },
{ 8,33,10,6,255 },
{ 8,33,20,6,255 },
{ 8,33,30,6,255 },
{ 8,33,40,6,255 },
{ 8,22,40,6,255 },
{ 8,11,40,6,255 },
{ 11,11,20,12,255 },
{ 11,11,30,12,255 },
{ 11,22,20,12,255 },
{ 11,22,30,12,255 },
{ 12,22,20,12,255 },
{ 13,22,20,12,255 },
{ 13,33,20,12,255 },
{ 14,44,20,12,255 },
{ 14,33,0,12,255 },
{ 14,33,10,12,255 },
{ 14,33,20,12,255 },
{ 14,33,30,12,255 },
{ 14,33,40,12,255 },
{ 14,22,0,16,255 },
{ 19,0,0,12,255 },
{ 20,0,20,16,255 },
{ 20,0,30,16,255 },
{ 20,11,30,16,255 },
{ 20,0,40,16,255 },
{ 20,11,40,16,255 },
{ 21,11,10,15,255 }, // if demo: { 21,11,10,16,255 },
{ 21,11,20,15,255 }, // if demo: { 21,11,20,16,255 },
{ 21, 0,20,15,255 }, // if demo: { 21,0,20,16,255 },
{ 21,22,20,15,255 }, // if demo: { 21,22,20,16,255 },
{ 21,33,20,15,255 }, // if demo: { 21,33,20,16,255 },
{ 21,44,20,15,255 }, // if demo: { 21,44,20,16,255 },
{ 21,44,10,15,255 }, // if demo: { 21,44,10,16,255 },
{ 22,22,10,16,255 },
{ 22,22,20,16,255 },
{ 23,22,30,13,255 },
{ 23,22,40,13,255 },
{ 23,33,40,13,255 },
{ 23,11,40,13,255 },
{ 23,0,40,13,255 },
{ 23,0,50,13,255 },
{ 25,11,40,16,255 },
{ 25,11,50,16,255 },
{ 25,0,50,16,255 },
{ 27,11,20,16,255 },
{ 27,11,30,16,255 },
{ 29,11,10,16,255 },
{ 45,22,30,12,255 },
{ 45,22,40,12,255 },
{ 45,22,50,12,255 },
{ 46,22,40,12,255 },
{ 46,11,50,12,255 },
{ 46,22,50,12,255 },
{ 46,33,50,12,255 },
{ 47,0,0,12,255 },
{ 26,22,20,16,255 },
{ 26,33,10,16,255 },
{ 26,33,20,16,255 },
{ 26,33,30,16,255 },
{ 26,44,30,16,255 },
{ 26,22,30,16,255 },
{ 26,11,30,16,255 },
{ 26,11,20,16,255 },
{ 26,0,20,16,255 },
{ 26,11,40,16,255 },
{ 26,0,40,16,255 },
{ 26,22,40,16,255 },
{ 26,11,50,16,255 },
{ 28,0,30,15,255 },
{ 28,0,20,15,255 },
{ 28,0,40,15,255 },
{ 28,11,30,15,255 },
{ 28,11,20,15,255 },
{ 28,22,30,15,255 },
{ 28,22,20,15,255 },
{ 255,255,255,255,255 }
};
void DreamGenContext::dreamweb() {
switch(engine->getLanguage()) {
case Common::EN_ANY:
case Common::EN_GRB:
case Common::EN_USA:
// Implicit data.byte(kForeignrelease) = 0
break;
default:
data.byte(kForeignrelease) = 1;
break;
}
seeCommandTail();
// soundStartup used to be done here...
// setKeyboardInt used to be done here...
allocateBuffers();
// setMouse
data.word(kOldpointerx) = 0xffff;
fadeDOS();
getTime();
clearBuffers();
clearPalette();
set16ColPalette();
readSetData();
data.byte(kWongame) = 0;
engine->loadSounds(0, "DREAMWEB.V99"); // basic sample
bool firstLoop = true;
int savegameId = Common::ConfigManager::instance().getInt("save_slot");
while (true) {
uint count = scanForNames();
bool startNewGame = true;
if (firstLoop && savegameId >= 0) {
// loading a savegame requested from launcher/command line
cls();
setMode();
loadPalFromIFF();
clearPalette();
doLoad(savegameId);
workToScreen();
fadeScreenUp();
startNewGame = false;
} else if (count == 0 && firstLoop) {
// no savegames found, and we're not restarting.
setMode();
loadPalFromIFF();
} else {
// "doDecisions"
// Savegames found, so ask if we should load one.
// (If we're restarting after game over, we also always show these
// options.)
cls();
setMode();
decide();
if (quitRequested())
goto done;
if (data.byte(kGetback) == 4)
startNewGame = false; // savegame has been loaded
}
firstLoop = false;
if (startNewGame) {
// "playGame"
// "titles"
// TODO: In the demo version, titles() did nothing
clearPalette();
bibleQuote();
if (!quitRequested()) // "titlesearly"
intro();
if (quitRequested())
goto done;
// "credits"
clearPalette();
realCredits();
if (quitRequested())
goto done;
clearChanges();
setMode();
loadPalFromIFF();
data.byte(kLocation) = 255;
data.byte(kRoomafterdream) = 1;
data.byte(kNewlocation) = 35;
data.byte(kVolume) = 7;
loadRoom();
clearSprites();
initMan();
entryTexts();
entryAnims();
data.byte(kDestpos) = 3;
initialInv();
data.byte(kLastflag) = 32;
startup1();
data.byte(kVolumeto) = 0;
data.byte(kVolumedirection) = (byte)-1;
data.byte(kCommandtype) = 255;
}
// main loop
while (true) {
if (quitRequested())
goto done;
screenUpdate();
if (quitRequested())
goto done;
if (data.byte(kWongame) != 0) {
// "endofgame"
clearBeforeLoad();
fadeScreenDowns();
hangOn(200);
endGame();
quickQuit2();
goto done;
}
if (data.byte(kMandead) == 1 || data.byte(kMandead) == 2)
break;
if (data.word(kWatchingtime) > 0) {
if (data.byte(kFinaldest) == data.byte(kManspath))
data.word(kWatchingtime)--;
}
if (data.word(kWatchingtime) == 0) {
// "notWatching"
if (data.byte(kMandead) == 4)
break;
if (data.byte(kNewlocation) != 255) {
// "loadNew"
clearBeforeLoad();
loadRoom();
clearSprites();
initMan();
entryTexts();
entryAnims();
data.byte(kNewlocation) = 255;
startup();
data.byte(kCommandtype) = 255;
workToScreenM();
}
}
}
// "gameOver"
clearBeforeLoad();
showGun();
fadeScreenDown();
hangOn(100);
}
done: // The engine will need some cleaner finalization, let's put it here for now
// FIXME: This triggers "Deallocating non existent segment" errors when
// quitting from a menu.
getRidOfAll();
engine->freeIcons1();
engine->freeIcons2();
}
bool DreamBase::quitRequested() {
return data.byte(kQuitrequested);
}
void DreamGenContext::screenUpdate() {
newPlace();
mainScreen();
if (quitRequested())
return;
animPointer();
showPointer();
if ((data.word(kWatchingtime) == 0) && (data.byte(kNewlocation) != 0xff))
return;
vSync();
uint16 mouseState = 0;
mouseState |= readMouseState();
dumpPointer();
dumpTextLine();
delPointer();
autoLook();
spriteUpdate();
watchCount();
zoom();
showPointer();
if (data.byte(kWongame))
return;
vSync();
mouseState |= readMouseState();
dumpPointer();
dumpZoom();
delPointer();
delEverything();
printSprites();
reelsOnScreen();
afterNewRoom();
showPointer();
vSync();
mouseState |= readMouseState();
dumpPointer();
dumpMap();
dumpTimedText();
delPointer();
showPointer();
vSync();
data.word(kOldbutton) = data.word(kMousebutton);
mouseState |= readMouseState();
data.word(kMousebutton) = mouseState;
dumpPointer();
dumpWatch();
delPointer();
}
void DreamBase::startup() {
data.byte(kCurrentkey) = 0;
data.byte(kMainmode) = 0;
createPanel();
data.byte(kNewobs) = 1;
drawFloor();
showIcon();
getUnderZoom();
spriteUpdate();
printSprites();
underTextLine();
reelsOnScreen();
atmospheres();
}
void DreamGenContext::startup1() {
clearPalette();
data.byte(kThroughdoor) = 0;
startup();
workToScreen();
fadeScreenUp();
}
void DreamBase::switchRyanOn() {
data.byte(kRyanon) = 255;
}
void DreamBase::switchRyanOff() {
data.byte(kRyanon) = 1;
}
uint16 DreamBase::standardLoad(const char *fileName, uint16 *outSizeInBytes) {
FileHeader header;
Common::File file;
file.open(fileName);
file.read((uint8 *)&header, sizeof(FileHeader));
uint16 sizeInBytes = header.len(0);
if (outSizeInBytes)
*outSizeInBytes = sizeInBytes;
uint16 result = allocateMem((sizeInBytes + 15) / 16);
file.read(getSegment(result).ptr(0, 0), sizeInBytes);
return result;
}
void *DreamBase::standardLoadCPP(const char *fileName, uint16 *outSizeInBytes) {
uint16 sizeInBytes;
uint16 seg = standardLoad(fileName, &sizeInBytes);
void *buffer = malloc(sizeInBytes);
memcpy(buffer, getSegment(seg).ptr(0, 0), sizeInBytes);
deallocateMem(seg);
if (outSizeInBytes)
*outSizeInBytes = sizeInBytes;
return buffer;
}
void DreamBase::loadIntoTemp(const char *fileName) {
data.word(kTempgraphics) = standardLoad(fileName);
}
void DreamBase::loadIntoTemp2(const char *fileName) {
data.word(kTempgraphics2) = standardLoad(fileName);
}
void DreamBase::loadIntoTemp3(const char *fileName) {
data.word(kTempgraphics3) = standardLoad(fileName);
}
void DreamBase::loadTempCharset(const char *fileName) {
engine->setTempCharset(standardLoadCPP(fileName));
}
void DreamBase::hangOnCurs(uint16 frameCount) {
for (uint16 i = 0; i < frameCount; ++i) {
printCurs();
vSync();
delCurs();
}
}
void DreamGenContext::seeCommandTail() {
data.byte(kBrightness) = 1;
}
void DreamGenContext::quickQuit() {
engine->quit();
}
void DreamGenContext::quickQuit2() {
engine->quit();
}
void DreamBase::readMouse() {
data.word(kOldbutton) = data.word(kMousebutton);
uint16 state = readMouseState();
data.word(kMousebutton) = state;
}
uint16 DreamBase::readMouseState() {
data.word(kOldx) = data.word(kMousex);
data.word(kOldy) = data.word(kMousey);
uint16 x, y, state;
engine->mouseCall(&x, &y, &state);
data.word(kMousex) = x;
data.word(kMousey) = y;
return state;
}
void DreamBase::dumpTextLine() {
if (data.byte(kNewtextline) != 1)
return;
data.byte(kNewtextline) = 0;
uint16 x = data.word(kTextaddressx);
uint16 y = data.word(kTextaddressy);
if (data.byte(kForeignrelease) != 0)
y -= 3;
multiDump(x, y, 228, 13);
}
void DreamBase::getUnderTimed() {
if (data.byte(kForeignrelease))
multiGet(_underTimedText, data.byte(kTimedx), data.byte(kTimedy) - 3, 240, kUnderTimedTextSizeY_f);
else
multiGet(_underTimedText, data.byte(kTimedx), data.byte(kTimedy), 240, kUnderTimedTextSizeY);
}
void DreamBase::putUnderTimed() {
if (data.byte(kForeignrelease))
multiPut(_underTimedText, data.byte(kTimedx), data.byte(kTimedy) - 3, 240, kUnderTimedTextSizeY_f);
else
multiPut(_underTimedText, data.byte(kTimedx), data.byte(kTimedy), 240, kUnderTimedTextSizeY);
}
void DreamBase::triggerMessage(uint16 index) {
multiGet(mapStore(), 174, 153, 200, 63);
uint16 offset = kTextstart + getSegment(data.word(kPuzzletext)).word(index * 2);
const uint8 *string = getSegment(data.word(kPuzzletext)).ptr(offset, 0);
uint16 y = 156;
printDirect(&string, 174, &y, 141, true);
hangOn(140);
workToScreen();
hangOn(340);
multiPut(mapStore(), 174, 153, 200, 63);
workToScreen();
data.byte(kLasttrigger) = 0;
}
void DreamBase::processTrigger() {
if (data.byte(kLasttrigger) == '1') {
setLocation(8);
triggerMessage(45);
} else if (data.byte(kLasttrigger) == '2') {
setLocation(9);
triggerMessage(55);
} else if (data.byte(kLasttrigger) == '3') {
setLocation(2);
triggerMessage(59);
}
}
void DreamBase::useTimedText() {
if (data.word(kTimecount) == 0)
return;
--data.word(kTimecount);
if (data.word(kTimecount) == 0) {
putUnderTimed();
data.byte(kNeedtodumptimed) = 1;
return;
}
if (data.word(kTimecount) == data.word(kCounttotimed))
getUnderTimed();
else if (data.word(kTimecount) > data.word(kCounttotimed))
return;
const uint8 *string = getSegment(data.word(kTimedseg)).ptr(data.word(kTimedoffset), 0);
uint16 y = data.byte(kTimedy);
printDirect(&string, data.byte(kTimedx), &y, 237, true);
data.byte(kNeedtodumptimed) = 1;
}
void DreamBase::setupTimedTemp(uint8 textIndex, uint8 voiceIndex, uint8 x, uint8 y, uint16 countToTimed, uint16 timeCount) {
#if 1 // if cd
if (voiceIndex != 0) {
if (loadSpeech('T', voiceIndex, 'T', textIndex)) {
playChannel1(50+12);
}
// FIXME: This fallthrough does not properly support subtitles+speech
// mode. The parameters to setuptimedtemp() are sometimes different
// for speech and for subtitles. See e.g., madmantext()
if ((data.byte(kSpeechloaded) == 1) && (data.byte(kSubtitles) != 1))
return;
}
#endif
if (data.word(kTimecount) != 0)
return;
data.byte(kTimedy) = y;
data.byte(kTimedx) = x;
data.word(kCounttotimed) = countToTimed;
data.word(kTimecount) = timeCount + countToTimed;
data.word(kTimedseg) = data.word(kTextfile1);
data.word(kTimedoffset) = kTextstart + getSegment(data.word(kTextfile1)).word(textIndex * 2);
const uint8 *string = getSegment(data.word(kTextfile1)).ptr(data.word(kTimedoffset), 0);
debug(1, "setupTimedTemp: (%d, %d) => '%s'", textIndex, voiceIndex, string);
}
void DreamBase::dumpTimedText() {
if (data.byte(kNeedtodumptimed) != 1)
return;
uint8 y = data.byte(kTimedy);
if (data.byte(kForeignrelease) != 0)
y -= 3;
multiDump(data.byte(kTimedx), y, 240, kUndertimedysize);
data.byte(kNeedtodumptimed) = 0;
}
void DreamBase::getTime() {
TimeDate t;
g_system->getTimeAndDate(t);
debug(1, "\tgettime: %02d:%02d:%02d", t.tm_hour, t.tm_min, t.tm_sec);
data.byte(kSecondcount) = t.tm_sec;
data.byte(kMinutecount) = t.tm_min;
data.byte(kHourcount) = t.tm_hour;
}
uint16 DreamBase::allocateMem(uint16 paragraphs) {
uint size = (paragraphs + 2) * 16;
debug(1, "allocate mem, %u bytes", size);
SegmentRef seg = allocateSegment(size);
uint16 result = (uint16)seg;
debug(1, "\tsegment address -> %04x", result);
return result;
}
void DreamBase::deallocateMem(uint16 segment) {
debug(1, "deallocating segment %04x", segment);
deallocateSegment(segment);
// CHECKME: Do we really need this? From brief testing it appears
// the sprite table is cleared entirely shortly after this happens
// anyway.
Common::List<Sprite>::iterator i;
for (i = _spriteTable.begin(); i != _spriteTable.end(); ) {
if (i->_frameData == segment)
i = _spriteTable.erase(i);
else
++i;
}
}
void DreamBase::DOSReturn() {
if (data.byte(kCommandtype) != 250) {
data.byte(kCommandtype) = 250;
commandOnly(46);
}
if (data.word(kMousebutton) & 1) {
data.word(kMousebutton) = 0;
engine->quit();
}
}
void DreamBase::eraseOldObs() {
if (data.byte(kNewobs) == 0)
return;
// Note: the original didn't delete sprites here, but marked the
// entries as unused, to be filled again by makeSprite. This can
// change the order of entries, but since they are drawn based on the
// priority field, this shouldn't matter.
Common::List<Sprite>::iterator i;
for (i = _spriteTable.begin(); i != _spriteTable.end(); ) {
Sprite &sprite = *i;
if (sprite._objData != 0xffff)
i = _spriteTable.erase(i);
else
++i;
}
}
void DreamBase::lockMon() {
// Pressing space pauses text output in the monitor. We use the "hard"
// key because calling readkey() drains characters from the input
// buffer, we we want the user to be able to type ahead while the text
// is being printed.
if (data.byte(kLasthardkey) == 57) {
// Clear the keyboard buffer. Otherwise the space that caused
// the pause will be read immediately unpause the game.
do {
readKey();
} while (data.byte(kCurrentkey) != 0);
lockLightOn();
while (!engine->shouldQuit()) {
engine->waitForVSync();
readKey();
if (data.byte(kCurrentkey) == ' ')
break;
}
// Forget the last "hard" key, otherwise the space that caused
// the unpausing will immediately re-pause the game.
data.byte(kLasthardkey) = 0;
lockLightOff();
}
}
uint16 DreamBase::allocateAndLoad(unsigned int size) {
// allocatemem adds 32 bytes, so it doesn't matter that size/16 rounds down
uint16 result = allocateMem(size / 16);
engine->readFromFile(getSegment(result).ptr(0, size), size);
return result;
}
void DreamBase::clearAndLoad(uint8 *buf, uint8 c,
unsigned int size, unsigned int maxSize) {
assert(size <= maxSize);
memset(buf, c, maxSize);
engine->readFromFile(buf, size);
}
void DreamBase::clearAndLoad(uint16 seg, uint8 c,
unsigned int size, unsigned int maxSize) {
assert(size <= maxSize);
uint8 *buf = getSegment(seg).ptr(0, maxSize);
clearAndLoad(buf, c, size, maxSize);
}
void DreamBase::startLoading(const Room &room) {
data.byte(kCombatcount) = 0;
data.byte(kRoomssample) = room.roomsSample;
data.byte(kMapx) = room.mapX;
data.byte(kMapy) = room.mapY;
data.byte(kLiftflag) = room.liftFlag;
data.byte(kManspath) = room.b21;
data.byte(kDestination) = room.b21;
data.byte(kFinaldest) = room.b21;
data.byte(kFacing) = room.facing;
data.byte(kTurntoface) = room.facing;
data.byte(kCounttoopen) = room.countToOpen;
data.byte(kLiftpath) = room.liftPath;
data.byte(kDoorpath) = room.doorPath;
data.byte(kLastweapon) = (uint8)-1;
data.byte(kReallocation) = room.realLocation;
loadRoomData(room, false);
findRoomInLoc();
deleteTaken();
setAllChanges();
autoAppear();
// const Room &newRoom = g_roomData[data.byte(kNewlocation)];
data.byte(kLastweapon) = (uint8)-1;
data.byte(kMandead) = 0;
data.word(kLookcounter) = 160;
data.byte(kNewlocation) = 255;
data.byte(kLinepointer) = 254;
if (room.b27 != 255) {
data.byte(kManspath) = room.b27;
autoSetWalk();
}
findXYFromPath();
}
void DreamBase::dealWithSpecial(uint8 firstParam, uint8 secondParam) {
uint8 type = firstParam - 220;
if (type == 0) {
placeSetObject(secondParam);
data.byte(kHavedoneobs) = 1;
} else if (type == 1) {
removeSetObject(secondParam);
data.byte(kHavedoneobs) = 1;
} else if (type == 2) {
placeFreeObject(secondParam);
data.byte(kHavedoneobs) = 1;
} else if (type == 3) {
removeFreeObject(secondParam);
data.byte(kHavedoneobs) = 1;
} else if (type == 4) {
switchRyanOff();
} else if (type == 5) {
data.byte(kTurntoface) = secondParam;
data.byte(kFacing) = secondParam;
switchRyanOn();
} else if (type == 6) {
data.byte(kNewlocation) = secondParam;
} else {
moveMap(secondParam);
}
}
void DreamBase::plotReel(uint16 &reelPointer) {
Reel *reel = getReelStart(reelPointer);
while (reel->x >= 220 && reel->x != 255) {
dealWithSpecial(reel->x, reel->y);
++reelPointer;
reel += 8;
}
for (size_t i = 0; i < 8; ++i) {
if (reel->frame() != 0xffff)
showReelFrame(reel);
++reel;
}
soundOnReels(reelPointer);
}
void DreamBase::crosshair() {
uint8 frame;
if ((data.byte(kCommandtype) != 3) && (data.byte(kCommandtype) < 10)) {
frame = 9;
} else {
frame = 29;
}
showFrame(engine->icons1(), kZoomx + 24, kZoomy + 19, frame, 0);
}
void DreamBase::delTextLine() {
if (data.byte(kForeignrelease))
multiPut(_textUnder, data.byte(kTextaddressx), data.word(kTextaddressy) - 3, kUnderTextSizeX_f, kUnderTextSizeY_f);
else
multiPut(_textUnder, data.byte(kTextaddressx), data.word(kTextaddressy), kUnderTextSizeX, kUnderTextSizeY);
}
void DreamBase::commandOnly(uint8 command) {
delTextLine();
uint16 index = command * 2;
uint16 offset = kTextstart + getSegment(data.word(kCommandtext)).word(index);
uint16 y = data.word(kTextaddressy);
const uint8 *string = getSegment(data.word(kCommandtext)).ptr(offset, 0);
printDirect(&string, data.word(kTextaddressx), &y, data.byte(kTextlen), (bool)(data.byte(kTextlen) & 1));
data.byte(kNewtextline) = 1;
}
bool DreamGenContext::checkIfPerson(uint8 x, uint8 y) {
Common::List<People>::iterator i;
for (i = _peopleList.begin(); i != _peopleList.end(); ++i) {
People &people = *i;
Reel *reel = getReelStart(people._reelPointer);
if (reel->frame() == 0xffff)
++reel;
const Frame *frame = getReelFrameAX(reel->frame());
uint8 xmin = reel->x + frame->x;
uint8 ymin = reel->y + frame->y;
uint8 xmax = xmin + frame->width;
uint8 ymax = ymin + frame->height;
if (x < xmin)
continue;
if (y < ymin)
continue;
if (x >= xmax)
continue;
if (y >= ymax)
continue;
_personData = people._routinePointer;
obName(people.b4, 5);
return true;
}
return false;
}
bool DreamGenContext::checkIfFree(uint8 x, uint8 y) {
Common::List<ObjPos>::const_iterator i;
for (i = _freeList.reverse_begin(); i != _freeList.end(); --i) {
const ObjPos &pos = *i;
assert(pos.index != 0xff);
if (!pos.contains(x,y))
continue;
obName(pos.index, 2);
return true;
}
return false;
}
bool DreamGenContext::checkIfEx(uint8 x, uint8 y) {
Common::List<ObjPos>::const_iterator i;
for (i = _exList.reverse_begin(); i != _exList.end(); --i) {
const ObjPos &pos = *i;
assert(pos.index != 0xff);
if (!pos.contains(x,y))
continue;
obName(pos.index, 4);
return true;
}
return false;
}
const uint8 *DreamBase::findObName(uint8 type, uint8 index) {
if (type == 5) {
uint16 i = 64 * 2 * (index & 127);
uint16 offset = getSegment(data.word(kPeople)).word(kPersontxtdat + i) + kPersontext;
return getSegment(data.word(kPeople)).ptr(offset, 0);
} else if (type == 4) {
uint16 offset = getSegment(data.word(kExtras)).word(kExtextdat + index * 2) + kExtext;
return getSegment(data.word(kExtras)).ptr(offset, 0);
} else if (type == 2) {
uint16 offset = getSegment(data.word(kFreedesc)).word(kFreetextdat + index * 2) + kFreetext;
return getSegment(data.word(kFreedesc)).ptr(offset, 0);
} else if (type == 1) {
uint16 offset = getSegment(data.word(kSetdesc)).word(kSettextdat + index * 2) + kSettext;
return getSegment(data.word(kSetdesc)).ptr(offset, 0);
} else {
uint16 offset = getSegment(data.word(kBlockdesc)).word(kBlocktextdat + index * 2) + kBlocktext;
return getSegment(data.word(kBlockdesc)).ptr(offset, 0);
}
}
void DreamBase::copyName(uint8 type, uint8 index, uint8 *dst) {
const uint8 *src = findObName(type, index);
size_t i;
for (i = 0; i < 28; ++i) {
char c = src[i];
if (c == ':')
break;
if (c == 0)
break;
dst[i] = c;
}
dst[i] = 0;
}
void DreamBase::commandWithOb(uint8 command, uint8 type, uint8 index) {
uint8 commandLine[64] = "OBJECT NAME ONE ";
delTextLine();
uint16 commandText = kTextstart + getSegment(data.word(kCommandtext)).word(command * 2);
uint8 textLen = data.byte(kTextlen);
{
const uint8 *string = getSegment(data.word(kCommandtext)).ptr(commandText, 0);
printDirect(string, data.word(kTextaddressx), data.word(kTextaddressy), textLen, (bool)(textLen & 1));
}
copyName(type, index, commandLine);
uint16 x = data.word(kLastxpos);
if (command != 0)
x += 5;
printDirect(commandLine, x, data.word(kTextaddressy), textLen, (bool)(textLen & 1));
data.byte(kNewtextline) = 1;
}
void DreamBase::examineObText() {
commandWithOb(1, data.byte(kCommandtype), data.byte(kCommand));
}
void DreamBase::blockNameText() {
commandWithOb(0, data.byte(kCommandtype), data.byte(kCommand));
}
void DreamBase::personNameText() {
commandWithOb(2, data.byte(kCommandtype), data.byte(kCommand) & 127);
}
void DreamBase::walkToText() {
commandWithOb(3, data.byte(kCommandtype), data.byte(kCommand));
}
void DreamBase::findOrMake(uint8 index, uint8 value, uint8 type) {
Change *change = _listOfChanges;
for (; change->index != 0xff; ++change) {
if (index == change->index && data.byte(kReallocation) == change->location && type == change->type) {
change->value = value;
return;
}
}
change->index = index;
change->location = data.byte(kReallocation);
change->value = value;
change->type = type;
}
void DreamBase::setAllChanges() {
Change *change = _listOfChanges;
for (; change->index != 0xff; ++change)
if (change->location == data.byte(kReallocation))
doChange(change->index, change->value, change->type);
}
DynObject *DreamBase::getFreeAd(uint8 index) {
return (DynObject *)getSegment(data.word(kFreedat)).ptr(0, 0) + index;
}
DynObject *DreamBase::getExAd(uint8 index) {
return (DynObject *)getSegment(data.word(kExtras)).ptr(kExdata, 0) + index;
}
DynObject *DreamBase::getEitherAdCPP() {
if (data.byte(kObjecttype) == kExObjectType)
return getExAd(data.byte(kItemframe));
else
return getFreeAd(data.byte(kItemframe));
}
void *DreamBase::getAnyAd(uint8 *slotSize, uint8 *slotCount) {
if (data.byte(kObjecttype) == kExObjectType) {
DynObject *exObject = getExAd(data.byte(kCommand));
*slotSize = exObject->slotSize;
*slotCount = exObject->slotCount;
return exObject;
} else if (data.byte(kObjecttype) == kFreeObjectType) {
DynObject *freeObject = getFreeAd(data.byte(kCommand));
*slotSize = freeObject->slotSize;
*slotCount = freeObject->slotCount;
return freeObject;
} else { // 1 or 3. 0 should never happen
SetObject *setObject = getSetAd(data.byte(kCommand));
// Note: the original returned slotCount/priority (bytes 4 and 5)
// instead of slotSize/slotCount (bytes 3 and 4).
// Changed this for consistency with the Ex/Free cases, and also
// with getOpenedSize()
*slotSize = setObject->slotSize;
*slotCount = setObject->slotCount;
return setObject;
}
}
void *DreamBase::getAnyAdDir(uint8 index, uint8 flag) {
if (flag == 4)
return getExAd(index);
else if (flag == 2)
return getFreeAd(index);
else
return getSetAd(index);
}
SetObject *DreamBase::getSetAd(uint8 index) {
return (SetObject *)getSegment(data.word(kSetdat)).ptr(0, 0) + index;
}
void DreamBase::doChange(uint8 index, uint8 value, uint8 type) {
if (type == 0) { //object
getSetAd(index)->mapad[0] = value;
} else if (type == 1) { //freeObject
DynObject *freeObject = getFreeAd(index);
if (freeObject->mapad[0] == 0xff)
freeObject->mapad[0] = value;
} else { //path
// getSegment(data.word(kReels)).byte(kPathdata + (type - 100) * 144 + index * 8 + 6) = value;
PathNode *paths = (PathNode *)getSegment(data.word(kReels)).ptr(kPathdata + 144 * (type - 100), 0);
paths[index].on = value;
}
}
void DreamBase::deleteTaken() {
const DynObject *extraObjects = (const DynObject *)getSegment(data.word(kExtras)).ptr(kExdata, 0);
DynObject *freeObjects = (DynObject *)getSegment(data.word(kFreedat)).ptr(0, 0);
for (size_t i = 0; i < kNumexobjects; ++i) {
uint8 location = extraObjects[i].initialLocation;
if (location == data.byte(kReallocation)) {
uint8 index = extraObjects[i].index;
freeObjects[index].mapad[0] = 0xfe;
}
}
}
uint8 DreamBase::getExPos() {
DynObject *objects = (DynObject *)getSegment(data.word(kExtras)).ptr(kExdata, sizeof(DynObject));
for (size_t i = 0; i < kNumexobjects; ++i) {
if (objects[i].mapad[0] == 0xff)
return i;
}
error("Out of Ex object positions");
}
void DreamBase::placeSetObject(uint8 index) {
findOrMake(index, 0, 0);
getSetAd(index)->mapad[0] = 0;
}
void DreamBase::removeSetObject(uint8 index) {
findOrMake(index, 0xff, 0);
getSetAd(index)->mapad[0] = 0xff;
}
bool DreamBase::finishedWalking() {
return (data.byte(kLinepointer) == 254) && (data.byte(kFacing) == data.byte(kTurntoface));
}
void DreamBase::getFlagUnderP(uint8 *flag, uint8 *flagEx) {
uint8 type, flagX, flagY;
checkOne(data.word(kMousex) - data.word(kMapadx), data.word(kMousey) - data.word(kMapady), flag, flagEx, &type, &flagX, &flagY);
data.byte(kLastflag) = *flag;
}
void DreamGenContext::walkAndExamine() {
if (!finishedWalking())
return;
data.byte(kCommandtype) = data.byte(kWalkexamtype);
data.byte(kCommand) = data.byte(kWalkexamnum);
data.byte(kWalkandexam) = 0;
if (data.byte(kCommandtype) != 5)
examineOb();
}
void DreamGenContext::obName(uint8 command, uint8 commandType) {
if (data.byte(kReasseschanges) == 0) {
if ((commandType == data.byte(kCommandtype)) && (command == data.byte(kCommand))) {
if (data.byte(kWalkandexam) == 1) {
walkAndExamine();
return;
} else if (data.word(kMousebutton) == 0)
return;
else if ((data.byte(kCommandtype) == 3) && (data.byte(kLastflag) < 2))
return;
else if ((data.byte(kManspath) != data.byte(kPointerspath)) || (data.byte(kCommandtype) == 3)) {
setWalk();
data.byte(kReasseschanges) = 1;
return;
} else if (!finishedWalking())
return;
else if (data.byte(kCommandtype) == 5) {
if (data.word(kWatchingtime) == 0)
talk();
return;
} else {
if (data.word(kWatchingtime) == 0)
examineOb();
return;
}
}
} else
data.byte(kReasseschanges) = 0;
data.byte(kCommand) = command;
data.byte(kCommandtype) = commandType;
if ((data.byte(kLinepointer) != 254) || (data.word(kWatchingtime) != 0) || (data.byte(kFacing) != data.byte(kTurntoface))) {
blockNameText();
return;
} else if (data.byte(kCommandtype) != 3) {
if (data.byte(kManspath) != data.byte(kPointerspath)) {
walkToText();
return;
} else if (data.byte(kCommandtype) == 3) {
blockNameText();
return;
} else if (data.byte(kCommandtype) == 5) {
personNameText();
return;
} else {
examineObText();
return;
}
}
if (data.byte(kManspath) == data.byte(kPointerspath)) {
uint8 flag, flagEx, type, flagX, flagY;
checkOne(data.byte(kRyanx) + 12, data.byte(kRyany) + 12, &flag, &flagEx, &type, &flagX, &flagY);
if (flag < 2) {
blockNameText();
return;
}
}
uint8 flag, flagEx;
getFlagUnderP(&flag, &flagEx);
if (data.byte(kLastflag) < 2) {
blockNameText();
return;
} else if (data.byte(kLastflag) >= 128) {
blockNameText();
return;
} else {
walkToText();
return;
}
}
void DreamBase::delPointer() {
if (data.word(kOldpointerx) == 0xffff)
return;
data.word(kDelherex) = data.word(kOldpointerx);
data.word(kDelherey) = data.word(kOldpointery);
data.byte(kDelxs) = data.byte(kPointerxs);
data.byte(kDelys) = data.byte(kPointerys);
multiPut(_pointerBack, data.word(kDelherex), data.word(kDelherey), data.byte(kPointerxs), data.byte(kPointerys));
}
void DreamBase::showBlink() {
if (data.byte(kManisoffscreen) == 1)
return;
++data.byte(kBlinkcount);
if (data.byte(kShadeson) != 0)
return;
if (data.byte(kReallocation) >= 50) // eyesshut
return;
if (data.byte(kBlinkcount) != 3)
return;
data.byte(kBlinkcount) = 0;
uint8 blinkFrame = data.byte(kBlinkframe);
++blinkFrame; // Implicit %256
data.byte(kBlinkframe) = blinkFrame;
if (blinkFrame > 6)
blinkFrame = 6;
static const uint8 blinkTab[] = { 16,18,18,17,16,16,16 };
uint8 width, height;
showFrame(engine->icons1(), 44, 32, blinkTab[blinkFrame], 0, &width, &height);
}
void DreamBase::dumpBlink() {
if (data.byte(kShadeson) != 0)
return;
if (data.byte(kBlinkcount) != 0)
return;
if (data.byte(kBlinkframe) >= 6)
return;
multiDump(44, 32, 16, 12);
}
void DreamBase::dumpPointer() {
dumpBlink();
multiDump(data.word(kDelherex), data.word(kDelherey), data.byte(kDelxs), data.byte(kDelys));
if ((data.word(kOldpointerx) != data.word(kDelherex)) || (data.word(kOldpointery) != data.word(kDelherey)))
multiDump(data.word(kOldpointerx), data.word(kOldpointery), data.byte(kPointerxs), data.byte(kPointerys));
}
template <class T>
void DreamBase::checkCoords(const RectWithCallback<T> *rectWithCallbacks) {
if (data.byte(kNewlocation) != 0xff)
return;
const RectWithCallback<T> *r;
for (r = rectWithCallbacks; r->_xMin != 0xffff; ++r) {
if (r->contains(data.word(kMousex), data.word(kMousey))) {
(((T *)this)->*(r->_callback))();
return;
}
}
}
void DreamBase::showPointer() {
showBlink();
uint16 x = data.word(kMousex);
data.word(kOldpointerx) = data.word(kMousex);
uint16 y = data.word(kMousey);
data.word(kOldpointery) = data.word(kMousey);
if (data.byte(kPickup) == 1) {
const Frame *frames;
if (data.byte(kObjecttype) != kExObjectType)
frames = (const Frame *)getSegment(data.word(kFreeframes)).ptr(0, 0);
else
frames = (const Frame *)getSegment(data.word(kExtras)).ptr(0, 0);
const Frame *frame = frames + (3 * data.byte(kItemframe) + 1);
uint8 width = frame->width;
uint8 height = frame->height;
if (width < 12)
width = 12;
if (height < 12)
height = 12;
data.byte(kPointerxs) = width;
data.byte(kPointerys) = height;
uint16 xMin = (x >= width / 2) ? x - width / 2 : 0;
uint16 yMin = (y >= height / 2) ? y - height / 2 : 0;
data.word(kOldpointerx) = xMin;
data.word(kOldpointery) = yMin;
multiGet(_pointerBack, xMin, yMin, width, height);
showFrame(frames, x, y, 3 * data.byte(kItemframe) + 1, 128);
showFrame(engine->icons1(), x, y, 3, 128);
} else {
const Frame *frame = engine->icons1() + (data.byte(kPointerframe) + 20);
uint8 width = frame->width;
uint8 height = frame->height;
if (width < 12)
width = 12;
if (height < 12)
height = 12;
data.byte(kPointerxs) = width;
data.byte(kPointerys) = height;
multiGet(_pointerBack, x, y, width, height);
showFrame(engine->icons1(), x, y, data.byte(kPointerframe) + 20, 0);
}
}
void DreamBase::animPointer() {
if (data.byte(kPointermode) == 2) {
data.byte(kPointerframe) = 0;
if ((data.byte(kReallocation) == 14) && (data.byte(kCommandtype) == 211))
data.byte(kPointerframe) = 5;
return;
} else if (data.byte(kPointermode) == 3) {
if (data.byte(kPointerspeed) != 0) {
--data.byte(kPointerspeed);
} else {
data.byte(kPointerspeed) = 5;
++data.byte(kPointercount);
if (data.byte(kPointercount) == 16)
data.byte(kPointercount) = 0;
}
static const uint8 flashMouseTab[] = { 1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2 };
data.byte(kPointerframe) = flashMouseTab[data.byte(kPointercount)];
return;
}
if (data.word(kWatchingtime) != 0) {
data.byte(kPointerframe) = 11;
return;
}
data.byte(kPointerframe) = 0;
if (data.byte(kInmaparea) == 0)
return;
if (data.byte(kPointerfirstpath) == 0)
return;
uint8 flag, flagEx;
getFlagUnderP(&flag, &flagEx);
if (flag < 2)
return;
if (flag >= 128)
return;
if (flag & 4) {
data.byte(kPointerframe) = 3;
return;
}
if (flag & 16) {
data.byte(kPointerframe) = 4;
return;
}
if (flag & 2) {
data.byte(kPointerframe) = 5;
return;
}
if (flag & 8) {
data.byte(kPointerframe) = 6;
return;
}
data.byte(kPointerframe) = 8;
}
void DreamBase::printMessage(uint16 x, uint16 y, uint8 index, uint8 maxWidth, bool centered) {
uint16 offset = kTextstart + getSegment(data.word(kCommandtext)).word(index * 2);
const uint8 *string = getSegment(data.word(kCommandtext)).ptr(offset, 0);
printDirect(string, x, y, maxWidth, centered);
}
void DreamBase::printMessage2(uint16 x, uint16 y, uint8 index, uint8 maxWidth, bool centered, uint8 count) {
uint16 offset = kTextstart + getSegment(data.word(kCommandtext)).word(index * 2);
const uint8 *string = getSegment(data.word(kCommandtext)).ptr(offset, 0);
while (count--) {
findNextColon(&string);
}
printDirect(string, x, y, maxWidth, centered);
}
bool DreamBase::objectMatches(void *object, const char *id) {
const char *objId = (const char *)object + 12; // whether it is a DynObject or a SetObject
for (size_t i = 0; i < 4; ++i) {
if (id[i] != objId[i] + 'A')
return false;
}
return true;
}
bool DreamBase::compare(uint8 index, uint8 flag, const char id[4]) {
return objectMatches(getAnyAdDir(index, flag), id);
}
uint16 DreamBase::findSetObject(const char *id) {
for (uint16 index = 0; index < 128; index++) {
if (objectMatches(getSetAd(index), id))
return index;
}
return 128;
}
uint16 DreamBase::findExObject(const char *id) {
for (uint16 index = 0; index < kNumexobjects; index++) {
if (objectMatches(getExAd(index), id))
return index;
}
return kNumexobjects;
}
bool DreamBase::isRyanHolding(const char *id) {
for (uint16 index = 0; index < kNumexobjects; index++) {
DynObject *object = getExAd(index);
if (object->mapad[0] == 4 && objectMatches(object, id))
return true;
}
return false;
}
bool DreamBase::isItDescribed(const ObjPos *pos) {
uint16 offset = getSegment(data.word(kSetdesc)).word(kSettextdat + pos->index * 2);
uint8 result = getSegment(data.word(kSetdesc)).byte(kSettext + offset);
return result != 0;
}
bool DreamBase::isCD() {
// The original sources has two codepaths depending if the game is 'if cd' or not
// This is a hack to guess which version to use with the assumption that if we have a cd version
// we managed to load the speech. At least it is isolated in this function and can be changed.
// Maybe detect the version during game id?
return (data.byte(kSpeechloaded) == 1);
}
void DreamBase::showIcon() {
if (data.byte(kReallocation) < 50) {
showPanel();
showMan();
roomName();
panelIcons1();
zoomIcon();
} else {
Frame *tempSprites = (Frame *)getSegment(data.word(kTempsprites)).ptr(0, 0);
showFrame(tempSprites, 72, 2, 45, 0);
showFrame(tempSprites, 72+47, 2, 46, 0);
showFrame(tempSprites, 69-10, 21, 49, 0);
showFrame(tempSprites, 160+88, 2, 45, 4 & 0xfe);
showFrame(tempSprites, 160+43, 2, 46, 4 & 0xfe);
showFrame(tempSprites, 160+101, 21, 49, 4 & 0xfe);
middlePanel();
}
}
bool DreamGenContext::checkIfSet(uint8 x, uint8 y) {
Common::List<ObjPos>::const_iterator i;
for (i = _setList.reverse_begin(); i != _setList.end(); --i) {
const ObjPos &pos = *i;
assert(pos.index != 0xff);
if (!pos.contains(x,y))
continue;
if (!pixelCheckSet(&pos, x, y))
continue;
if (!isItDescribed(&pos))
continue;
obName(pos.index, 1);
return true;
}
return false;
}
void DreamBase::hangOn(uint16 frameCount) {
while (frameCount) {
vSync();
--frameCount;
if (quitRequested())
break;
}
}
void DreamBase::hangOnW(uint16 frameCount) {
while (frameCount) {
delPointer();
readMouse();
animPointer();
showPointer();
vSync();
dumpPointer();
--frameCount;
if (quitRequested())
break;
}
}
void DreamBase::hangOnP(uint16 count) {
data.word(kMaintimer) = 0;
uint8 pointerFrame = data.byte(kPointerframe);
uint8 pickup = data.byte(kPickup);
data.byte(kPointermode) = 3;
data.byte(kPickup) = 0;
data.byte(kCommandtype) = 255;
readMouse();
animPointer();
showPointer();
vSync();
dumpPointer();
count *= 3;
for (uint16 i = 0; i < count; ++i) {
delPointer();
readMouse();
animPointer();
showPointer();
vSync();
dumpPointer();
if (quitRequested())
break;
if (data.word(kMousebutton) != 0 && data.word(kMousebutton) != data.word(kOldbutton))
break;
}
delPointer();
data.byte(kPointerframe) = pointerFrame;
data.byte(kPickup) = pickup;
data.byte(kPointermode) = 0;
}
uint8 DreamBase::findNextColon(const uint8 **string) {
uint8 c;
do {
c = **string;
++(*string);
} while ((c != 0) && (c != ':'));
return c;
}
void DreamBase::enterSymbol() {
data.byte(kManisoffscreen) = 1;
getRidOfReels();
loadIntoTemp("DREAMWEB.G12"); // symbol graphics
data.byte(kSymboltopx) = 24;
data.byte(kSymboltopdir) = 0;
data.byte(kSymbolbotx) = 24;
data.byte(kSymbolbotdir) = 0;
redrawMainScrn();
showSymbol();
underTextLine();
workToScreenM();
data.byte(kGetback) = 0;
do {
delPointer();
updateSymbolTop();
updateSymbolBot();
showSymbol();
readMouse();
showPointer();
vSync();
dumpPointer();
dumpTextLine();
dumpSymbol();
RectWithCallback<DreamBase> symbolList[] = {
{ kSymbolx+40,kSymbolx+64,kSymboly+2,kSymboly+16,&DreamBase::quitSymbol },
{ kSymbolx,kSymbolx+52,kSymboly+20,kSymboly+50,&DreamBase::setTopLeft },
{ kSymbolx+52,kSymbolx+104,kSymboly+20,kSymboly+50,&DreamBase::setTopRight },
{ kSymbolx,kSymbolx+52,kSymboly+50,kSymboly+80,&DreamBase::setBotLeft },
{ kSymbolx+52,kSymbolx+104,kSymboly+50,kSymboly+80,&DreamBase::setBotRight },
{ 0,320,0,200,&DreamBase::blank },
{ 0xFFFF,0,0,0,0 }
};
checkCoords(symbolList);
} while ((data.byte(kGetback) == 0) && !quitRequested());
if ((data.byte(kSymbolbotnum) == 3) && (data.byte(kSymboltopnum) == 5)) {
removeSetObject(43);
placeSetObject(46);
turnAnyPathOn(0, data.byte(kRoomnum) + 12);
data.byte(kManisoffscreen) = 0;
redrawMainScrn();
getRidOfTemp();
restoreReels();
workToScreenM();
playChannel1(13);
} else {
removeSetObject(46);
placeSetObject(43);
turnAnyPathOff(0, data.byte(kRoomnum) + 12);
data.byte(kManisoffscreen) = 0;
redrawMainScrn();
getRidOfTemp();
restoreReels();
workToScreenM();
}
}
void DreamGenContext::zoomOnOff() {
if (data.word(kWatchingtime) != 0 || data.byte(kPointermode) == 2) {
blank();
return;
}
if (data.byte(kCommandtype) != 222) {
data.byte(kCommandtype) = 222;
commandOnly(39);
}
if (!(data.word(kMousebutton) & 1) || (data.word(kMousebutton) == data.word(kOldbutton)))
return;
data.byte(kZoomon) ^= 1;
createPanel();
data.byte(kNewobs) = 0;
drawFloor();
printSprites();
reelsOnScreen();
showIcon();
getUnderZoom();
underTextLine();
commandOnly(39);
readMouse();
workToScreenM();
}
void DreamBase::sortOutMap() {
const uint8 *src = workspace();
uint8 *dst = (uint8 *)getSegment(data.word(kMapdata)).ptr(0, 0);
for (uint16 y = 0; y < kMaplength; ++y) {
memcpy(dst, src, kMapwidth);
dst += kMapwidth;
src += 132;
}
}
void DreamGenContext::mainScreen() {
data.byte(kInmaparea) = 0;
if (data.byte(kWatchon) == 1) {
RectWithCallback<DreamGenContext> mainList[] = {
{ 44,70,32,46,&DreamGenContext::look },
{ 0,50,0,180,&DreamGenContext::inventory },
{ 226,244,10,26,&DreamGenContext::zoomOnOff },
{ 226,244,26,40,&DreamGenContext::saveLoad },
{ 240,260,100,124,&DreamGenContext::madmanRun },
{ 0,320,0,200,&DreamGenContext::identifyOb },
{ 0xFFFF,0,0,0,0 }
};
checkCoords(mainList);
} else {
RectWithCallback<DreamGenContext> mainList2[] = {
{ 44,70,32,46,&DreamGenContext::look },
{ 0,50,0,180,&DreamGenContext::inventory },
{ 226+48,244+48,10,26,&DreamGenContext::zoomOnOff },
{ 226+48,244+48,26,40,&DreamGenContext::saveLoad },
{ 240,260,100,124,&DreamGenContext::madmanRun },
{ 0,320,0,200,&DreamGenContext::identifyOb },
{ 0xFFFF,0,0,0,0 }
};
checkCoords(mainList2);
}
if (data.byte(kWalkandexam) != 0)
walkAndExamine();
}
void DreamBase::showWatch() {
if (data.byte(kWatchon)) {
showFrame(engine->icons1(), 250, 1, 6, 0);
showTime();
}
}
void DreamBase::dumpWatch() {
if (data.byte(kWatchdump) != 1)
return;
multiDump(256, 21, 40, 12);
data.byte(kWatchdump) = 0;
}
void DreamBase::showTime() {
if (data.byte(kWatchon) == 0)
return;
Frame *charset = (Frame *)getSegment(data.word(kCharset1)).ptr(0, 0);
int seconds = data.byte(kSecondcount);
int minutes = data.byte(kMinutecount);
int hours = data.byte(kHourcount);
showFrame(charset, 282+5, 21, 91*3+10 + seconds / 10, 0);
showFrame(charset, 282+9, 21, 91*3+10 + seconds % 10, 0);
showFrame(charset, 270+5, 21, 91*3 + minutes / 10, 0);
showFrame(charset, 270+11, 21, 91*3 + minutes % 10, 0);
showFrame(charset, 256+5, 21, 91*3 + hours / 10, 0);
showFrame(charset, 256+11, 21, 91*3 + hours % 10, 0);
showFrame(charset, 267+5, 21, 91*3+20, 0);
}
void DreamBase::watchCount() {
if (data.byte(kWatchon) == 0)
return;
++data.byte(kTimercount);
if (data.byte(kTimercount) == 9) {
showFrame((Frame *)getSegment(data.word(kCharset1)).ptr(0, 0), 268+4, 21, 91*3+21, 0);
data.byte(kWatchdump) = 1;
} else if (data.byte(kTimercount) == 18) {
data.byte(kTimercount) = 0;
++data.byte(kSecondcount);
if (data.byte(kSecondcount) == 60) {
data.byte(kSecondcount) = 0;
++data.byte(kMinutecount);
if (data.byte(kMinutecount) == 60) {
data.byte(kMinutecount) = 0;
++data.byte(kHourcount);
if (data.byte(kHourcount) == 24)
data.byte(kHourcount) = 0;
}
}
showTime();
data.byte(kWatchdump) = 1;
}
}
void DreamBase::roomName() {
printMessage(88, 18, 53, 240, false);
uint16 textIndex = data.byte(kRoomnum);
if (textIndex >= 32)
textIndex -= 32;
data.word(kLinespacing) = 7;
uint8 maxWidth = (data.byte(kWatchon) == 1) ? 120 : 160;
uint16 descOffset = getSegment(data.word(kRoomdesc)).word(kIntextdat + textIndex * 2);
const uint8 *string = getSegment(data.word(kRoomdesc)).ptr(kIntext + descOffset, 0);
printDirect(string, 88, 25, maxWidth, false);
data.word(kLinespacing) = 10;
useCharset1();
}
void DreamBase::zoomIcon() {
if (data.byte(kZoomon) == 0)
return;
showFrame(engine->icons1(), kZoomx, kZoomy-1, 8, 0);
}
void DreamBase::loadRoom() {
data.byte(kRoomloaded) = 1;
data.word(kTimecount) = 0;
data.word(kMaintimer) = 0;
data.word(kMapoffsetx) = 104;
data.word(kMapoffsety) = 38;
data.word(kTextaddressx) = 13;
data.word(kTextaddressy) = 182;
data.byte(kTextlen) = 240;
data.byte(kLocation) = data.byte(kNewlocation);
const Room &room = g_roomData[data.byte(kNewlocation)];
startLoading(room);
loadRoomsSample();
switchRyanOn();
drawFlags();
uint8 mapXstart, mapYstart;
uint8 mapXsize, mapYsize;
getDimension(&mapXstart, &mapYstart, &mapXsize, &mapYsize);
}
void DreamGenContext::readSetData() {
data.word(kCharset1) = standardLoad("DREAMWEB.C00");
void *icons1Buffer = standardLoadCPP("DREAMWEB.G00");
engine->setIcons1(icons1Buffer);
void *icons2Buffer = standardLoadCPP("DREAMWEB.G01");
engine->setIcons2(icons2Buffer);
data.word(kMainsprites) = standardLoad("DREAMWEB.S00");
data.word(kPuzzletext) = standardLoad("DREAMWEB.T80");
data.word(kCommandtext) = standardLoad("DREAMWEB.T84");
useCharset1();
// FIXME: Why is this commented out?
//engine->openFile("DREAMWEB.VOL");
//uint8 *volumeTab = getSegment(data.word(kSoundbuffer)).ptr(16384, 0);
//engine->readFromFile(volumeTab, 2048-256);
//engine->closeFile();
}
Frame * DreamBase::tempGraphics() {
return (Frame *)getSegment(data.word(kTempgraphics)).ptr(0, 0);
}
Frame * DreamBase::tempGraphics2() {
return (Frame *)getSegment(data.word(kTempgraphics2)).ptr(0, 0);
}
Frame * DreamBase::tempGraphics3() {
return (Frame *)getSegment(data.word(kTempgraphics3)).ptr(0, 0);
}
void DreamBase::findRoomInLoc() {
uint8 x = data.byte(kMapx) / 11;
uint8 y = data.byte(kMapy) / 10;
uint8 roomNum = y * 6 + x;
data.byte(kRoomnum) = roomNum;
}
void DreamGenContext::autoLook() {
if ((data.word(kMousex) != data.word(kOldx)) || (data.word(kMousey) != data.word(kOldy))) {
data.word(kLookcounter) = 1000;
return;
}
--data.word(kLookcounter);
if (data.word(kLookcounter))
return;
if (data.word(kWatchingtime))
return;
doLook();
}
void DreamGenContext::look() {
if (data.word(kWatchingtime) || (data.byte(kPointermode) == 2)) {
blank();
return;
}
if (data.byte(kCommandtype) != 241) {
data.byte(kCommandtype) = 241;
commandOnly(25);
}
if ((data.word(kMousebutton) == 1) && (data.word(kMousebutton) != data.word(kOldbutton)))
doLook();
}
void DreamGenContext::doLook() {
createPanel();
showIcon();
underTextLine();
workToScreenM();
data.byte(kCommandtype) = 255;
dumpTextLine();
uint8 index = data.byte(kRoomnum) & 31;
uint16 offset = getSegment(data.word(kRoomdesc)).word(kIntextdat + index * 2);
const uint8 *string = getSegment(data.word(kRoomdesc)).ptr(kIntext, 0) + offset;
findNextColon(&string);
uint16 x;
if (data.byte(kReallocation) < 50)
x = 66;
else
x = 40;
if (printSlow(string, x, 80, 241, true) != 1)
hangOnP(400);
data.byte(kPointermode) = 0;
data.byte(kCommandtype) = 0;
redrawMainScrn();
workToScreenM();
}
void DreamBase::useCharset1() {
engine->setCurrentCharset((Frame *)getSegment(data.word(kCharset1)).ptr(0, 0));
}
void DreamBase::useTempCharset() {
engine->setCurrentCharset(engine->tempCharset());
}
void DreamBase::getRidOfTemp() {
deallocateMem(data.word(kTempgraphics));
}
void DreamBase::getRidOfTempText() {
deallocateMem(data.word(kTextfile1));
}
void DreamBase::getRidOfTemp2() {
deallocateMem(data.word(kTempgraphics2));
}
void DreamBase::getRidOfTemp3() {
deallocateMem(data.word(kTempgraphics3));
}
void DreamBase::getRidOfTempCharset() {
engine->freeTempCharset();
}
void DreamBase::getRidOfTempsP() {
deallocateMem(data.word(kTempsprites));
}
void DreamBase::getRidOfAll() {
deallocateMem(data.word(kBackdrop));
deallocateMem(data.word(kSetframes));
deallocateMem(data.word(kReel1));
deallocateMem(data.word(kReel2));
deallocateMem(data.word(kReel3));
deallocateMem(data.word(kReels));
deallocateMem(data.word(kPeople));
deallocateMem(data.word(kSetdesc));
deallocateMem(data.word(kBlockdesc));
deallocateMem(data.word(kRoomdesc));
deallocateMem(data.word(kFreeframes));
deallocateMem(data.word(kFreedesc));
}
// if skipDat, skip clearing and loading Setdat and Freedat
void DreamBase::loadRoomData(const Room &room, bool skipDat) {
engine->openFile(room.name);
FileHeader header;
engine->readFromFile((uint8 *)&header, sizeof(FileHeader));
// read segment lengths from room file header
int len[15];
for (int i = 0; i < 15; ++i)
len[i] = header.len(i);
data.word(kBackdrop) = allocateAndLoad(len[0]);
clearAndLoad(workspace(), 0, len[1], 132*66); // 132*66 = maplen
sortOutMap();
data.word(kSetframes) = allocateAndLoad(len[2]);
if (!skipDat)
clearAndLoad(data.word(kSetdat), 255, len[3], kSetdatlen);
else
engine->skipBytes(len[3]);
// NB: The skipDat version of this function as called by restoreall
// had a 'call bloc' instead of 'call loadseg' for reel1,
// but 'bloc' was not defined.
data.word(kReel1) = allocateAndLoad(len[4]);
data.word(kReel2) = allocateAndLoad(len[5]);
data.word(kReel3) = allocateAndLoad(len[6]);
data.word(kReels) = allocateAndLoad(len[7]);
data.word(kPeople) = allocateAndLoad(len[8]);
data.word(kSetdesc) = allocateAndLoad(len[9]);
data.word(kBlockdesc) = allocateAndLoad(len[10]);
data.word(kRoomdesc) = allocateAndLoad(len[11]);
data.word(kFreeframes) = allocateAndLoad(len[12]);
if (!skipDat)
clearAndLoad(data.word(kFreedat), 255, len[13], kFreedatlen);
else
engine->skipBytes(len[13]);
data.word(kFreedesc) = allocateAndLoad(len[14]);
engine->closeFile();
}
void DreamBase::restoreAll() {
const Room &room = g_roomData[data.byte(kLocation)];
loadRoomData(room, true);
setAllChanges();
}
void DreamBase::restoreReels() {
if (data.byte(kRoomloaded) == 0)
return;
const Room &room = g_roomData[data.byte(kReallocation)];
engine->openFile(room.name);
FileHeader header;
engine->readFromFile((uint8 *)&header, sizeof(FileHeader));
// read segment lengths from room file header
int len[15];
for (int i = 0; i < 15; ++i)
len[i] = header.len(i);
engine->skipBytes(len[0]);
engine->skipBytes(len[1]);
engine->skipBytes(len[2]);
engine->skipBytes(len[3]);
data.word(kReel1) = allocateAndLoad(len[4]);
data.word(kReel2) = allocateAndLoad(len[5]);
data.word(kReel3) = allocateAndLoad(len[6]);
engine->closeFile();
}
void DreamBase::loadFolder() {
loadIntoTemp("DREAMWEB.G09"); // folder graphics 1
loadIntoTemp2("DREAMWEB.G10"); // folder graphics 2
loadIntoTemp3("DREAMWEB.G11"); // folder graphics 3
loadTempCharset("DREAMWEB.C02"); // character set 3
loadTempText("DREAMWEB.T50"); // folder text
}
void DreamBase::showFolder() {
data.byte(kCommandtype) = 255;
if (data.byte(kFolderpage)) {
useTempCharset();
createPanel2();
showFrame(tempGraphics(), 0, 0, 0, 0);
showFrame(tempGraphics(), 143, 0, 1, 0);
showFrame(tempGraphics(), 0, 92, 2, 0);
showFrame(tempGraphics(), 143, 92, 3, 0);
folderExit();
if (data.byte(kFolderpage) != 1)
showLeftPage();
if (data.byte(kFolderpage) != 12)
showRightPage();
useCharset1();
underTextLine();
} else {
createPanel2();
showFrame(tempGraphics3(), 143-28, 0, 0, 0);
showFrame(tempGraphics3(), 143-28, 92, 1, 0);
folderExit();
underTextLine();
}
}
void DreamBase::showLeftPage() {
showFrame(tempGraphics2(), 0, 12, 3, 0);
uint16 y = 12+5;
for (size_t i = 0; i < 9; ++i) {
showFrame(tempGraphics2(), 0, y, 4, 0);
y += 16;
}
showFrame(tempGraphics2(), 0, y, 5, 0);
data.word(kLinespacing) = 8;
data.word(kCharshift) = 91;
data.byte(kKerning) = 1;
uint8 pageIndex = data.byte(kFolderpage) - 2;
const uint8 *string = getTextInFile1(pageIndex * 2);
y = 48;
for (size_t i = 0; i < 2; ++i) {
uint8 lastChar;
do {
lastChar = printDirect(&string, 2, &y, 140, false);
y += data.word(kLinespacing);
} while (lastChar != '\0');
}
data.byte(kKerning) = 0;
data.word(kCharshift) = 0;
data.word(kLinespacing) = 10;
uint8 *bufferToSwap = workspace() + (48*320)+2;
for (size_t i = 0; i < 120; ++i) {
for (size_t j = 0; j < 65; ++j) {
SWAP(bufferToSwap[j], bufferToSwap[130 - j]);
}
bufferToSwap += 320;
}
}
void DreamBase::showRightPage() {
showFrame(tempGraphics2(), 143, 12, 0, 0);
uint16 y = 12+37;
for (size_t i = 0; i < 7; ++i) {
showFrame(tempGraphics2(), 143, y, 1, 0);
y += 16;
}
showFrame(tempGraphics2(), 143, y, 2, 0);
data.word(kLinespacing) = 8;
data.byte(kKerning) = 1;
uint8 pageIndex = data.byte(kFolderpage) - 1;
const uint8 *string = getTextInFile1(pageIndex * 2);
y = 48;
for (size_t i = 0; i < 2; ++i) {
uint8 lastChar;
do {
lastChar = printDirect(&string, 152, &y, 140, false);
y += data.word(kLinespacing);
} while (lastChar != '\0');
}
data.byte(kKerning) = 0;
data.word(kLinespacing) = 10;
}
void DreamBase::showExit() {
showFrame(engine->icons1(), 274, 154, 11, 0);
}
void DreamBase::showMan() {
showFrame(engine->icons1(), 0, 0, 0, 0);
showFrame(engine->icons1(), 0, 114, 1, 0);
if (data.byte(kShadeson))
showFrame(engine->icons1(), 28, 25, 2, 0);
}
void DreamBase::panelIcons1() {
uint16 x;
if (data.byte(kWatchon) != 1)
x = 48;
else
x = 0;
showFrame(engine->icons2(), 204 + x, 4, 2, 0);
if (data.byte(kZoomon) != 1)
showFrame(engine->icons1(), 228 + x, 8, 5, 0);
showWatch();
}
void DreamBase::examIcon() {
showFrame(engine->icons2(), 254, 5, 3, 0);
}
const uint8 *DreamBase::getTextInFile1(uint16 index) {
SegmentRef text = getSegment(data.word(kTextfile1));
uint16 offset = text.word(index * 2) + kTextstart;
const uint8 *string = text.ptr(offset, 0);
return string;
}
void DreamBase::checkFolderCoords() {
RectWithCallback<DreamBase> folderList[] = {
{ 280,320,160,200, &DreamBase::quitKey },
{ 143,300,6,194, &DreamBase::nextFolder },
{ 0,143,6,194, &DreamBase::lastFolder },
{ 0,320,0,200, &DreamBase::blank },
{ 0xFFFF,0,0,0, 0 }
};
checkCoords(folderList);
}
void DreamBase::nextFolder() {
if (data.byte(kFolderpage) == 12) {
blank();
return;
}
if (data.byte(kCommandtype) != 201) {
data.byte(kCommandtype) = 201;
commandOnly(16);
}
if ((data.word(kMousebutton) == 1) && (data.word(kMousebutton) != data.word(kOldbutton))) {
++data.byte(kFolderpage);
folderHints();
delPointer();
showFolder();
data.word(kMousebutton) = 0;
checkFolderCoords();
workToScreenM();
}
}
void DreamBase::lastFolder() {
if (data.byte(kFolderpage) == 0) {
blank();
return;
}
if (data.byte(kCommandtype) != 202) {
data.byte(kCommandtype) = 202;
commandOnly(17);
}
if ((data.word(kMousebutton) == 1) && (data.word(kMousebutton) != data.word(kOldbutton))) {
--data.byte(kFolderpage);
delPointer();
showFolder();
data.word(kMousebutton) = 0;
checkFolderCoords();
workToScreenM();
}
}
void DreamBase::folderHints() {
if (data.byte(kFolderpage) == 5) {
if ((data.byte(kAidedead) != 1) && (getLocation(13) != 1)) {
setLocation(13);
showFolder();
const uint8 *string = getTextInFile1(30);
printDirect(string, 0, 86, 141, true);
workToScreenM();
hangOnP(200);
}
} else if (data.byte(kFolderpage) == 9) {
if (getLocation(7) != 1) {
setLocation(7);
showFolder();
const uint8 *string = getTextInFile1(31);
printDirect(string, 0, 86, 141, true);
workToScreenM();
hangOnP(200);
}
}
}
void DreamBase::folderExit() {
showFrame(tempGraphics2(), 296, 178, 6, 0);
}
void DreamBase::loadTravelText() {
data.word(kTraveltext) = standardLoad("DREAMWEB.T81"); // location descs
}
void DreamBase::loadTempText(const char *fileName) {
data.word(kTextfile1) = standardLoad(fileName);
}
void DreamBase::drawFloor() {
eraseOldObs();
drawFlags();
calcMapAd();
doBlocks();
showAllObs();
showAllFree();
showAllEx();
panelToMap();
initRain();
data.byte(kNewobs) = 0;
}
void DreamBase::allocateBuffers() {
data.word(kExtras) = allocateMem(kLengthofextra/16);
data.word(kMapdata) = allocateMem(kLengthofmap/16);
data.word(kFreedat) = allocateMem(kFreedatlen/16);
data.word(kSetdat) = allocateMem(kSetdatlen/16);
data.word(kMapstore) = allocateMem(kLenofmapstore/16);
data.word(kSounddata) = allocateMem(2048/16);
data.word(kSounddata2) = allocateMem(2048/16);
}
void DreamBase::workToScreenM() {
animPointer();
readMouse();
showPointer();
vSync();
workToScreen();
delPointer();
}
void DreamBase::loadMenu() {
loadIntoTemp("DREAMWEB.S02"); // sprite name 3
loadIntoTemp2("DREAMWEB.G07"); // mon. graphics 2
}
void DreamBase::showMenu() {
++data.byte(kMenucount);
if (data.byte(kMenucount) == 37*2)
data.byte(kMenucount) = 0;
showFrame(tempGraphics(), kMenux, kMenuy, data.byte(kMenucount) / 2, 0);
}
void DreamBase::dumpMenu() {
multiDump(kMenux, kMenuy, 48, 48);
}
void DreamBase::useMenu() {
getRidOfReels();
loadMenu();
createPanel();
showPanel();
showIcon();
data.byte(kNewobs) = 0;
drawFloor();
printSprites();
showFrame(tempGraphics2(), kMenux-48, kMenuy-4, 4, 0);
getUnderMenu();
showFrame(tempGraphics2(), kMenux+54, kMenuy+72, 5, 0);
workToScreenM();
data.byte(kGetback) = 0;
do {
delPointer();
putUnderMenu();
showMenu();
readMouse();
showPointer();
vSync();
dumpPointer();
dumpMenu();
dumpTextLine();
RectWithCallback<DreamBase> menuList[] = {
{ kMenux+54,kMenux+68,kMenuy+72,kMenuy+88,&DreamBase::quitKey },
{ 0,320,0,200,&DreamBase::blank },
{ 0xFFFF,0,0,0,0 }
};
checkCoords(menuList);
} while ((data.byte(kGetback) != 1) && !quitRequested());
data.byte(kManisoffscreen) = 0;
redrawMainScrn();
getRidOfTemp();
getRidOfTemp2();
restoreReels();
workToScreenM();
}
void DreamBase::atmospheres() {
const Atmosphere *a = &g_atmosphereList[0];
for (; a->_location != 255; ++a) {
if (a->_location != data.byte(kReallocation))
continue;
if (a->_mapX != data.byte(kMapx) || a->_mapY != data.byte(kMapy))
continue;
if (a->_sound != data.byte(kCh0playing)) {
if (data.byte(kLocation) == 45 && data.word(kReeltowatch) == 45)
continue; // "web"
playChannel0(a->_sound, a->_repeat);
// NB: The asm here reads
// cmp reallocation,2
// cmp mapy,0
// jz fullvol
// jnz notlouisvol
// I'm interpreting this as if the cmp reallocation is below the jz
if (data.byte(kMapy) == 0) {
data.byte(kVolume) = 0; // "fullvol"
return;
}
if (data.byte(kReallocation) == 2 && data.byte(kMapx) == 22 && data.byte(kMapy) == 10)
data.byte(kVolume) = 5; // "louisvol"
if (isCD() && data.byte(kReallocation) == 14) {
if (data.byte(kMapx) == 33) {
data.byte(kVolume) = 0; // "ismad2"
return;
}
if (data.byte(kMapx) == 22) {
data.byte(kVolume) = 5;
return;
}
}
}
if (data.byte(kReallocation) == 2) {
if (data.byte(kMapx) == 22) {
data.byte(kVolume) = 5; // "louisvol"
return;
}
if (data.byte(kMapx) == 11) {
data.byte(kVolume) = 0; // "fullvol"
return;
}
}
return;
}
cancelCh0();
}
uint8 DreamBase::nextSymbol(uint8 symbol) {
uint8 result = symbol + 1;
if (result == 6)
return 0;
if (result == 12)
return 6;
return result;
}
void DreamBase::showSymbol() {
showFrame(tempGraphics(), kSymbolx, kSymboly, 12, 0);
showFrame(tempGraphics(), data.byte(kSymboltopx) + kSymbolx-44, kSymboly+20, data.byte(kSymboltopnum), 32);
uint8 nextTopSymbol = nextSymbol(data.byte(kSymboltopnum));
showFrame(tempGraphics(), data.byte(kSymboltopx) + kSymbolx+5, kSymboly+20, nextTopSymbol, 32);
uint8 nextNextTopSymbol = nextSymbol(nextTopSymbol);
showFrame(tempGraphics(), data.byte(kSymboltopx) + kSymbolx+54, kSymboly+20, nextNextTopSymbol, 32);
showFrame(tempGraphics(), data.byte(kSymbolbotx) + kSymbolx-44, kSymboly+49, 6 + data.byte(kSymbolbotnum), 32);
uint8 nextBotSymbol = nextSymbol(data.byte(kSymbolbotnum));
showFrame(tempGraphics(), data.byte(kSymbolbotx) + kSymbolx+5, kSymboly+49, 6 + nextBotSymbol, 32);
uint8 nextNextBotSymbol = nextSymbol(nextBotSymbol);
showFrame(tempGraphics(), data.byte(kSymbolbotx) + kSymbolx+54, kSymboly+49, 6 + nextNextBotSymbol, 32);
}
void DreamBase::readKey() {
uint16 bufOut = data.word(kBufferout);
if (bufOut == data.word(kBufferin)) {
// empty buffer
data.byte(kCurrentkey) = 0;
return;
}
bufOut = (bufOut + 1) & 15; // The buffer has size 16
data.byte(kCurrentkey) = g_keyBuffer[bufOut];
data.word(kBufferout) = bufOut;
}
void DreamBase::setTopLeft() {
if (data.byte(kSymboltopdir) != 0) {
blank();
return;
}
if (data.byte(kCommandtype) != 210) {
data.byte(kCommandtype) = 210;
commandOnly(19);
}
if (data.word(kMousebutton) != 0)
data.byte(kSymboltopdir) = 0xFF;
}
void DreamBase::setTopRight() {
if (data.byte(kSymboltopdir) != 0) {
blank();
return;
}
if (data.byte(kCommandtype) != 211) {
data.byte(kCommandtype) = 211;
commandOnly(20);
}
if (data.word(kMousebutton) != 0)
data.byte(kSymboltopdir) = 1;
}
void DreamBase::setBotLeft() {
if (data.byte(kSymbolbotdir) != 0) {
blank();
return;
}
if (data.byte(kCommandtype) != 212) {
data.byte(kCommandtype) = 212;
commandOnly(21);
}
if (data.word(kMousebutton) != 0)
data.byte(kSymbolbotdir) = 0xFF;
}
void DreamBase::setBotRight() {
if (data.byte(kSymbolbotdir) != 0) {
blank();
return;
}
if (data.byte(kCommandtype) != 213) {
data.byte(kCommandtype) = 213;
commandOnly(22);
}
if (data.word(kMousebutton) != 0)
data.byte(kSymbolbotdir) = 1;
}
void DreamBase::newGame() {
if (data.byte(kCommandtype) != 251) {
data.byte(kCommandtype) = 251;
commandOnly(47);
}
if (data.word(kMousebutton) == 1)
data.byte(kGetback) = 3;
}
void DreamBase::pickupOb(uint8 command, uint8 pos) {
data.byte(kLastinvpos) = pos;
data.byte(kObjecttype) = kFreeObjectType;
data.byte(kItemframe) = command;
data.byte(kCommand) = command;
//uint8 dummy;
//getAnyAd(&dummy, &dummy); // was in the original source, seems useless here
transferToEx(command);
}
void DreamGenContext::initialInv() {
if (data.byte(kReallocation) != 24)
return;
pickupOb(11, 5);
pickupOb(12, 6);
pickupOb(13, 7);
pickupOb(14, 8);
pickupOb(18, 0);
pickupOb(19, 1);
pickupOb(20, 9);
pickupOb(16, 2);
data.byte(kWatchmode) = 1;
data.word(kReeltohold) = 0;
data.word(kEndofholdreel) = 6;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
switchRyanOff();
}
void DreamGenContext::walkIntoRoom() {
if (data.byte(kLocation) == 14 && data.byte(kMapx) == 22) {
data.byte(kDestination) = 1;
data.byte(kFinaldest) = 1;
autoSetWalk();
}
}
void DreamBase::afterIntroRoom() {
if (data.byte(kNowinnewroom) == 0)
return; // notnewintro
clearWork();
findRoomInLoc();
data.byte(kNewobs) = 1;
drawFloor();
reelsOnScreen();
spriteUpdate();
printSprites();
workToScreen();
data.byte(kNowinnewroom) = 0;
}
void DreamBase::redrawMainScrn() {
data.word(kTimecount) = 0;
createPanel();
data.byte(kNewobs) = 0;
drawFloor();
printSprites();
reelsOnScreen();
showIcon();
getUnderZoom();
underTextLine();
readMouse();
data.byte(kCommandtype) = 255;
}
void DreamBase::blank() {
if (data.byte(kCommandtype) != 199) {
data.byte(kCommandtype) = 199;
commandOnly(0);
}
}
void DreamBase::allPointer() {
readMouse();
showPointer();
dumpPointer();
}
void DreamBase::makeMainScreen() {
createPanel();
data.byte(kNewobs) = 1;
drawFloor();
spriteUpdate();
printSprites();
reelsOnScreen();
showIcon();
getUnderZoom();
underTextLine();
data.byte(kCommandtype) = 255;
animPointer();
workToScreenM();
data.byte(kCommandtype) = 200;
data.byte(kManisoffscreen) = 0;
}
void DreamBase::openInv() {
data.byte(kInvopen) = 1;
printMessage(80, 58 - 10, 61, 240, (240 & 1));
fillRyan();
data.byte(kCommandtype) = 255;
}
void DreamBase::obsThatDoThings() {
if (!compare(data.byte(kCommand), data.byte(kObjecttype), "MEMB"))
return; // notlouiscard
if (getLocation(4) != 1) {
setLocation(4);
lookAtCard();
}
}
void DreamBase::describeOb() {
const uint8 *obText = getObTextStart();
uint16 y = 92;
if (data.byte(kForeignrelease) && data.byte(kObjecttype) == kSetObjectType1)
y = 82;
data.word(kCharshift) = 91 + 91;
printDirect(&obText, 33, &y, 241, 241 & 1);
data.word(kCharshift) = 0;
y = 104;
if (data.byte(kForeignrelease) && data.byte(kObjecttype) == kSetObjectType1)
y = 94;
printDirect(&obText, 36, &y, 241, 241 & 1);
obsThatDoThings();
// Additional text
if (compare(data.byte(kCommand), data.byte(kObjecttype), "CUPE")) {
// Empty cup
uint16 offset = kTextstart + getSegment(data.word(kPuzzletext)).word(40 * 2);
const uint8 *string = getSegment(data.word(kPuzzletext)).ptr(offset, 0);
printDirect(string, 36, y + 10, 241, 241 & 1);
} else if (compare(data.byte(kCommand), data.byte(kObjecttype), "CUPF")) {
// Full cup
uint16 offset = kTextstart + getSegment(data.word(kPuzzletext)).word(39 * 2);
const uint8 *string = getSegment(data.word(kPuzzletext)).ptr(offset, 0);
printDirect(string, 36, y + 10, 241, 241 & 1);
}
}
void DreamBase::delEverything() {
if (data.byte(kMapysize) + data.word(kMapoffsety) < 182) {
mapToPanel();
} else {
// Big room
data.byte(kMapysize) -= 8;
mapToPanel();
data.byte(kMapysize) += 8;
}
}
void DreamBase::errorMessage1() {
delPointer();
printMessage(76, 21, 58, 240, (240 & 1));
readMouse();
showPointer();
workToScreen();
delPointer();
hangOnP(50);
showPanel();
showMan();
examIcon();
readMouse();
useOpened();
showPointer();
workToScreen();
delPointer();
}
void DreamBase::errorMessage2() {
data.byte(kCommandtype) = 255;
delPointer();
printMessage(76, 21, 59, 240, (240 & 1));
readMouse();
showPointer();
workToScreen();
delPointer();
hangOnP(50);
showPanel();
showMan();
examIcon();
readMouse();
useOpened();
showPointer();
workToScreen();
delPointer();
}
void DreamBase::errorMessage3() {
delPointer();
printMessage(76, 21, 60, 240, (240 & 1));
workToScreenM();
hangOnP(50);
showPanel();
showMan();
examIcon();
readMouse();
useOpened();
showPointer();
workToScreen();
delPointer();
}
void DreamBase::reExFromOpen() {
}
void DreamBase::putBackObStuff() {
createPanel();
showPanel();
showMan();
obIcons();
showExit();
obPicture();
describeOb();
underTextLine();
data.byte(kCommandtype) = 255;
readMouse();
showPointer();
workToScreen();
delPointer();
}
bool DreamBase::isSetObOnMap(uint8 index) {
return (getSetAd(index)->mapad[0] == 0);
}
void DreamBase::dumpZoom() {
if (data.byte(kZoomon) == 1)
multiDump(kZoomx + 5, kZoomy + 4, 46, 40);
}
void DreamBase::examineInventory() {
if (data.byte(kCommandtype) != 249) {
data.byte(kCommandtype) = 249;
commandOnly(32);
}
if (!(data.word(kMousebutton) & 1))
return;
createPanel();
showPanel();
showMan();
showExit();
examIcon();
data.byte(kPickup) = 0;
data.byte(kInvopen) = 2;
openInv();
workToScreenM();
}
void DreamBase::middlePanel() {
Frame *tempSprites = (Frame *)getSegment(data.word(kTempsprites)).ptr(0, 0);
showFrame(tempSprites, 72 + 47 + 20, 0, 48, 0);
showFrame(tempSprites, 72 + 19, 21, 47, 0);
showFrame(tempSprites, 160 + 23, 0, 48, 4);
showFrame(tempSprites, 160 + 71, 21, 47, 4);
}
void DreamBase::showDiary() {
showFrame(tempGraphics(), kDiaryx, kDiaryy + 37, 1, 0);
showFrame(tempGraphics(), kDiaryx + 176, kDiaryy + 108, 2, 0);
}
void DreamBase::underTextLine() {
if (data.byte(kForeignrelease))
multiGet(_textUnder, data.byte(kTextaddressx), data.word(kTextaddressy) - 3, kUnderTextSizeX_f, kUnderTextSizeY_f);
else
multiGet(_textUnder, data.byte(kTextaddressx), data.word(kTextaddressy), kUnderTextSizeX, kUnderTextSizeY);
}
void DreamBase::getUnderZoom() {
multiGet(_zoomSpace, kZoomx + 5, kZoomy + 4, 46, 40);
}
void DreamBase::putUnderZoom() {
multiPut(_zoomSpace, kZoomx + 5, kZoomy + 4, 46, 40);
}
void DreamBase::showWatchReel() {
uint16 reelPointer = data.word(kReeltowatch);
plotReel(reelPointer);
data.word(kReeltowatch) = reelPointer;
// check for shake
if (data.byte(kReallocation) == 26 && reelPointer == 104)
data.byte(kShakecounter) = 0xFF;
}
void DreamBase::watchReel() {
if (data.word(kReeltowatch) != 0xFFFF) {
if (data.byte(kManspath) != data.byte(kFinaldest))
return; // Wait until stopped walking
if (data.byte(kTurntoface) != data.byte(kFacing))
return;
if (--data.byte(kSpeedcount) != 0xFF) {
showWatchReel();
return;
}
data.byte(kSpeedcount) = data.byte(kWatchspeed);
if (data.word(kReeltowatch) != data.word(kEndwatchreel)) {
++data.word(kReeltowatch);
showWatchReel();
return;
}
if (data.word(kWatchingtime)) {
showWatchReel();
return;
}
data.word(kReeltowatch) = 0xFFFF;
data.byte(kWatchmode) = 0xFF;
if (data.word(kReeltohold) == 0xFFFF)
return; // No more reel
data.byte(kWatchmode) = 1;
} else if (data.byte(kWatchmode) != 1) {
if (data.byte(kWatchmode) != 2)
return; // "notreleasehold"
if (--data.byte(kSpeedcount) == 0xFF) {
data.byte(kSpeedcount) = data.byte(kWatchspeed);
++data.word(kReeltohold);
}
if (data.word(kReeltohold) == data.word(kEndofholdreel)) {
data.word(kReeltohold) = 0xFFFF;
data.byte(kWatchmode) = 0xFF;
data.byte(kDestination) = data.byte(kDestafterhold);
data.byte(kFinaldest) = data.byte(kDestafterhold);
autoSetWalk();
return;
}
}
uint16 reelPointer = data.word(kReeltohold);
plotReel(reelPointer);
}
void DreamGenContext::afterNewRoom() {
if (data.byte(kNowinnewroom) == 0)
return; // notnew
data.word(kTimecount) = 0;
createPanel();
data.byte(kCommandtype) = 0;
findRoomInLoc();
if (data.byte(kRyanon) != 1) {
data.byte(kManspath) = findPathOfPoint(data.byte(kRyanx) + 12, data.byte(kRyany) + 12);
findXYFromPath();
data.byte(kResetmanxy) = 1;
}
data.byte(kNewobs) = 1;
drawFloor();
data.word(kLookcounter) = 160;
data.byte(kNowinnewroom) = 0;
showIcon();
spriteUpdate();
printSprites();
underTextLine();
reelsOnScreen();
mainScreen();
getUnderZoom();
zoom();
workToScreenM();
walkIntoRoom();
edensFlatReminders();
atmospheres();
}
void DreamGenContext::madmanRun() {
if (data.byte(kLocation) != 14 ||
data.byte(kMapx) != 22 ||
data.byte(kPointermode) != 2 ||
data.byte(kMadmanflag) != 0) {
identifyOb();
return;
}
if (data.byte(kCommandtype) != 211) {
data.byte(kCommandtype) = 211;
commandOnly(52);
}
if (data.word(kMousebutton) == 1 &&
data.word(kMousebutton) != data.word(kOldbutton))
data.byte(kLastweapon) = 8;
}
void DreamBase::decide() {
setMode();
loadPalFromIFF();
clearPalette();
data.byte(kPointermode) = 0;
data.word(kWatchingtime) = 0;
data.byte(kPointerframe) = 0;
data.word(kTextaddressx) = 70;
data.word(kTextaddressy) = 182 - 8;
data.byte(kTextlen) = 181;
data.byte(kManisoffscreen) = 1;
loadSaveBox();
showDecisions();
workToScreen();
fadeScreenUp();
data.byte(kGetback) = 0;
RectWithCallback<DreamBase> decideList[] = {
{ kOpsx+69,kOpsx+124,kOpsy+30,kOpsy+76,&DreamBase::newGame },
{ kOpsx+20,kOpsx+87,kOpsy+10,kOpsy+59,&DreamBase::DOSReturn },
{ kOpsx+123,kOpsx+190,kOpsy+10,kOpsy+59,&DreamBase::loadOld },
{ 0,320,0,200,&DreamBase::blank },
{ 0xFFFF,0,0,0,0 }
};
do {
if (data.byte(kQuitrequested) != 0)
return;
readMouse();
showPointer();
vSync();
dumpPointer();
dumpTextLine();
delPointer();
checkCoords(decideList);
} while (!data.byte(kGetback));
if (data.byte(kGetback) != 4)
getRidOfTemp(); // room not loaded
data.word(kTextaddressx) = 13;
data.word(kTextaddressy) = 182;
data.byte(kTextlen) = 240;
}
void DreamGenContext::showGun() {
data.byte(kAddtored) = 0;
data.byte(kAddtogreen) = 0;
data.byte(kAddtoblue) = 0;
palToStartPal();
palToEndPal();
greyscaleSum();
data.byte(kFadedirection) = 1;
data.byte(kFadecount) = 63;
data.byte(kColourpos) = 0;
data.byte(kNumtofade) = 128;
hangOn(130);
endPalToStart();
clearEndPal();
data.byte(kFadedirection) = 1;
data.byte(kFadecount) = 63;
data.byte(kColourpos) = 0;
data.byte(kNumtofade) = 128;
hangOn(200);
data.byte(kRoomssample) = 34;
loadRoomsSample();
data.byte(kVolume) = 0;
loadIntoTemp("DREAMWEB.G13");
createPanel2();
showFrame(tempGraphics(), 100, 4, 0, 0);
showFrame(tempGraphics(), 158, 106, 1, 0);
workToScreen();
getRidOfTemp();
fadeScreenUp();
hangOn(160);
playChannel0(12, 0);
loadTempText("DREAMWEB.T83");
rollEndCreditsGameLost();
getRidOfTempText();
}
void DreamBase::diaryKeyP() {
if (data.byte(kCommandtype) != 214) {
data.byte(kCommandtype) = 214;
commandOnly(23);
}
if (!data.word(kMousebutton) ||
data.word(kOldbutton) == data.word(kMousebutton) ||
data.byte(kPresscount))
return; // notkeyp
playChannel1(16);
data.byte(kPresscount) = 12;
data.byte(kPressed) = 'P';
data.byte(kDiarypage)--;
if (data.byte(kDiarypage) == 0xFF)
data.byte(kDiarypage) = 11;
}
void DreamBase::diaryKeyN() {
if (data.byte(kCommandtype) != 213) {
data.byte(kCommandtype) = 213;
commandOnly(23);
}
if (!data.word(kMousebutton) ||
data.word(kOldbutton) == data.word(kMousebutton) ||
data.byte(kPresscount))
return; // notkeyn
playChannel1(16);
data.byte(kPresscount) = 12;
data.byte(kPressed) = 'N';
data.byte(kDiarypage)++;
if (data.byte(kDiarypage) == 12)
data.byte(kDiarypage) = 0;
}
void DreamBase::dropError() {
data.byte(kCommandtype) = 255;
delPointer();
printMessage(76, 21, 56, 240, 240 & 1);
workToScreenM();
hangOnP(50);
showPanel();
showMan();
examIcon();
data.byte(kCommandtype) = 255;
workToScreenM();
}
void DreamBase::cantDrop() {
data.byte(kCommandtype) = 255;
delPointer();
printMessage(76, 21, 24, 240, 240 & 1);
workToScreenM();
hangOnP(50);
showPanel();
showMan();
examIcon();
data.byte(kCommandtype) = 255;
workToScreenM();
}
void DreamBase::getBack1() {
if (data.byte(kPickup) != 0) {
blank();
return;
}
if (data.byte(kCommandtype) != 202) {
data.byte(kCommandtype) = 202;
commandOnly(26);
}
if (data.word(kMousebutton) == data.word(kOldbutton))
return;
if (data.word(kMousebutton) & 1) {
// Get back
data.byte(kGetback) = 1;
data.byte(kPickup) = 0;
}
}
void DreamBase::autoAppear() {
if (data.byte(kLocation) == 32) {
// In alley
resetLocation(5);
setLocation(10);
data.byte(kDestpos) = 10;
return;
}
if (data.byte(kReallocation) == 24) {
// In Eden's apartment
if (data.byte(kGeneraldead) == 1) {
data.byte(kGeneraldead)++;
placeSetObject(44);
placeSetObject(18);
placeSetObject(93);
removeSetObject(92);
removeSetObject(55);
removeSetObject(75);
removeSetObject(84);
removeSetObject(85);
} else if (data.byte(kSartaindead) == 1) {
// Eden's part 2
removeSetObject(44);
removeSetObject(93);
placeSetObject(55);
data.byte(kSartaindead)++;
}
} else {
// Not in Eden's
if (data.byte(kReallocation) == 25) {
// Sart roof
data.byte(kNewsitem) = 3;
resetLocation(6);
setLocation(11);
data.byte(kDestpos) = 11;
} else {
if (data.byte(kReallocation) == 2 && data.byte(kRockstardead) != 0)
placeSetObject(23);
}
}
}
void DreamBase::quitKey() {
if (data.byte(kCommandtype) != 222) {
data.byte(kCommandtype) = 222;
commandOnly(4);
}
if (data.word(kMousebutton) != data.word(kOldbutton) && (data.word(kMousebutton) & 1))
data.byte(kGetback) = 1;
}
void DreamBase::setupTimedUse(uint16 textIndex, uint16 countToTimed, uint16 timeCount, byte x, byte y) {
if (data.word(kTimecount) != 0)
return; // can't setup
data.byte(kTimedy) = y;
data.byte(kTimedx) = x;
data.word(kCounttotimed) = countToTimed;
data.word(kTimecount) = timeCount + countToTimed;
data.word(kTimedseg) = data.word(kPuzzletext);
data.word(kTimedoffset) = kTextstart + getSegment(data.word(kPuzzletext)).word(textIndex * 2);
const uint8 *string = getSegment(data.word(kPuzzletext)).ptr(data.word(kTimedoffset), 0);
debug(1, "setupTimedUse: %d => '%s'", textIndex, string);
}
void DreamBase::entryTexts() {
switch (data.byte(kLocation)) {
case 21:
setupTimedUse(28, 60, 11, 68, 64);
break;
case 30:
setupTimedUse(27, 60, 11, 68, 64);
break;
case 23:
setupTimedUse(29, 60, 11, 68, 64);
break;
case 31:
setupTimedUse(30, 60, 11, 68, 64);
break;
case 20: // Sarter's 2
setupTimedUse(31, 60, 11, 68, 64);
break;
case 24: // Eden's lobby
setupTimedUse(32, 60, 3, 68, 64);
break;
case 34: // Eden 2
setupTimedUse(33, 60, 3, 68, 64);
break;
default:
break;
}
}
void DreamBase::entryAnims() {
data.word(kReeltowatch) = 0xFFFF;
data.byte(kWatchmode) = (byte)-1;
switch (data.byte(kLocation)) {
case 33: // beach
switchRyanOff();
data.word(kWatchingtime) = 76 * 2;
data.word(kReeltowatch) = 0;
data.word(kEndwatchreel) = 76;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
break;
case 44: // Sparky's
resetLocation(8);
data.word(kWatchingtime) = 50*2;
data.word(kReeltowatch) = 247;
data.word(kEndwatchreel) = 297;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
switchRyanOff();
break;
case 22: // lift
data.word(kWatchingtime) = 31 * 2;
data.word(kReeltowatch) = 0;
data.word(kEndwatchreel) = 30;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
switchRyanOff();
break;
case 26: // under church
data.byte(kSymboltopnum) = 2;
data.byte(kSymbolbotnum) = 1;
break;
case 45: // entered Dreamweb
data.byte(kKeeperflag) = 0;
data.word(kWatchingtime) = 296;
data.word(kReeltowatch) = 45;
data.word(kEndwatchreel) = 198;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
switchRyanOff();
break;
default:
if (data.byte(kReallocation) == 46 && data.byte(kSartaindead) == 1) { // Crystal
removeFreeObject(0);
} else if (data.byte(kLocation) == 9 && !checkIfPathIsOn(2) && data.byte(kAidedead) != 0) {
// Top of church
if (checkIfPathIsOn(3))
turnPathOn(2);
// Make doors open
removeSetObject(4);
placeSetObject(5);
} else if (data.byte(kLocation) == 47) { // Dream centre
placeSetObject(4);
placeSetObject(5);
} else if (data.byte(kLocation) == 38) { // Car park
data.word(kWatchingtime) = 57 * 2;
data.word(kReeltowatch) = 4;
data.word(kEndwatchreel) = 57;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
switchRyanOff();
} else if (data.byte(kLocation) == 32) { // Alley
data.word(kWatchingtime) = 66 * 2;
data.word(kReeltowatch) = 0;
data.word(kEndwatchreel) = 66;
data.byte(kWatchspeed) = 1;
data.byte(kSpeedcount) = 1;
switchRyanOff();
} else if (data.byte(kLocation) == 24) { // Eden's again
turnAnyPathOn(2, data.byte(kRoomnum) - 1);
}
}
}
void DreamBase::updateSymbolTop() {
if (!data.byte(kSymboltopdir))
return; // topfinished
if (data.byte(kSymboltopdir) == (byte)-1) {
// Backward
data.byte(kSymboltopx)--;
if (data.byte(kSymboltopx) != (byte)-1) {
// Not wrapping
if (data.byte(kSymboltopx) != 24)
return; // topfinished
data.byte(kSymboltopdir) = 0;
} else {
data.byte(kSymboltopx) = 48;
data.byte(kSymboltopnum)++;
if (data.byte(kSymboltopnum) != 6)
return; // topfinished
data.byte(kSymboltopnum) = 0;
}
} else {
// Forward
data.byte(kSymboltopx)++;
if (data.byte(kSymboltopx) != 49) {
// Not wrapping
if (data.byte(kSymboltopx) != 24)
return; // topfinished
data.byte(kSymboltopdir) = 0;
} else {
data.byte(kSymboltopx) = 0;
data.byte(kSymboltopnum)--;
if (data.byte(kSymboltopnum) != (byte)-1)
return; // topfinished
data.byte(kSymboltopnum) = 5;
}
}
}
void DreamBase::updateSymbolBot() {
if (!data.byte(kSymbolbotdir))
return; // botfinished
if (data.byte(kSymbolbotdir) == (byte)-1) {
// Backward
data.byte(kSymbolbotx)--;
if (data.byte(kSymbolbotx) != (byte)-1) {
// Not wrapping
if (data.byte(kSymbolbotx) != 24)
return; // botfinished
data.byte(kSymbolbotdir) = 0;
} else {
data.byte(kSymbolbotx) = 48;
data.byte(kSymbolbotnum)++;
if (data.byte(kSymbolbotnum) != 6)
return; // botfinished
data.byte(kSymbolbotnum) = 0;
}
} else {
// Forward
data.byte(kSymbolbotx)++;
if (data.byte(kSymbolbotx) != 49) {
// Not wrapping
if (data.byte(kSymbolbotx) != 24)
return; // botfinished
data.byte(kSymbolbotdir) = 0;
} else {
data.byte(kSymbolbotx) = 0;
data.byte(kSymbolbotnum)--;
if (data.byte(kSymbolbotnum) != (byte)-1)
return; // botfinished
data.byte(kSymbolbotnum) = 5;
}
}
}
void DreamBase::showDiaryPage() {
showFrame(tempGraphics(), kDiaryx, kDiaryy, 0, 0);
data.byte(kKerning) = 1;
useTempCharset();
data.word(kCharshift) = 91+91;
const uint8 *string = getTextInFile1(data.byte(kDiarypage));
uint16 y = kDiaryy + 16;
printDirect(&string, kDiaryx + 48, &y, 240, 240 & 1);
y = kDiaryy + 16;
printDirect(&string, kDiaryx + 129, &y, 240, 240 & 1);
y = kDiaryy + 23;
printDirect(&string, kDiaryx + 48, &y, 240, 240 & 1);
data.byte(kKerning) = 0;
data.word(kCharshift) = 0;
useCharset1();
}
void DreamBase::dumpDiaryKeys() {
if (data.byte(kPresscount) == 1) {
if (data.byte(kSartaindead) != 1 && data.byte(kDiarypage) == 5 && getLocation(6) != 1) {
// Add Sartain Industries note
setLocation(6);
delPointer();
const uint8 *string = getTextInFile1(12);
printDirect(string, 70, 106, 241, 241 & 1);
workToScreenM();
hangOnP(200);
createPanel();
showIcon();
showDiary();
showDiaryPage();
workToScreenM();
showPointer();
return;
} else {
multiDump(kDiaryx + 48, kDiaryy + 15, 200, 16);
}
}
multiDump(kDiaryx + 94, kDiaryy + 97, 16, 16);
multiDump(kDiaryx + 151, kDiaryy + 71, 16, 16);
}
void DreamBase::lookAtCard() {
data.byte(kManisoffscreen) = 1;
getRidOfReels();
loadKeypad();
createPanel2();
showFrame(tempGraphics(), 160, 80, 42, 128);
const uint8 *obText = getObTextStart();
findNextColon(&obText);
findNextColon(&obText);
findNextColon(&obText);
uint16 y = 124;
printDirect(&obText, 36, &y, 241, 241 & 1);
workToScreenM();
hangOnW(280);
createPanel2();
showFrame(tempGraphics(), 160, 80, 42, 128);
printDirect(obText, 36, 130, 241, 241 & 1);
workToScreenM();
hangOnW(200);
data.byte(kManisoffscreen) = 0;
getRidOfTemp();
restoreReels();
putBackObStuff();
}
void DreamBase::clearBuffers() {
memset(getSegment(data.word(kExtras)).ptr(0, kLengthofextra), 0xFF, kLengthofextra);
memcpy(_initialVars, data.ptr(kStartvars, kLengthofvars), kLengthofvars);
clearChanges();
}
void DreamBase::clearChanges() {
memset(_listOfChanges, 0xFF, 4*kNumchanges);
setupInitialReelRoutines();
memcpy(data.ptr(kStartvars, kLengthofvars), _initialVars, kLengthofvars);
data.word(kExframepos) = 0;
data.word(kExtextpos) = 0;
memset(getSegment(data.word(kExtras)).ptr(0, kLengthofextra), 0xFF, kLengthofextra);
const uint8 initialRoomsCanGo[] = { 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
memcpy(_roomsCanGo, initialRoomsCanGo, 16);
}
void DreamBase::showDiaryKeys() {
if (!data.byte(kPresscount))
return; // nokeyatall
data.byte(kPresscount)--;
if (!data.byte(kPresscount))
return; // nokeyatall
if (data.byte(kPressed) == 'N') {
byte frame = (data.byte(kPresscount) == 1) ? 3 : 4;
showFrame(tempGraphics(), kDiaryx + 94, kDiaryy + 97, frame, 0);
} else {
byte frame = (data.byte(kPresscount) == 1) ? 5 : 6;
showFrame(tempGraphics(), kDiaryx + 151, kDiaryy + 71, frame, 0);
}
if (data.byte(kPresscount) == 1)
showDiaryPage();
}
void DreamBase::edensFlatReminders() {
if (data.byte(kReallocation) != 24 || data.byte(kMapx) != 44)
return; // not in Eden's lift
if (data.byte(kProgresspoints))
return; // not the first time in Eden's apartment
uint16 exObjextIndex = findExObject("CSHR");
if (!isRyanHolding("DKEY") || exObjextIndex == kNumexobjects) {
setupTimedUse(50, 48, 8, 54, 70); // forgot something
return;
}
DynObject *object = getExAd(exObjextIndex);
if (object->mapad[0] != 4) {
setupTimedUse(50, 48, 8, 54, 70); // forgot something
return;
} else if (object->mapad[1] != 255) {
if (!compare(object->mapad[1], object->mapad[0], "PURS")) {
setupTimedUse(50, 48, 8, 54, 70); // forgot something
return;
}
}
data.byte(kProgresspoints)++; // got card
}
void DreamBase::incRyanPage() {
if (data.byte(kCommandtype) != 222) {
data.byte(kCommandtype) = 222;
commandOnly(31);
}
if (data.word(kMousebutton) == data.word(kOldbutton) || !(data.word(kMousebutton) & 1))
return;
data.byte(kRyanpage) = (data.word(kMousex) - (kInventx + 167)) / 18;
delPointer();
fillRyan();
readMouse();
showPointer();
workToScreen();
delPointer();
}
void DreamBase::emergencyPurge() {
while (true) {
if (data.word(kExframepos) + 4000 < kExframeslen) {
// Not near frame end
if (data.word(kExtextpos) + 400 < kExtextlen)
return; // notneartextend
}
purgeAnItem();
}
}
void DreamBase::purgeAnItem() {
const DynObject *extraObjects = (const DynObject *)getSegment(data.word(kExtras)).ptr(kExdata, 0);
for (size_t i = 0; i < kNumexobjects; ++i) {
if (extraObjects[i].mapad[0] && extraObjects[i].id[0] == 255 &&
extraObjects[i].initialLocation != data.byte(kReallocation)) {
deleteExObject(i);
return;
}
}
for (size_t i = 0; i < kNumexobjects; ++i) {
if (extraObjects[i].mapad[0] && extraObjects[i].id[0] == 255) {
deleteExObject(i);
return;
}
}
}
} // End of namespace DreamGen