//::///////////////////////////////////////////////
//:: FileName rewardclasscleri
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 12/17/2002 1:07:37 AM
//:://////////////////////////////////////////////
#include "nw_i0_tool"

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

    // Give the speaker some XP
    RewardPartyXP(2000, GetPCSpeaker());

    // Give the speaker the items
    CreateItemOnObject("clericbarmor", GetPCSpeaker(), 1);
    CreateItemOnObject("clericbhelm", GetPCSpeaker(), 1);

{

        string sTemplate;
        string sItem;
        object oSpawnPoint;
        object oThug;
        int nIdx;
        location lLoc;

        sTemplate = "GOA";

        for(nIdx = 1; nIdx <= 3; nIdx++)
        {
            lLoc = GetLocation(GetNearestObjectByTag("WP_GOAEND" + IntToString(nIdx)));
            oThug = CreateObject(OBJECT_TYPE_CREATURE,sTemplate,lLoc);
            ApplyEffectAtLocation(DURATION_TYPE_INSTANT,EffectVisualEffect(VFX_FNF_SUMMON_MONSTER_1),lLoc);
        }

    effect eVis = EffectVisualEffect(VFX_IMP_UNSUMMON);
    ApplyEffectToObject(DURATION_TYPE_INSTANT,eVis,OBJECT_SELF);
        DestroyObject(OBJECT_SELF,0.5f);

}

}