160 lines
3.8 KiB
C++
160 lines
3.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 3 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, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
*/
|
|
|
|
#include "titanic/true_talk/tt_script_base.h"
|
|
#include "titanic/true_talk/script_handler.h"
|
|
#include "titanic/titanic.h"
|
|
#include "common/textconsole.h"
|
|
|
|
namespace Titanic {
|
|
|
|
TTscriptBase::TTscriptBase(int scriptId, const char *charClass, int state,
|
|
const char *charName, int v3, int v4, int v5, int v6, int v7) :
|
|
_charName(charName), _charClass(charClass), _status(0),
|
|
_nodesP(nullptr), _id(0), _hist1P(nullptr),
|
|
_field20(0), _field24(0), _field28(0), _field2C(0),
|
|
_field30(0), _state(0), _hist2P(nullptr), _field3C(0),
|
|
_respHeadP(nullptr), _respTailP(nullptr), _oldResponseP(nullptr) {
|
|
if (isValid()) {
|
|
if (!v7 || !getStatus()) {
|
|
_id = scriptId;
|
|
_field20 = v3;
|
|
_field24 = v4;
|
|
_field28 = v5;
|
|
_field2C = v6;
|
|
_field30 = v7;
|
|
_state = state;
|
|
} else {
|
|
_status = SS_5;
|
|
}
|
|
}
|
|
|
|
if (_status)
|
|
reset();
|
|
}
|
|
|
|
TTscriptBase::~TTscriptBase() {
|
|
deleteResponses();
|
|
delete _oldResponseP;
|
|
|
|
delete _hist1P;
|
|
delete _hist2P;
|
|
|
|
if (_nodesP) {
|
|
_nodesP->deleteSiblings();
|
|
delete _nodesP;
|
|
}
|
|
}
|
|
|
|
bool TTscriptBase::isValid() {
|
|
_status = SS_VALID;
|
|
return true;
|
|
}
|
|
|
|
void TTscriptBase::reset() {
|
|
_nodesP = nullptr;
|
|
_id = 4;
|
|
_hist1P = nullptr;
|
|
_field20 = 0;
|
|
_field24 = -1;
|
|
_field28 = -1;
|
|
_field2C = -1;
|
|
_field30 = 0;
|
|
_state = 0;
|
|
_hist2P = nullptr;
|
|
_field3C = 0;
|
|
_respHeadP = nullptr;
|
|
_respTailP = nullptr;
|
|
_oldResponseP = nullptr;
|
|
}
|
|
|
|
int TTscriptBase::scriptPreprocess(TTsentence *sentence) {
|
|
delete _hist1P;
|
|
_hist1P = new TTscriptHist(sentence);
|
|
|
|
return _hist1P ? SS_VALID : SS_7;
|
|
}
|
|
|
|
void TTscriptBase::addResponse(const TTstring &str) {
|
|
appendResponse2(-1, nullptr, str);
|
|
}
|
|
|
|
void TTscriptBase::addResponse(int id) {
|
|
appendResponse(-1, nullptr, id);
|
|
}
|
|
|
|
void TTscriptBase::applyResponse() {
|
|
delete _oldResponseP;
|
|
_oldResponseP = nullptr;
|
|
|
|
if (_respHeadP) {
|
|
g_vm->_scriptHandler->setResponse(this, _respHeadP);
|
|
_oldResponseP = _respHeadP->copyChain();
|
|
TTresponse *oldRespP = _respHeadP;
|
|
_respHeadP = _respHeadP->getLink();
|
|
_respTailP = nullptr;
|
|
|
|
delete oldRespP;
|
|
}
|
|
}
|
|
|
|
void TTscriptBase::deleteResponses() {
|
|
while (_respHeadP) {
|
|
_respTailP = _respHeadP;
|
|
_respHeadP = _respTailP->getLink();
|
|
delete _respTailP;
|
|
}
|
|
}
|
|
|
|
void TTscriptBase::appendResponse(int index, int *maxP, int id) {
|
|
if (id && (!maxP || index <= *maxP)) {
|
|
if (_respTailP) {
|
|
// Prior fragments already exist, so append to end of chain
|
|
_respTailP = _respTailP->appendResponse(id);
|
|
} else {
|
|
// Currently no tail
|
|
_respTailP = new TTresponse(id, 3);
|
|
if (_respHeadP)
|
|
_respHeadP->addLink(_respTailP);
|
|
else
|
|
_respHeadP = _respTailP;
|
|
}
|
|
}
|
|
}
|
|
|
|
void TTscriptBase::appendResponse(int index, int *maxP, const TTstring &str) {
|
|
if (!maxP || index <= *maxP) {
|
|
if (_respTailP) {
|
|
// Prior fragments already exist, so append to end of chain
|
|
_respTailP = new TTresponse(str);
|
|
} else {
|
|
// Currently no tail
|
|
_respTailP = new TTresponse(str);
|
|
if (_respHeadP)
|
|
_respHeadP->addLink(_respTailP);
|
|
else
|
|
_respHeadP = _respTailP;
|
|
}
|
|
}
|
|
}
|
|
|
|
} // End of namespace Titanic
|