//::///////////////////////////////////////////////
//:: FileName varioscomplete
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 2/16/2004 5:14:49 PM
//:://////////////////////////////////////////////
#include "nw_i0_tool"

void main()
{
    // Give the speaker some gold
    //RewardPartyGP(500, GetPCSpeaker());

    // Give the speaker some XP
    //RewardPartyXP(800, GetPCSpeaker());
    object oPartymember = GetFirstFactionMember(GetPCSpeaker());
        while (GetIsObjectValid(oPartymember))
             {
              if (GetArea(oPartymember) == GetArea(GetPCSpeaker()) && GetXP(oPartymember) < 210000)
                {
                  GiveGoldToCreature(oPartymember, 1000);
                  GiveXPToCreature(oPartymember, 800);
                  }
              oPartymember = GetNextFactionMember(GetPCSpeaker());
               }


    // Remove items from the player's inventory
    object oItemToTake;
    oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "OrcChiefsBlade");
    if(GetIsObjectValid(oItemToTake) != 0)
        DestroyObject(oItemToTake);
    oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "MilitaryRing");
    if(GetIsObjectValid(oItemToTake) != 0)
        DestroyObject(oItemToTake);
    // Set the variables
    SetLocalInt(GetPCSpeaker(), "Varios", 200);

}