scummvm/engines/avalanche/visa2.cpp

281 lines
8 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.
*
*/
/*
* This code is based on the original source code of Lord Avalot d'Argent version 1.3.
* Copyright (c) 1994-1995 Mike, Mark and Thomas Thurman.
*/
/* VISA The new Sez handler. (Replaces Access.) */
#include "avalanche/avalanche.h"
#include "avalanche/visa2.h"
#include "avalanche/gyro2.h"
#include "avalanche/scrolls2.h"
#include "avalanche/acci2.h"
#include "avalanche/lucerna2.h"
#include "avalanche/animation.h"
#include "common/textconsole.h"
namespace Avalanche {
Visa::Visa(AvalancheEngine *vm) {
_vm = vm;
_noError = true;
}
void Visa::unSkrimble() {
for (uint16 i = 0; i < _vm->_gyro->_bufSize; i++)
_vm->_gyro->_buffer[i] = (~(_vm->_gyro->_buffer[i] - (i + 1))) % 256;
}
void Visa::doTheBubble() {
_vm->_gyro->_bufSize++;
_vm->_gyro->_buffer[_vm->_gyro->_bufSize - 1] = 2;
}
/**
* Display a string in a scroll
* @remarks Originally called 'dixi'
*/
void Visa::displayScrollChain(char block, byte point, bool report, bool bubbling) {
Common::File indexfile;
if (!indexfile.open("avalot.idx"))
error("AVALANCHE: Visa: File not found: avalot.idx");
bool error = false;
indexfile.seek((toupper(block) - 65) * 2);
uint16 idx_offset = indexfile.readUint16LE();
if (idx_offset == 0)
error = true;
indexfile.seek(idx_offset + point * 2);
uint16 sez_offset = indexfile.readUint16LE();
if (sez_offset == 0)
error = true;
indexfile.close();
_noError = !error;
if (error) {
if (report) {
Common::String todisplay = Common::String::format("%cError accessing scroll %c%d", Scrolls::kControlBell, block, point);
_vm->_scrolls->displayText(todisplay);
}
return;
}
Common::File sezfile;
if (!sezfile.open("avalot.sez"))
::error("AVALANCHE: Visa: File not found: avalot.sez");
sezfile.seek(sez_offset);
_vm->_gyro->_bufSize = sezfile.readUint16LE();
sezfile.read(_vm->_gyro->_buffer, _vm->_gyro->_bufSize);
sezfile.close();
unSkrimble();
if (bubbling)
doTheBubble();
_vm->_scrolls->callScrollDriver();
}
/**
* Start speech
* @remarks Originally called 'speech'
*/
void Visa::speak(byte who, byte subject) {
if (subject == 0) { // No subject.
displayScrollChain('s', who, false, true);
return;
}
// Subject given.
_noError = false; // Assume that until we know otherwise.
Common::File indexfile;
if (!indexfile.open("converse.avd"))
error("AVALANCHE: Visa: File not found: converse.avd");
indexfile.seek(who * 2 - 2);
uint16 idx_offset = indexfile.readUint16LE();
uint16 next_idx_offset = indexfile.readUint16LE();
if ((idx_offset == 0) || ((((next_idx_offset - idx_offset) / 2) - 1) < subject))
return;
indexfile.seek(idx_offset + subject * 2);
uint16 sez_offset = indexfile.readUint16LE();
if ((sez_offset == 0) || (indexfile.err()))
return;
indexfile.close();
Common::File sezfile;
if (!sezfile.open("avalot.sez"))
error("AVALANCHE: Visa: File not found: avalot.sez");
sezfile.seek(sez_offset);
_vm->_gyro->_bufSize = sezfile.readUint16LE();
sezfile.read(_vm->_gyro->_buffer, _vm->_gyro->_bufSize);
sezfile.close();
unSkrimble();
doTheBubble();
_vm->_scrolls->callScrollDriver();
_noError = true;
}
void Visa::talkTo(byte whom) {
if (_vm->_acci->_person == _vm->_acci->kPardon) {
_vm->_acci->_person = _vm->_gyro->_subjectNum;
_vm->_gyro->_subjectNum = 0;
}
if (_vm->_gyro->_subjectNum == 0) {
switch (whom) {
case Gyro::kPeopleSpludwick:
if ((_vm->_gyro->_lustieIsAsleep) & (!_vm->_gyro->_objects[Gyro::kObjectPotion - 1])) {
displayScrollChain('q', 68);
_vm->_gyro->_objects[Gyro::kObjectPotion - 1] = true;
_vm->_lucerna->refreshObjectList();
_vm->_lucerna->incScore(3);
return;
} else if (_vm->_gyro->_talkedToCrapulus) {
// Spludwick - what does he need?
// 0 - let it through to use normal routine.
switch (_vm->_gyro->_givenToSpludwick) {
case 1: // Fallthrough is intended.
case 2: {
Common::String objStr = _vm->_gyro->getItem(Gyro::kSpludwicksOrder[_vm->_gyro->_givenToSpludwick]);
Common::String tmpStr = Common::String::format("Can you get me %s, please?%c2%c", objStr.c_str(), Scrolls::kControlRegister, Scrolls::kControlSpeechBubble);
_vm->_scrolls->displayText(tmpStr);
}
return;
case 3:
displayScrollChain('q', 30); // Need any help with the game?
return;
}
} else {
displayScrollChain('q', 42); // Haven't talked to Crapulus. Go and talk to him.
return;
}
break;
case Gyro::kPeopleIbythneth:
if (_vm->_gyro->_givenBadgeToIby) {
displayScrollChain('q', 33); // Thanks a lot!
return; // And leave the proc.
}
break; // Or... just continue, 'cos he hasn't got it.
case Gyro::kPeopleDogfood:
if (_vm->_gyro->_wonNim) { // We've won the game.
displayScrollChain('q', 6); // "I'm Not Playing!"
return; // Zap back.
} else
_vm->_gyro->_askedDogfoodAboutNim = true;
break;
case Gyro::kPeopleAyles:
if (!_vm->_gyro->_aylesIsAwake) {
displayScrollChain('q', 43); // He's fast asleep!
return;
} else if (!_vm->_gyro->_givenPenToAyles) {
displayScrollChain('q', 44); // Can you get me a pen, Avvy?
return;
}
break;
case Gyro::kPeopleJacques:
displayScrollChain('q', 43);
return;
case Gyro::kPeopleGeida:
if (_vm->_gyro->_givenPotionToGeida)
_vm->_gyro->_geidaFollows = true;
else {
displayScrollChain('u', 17);
return;
}
break;
case Gyro::kPeopleSpurge:
if (!_vm->_gyro->_sittingInPub) {
displayScrollChain('q', 71); // Try going over and sitting down.
return;
} else {
if (_vm->_gyro->_spurgeTalkCount < 5)
_vm->_gyro->_spurgeTalkCount++;
if (_vm->_gyro->_spurgeTalkCount > 1) { // no. 1 falls through
displayScrollChain('q', 70 + _vm->_gyro->_spurgeTalkCount);
return;
}
}
break;
}
// On a subject. Is there any reason to block it?
} else if ((whom == Gyro::kPeopleAyles) && (!_vm->_gyro->_aylesIsAwake)) {
displayScrollChain('q', 43); // He's fast asleep!
return;
}
if (whom > 149)
whom -= 149;
bool noMatches = true;
for (byte i = 0; i <= _vm->_animation->kSpriteNumbMax; i++) {
if (_vm->_animation->_sprites[i]._stat._acciNum == whom) {
Common::String tmpStr = Common::String::format("%c%c%c", Scrolls::kControlRegister, i + 49, Scrolls::kControlToBuffer);
_vm->_scrolls->displayText(tmpStr);
noMatches = false;
break;
}
}
if (noMatches) {
Common::String tmpStr = Common::String::format("%c%c%c", Scrolls::kControlRegister, Scrolls::kControlRegister, Scrolls::kControlToBuffer);
_vm->_scrolls->displayText(tmpStr);
}
speak(whom, _vm->_gyro->_subjectNum);
if (!_noError)
displayScrollChain('n', whom); // File not found!
if ((_vm->_gyro->_subjectNum == 0) && ((whom + 149) == Gyro::kPeopleCrapulus)) { // Crapulus: get the badge - first time only
_vm->_gyro->_objects[Gyro::kObjectBadge - 1] = true;
_vm->_lucerna->refreshObjectList();
displayScrollChain('q', 1); // Circular from Cardiff.
_vm->_gyro->_talkedToCrapulus = true;
_vm->_gyro->_whereIs[Gyro::kPeopleCrapulus - 150] = 177; // Crapulus walks off.
AnimationType *spr = &_vm->_animation->_sprites[1];
spr->_vanishIfStill = true;
spr->walkTo(3); // Walks away.
_vm->_lucerna->incScore(2);
}
}
} // End of namespace Avalanche.