Grimoric: Created page with " function int Q4TP(obj this, obj s..."

2018-10-12T02:49:50Z

Created page with " function int Q4TP(obj this, obj s..."

New page

function int Q4TP(obj this, obj speaker, string arg)
{
list args;
[[Engine Function:_split|split]](args, arg);
int Q4QI = 0x00;
string Q618;
list Q5II;
int Q699;
for(int i = 0x00; i < [[Engine Function:_numInList|numInList]](args); i++)
{
Q618 = args[i];
if (Q618 == "where")
{
Q4QI = 0x01;
if (0x00)
{
[[Engine Function:_bark|bark]](this, "Being asked where something is.");
}
Q699 = i;
}
}
if (!Q4QI)
{
return (0x01);
}
;
string Q5QL = "nothing";
int Q4TS = 0x00;
Q4QI = 0x00;
int Q5J5 = 0x01;
for(i = Q699; i < [[Engine Function:_numInList|numInList]](args); i++)
{
Q618 = args[i];
if (Q618 == "shrine")
{
Q5QL = "shrine";
Q4TS = 0x01;
Q5J5 = 0x00;
Q4QI = 0x01;
}
if (Q618 == "britain")
{
Q5QL = "city_britain";
Q618 = "city of Britain";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "buccaneer")
{
Q5QL = "city_bucden";
Q618 = "island known as Buccaneer's Den";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "jhelom")
{
Q5QL = "city_jhelom";
Q618 = "city of Jhelom";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "magincia")
{
Q5QL = "city_magincia";
Q618 = "city of Magincia";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "vesper")
{
Q5QL = "city_vesper";
Q618 = "lovely city of Vesper";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "minoc")
{
Q5QL = "city_minoc";
Q618 = "rustic town of Minoc";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "moonglow")
{
Q5QL = "city_moonglow";
Q618 = "magical city of Moonglow";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "nujel")
{
Q5QL = "city_nujelm";
Q618 = "city of Nujel'm";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "ocllo")
{
Q5QL = "city_ocllo";
Q618 = "strange land called Ocllo";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "serpent")
{
Q5QL = "city_serphold";
Q618 = "fortress called Serpent's Hold";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "skara")
{
Q5QL = "city_skara";
Q618 = "town of Skara Brae";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "trinsic")
{
Q5QL = "city_trinsic";
Q618 = "walled city of Trinsic";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "yew")
{
Q5QL = "city_yew";
Q618 = "city of Yew";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "cove")
{
Q5QL = "city_cove";
Q618 = "township of Cove";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "abbey")
{
Q5QL = "abbey";
Q618 = "Empath Abbey";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "alchemist")
{
Q5QL = "alchemist";
Q4QI = 0x01;
}
if (Q618 == "animal")
{
Q5QL = "animaltrainer";
Q618 = "animal trainer";
Q4QI = 0x01;
}
if ((Q618 == "armorer") || (Q618 == "armourer"))
{
Q5QL = "armorer";
Q4QI = 0x01;
}
if ((Q618 == "artisans") || (Q618 == "artisan"))
{
Q5QL = "artisansguild";
Q618 = "artisans guild";
Q4TS = 0x01;
if (Q618 == "artisans")
{
Q5J5 = 0x00;
}
Q4QI = 0x01;
}
if ((Q618 == "baker") || (Q618 == "bakery"))
{
Q5QL = "baker";
if (Q618 == "bakery")
{
Q5J5 = 0x00;
}
Q4QI = 0x01;
}
if (Q618 == "bank")
{
Q5QL = "bank";
Q4TS = 0x01;
Q4QI = 0x01;
}
if ((Q618 == "bard") || (Q618 == "bards"))
{
Q5QL = "bard";
if (Q618 == "bards")
{
Q5J5 = 0x00;
}
Q4QI = 0x01;
}
if ((Q618 == "bath") || (Q618 == "baths"))
{
Q5QL = "bath";
if (Q618 == "baths")
{
Q5J5 = 0x00;
}
Q4QI = 0x01;
}
if (Q618 == "beekeeper")
{
Q5QL = "beekeeper";
Q4QI = 0x01;
}
if ((Q618 == "smith") || (Q618 == "blacksmith"))
{
Q5QL = "blacksmith";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "blackthorn")
{
Q5QL = "blackthornkeep";
Q618 == "Blackthorn's keep";
Q4TS = 0x01;
Q4QI = 0x01;
}
if ((Q618 == "bowyer") || (Q618 == "fletcher"))
{
Q5QL = "bowyer";
Q4QI = 0x01;
}
if (Q618 == "butcher")
{
Q5QL = "butcher";
Q4QI = 0x01;
}
if (Q618 == "carpenter")
{
Q5QL = "carpenter";
Q4QI = 0x01;
}
if (Q618 == "casino")
{
Q5QL = "casino";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "cemetery")
{
Q5QL = "cemetery";
Q5J5 = 0x00;
Q4QI = 0x01;
}
if (Q618 == "clothier")
{
Q5QL = "clothier";
Q4QI = 0x01;
}
if (Q618 == "cobbler")
{
Q5QL = "cobbler";
Q4QI = 0x01;
}
if (Q618 == "court")
{
Q5QL = "court";
Q4QI = 0x01;
Q4TS = 0x01;
}
if (Q618 == "customs")
{
Q5QL == "customs";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if ((Q618 == "docks") || (Q618 == "dock"))
{
Q5QL = "docks";
Q4QI = 0x01;
if (Q618 == "docks")
{
Q5J5 = 0x00;
}
Q4TS = 0x01;
}
if ((Q618 == "duel") || (Q618 == "pit"))
{
Q5QL = "duelpit";
Q618 == "dueling pit";
Q4QI = 0x01;
}
if (Q618 == "farm")
{
Q5QL = "farm";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "fish")
{
Q5QL = "fishery";
Q4QI = 0x01;
}
if (Q618 == "glassblower")
{
Q5QL = "glassblower";
Q4QI = 0x01;
}
if ((Q618 == "gypsy") || (Q618 == "gypsies"))
{
Q5QL = "gypsy";
if (Q618 == "gypsies")
{
Q5J5 = 0x00;
}
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "healer")
{
Q5QL = "healer";
Q4QI = 0x01;
}
if (Q618 == "herbalist")
{
Q5QL = "herbalist";
Q4QI = 0x01;
}
if ((Q618 == "inn") || (Q618 == "hostel"))
{
Q5QL = "inn";
Q4TS = 0x01;
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "jail")
{
Q5QL = "jail";
Q4QI = 0x01;
}
if (Q618 == "jeweler")
{
Q5QL = "jeweler";
Q4QI = 0x01;
}
if (Q618 == "castle")
{
Q5QL = "lbcastle";
Q4TS = 0x01;
Q5J5 = 0x00;
Q4QI = 0x01;
}
if (Q618 == "library")
{
Q5QL = "library";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "lighthouse")
{
Q5QL = "lighthouse";
Q4TS = 0x01;
Q5J5 = 0x00;
Q4QI = 0x01;
}
if ((Q618 == "magic") || (Q618 == "mage"))
{
Q5QL = "magic";
Q4QI = 0x01;
Q618 = "mage";
}
if (Q618 == "merchant")
{
Q5QL = "merchant";
Q4QI = 0x01;
}
if (Q618 == "mill")
{
Q5QL = "mill";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "observatory")
{
Q5QL = "observatory";
Q5J5 = 0x00;
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "painter")
{
Q5QL = "painter";
Q4QI = 0x01;
}
if (Q618 == "paladin")
{
Q5QL = "paladin";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "provisioner")
{
Q5QL = "provisioner";
Q4QI = 0x01;
}
if (Q618 == "shipwright")
{
Q5QL = "shipwright";
Q4TS = 0x01;
Q4QI = 0x01;
}
if ((Q618 == "stable") || (Q618 == "stables"))
{
Q5QL = "stable";
if (Q618 == "stables")
{
Q5J5 = 0x00;
}
Q4QI = 0x01;
}
if (Q618 == "tanner")
{
Q5QL = "tanner";
Q4QI = 0x01;
}
if ((Q618 == "tavern") || ((Q618 == "pub") || (Q618 == "bar")))
{
Q5QL = "tavern";
Q4QI = 0x01;
}
if (Q618 == "temple")
{
Q5QL = "temple";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "theater")
{
Q5QL = "theater";
Q4QI = 0x01;
Q5J5 = 0x00;
}
if (Q618 == "tinker")
{
Q5QL = "tinker";
Q4QI = 0x01;
}
if ((Q618 == "vet") || (Q618 == "veterinarian"))
{
Q5QL = "vet";
Q4QI = 0x01;
}
if ((Q618 == "weapons") || (Q618 == "weaponeer"))
{
Q5QL = "weaponry";
Q4QI = 0x01;
if (Q618 == "weapons")
{
Q5J5 = 0x00;
}
}
if (Q618 == "trainer")
{
Q5QL = "weapontrainer";
Q4QI = 0x01;
}
if (Q618 == "woodworker")
{
Q5QL = "woodworker";
Q4TS = 0x01;
Q4QI = 0x01;
}
if (Q618 == "guild")
{
string Q5QO;
string Q4QT;
Q4TS = 0x01;
for(int Q518 = 0x00; Q518 < [[Engine Function:_numInList|numInList]](args); Q518++)
{
Q5QO = args[Q518];
if (Q5QO == "bard")
{
Q4QT = "bardic guild";
Q5QL = "bardguild";
Q4QI = 0x01;
}
if ((Q5QO == "fighter") || (Q5QO == "warrior"))
{
Q4QT = "warrior's guild";
Q5QL = "fighterguild";
Q4QI = 0x01;
}
if (Q5QO == "healer")
{
Q4QT = "healer's guild";
Q5QL = "healer";
Q4QI = 0x01;
}
if (Q5QO == "merchant")
{
Q4QT = "merchant's guild";
Q5QL = "merchantguild";
Q4QI = 0x01;
}
if (Q5QO == "miner")
{
Q4QT = "miner's guild";
Q5QL = "minerguild";
Q4QI = 0x01;
}
if (Q5QO == "ranger")
{
Q4QT = "ranger's guild";
Q5QL = "rangerguild";
Q4QI = 0x01;
}
if (Q5QO == "tailor")
{
Q4QT = "tailor's guild";
Q5QL = "tailorguild";
Q4QI = 0x01;
}
if (Q5QO == "tinker")
{
Q4QT = "tinker's guild";
Q5QL = "tinkerguild";
Q4QI = 0x01;
}
}
}
}
if (!Q4QI)
{
if (0x00)
{
[[Engine Function:_bark|bark]](this, "Asked direction to nowhere I recognize.");
}
return (0x01);
}
string Q601;
loc Q5ZU;
loc Q4VS = [[Engine Function:_getLocation|getLocation]](this);
Q4QI = [[Engine Function:_findClosestArea|findClosestArea]](Q601, Q5ZU, Q5QL, Q4VS, Q4TS);
if (Q601 == "")
{
if (Q4QT == "")
{
if (Q5J5 == 0x00)
{
Q601 = Q618 + "s";
}
else
{
Q601 = Q618;
}
}
else
{
Q601 = Q4QT;
}
}
[[Engine Function:_split|split]](args, Q601);
Q5QO = args[0x00];
if (Q5QO == "the")
{
Q618 = "";
}
else
{
Q618 = "the ";
}
string Q5N7 = "Thou seekest " + Q618 + Q601 + "?";
[[Engine Function:_bark|bark]](this, Q5N7);
[[Script_Function:_Q4J9|Q4J9]](this);
if (!Q4QI)
{
[[Engine Function:_bark|bark]](this, "I know not where to find that.");
return (0x00);
}
string Q602 = [[Engine Function:_getDirection|getDirection]](Q4VS, Q5ZU);
string Q603 = [[Engine Function:_getDistance|getDistance]](Q4VS, Q5ZU);
Q5N7 = "'Tis " + Q603 + " " + Q602 + " from here.";
if (Q603 == "right here")
{
Q5N7 = "But 'tis " + Q603 + "! Look thee " + Q602 + ".";
}
[[Engine Function:_bark|bark]](this, Q5N7);
return (0x00);
}

Script Function: Q4TP - Revision history

Grimoric at 13:41, 12 October 2018

Grimoric: Created page with " function int Q4TP(obj this, obj s..."