46 lines
1.1 KiB
Plaintext
46 lines
1.1 KiB
Plaintext
|
//::///////////////////////////////////////////////
|
||
|
|
//:: Tell Butler to Poison the Players' Food
|
||
|
|
//:: pri_guestpoison
|
||
|
|
//:: Copyright (c) 2002 Shepherd Software Inc.
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
/*
|
||
|
|
|
||
|
|
DM Option for the Suite Butler. This scritp toggels
|
||
|
|
a Local Variable on the Butler to either on or off.
|
||
|
|
If the Variable is toggeled on the Butler will posion
|
||
|
|
the players' food the next time they ask him to cook
|
||
|
|
for them.
|
||
|
|
|
||
|
|
Just for kicks or could make an intersting quest.
|
||
|
|
|
||
|
|
*/
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
//:: Created By: Russell S. Ahlstrom
|
||
|
|
//:: Created On: July 11, 2002
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
|
||
|
|
#include "pri_inc"
|
||
|
|
#include "pri_text"
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
object oPC = GetPCSpeaker();
|
||
|
|
|
||
|
|
GetInnArea(oPC);
|
||
|
|
|
||
|
|
string sButler = GetLocalString(oPC, "RSA_Butler");
|
||
|
|
|
||
|
|
object oButler = GetObjectByTag(sButler);
|
||
|
|
|
||
|
|
int iKill = GetLocalInt(oButler, "RSA_PoisonFood");
|
||
|
|
|
||
|
|
if (iKill == 1)
|
||
|
|
{
|
||
|
|
SetLocalInt(oButler, "RSA_PoisonFood", 0);
|
||
|
|
SendMessageToPC(oPC, POISONOFF);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
SetLocalInt(oButler, "RSA_PoisonFood", 1);
|
||
|
|
SendMessageToPC(oPC, POISONON);
|
||
|
|
}
|