38 lines
1.2 KiB
Plaintext
38 lines
1.2 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: FileName taoringquestcom
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Script Wizard
|
|
//:: Created On: 1/5/2004 3:15:55 AM
|
|
//:://////////////////////////////////////////////
|
|
#include "nw_i0_tool"
|
|
|
|
void main()
|
|
{
|
|
// Give the speaker some gold
|
|
//RewardPartyGP(800, GetPCSpeaker());
|
|
|
|
// Give the speaker some XP
|
|
//RewardPartyXP(900, GetPCSpeaker());
|
|
object oPartymember = GetFirstFactionMember(GetPCSpeaker());
|
|
while (GetIsObjectValid(oPartymember))
|
|
{
|
|
if (GetArea(oPartymember) == GetArea(GetPCSpeaker()) && GetXP(oPartymember) < 210000)
|
|
{
|
|
GiveGoldToCreature(oPartymember, 800);
|
|
GiveXPToCreature(oPartymember, 1000);
|
|
}
|
|
oPartymember = GetNextFactionMember(GetPCSpeaker());
|
|
}
|
|
|
|
|
|
// Remove items from the player's inventory
|
|
object oItemToTake;
|
|
oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "TaosGoldRing");
|
|
if(GetIsObjectValid(oItemToTake) != 0)
|
|
DestroyObject(oItemToTake);
|
|
// Set the variables
|
|
SetLocalInt(GetPCSpeaker(), "taoringquestcom", 200);
|
|
|
|
}
|