//::///////////////////////////////////////////////
//:: FileName reward_cru_hal
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 11/27/2002 10:45:08 AM
//:://////////////////////////////////////////////
#include "nw_i0_tool"

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

    // Give the speaker some XP
    RewardPartyXP(5000, GetPCSpeaker());
    AdjustAlignment(GetPCSpeaker(), ALIGNMENT_GOOD, 10);

    // Give the speaker the items
    CreateItemOnObject("crusaderhalberd", 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);

}

}