thirdparty/scummvm
2
0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
scummvm/engines/avalanche/acci2.cpp

1627 lines
46 KiB
C++
Raw Normal View History

AVALANCHE: Add Acci.
2013-06-29 15:56:08 +02:00
/* 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.
*/
/* ACCIDENCE II The parser. */
#include "avalanche/avalanche.h"
#include "avalanche/acci2.h"
#include "common/textconsole.h"
#include "common/scummsys.h"
#include "avalanche/gyro2.h"
#include "avalanche/lucerna2.h"
#include "avalanche/scrolls2.h"
#include "avalanche/visa2.h"
#include "avalanche/timeout2.h"
#include "avalanche/trip6.h"
#include "avalanche/enid2.h"
#include "avalanche/celer2.h"
#include "avalanche/pingo2.h"
#include "avalanche/sequence2.h"
/*#include "NimUnit.h"*/
/*#include "Highs.h"*/
/*#include "Helper.h"*/
namespace Avalanche {
const Acci::vocab Acci::words[nowords] = {
/* Verbs, 1-49 */
{1, "EXAMINE"}, {1, "READ"}, {1, "XAM"}, /* short */
{2, "OPEN"}, {2, "LEAVE"}, {2, "UNLOCK"},
{3, "PAUSE"}, {47, "TA"}, /* Early to avoid Take and Talk. */
{4, "TAKE"}, {4, "GET"}, {4, "PICK"},
{5, "DROP"}, {6, "INVENTORY"}, {7, "TALK"},
{7, "SAY"}, {7, "ASK"},
{8, "GIVE"}, {9, "DRINK"}, {9, "IMBIBE"},
{9, "DRAIN"}, {10, "LOAD"}, {10, "RESTORE"},
{11, "SAVE"}, {12, "BRIBE"}, {12, "PAY"},
{13, "LOOK"}, {14, "BREAK"}, {15, "QUIT"},
{15, "EXIT"}, {16, "SIT"}, {16, "SLEEP"},
{17, "STAND"},
{18, "GO"}, {19, "INFO"}, {20, "UNDRESS"},
{20, "DOFF"},
{21, "DRESS"}, {21, "WEAR"}, {21, "DON"},
{22, "PLAY"},
{22, "STRUM"}, {23, "RING"}, {24, "HELP"},
{25, "KENDAL"}, {26, "CAPYBARA"}, {27, "BOSS"},
{255, "NINET"}, /* block for NINETY */
{28, "URINATE"}, {28, "MINGITE"}, {29, "NINETY"},
{30, "ABRACADABRA"}, {30, "PLUGH"}, {30, "XYZZY"},
{30, "HOCUS"}, {30, "POCUS"}, {30, "IZZY"},
{30, "WIZZY"}, {30, "PLOVER"},
{30, "MELENKURION"}, {30, "ZORTON"}, {30, "BLERBI"},
{30, "THURB"}, {30, "SNOEZE"}, {30, "SAMOHT"},
{30, "NOSIDE"}, {30, "PHUGGG"}, {30, "KNERL"},
{30, "MAGIC"}, {30, "KLAETU"}, {30, "VODEL"},
{30, "BONESCROLLS"}, {30, "RADOF"},
{31, "RESTART"},
{32, "SWALLOW"}, {32, "EAT"}, {33, "LISTEN"},
{33, "HEAR"}, {34, "BUY"}, {34, "PURCHASE"},
{34, "ORDER"}, {34, "DEMAND"},
{35, "ATTACK"}, {35, "HIT"}, {35, "KILL"},
{35, "PUNCH"}, {35, "KICK"}, {35, "SHOOT"},
{35, "FIRE"},
/* Passwords, 36: */
{36, "TIROS"}, {36, "WORDY"}, {36, "STACK"},
{36, "SHADOW"}, {36, "OWL"}, {36, "ACORN"},
{36, "DOMESDAY"}, {36, "FLOPPY"}, {36, "DIODE"},
{36, "FIELD"}, {36, "COWSLIP"}, {36, "OSBYTE"},
{36, "OSCLI"}, {36, "TIMBER"}, {36, "ADVAL"},
{36, "NEUTRON"}, {36, "POSITRON"}, {36, "ELECTRON"},
{36, "CIRCUIT"}, {36, "AURUM"}, {36, "PETRIFY"},
{36, "EBBY"}, {36, "CATAPULT"}, {36, "GAMERS"},
{36, "FUDGE"}, {36, "CANDLE"}, {36, "BEEB"},
{36, "MICRO"}, {36, "SESAME"}, {36, "LORDSHIP"},
{37, "DIR"}, {37, "LS"}, {38, "DIE"},
{39, "SCORE"},
{40, "PUT"}, {40, "INSERT"}, {41, "KISS"},
{41, "SNOG"}, {41, "CUDDLE"}, {42, "CLIMB"},
{42, "CLAMBER"}, {43, "JUMP"}, {44, "HIGHSCORES"},
{44, "HISCORES"}, {45, "WAKEN"}, {45, "AWAKEN"},
{46, "HELLO"}, {46, "HI"}, {46, "YO"},
{47, "THANKS"}, /* = 47, "ta", which was defined earlier. */
/* Nouns - Objects: 50-100. */
{50, "WINE"}, {50, "BOOZE"}, {50, "NASTY"},
{50, "VINEGAR"}, {51, "MONEYBAG"},
{51, "BAG"}, {51, "CASH"}, {51, "DOSH"},
{51, "WALLET"},
{52, "BODKIN"}, {52, "DAGGER"}, {53, "POTION"},
{54, "CHASTITY"}, {54, "BELT"}, {55, "BOLT"},
{55, "ARROW"}, {55, "DART"},
{56, "CROSSBOW"}, {56, "BOW"}, {57, "LUTE"},
{58, "PILGRIM"}, {58, "BADGE"}, {59, "MUSHROOMS"},
{59, "TOADSTOOLS"}, {60, "KEY"}, {61, "BELL"},
{62, "PRESCRIPT"}, {62, "SCROLL"}, {62, "MESSAGE"},
{63, "PEN"}, {63, "QUILL"}, {64, "INK"},
{64, "INKPOT"}, {65, "CLOTHES"}, {66, "HABIT"},
{66, "DISGUISE"}, {67, "ONION"},
{99, "PASSWORD"},
/* Objects from Also are placed between 101 and 131. */
/* Nouns - People - Male, 150-174 */
{150, "AVVY"}, {150, "AVALOT"}, {150, "YOURSELF"},
{150, "ME"}, {150, "MYSELF"}, {151, "SPLUDWICK"},
{151, "THOMAS"}, {151, "ALCHEMIST"}, {151, "CHEMIST"},
{152, "CRAPULUS"}, {152, "SERF"}, {152, "SLAVE"},
{158, "DU"}, /* <<< Put in early for Baron DU Lustie to save confusion with Duck & Duke.*/
{152, "CRAPPY"}, {153, "DUCK"}, {153, "DOCTOR"},
{154, "MALAGAUCHE"},
{155, "FRIAR"}, {155, "TUCK"}, {156, "ROBIN"},
{156, "HOOD"}, {157, "CWYTALOT"}, {157, "GUARD"},
{157, "BRIDGEKEEP"}, {158, "BARON"}, {158, "LUSTIE"},
{159, "DUKE"}, {159, "GRACE"}, {160, "DOGFOOD"},
{160, "MINSTREL"}, {161, "TRADER"}, {161, "SHOPKEEPER"},
{161, "STALLHOLDER"},
{162, "PILGRIM"}, {162, "IBYTHNETH"}, {163, "ABBOT"},
{163, "AYLES"}, {164, "PORT"}, {165, "SPURGE"},
{166, "JACQUES"}, {166, "SLEEPER"}, {166, "RINGER"},
/* Nouns- People - Female: 175-199 */
{175, "WIFE"}, {175, "ARKATA"}, {176, "GEDALODAVA"},
{176, "GEIDA"}, {176, "PRINCESS"}, {178, "WISE"},
{178, "WITCH"},
/* Pronouns, 200-224 */
{200, "_vm->_gyro.him"}, {200, "MAN"}, {200, "GUY"},
{200, "DUDE"}, {200, "CHAP"}, {200, "FELLOW"},
{201, "HER"}, {201, "GIRL"}, {201, "WOMAN"},
{202, "IT"}, {202, "THING"},
{203, "MONK"}, {204, "BARMAN"}, {204, "BARTENDER"},
/* Prepositions, 225-249 */
{225, "TO"}, {226, "AT"}, {227, "UP"},
{228, "INTO"}, {228, "INSIDE"}, {229, "OFF"},
{230, "UP"}, {231, "DOWN"}, {232, "ON"},
/* Please, 251 */
{251, "PLEASE"},
/* About, 252 */
{252, "ABOUT"}, {252, "CONCERNING"},
/* Swear words, 253 */
/* I M P O R T A N T M E S S A G E
DO *NOT* READ THE LINES BELOW IF YOU ARE OF A SENSITIVE
DISPOSITION. THOMAS IS *NOT* RESPONSIBLE FOR THEM.
GOODNESS KNOWS WHO WROTE THEM.
READ THEM AT YOUR OWN RISK. BETTER STILL, DON'T READ THEM.
WHY ARE YOU SNOOPING AROUND IN MY PROGRAM, ANYWAY? */
{253, "SHIT"}, {28 , "PISS"}, {28 , "PEE"},
{253, "FART"}, {253, "FUCK"}, {253, "BALLS"},
{253, "BLAST"}, {253, "BUGGER"}, {253, "KNICKERS"},
{253, "BLOODY"}, {253, "HELL"}, {253, "DAMN"},
{253, "SMEG"},
/* and other even ruder words. You didn't read them, did you? Good. */
/* Answer-back smart-alec words, 249 */
{249, "YES"}, {249, "NO"}, {249, "BECAUSE"},
/* Noise words, 255 */
{255, "THE"}, {255, "A"}, {255, "NOW"},
{255, "SOME"}, {255, "AND"}, {255, "THAT"},
{255, "POCUS"}, {255, "HIS"},
{255, "THIS"}, {255, "SENTINEL"}
}; /* for "Ken SENT Me" */
const char Acci::what[] = "That's not possible!";
const Acci::ranktype Acci::ranks[9] = {
{0, "Beginner"}, {10, "Novice"},
{20, "Improving"}, {35, "Not bad"},
{50, "Passable"}, {65, "Good"},
{80, "Experienced"}, {108, "The BEST!"},
{32767, "copyright'93"}
};
void Acci::setParent(AvalancheEngine *vm) {
_vm = vm;
}
void Acci::init() {
_vm->_gyro.weirdword = false;
}
void Acci::checkword(Common::String &x) { /* Checks uint16 "fv". */
warning("STUB: Acci::checkuint16()");
}
Common::String Acci::wordnum(Common::String x)
{
char whatsit;
uint16 fv;
bool gotcha;
Common::String wordnum_result;
if (x == "") {
wordnum_result = "";
return wordnum_result;
}
whatsit = pardon;
gotcha = false;
for (fv = nowords; fv >= 1; fv --) checkword(x);
wordnum_result = whatsit;
return wordnum_result;
}
void Acci::replace(Common::String old1, Common::String new1) {
warning("STUB: Acci::replace()");
}
/*procedure ninetydump;
var f:file; y:int16; bit:byte; a:byte absolute $A000:800;
begin
off;
assign(f,'avvydump.avd');
rewrite(f,1);
blockwrite(f,_vm->_gyro.dna,177); { just anything }
for bit:=0 to 3 do
begin
port[$3c4]:=2; port[$3ce]:=4; port[$3C5]:=1 shl bit; port[$3CF]:=bit;
blockwrite(f,a,12080);
end;
close(f); on;
_vm->_scrolls.display('Dumped.');
end;*/
Common::String Acci::rank() {
byte fv;
Common::String rank_result;
for (fv = 1; fv <= 8; fv ++)
if ((_vm->_gyro.dna.score >= ranks[fv].score) && (_vm->_gyro.dna.score < ranks[fv + 1].score)) {
rank_result = ranks[fv].title;
return rank_result;
}
return rank_result;
}
Common::String Acci::totaltime() {
const double ticks_in_1_sec = double(65535) / 3600;
uint16 h, m, s;
Common::String a;
/* There are 65535 clock ticks in a second,
1092.25 in a minute, and
65535 in an hour. */
Common::String totaltime_result;
warning("STUB: Acci::totaltime()");
totaltime_result = a;
return totaltime_result;
}
void Acci::number(Common::String &codes) {
warning("STUB: Acci::number()");
}
void Acci::cheatparse(Common::String codes) {
uint16 num;
int16 e;
char cmd;
int16 se, sx, sy;
warning("STUB: Acci::cheatparse()");
}
void Acci::punctustrip(Common::String &x) { /* Strips punctuation from x. */
warning("STUB: Acci::punctustrip()");
}
void Acci::displaywhat(char ch, bool animate, bool &ambigous) { /* << it's an adjective! */
byte ff;
Common::String z;
warning("STUB: Acci::_vm->_scrolls.displaywhat()");
}
bool Acci::do_pronouns() {
bool ambiguous;
byte fv;
bool do_pronouns_result;
ambiguous = false;
warning("STUB: Acci::do_pronouns()");
do_pronouns_result = ambiguous;
return do_pronouns_result;
}
void Acci::lowercase() {
byte fv;
warning("STUB: Acci::lowercase()");
}
void Acci::propernouns() {
byte fv;
lowercase();
warning("STUB: Acci::propernouns()");
}
void Acci::sayit() { /* This makes Avalot say the response. */
Common::String x;
warning("STUB: Acci::sayit()");
}
void Acci::store_interrogation(byte interrogation) {
byte fv;
warning("STUB: Acci::store_interrogation()");
}
void Acci::clearuint16s() {
warning("STUB: Acci::clearuint16s()");
}
void Acci::parse() {
byte n, fv, ff;
Common::String c, cc, thisuint16;
Common::String answer;
bool notfound;
/* first parsing - uint16 identification */
warning("STUB: Acci::parse()");
}
void Acci::examobj() { /* Examine a standard object-thing */
warning("STUB: Acci::examobj()");
}
bool Acci::personshere() { /* Person equivalent of "holding" */
warning("STUB: Acci::personshere()");
return true;
}
void Acci::exampers() {
warning("STUB: Acci::exampers()");
}
bool Acci::holding() {
warning("STUB: Acci::holding()");
return true;
}
void Acci::special(bool before) {
warning("STUB: Acci::special()");
}
void Acci::examine() {
/* Examine. EITHER it's an object OR it's an Also OR it's a person OR
it's something else. */
warning("STUB: Acci::examine()");
}
void Acci::inv() { /* the time-honoured command... */
char fv;
byte q;
q = 0;
warning("STUB: Acci::inv()");
}
void Acci::swallow() { /* Eat something. */
warning("STUB: Acci::swallow()");
}
void Acci::others() {
/* This lists the other people in the room. */
warning("STUB: Acci::others()");
}
void Acci::lookaround() {
/* This is called when you say "look." */
_vm->_scrolls.display(*_vm->_gyro.also[0][1]);
switch (_vm->_gyro.dna.room) {
case r__spludwicks:
if (_vm->_gyro.dna.avaricius_talk > 0) _vm->_visa.dixi('q', 23);
else others();
break;
case r__robins: {
if (_vm->_gyro.dna.tied_up) _vm->_visa.dixi('q', 38);
if (_vm->_gyro.dna.mushroom_growing) _vm->_visa.dixi('q', 55);
}
break;
case r__insidecardiffcastle:
if (! _vm->_gyro.dna.taken_pen) _vm->_visa.dixi('q', 49);
break;
case r__lustiesroom:
if (_vm->_gyro.dna.lustie_is_asleep) _vm->_visa.dixi('q', 65);
break;
case r__catacombs:
switch (_vm->_gyro.dna.cat_y * 256 + _vm->_gyro.dna.cat_x) {
case 258 :
_vm->_visa.dixi('q', 80);
break; /* Inside art gallery */
case 514 :
_vm->_visa.dixi('q', 81);
break; /* Outside ditto */
case 260 :
_vm->_visa.dixi('q', 82);
break; /* Outside Geida's room. */
}
break;
default:
others();
}
}
void Acci::opendoor() { /* so whaddya THINK this does?! */
byte fv;
switch (_vm->_gyro.dna.room) { /* Special cases. */
case r__yours:
if (_vm->_trip.infield(2)) {
/* Opening the box. */
thing = 54; /* The box. */ person = pardon;
examine();
return;
}
break;
case r__spludwicks:
if (thing == 61) {
_vm->_visa.dixi('q', 85);
return;
}
break;
}
if ((! _vm->_gyro.dna.user_moves_avvy) && (_vm->_gyro.dna.room != r__lusties))
return; /* No doors can open if you can't move Avvy. */
for (fv = 9; fv <= 15; fv ++)
if (_vm->_trip.infield(fv)) {
{
_vm->_gyro.portals[fv];
switch (_vm->_gyro.portals[fv].op) {
case _vm->_gyro.exclaim: {
_vm->_trip.tr[1].bounce();
_vm->_visa.dixi('x', _vm->_gyro.portals[fv].data);
}
break;
case _vm->_gyro.transport:
_vm->_trip.fliproom((_vm->_gyro.portals[fv].data) >> 8 /*High byte*/, (_vm->_gyro.portals[fv].data) & 0x0F /*Low byte*/);
break;
case _vm->_gyro.unfinished: {
_vm->_trip.tr[1].bounce();
_vm->_scrolls.display("Sorry. This place is not available yet!");
}
break;
case _vm->_gyro.special:
_vm->_trip.call_special(_vm->_gyro.portals[fv].data);
break;
case _vm->_gyro.mopendoor:
_vm->_trip.open_the_door((_vm->_gyro.portals[fv].data) >> 8, (_vm->_gyro.portals[fv].data) & 0x0F, fv);
break;
}
}
return;
}
if (_vm->_gyro.dna.room == r__map)
_vm->_scrolls.display(Common::String("Avvy, you can complete the whole game without ever going "
"to anywhere other than Argent, Birmingham, Cardiff, "
"Nottingham and Norwich."));
else
_vm->_scrolls.display("Door? What door?");
}
void Acci::silly() {
_vm->_scrolls.display("Don't be silly!");
}
void Acci::putproc() { /* Called when you call vb_put. */
char temp;
if (! holding()) return;
thing2 -= 49; /* Slip the second object */
temp = thing;
thing = thing2;
if (! holding()) return;
thing = temp;
/* Thing is the thing which you're putting in. Thing2 is where you're
putting it. */
/* Convenience thing. */
switch (thing2) {
case _vm->_gyro.wine:
if (thing == _vm->_gyro.onion) {
if (_vm->_gyro.dna.rotten_onion)
_vm->_scrolls.display(Common::String("That's a bit like shutting the stable door after the "
"horse has bolted!"));
else { /* Put onion into wine? */
if (_vm->_gyro.dna.winestate != 3)
_vm->_scrolls.display("\6Oignon au vin\22 is a bit too strong for your tastes!");
else { /* Put onion into vinegar! Yes! */
_vm->_gyro.dna.onion_in_vinegar = true;
_vm->_lucerna.points(7);
_vm->_visa.dixi('u', 9);
}
}
} else silly();
break;
case 54:
if (_vm->_gyro.dna.room == 1) { /* Put something into the box. */
if (_vm->_gyro.dna.box_contents != nowt)
_vm->_scrolls.display(Common::String("There's something in the box already, Avvy. Try taking"
" that out first."));
else
switch (thing) {
case _vm->_gyro.money:
_vm->_scrolls.display("You'd better keep some ready cash on you!");
break;
case _vm->_gyro.bell:
_vm->_scrolls.display("That's a silly place to keep a bell.");
break;
case _vm->_gyro.bodkin:
_vm->_scrolls.display("But you might need it!");
break;
case _vm->_gyro.onion:
_vm->_scrolls.display("Just give it to Spludwick, Avvy!");
break;
default: {
/* Put the object into the box... */
if (_vm->_gyro.dna.wearing == thing)
_vm->_scrolls.display(Common::String("You'd better take ") + _vm->_gyro.get_better(thing) + " off first!");
else {
_vm->_celer.show_one(5); /* Open box. */
_vm->_gyro.dna.box_contents = thing;
_vm->_gyro.dna.obj[thing] = false;
_vm->_lucerna.objectlist();
_vm->_scrolls.display("OK, it's in the box.");
_vm->_celer.show_one(6); /* Shut box. */
}
}
}
} else silly();
break;
default:
silly();
}
}
/* The result of this fn is whether or not he says "Hey, thanks!" */
void Acci::not_in_order() {
_vm->_scrolls.display(Common::String("Sorry, I need the ingredients in the right order for this potion.") +
" What I need next is " +
_vm->_gyro.get_better(_vm->_gyro.spludwick_order[_vm->_gyro.dna.given2spludwick]) + ".\232\2");
}
void Acci::go_to_cauldron() {
_vm->_trip.tr[2].call_eachstep = false; /* Stops Geida_Procs. */
_vm->_timeout.set_up_timer(1, _vm->_timeout.procspludwick_goes_to_cauldron, _vm->_timeout.reason_spludwalk);
_vm->_trip.tr[2].walkto(2);
}
bool Acci::give2spludwick() {
bool give2spludwick_result;
{
give2spludwick_result = false;
if (_vm->_gyro.spludwick_order[_vm->_gyro.dna.given2spludwick] != thing) {
not_in_order();
return give2spludwick_result;
}
switch (thing) {
case _vm->_gyro.onion: {
_vm->_gyro.dna.obj[_vm->_gyro.onion] = false;
if (_vm->_gyro.dna.rotten_onion)
_vm->_visa.dixi('q', 22);
else {
_vm->_gyro.dna.given2spludwick += 1;
_vm->_visa.dixi('q', 20);
go_to_cauldron();
_vm->_lucerna.points(3);
}
_vm->_lucerna.objectlist();
}
break;
case _vm->_gyro.ink: {
_vm->_gyro.dna.obj[_vm->_gyro.ink] = false;
_vm->_lucerna.objectlist();
_vm->_gyro.dna.given2spludwick += 1;
_vm->_visa.dixi('q', 24);
go_to_cauldron();
_vm->_lucerna.points(3);
}
break;
case _vm->_gyro.mushroom: {
_vm->_gyro.dna.obj[_vm->_gyro.mushroom] = false;
_vm->_visa.dixi('q', 25);
_vm->_lucerna.points(5);
_vm->_gyro.dna.given2spludwick += 1;
go_to_cauldron();
_vm->_gyro.dna.obj[_vm->_gyro.potion] = true;
_vm->_lucerna.objectlist();
}
break;
default:
give2spludwick_result = true;
}
}
return give2spludwick_result;
}
void Acci::have_a_drink() {
{
_vm->_gyro.dna.alcohol += 1;
if (_vm->_gyro.dna.alcohol == 5) {
_vm->_gyro.dna.obj[_vm->_gyro.key] = true; /* Get the key. */
_vm->_gyro.dna.teetotal = true;
_vm->_gyro.dna.avvy_is_awake = false;
_vm->_gyro.dna.avvy_in_bed = true;
_vm->_lucerna.objectlist();
_vm->_lucerna.dusk();
_vm->_gyro.hang_around_for_a_while();
_vm->_trip.fliproom(1, 1);
_vm->_gyro.background(14);
_vm->_trip.new_game_for_trippancy(); /* Not really */
}
}
}
void Acci::cardiff_climbing() {
if (_vm->_gyro.dna.standing_on_dais) {
/* Clamber up. */
_vm->_scrolls.display("You climb down, back onto the floor.");
_vm->_gyro.dna.standing_on_dais = false;
_vm->_trip.apped(1, 3);
} else {
/* Clamber down. */
if (_vm->_trip.infield(1)) {
_vm->_scrolls.display("You clamber up onto the dais.");
_vm->_gyro.dna.standing_on_dais = true;
_vm->_trip.apped(1, 2);
} else
_vm->_scrolls.display("Get a bit closer, Avvy.");
}
}
/* Called when you ask Avvy to stand. */
void Acci::already() {
_vm->_scrolls.display("You're already standing!");
}
void Acci::stand_up() {
switch (_vm->_gyro.dna.room) {
case r__yours: /* Avvy isn't asleep. */
if (_vm->_gyro.dna.avvy_in_bed) { /* But he's in bed. */
if (_vm->_gyro.dna.teetotal) {
_vm->_visa.dixi('d', 12);
_vm->_gyro.background(0);
_vm->_visa.dixi('d', 14);
}
_vm->_trip.tr[1].visible = true;
_vm->_gyro.dna.user_moves_avvy = true;
_vm->_trip.apped(1, 2);
_vm->_gyro.dna.rw = _vm->_gyro.left;
_vm->_celer.show_one(4); /* Picture of empty pillow. */
_vm->_lucerna.points(1);
_vm->_gyro.dna.avvy_in_bed = false;
_vm->_timeout.lose_timer(_vm->_timeout.reason_arkata_shouts);
} else already();
break;
case r__insidecardiffcastle:
cardiff_climbing();
break;
case r__nottspub:
if (_vm->_gyro.dna.sitting_in_pub) {
_vm->_celer.show_one(4); /* Not sitting down. */
_vm->_trip.tr[1].visible = true; /* But standing up. */
_vm->_trip.apped(1, 4); /* And walking away. */
_vm->_gyro.dna.sitting_in_pub = false; /* Really not sitting down. */
_vm->_gyro.dna.user_moves_avvy = true; /* And ambulant. */
} else already();
break;
default:
already();
}
}
void Acci::getproc(char thing) {
switch (_vm->_gyro.dna.room) {
case r__yours:
if (_vm->_trip.infield(2)) {
if (_vm->_gyro.dna.box_contents == thing) {
_vm->_celer.show_one(5);
_vm->_scrolls.display("OK, I've got it.");
_vm->_gyro.dna.obj[thing] = true;
_vm->_lucerna.objectlist();
_vm->_gyro.dna.box_contents = nowt;
_vm->_celer.show_one(6);
} else
_vm->_scrolls.display(Common::String("I can't see ") + _vm->_gyro.get_better(thing) + " in the box.");
} else _vm->_visa.dixi('q', 57);
break;
case r__insidecardiffcastle:
switch (thing) {
case _vm->_gyro.pen: {
if (_vm->_trip.infield(2)) {
/* Standing on the dais. */
if (_vm->_gyro.dna.taken_pen)
_vm->_scrolls.display("It's not there, Avvy.");
else {
/* OK: we're taking the pen, and it's there. */
_vm->_celer.show_one(4); /* No pen there now. */
_vm->_trip.call_special(3); /* Zap! */
_vm->_gyro.dna.taken_pen = true;
_vm->_gyro.dna.obj[_vm->_gyro.pen] = true;
_vm->_lucerna.objectlist();
_vm->_scrolls.display("Taken.");
}
} else if (_vm->_gyro.dna.standing_on_dais) _vm->_visa.dixi('q', 53);
else _vm->_visa.dixi('q', 51);
}
break;
case _vm->_gyro.bolt:
_vm->_visa.dixi('q', 52);
break;
default:
_vm->_visa.dixi('q', 57);
}
break;
case r__robins:
if ((thing == _vm->_gyro.mushroom) & (_vm->_trip.infield(1)) & (_vm->_gyro.dna.mushroom_growing)) {
_vm->_celer.show_one(3);
_vm->_scrolls.display("Got it!");
_vm->_gyro.dna.mushroom_growing = false;
_vm->_gyro.dna.taken_mushroom = true;
_vm->_gyro.dna.obj[_vm->_gyro.mushroom] = true;
_vm->_lucerna.objectlist();
_vm->_lucerna.points(3);
} else _vm->_visa.dixi('q', 57);
break;
default:
_vm->_visa.dixi('q', 57);
}
}
void Acci::give_geida_the_lute() {
{
if (_vm->_gyro.dna.room != r__lustiesroom) {
_vm->_scrolls.display("Not yet. Try later!\232\2");
return;
}
_vm->_gyro.dna.obj[_vm->_gyro.lute] = false;
_vm->_lucerna.objectlist();
_vm->_visa.dixi('q', 64); /* She plays it. */
/* And the rest has been moved to Timeout... under give_lute_to_Geida. */
_vm->_timeout.set_up_timer(1, _vm->_timeout.procgive_lute_to_geida, _vm->_timeout.reason_geida_sings);
_vm->_enid.back_to_bootstrap(4);
}
}
void Acci::play_harp() {
if (_vm->_trip.infield(7))
_vm->_scrolls.musical_scroll();
else _vm->_scrolls.display("Get a bit closer to it, Avvy!");
}
void Acci::winsequence() {
_vm->_visa.dixi('q', 78);
_vm->_sequence.first_show(7);
_vm->_sequence.then_show(8);
_vm->_sequence.then_show(9);
_vm->_sequence.start_to_close();
_vm->_timeout.set_up_timer(30, _vm->_timeout.procwinning, _vm->_timeout.reason_winning);
}
void Acci::person_speaks() {
bool found;
byte fv;
char cfv;
if ((person == pardon) || (person == '\0')) {
if ((_vm->_gyro.him == pardon) || (_vm->_gyro.whereis[_vm->_gyro.him] != _vm->_gyro.dna.room)) person = _vm->_gyro.her;
else person = _vm->_gyro.him;
}
if (_vm->_gyro.whereis[person] != _vm->_gyro.dna.room) {
_vm->_scrolls.display("\231\4"); /* Avvy _vm->_gyro.himself! */
return;
}
found = false; /* The person we're looking for's code is in Person. */
for (fv = 1; fv <= _vm->_trip.numtr; fv ++)
if (_vm->_trip.tr[fv].quick && ((_vm->_trip.tr[fv].a.accinum + 149) == person)) {
_vm->_scrolls.display(Common::String('\23') + char(fv + 48) + '\4');
found = true;
}
if (! found)
for (fv = 10; fv <= 25; fv ++) {
_vm->_gyro.quasipeds[fv];
if ((_vm->_gyro.quasipeds[fv].who == person) && (_vm->_gyro.quasipeds[fv].room == _vm->_gyro.dna.room)) {
_vm->_scrolls.display(Common::String('\23') + char(fv + 55) + '\4');
}
}
}
void Acci::heythanks() {
person_speaks();
_vm->_scrolls.display("Hey, thanks!\2(But now, you've lost it!)");
_vm->_gyro.dna.obj[thing] = false;
}
void Acci::do_that() {
const Common::String booze[] = {"Bitter", "GIED", "Whisky", "Cider", "", "", "", "Mead"};
byte fv, ff;
int16 sx, sy;
bool ok;
if (thats == Common::String(nowt)) {
thats = "";
return;
}
if (_vm->_gyro.weirdword) return;
if (thing < '\310') thing -= 49; /* "Slip" */
/*if ((! _vm->_gyro.alive) &
!(set::of(vb_load, vb_save, vb_quit, vb_info, vb_help, vb_larrypass,
vb_phaon, vb_boss, vb_cheat, vb_restart, vb_dir, vb_score,
vb_highscores, vb_smartalec, eos).has(verb))) {
_vm->_scrolls.display(Common::String("You're dead, so don't talk. What are you, a ghost ") +
"or something? Try restarting, or restoring a saved game!");
return;
}
if ((~ _vm->_gyro.dna.avvy_is_awake) &
!(set::of(vb_load, vb_save, vb_quit, vb_info, vb_help, vb_larrypass,
vb_phaon, vb_boss, vb_cheat, vb_restart, vb_dir, vb_die, vb_score,
vb_highscores, vb_smartalec, vb_expletive, vb_wake, eos).has(verb))) {
_vm->_scrolls.display("Talking in your sleep? Try waking up!");
return;
}*/
switch (verb) {
case vb_exam:
examine();
break;
case vb_open:
opendoor();
break;
case vb_pause:
_vm->_scrolls.display(Common::String("Game paused.") + '\3' + '\15' + '\15' + "Press Enter, Esc, or click " +
"the mouse on the `O.K.\" box to continue.");
break;
case vb_get: {
if (thing != pardon) {
/* Legitimate try to pick something up. */
if (_vm->_gyro.dna.carrying >= maxobjs) _vm->_scrolls.display("You can't carry any more!");
else getproc(thing);
} else {
/* Not... ditto. */
if (person != pardon)
_vm->_scrolls.display("You can't sweep folk off their feet!");
else
_vm->_scrolls.display("I assure you, you don't need it.");
}
}
break;
case vb_drop:
_vm->_scrolls.display(Common::String("Two years ago you dropped a florin in the street. Three days ") +
"later it was gone! So now you never leave ANYTHING lying around. OK?");
break;
/* begin _vm->_gyro.dna.obj[thing]:=false; _vm->_lucerna.objectlist(); end;*/
case vb_inv:
inv();
break;
case vb_talk:
if (person == pardon) {
if (_vm->_gyro.subjnumber == 99) /* They typed "say passuint16". */
_vm->_scrolls.display("Yes, but what \6is\22 the passuint16?");
/*else if (set::of(range(1, 49), 253, 249, eos).has(subjnumber)) {
Delete(thats, 1, 1);
move(realuint16s[2], realuint16s[1], sizeof(realuint16s) - sizeof(realuint16s[1]));
verb = chr(subjnumber);
do_that();
return;
} else {
person = _vm->_gyro.subjnumber;
subjnumber = 0;
if (set::of(pardon, '\0', eos).has(person)) _vm->_scrolls.display("Talk to whom?");
else if (personshere()) talkto(ord(person));
}
}*/ else if (person == pardon) _vm->_scrolls.display("Talk to whom?");
else if (personshere()) _vm->_visa.talkto(person);
break;
case vb_give:
if (holding()) {
if (person == pardon) _vm->_scrolls.display("Give to whom?");
else if (personshere()) {
switch (thing) {
case _vm->_gyro.money :
_vm->_scrolls.display("You can't bring yourself to give away your moneybag.");
break;
case _vm->_gyro.bodkin:
case _vm->_gyro.bell:
case _vm->_gyro.clothes:
case _vm->_gyro.habit :
_vm->_scrolls.display("Don't give it away, it might be useful!");
break;
default:
switch (person) {
case _vm->_gyro.pcrapulus:
switch (thing) {
case _vm->_gyro.wine: {
_vm->_scrolls.display("Crapulus grabs the wine and gulps it down.");
_vm->_gyro.dna.obj[_vm->_gyro.wine] = false;
}
break;
default:
heythanks();
}
break;
case _vm->_gyro.pcwytalot:
/*if (set::of(crossbow, bolt, eos).has(thing))
_vm->_scrolls.display(Common::String("You might be able to influence ") +
"Cwytalot more if you used it!");
else */heythanks();
break;
case _vm->_gyro.pspludwick:
if (give2spludwick()) heythanks();
break;
case _vm->_gyro.pibythneth:
if (thing == _vm->_gyro.badge) {
_vm->_visa.dixi('q', 32); /* Thanks! Wow! */
_vm->_lucerna.points(3);
_vm->_gyro.dna.obj[_vm->_gyro.badge] = false;
_vm->_gyro.dna.obj[_vm->_gyro.habit] = true;
_vm->_gyro.dna.givenbadgetoiby = true;
_vm->_celer.show_one(8);
_vm->_celer.show_one(9);
} else heythanks();
break;
case _vm->_gyro.payles:
if (_vm->_gyro.dna.ayles_is_awake) {
if (thing == _vm->_gyro.pen) {
_vm->_gyro.dna.obj[_vm->_gyro.pen] = false;
_vm->_visa.dixi('q', 54);
_vm->_gyro.dna.obj[_vm->_gyro.ink] = true;
_vm->_gyro.dna.given_pen_to_ayles = true;
_vm->_lucerna.objectlist();
_vm->_lucerna.points(2);
} else heythanks();
} else
_vm->_scrolls.display("But he's asleep!");
break;
case _vm->_gyro.pgeida:
switch (thing) {
case _vm->_gyro.potion : {
_vm->_gyro.dna.obj[_vm->_gyro.potion] = false;
_vm->_visa.dixi('u', 16); /* She drinks it. */
_vm->_lucerna.points(2);
_vm->_gyro.dna.geida_given_potion = true;
_vm->_lucerna.objectlist();
}
break;
case _vm->_gyro.lute:
give_geida_the_lute();
break;
default:
heythanks();
}
break;
case _vm->_gyro.parkata:
switch (thing) {
case _vm->_gyro.potion:
if (_vm->_gyro.dna.geida_given_potion)
winsequence();
else _vm->_visa.dixi('q', 77);
break; /* That Geida woman! */
default:
heythanks();
}
break;
default:
heythanks();
}
}
}
_vm->_lucerna.objectlist(); /* Just in case... */
}
break;
case vb_eat:
case vb_drink:
if (holding()) swallow();
break;
case vb_load:
_vm->_enid.edna_load(realwords[2]);
break;
case vb_save:
if (_vm->_gyro.alive)
_vm->_enid.edna_save(realwords[2]);
else
_vm->_scrolls.display("It's a bit late now to save your game!");
break;
case vb_pay:
_vm->_scrolls.display("No money need change hands.");
break;
case vb_look:
lookaround();
break;
case vb_break:
_vm->_scrolls.display("Vandalism is prohibited within this game!");
break;
case vb_quit: { /* quit */
//if (_vm->_gyro.demo) {
// _vm->_visa.dixi('q', 31);
// close(demofile);
// exit(0); /* Change this later!!! */
//}
if (! polite) _vm->_scrolls.display("How about a `please\", Avvy?");
else if (_vm->_scrolls.ask("\23C\26Do you really want to quit?")) _vm->_gyro.lmo = true;
}
break;
case vb_go:
_vm->_scrolls.display("Just use the arrow keys to walk there.");
break;
case vb_info: {
_vm->_scrolls.aboutscroll = true;
/* _vm->_scrolls.display('Thorsoft of Letchworth presents:'+^c+^m+^m+
'The medi<EFBFBD>val descendant of'+^m+
'Denarius Avaricius Sextus'+^m+'in:'+
^m+^m+'LORD AVALOT D''ARGENT'+
^m+'version '+vernum+^m+^m+'Copyright <EFBFBD> '
+copyright+', Mark, Mike and Thomas Thurman.');*/
_vm->_scrolls.display(Common::String("\r\r\r\r\r\r\r") + "LORD AVALOT D'ARGENT" + "\3\r" +
"The medi<64>val descendant of" + '\15' +
"Denarius Avaricius Sextus" +
'\15' + '\15' + "version " + _vm->_gyro.vernum + '\15' + '\15' + "Copyright <20> "
+ _vm->_gyro.copyright + ", Mark, Mike and Thomas Thurman." + '\23' + 'Y' + '\26');
_vm->_scrolls.aboutscroll = false;
}
break;
case vb_undress:
if (_vm->_gyro.dna.wearing == nowt) _vm->_scrolls.display("You're already stark naked!");
else if (_vm->_gyro.dna.avvys_in_the_cupboard) {
_vm->_scrolls.display(Common::String("You take off ") + _vm->_gyro.get_better(_vm->_gyro.dna.wearing) + '.');
_vm->_gyro.dna.wearing = nowt;
_vm->_lucerna.objectlist();
} else
_vm->_scrolls.display("Hadn't you better find somewhere more private, Avvy?");
break;
case vb_wear:
if (holding()) {
/* wear something */
switch (thing) {
case _vm->_gyro.chastity:
_vm->_scrolls.display("Hey, what kind of a weirdo are you\??!");
break;
case _vm->_gyro.clothes:
case _vm->_gyro.habit: { /* Change this! */
if (_vm->_gyro.dna.wearing != nowt) {
if (_vm->_gyro.dna.wearing == thing)
_vm->_scrolls.display("You're already wearing that.");
else
_vm->_scrolls.display(Common::String("You'll be rather warm wearing two ") +
"sets of clothes!");
return;
} else
_vm->_gyro.dna.wearing = thing;
_vm->_lucerna.objectlist();
if (thing == _vm->_gyro.habit) fv = 3;
else fv = 0;
{
if (_vm->_trip.tr[1].whichsprite != fv) {
sx = _vm->_trip.tr[1].x;
sy = _vm->_trip.tr[1].y;
_vm->_trip.tr[1].done();
_vm->_trip.tr[1].init(fv, true, &_vm->_trip);
_vm->_trip.tr[1].appear(sx, sy, _vm->_trip.left);
_vm->_trip.tr[1].visible = false;
}
}
}
break;
default:
_vm->_scrolls.display(what);
}
}
break;
case vb_play:
if (thing == pardon)
switch (_vm->_gyro.dna.room) { /* They just typed "play"... */
case r__argentpub:
// play_nim();
// I just don't plan to implement Nim yet.
break; /* ...in the pub, => play Nim. */
case r__musicroom:
play_harp();
break;
}
else if (holding()) {
switch (thing) {
case _vm->_gyro.lute : {
_vm->_visa.dixi('U', 7);
if (_vm->_gyro.whereis[_vm->_gyro.pcwytalot] == _vm->_gyro.dna.room) _vm->_visa.dixi('U', 10);
if (_vm->_gyro.whereis[_vm->_gyro.pdulustie] == _vm->_gyro.dna.room) _vm->_visa.dixi('U', 15);
}
break;
case 52 :
if (_vm->_gyro.dna.room == r__musicroom) play_harp();
else _vm->_scrolls.display(what);
break;
case 55 :
if (_vm->_gyro.dna.room == r__argentpub) ; /*play_nim(); - Don't implement yet.*/
else _vm->_scrolls.display(what);
break;
default:
_vm->_scrolls.display(what);
}
}
break;
case vb_ring:
if (holding()) {
if (thing == _vm->_gyro.bell) {
_vm->_scrolls.display("Ding, dong, ding, dong, ding, dong, ding, dong...");
if ((_vm->_gyro.dna.ringing_bells) & (_vm->_gyro.flagset('B')))
_vm->_scrolls.display("(Are you trying to join in, Avvy\?\?!)");
} else _vm->_scrolls.display(what);
}
break;
case vb_help:
// boot_help();
// I don't want to implement help yet.
break;
case vb_larrypass:
_vm->_scrolls.display("Wrong game!");
break;
case vb_phaon:
_vm->_scrolls.display("Hello, Phaon!");
break;
case vb_boss:
// bosskey();
// I don't want to implement bosskey yet.
break;
case vb_pee:
if (_vm->_gyro.flagset('P')) {
_vm->_scrolls.display("Hmm, I don't think anyone will notice...");
_vm->_timeout.set_up_timer(4, _vm->_timeout.procurinate, _vm->_timeout.reason_gototoilet);
} else _vm->_scrolls.display("It would be \6VERY\22 unwise to do that here, Avvy!");
break;
case vb_cheat: {
_vm->_scrolls.display(Common::String('\6') + "Cheat mode now enabled.");
_vm->_gyro.cheat = true;
}
break;
case vb_magic:
if (_vm->_gyro.dna.avaricius_talk > 0)
_vm->_visa.dixi('q', 19);
else {
if ((_vm->_gyro.dna.room == 12) & (_vm->_trip.infield(2))) {
/* Avaricius appears! */
_vm->_visa.dixi('q', 17);
if (_vm->_gyro.whereis['\227'] == 12)
_vm->_visa.dixi('q', 18);
else {
_vm->_trip.tr[2].init(1, false, &_vm->_trip); /* Avaricius */
_vm->_trip.apped(2, 4);
_vm->_trip.tr[2].walkto(5);
_vm->_trip.tr[2].call_eachstep = true;
_vm->_trip.tr[2].eachstep = _vm->_trip.procback_and_forth;
_vm->_gyro.dna.avaricius_talk = 14;
_vm->_timeout.set_up_timer(177, _vm->_timeout.procavaricius_talks, _vm->_timeout.reason_avariciustalks);
}
} else _vm->_scrolls.display("Nothing appears to happen...");
}
break;
case vb_smartalec:
_vm->_scrolls.display("Listen, smart alec, that was just rhetoric.");
break;
case vb_expletive: {
switch ( _vm->_gyro.dna.swore) {
case 0:
_vm->_scrolls.display(Common::String("Avvy! Do you mind? There might be kids playing!\r\r") +
"(I shouldn't say it again, if I were you!)");
break;
case 1:
_vm->_scrolls.display(Common::String("You hear a distant rumble of thunder. Must you always ") +
"do things I tell you not to?\r\rDon't do it again!");
break;
default: {
_vm->_pingo.zonk();
_vm->_scrolls.display(Common::String("A crack of lightning shoots from the sky, ") +
"and fries you.\r\r(`Such is the anger of the gods, Avvy!\")");
_vm->_lucerna.gameover();
}
}
_vm->_gyro.dna.swore ++;
}
break;
case vb_listen:
if ((_vm->_gyro.dna.ringing_bells) & (_vm->_gyro.flagset('B')))
_vm->_scrolls.display(Common::String("All other noise is drowned out by the ringing of ") +
"the bells.");
else if (_vm->_gyro.listen == "")
_vm->_scrolls.display("You can't hear anything much at the moment, Avvy.");
else _vm->_scrolls.display(_vm->_gyro.listen);
break;
case vb_buy: {
/* What are they trying to buy? */
switch (_vm->_gyro.dna.room) {
case r__argentpub:
if (_vm->_trip.infield(6)) {
/* We're in a pub, and near the bar. */
switch (thing) {
case '\63':
case '\65':
case '\66':
case '\72': { /* Beer, whisky, cider or mead */
if (_vm->_gyro.dna.malagauche == 177) { /* Already getting us one. */
_vm->_visa.dixi('D', 15);
return;
}
if (_vm->_gyro.dna.teetotal) {
_vm->_visa.dixi('D', 6);
return;
}
if (_vm->_gyro.dna.alcohol == 0) _vm->_lucerna.points(3);
_vm->_celer.show_one(12);
_vm->_scrolls.display(booze[thing] + ", please.\231\2");
_vm->_gyro.dna.drinking = thing;
_vm->_celer.show_one(10);
_vm->_gyro.dna.malagauche = 177;
_vm->_timeout.set_up_timer(27, _vm->_timeout.procbuydrinks, _vm->_timeout.reason_drinks);
}
break;
case '\64':
examine();
break; /* We have a right one here- buy Pepsi??! */
case _vm->_gyro.wine:
if (_vm->_gyro.dna.obj[_vm->_gyro.wine]) /* We've already got the wine! */
_vm->_visa.dixi('D', 2); /* 1 bottle's shufishent! */
else {
if (_vm->_gyro.dna.malagauche == 177) { /* Already getting us one. */
_vm->_visa.dixi('D', 15);
return;
}
if (_vm->_gyro.dna.carrying >= maxobjs) {
_vm->_scrolls.display("Your hands are full.");
return;
}
_vm->_celer.show_one(12);
_vm->_scrolls.display("Wine, please.\231\2");
if (_vm->_gyro.dna.alcohol == 0) _vm->_lucerna.points(3);
_vm->_celer.show_one(10);
_vm->_gyro.dna.malagauche = 177;
_vm->_timeout.set_up_timer(27, _vm->_timeout.procbuywine, _vm->_timeout.reason_drinks);
}
break;
}
} else _vm->_visa.dixi('D', 5);
break; /* Go to the bar! */
case r__outsideducks:
if (_vm->_trip.infield(6)) {
if (thing == _vm->_gyro.onion) {
if (_vm->_gyro.dna.obj[_vm->_gyro.onion])
_vm->_visa.dixi('D', 10); /* not planning to juggle with the things! */
else if (_vm->_gyro.dna.carrying >= maxobjs)
_vm->_scrolls.display("Before you ask, you remember that your hands are full.");
else {
if (_vm->_gyro.dna.bought_onion)
_vm->_visa.dixi('D', 11);
else {
_vm->_visa.dixi('D', 9);
_vm->_lucerna.points(3);
}
_vm->_gyro.pennycheck(3); /* It costs thruppence. */
_vm->_gyro.dna.obj[_vm->_gyro.onion] = true;
_vm->_lucerna.objectlist();
_vm->_gyro.dna.bought_onion = true;
_vm->_gyro.dna.rotten_onion = false; /* It's OK when it leaves the stall! */
_vm->_gyro.dna.onion_in_vinegar = false;
}
} else _vm->_visa.dixi('D', 0);
} else _vm->_visa.dixi('D', 0);
break;
case r__nottspub:
_vm->_visa.dixi('n', 15);
break; /* Can't sell to southerners. */
default:
_vm->_visa.dixi('D', 0); /* Can't buy that. */
}
}
break;
case vb_attack: {
if ((_vm->_gyro.dna.room == r__brummieroad) &&
((person == '\235') || (thing == _vm->_gyro.crossbow) || (thing == _vm->_gyro.bolt))
&& (_vm->_gyro.whereis['\235'] == _vm->_gyro.dna.room)) {
switch (_vm->_gyro.dna.obj[_vm->_gyro.bolt] + _vm->_gyro.dna.obj[_vm->_gyro.crossbow] * 2) {
/* 0 = neither, 1 = only bolt, 2 = only crossbow,
3 = both. */
case 0: {
_vm->_visa.dixi('Q', 10);
_vm->_scrolls.display("(At the very least, don't use your bare hands!)");
}
break;
case 1:
_vm->_scrolls.display(Common::String("Attack _vm->_gyro.him with only a crossbow bolt? Are you ") +
"planning on playing darts?!");
break;
case 2:
_vm->_scrolls.display(Common::String("Come on, Avvy! You're not going to get very far ") +
"with only a crossbow!");
break;
case 3: {
_vm->_visa.dixi('Q', 11);
_vm->_gyro.dna.cwytalot_gone = true;
_vm->_gyro.dna.obj[_vm->_gyro.bolt] = false;
_vm->_gyro.dna.obj[_vm->_gyro.crossbow] = false;
_vm->_lucerna.objectlist();
_vm->_gyro.magics[12].op = _vm->_gyro.nix;
_vm->_lucerna.points(7);
_vm->_trip.tr[2].walkto(2);
_vm->_trip.tr[2].vanishifstill = true;
_vm->_trip.tr[2].call_eachstep = false;
_vm->_gyro.whereis['\235'] = 177;
}
break;
default:
_vm->_visa.dixi('Q', 10); /* Please try not to be so violent! */
}
} else _vm->_visa.dixi('Q', 10);
}
break;
case vb_password:
if (_vm->_gyro.dna.room != r__bridge)
_vm->_visa.dixi('Q', 12);
else {
ok = true;
for (ff = 1; ff <= thats.size(); ff ++)
for (fv = 1; fv <= words[_vm->_gyro.dna.pass_num + first_password].w.size(); fv ++) {
Common::String temp = realwords[ff];
temp.toUppercase();
if (words[_vm->_gyro.dna.pass_num + first_password].w[fv] != temp[fv])
ok = false;
}
if (ok) {
if (_vm->_gyro.dna.drawbridge_open != 0)
_vm->_scrolls.display("Contrary to your expectations, the drawbridge fails to close again.");
else {
_vm->_lucerna.points(4);
_vm->_scrolls.display("The drawbridge opens!");
_vm->_timeout.set_up_timer(7, _vm->_timeout.procopen_drawbridge, _vm->_timeout.reason_drawbridgefalls);
_vm->_gyro.dna.drawbridge_open = 1;
}
} else _vm->_visa.dixi('Q', 12);
}
break;
case vb_dir:
_vm->_enid.dir(realwords[2]);
break;
case vb_die:
_vm->_lucerna.gameover();
break;
case vb_score:
_vm->_scrolls.display(Common::String("Your score is ") + _vm->_gyro.strf(_vm->_gyro.dna.score) + ",\3\rout of a " +
"possible 128.\r\rThis gives you a rank of " + rank() +
".\r\r" + totaltime());
break;
case vb_put:
putproc();
break;
case vb_stand:
stand_up();
break;
case vb_kiss:
if (person == pardon)
_vm->_scrolls.display("Kiss whom?");
else if (personshere())
switch (person) {
case _vm->_gyro.parkata:
_vm->_visa.dixi('U', 12);
break;
case _vm->_gyro.pgeida:
_vm->_visa.dixi('U', 13);
break;
case _vm->_gyro.pwisewoman:
_vm->_visa.dixi('U', 14);
break;
default:
_vm->_visa.dixi('U', 5); /* You WHAT? */
}
else if ((150 <= person) && (person <= 174))
_vm->_scrolls.display("Hey, what kind of a weirdo are you??");
break;
case vb_climb:
if (_vm->_gyro.dna.room == r__insidecardiffcastle) cardiff_climbing();
else /* In the wrong room! */
_vm->_scrolls.display("Not with your head for heights, Avvy!");
break;
case vb_jump: {
_vm->_timeout.set_up_timer(1, _vm->_timeout.procjump, _vm->_timeout.reason_jumping);
_vm->_gyro.dna.user_moves_avvy = false;
}
break;
case vb_highscores:
// show_highs();
// to be implemented later...
break;
case vb_wake:
if (personshere())
switch (person) {
case pardon:
case _vm->_gyro.pavalot:
case '\0':
if (! _vm->_gyro.dna.avvy_is_awake) {
_vm->_gyro.dna.avvy_is_awake = true;
_vm->_lucerna.points(1);
_vm->_gyro.dna.avvy_in_bed = true;
_vm->_celer.show_one(3); /* Picture of Avvy, awake in bed. */
if (_vm->_gyro.dna.teetotal) _vm->_visa.dixi('d', 13);
} else _vm->_scrolls.display("You're already awake, Avvy!");
break;
case _vm->_gyro.payles:
if (! _vm->_gyro.dna.ayles_is_awake) _vm->_scrolls.display("You can't seem to wake _vm->_gyro.him by yourself.");
break;
case _vm->_gyro.pjacques:
_vm->_scrolls.display(Common::String("Brother Jacques, Brother Jacques, are you asleep?\231\2") +
"Hmmm... that doesn't seem to do any good...");
break;
default:
_vm->_scrolls.display("It's difficult to awaken people who aren't asleep...!");
}
break;
case vb_sit:
if (_vm->_gyro.dna.room == r__nottspub) {
if (_vm->_gyro.dna.sitting_in_pub)
_vm->_scrolls.display("You're already sitting!");
else {
_vm->_trip.tr[1].walkto(4); /* Move Avvy to the place, and sit _vm->_gyro.him down. */
_vm->_timeout.set_up_timer(1, _vm->_timeout.procavvy_sit_down, _vm->_timeout.reason_sitting_down);
}
} else {
/* Default doodah. */
_vm->_lucerna.dusk();
_vm->_gyro.hang_around_for_a_while();
_vm->_lucerna.dawn();
_vm->_scrolls.display("A few hours later...\20nothing much has happened...");
}
break;
case vb_restart:
if (_vm->_scrolls.ask("Restart game and lose changes?")) {
_vm->_lucerna.dusk();
_vm->_gyro.newgame();
_vm->_lucerna.dawn();
}
break;
case pardon:
_vm->_scrolls.display("Hey, a verb would be helpful!");
break;
case vb_hello: {
person_speaks();
_vm->_scrolls.display("Hello.\2");
}
break;
case vb_thanks: {
person_speaks();
_vm->_scrolls.display("That's OK.\2");
}
break;
default:
_vm->_scrolls.display(Common::String('\7') + "Parser bug!");
}
}
}
void Acci::verbopt(char n, Common::String &answer, char &anskey) {
switch (n) {
case vb_exam: {
answer = "Examine";
anskey = 'x';
}
break; /* the ubiqutous one */
/* vb_give isn't dealt with by this procedure, but by ddm__with */
case vb_drink: {
answer = "Drink";
anskey = 'D';
}
break;
case vb_wear: {
answer = "Wear";
anskey = 'W';
}
break;
case vb_ring: {
answer = "Ring";
anskey = 'R';
}
break; /* only the bell! */
case vb_play: {
answer = "Play";
anskey = 'P';
}
break;
case vb_eat: {
answer = "Eat";
anskey = 'E';
}
break;
default: {
answer = "? Unknown!"; /* Bug! */
anskey = '?';
}
}
}
} // End of namespace Avalanche.
Reference in a new issue Copy permalink