/*
    Series of scripts: 1-10
    Upon death of PC banner, spawn in Horde Banner
    Scripts 1-5 also burn the neighbouring house
    Created By: Dalantriel Jul 22, 2002
*/


void main()
{
    location loc = GetLocation(OBJECT_SELF);
    CreateObject(OBJECT_TYPE_PLACEABLE, "hordebanner001", loc, TRUE);
    CreateObject(OBJECT_TYPE_PLACEABLE, "unholylight", loc, TRUE);
    DestroyObject(GetNearestObjectByTag("MagicSparksWhite"));

    loc = GetLocation(GetObjectByTag("spawnbodak1"));
    object oCreature = GetObjectByTag("ms_spawnbodak1");

    if(!(GetCurrentHitPoints(oCreature) > 0))
    {
        CreateObject(OBJECT_TYPE_CREATURE, "bodak001", loc, TRUE);
    }


    SoundObjectStop(GetObjectByTag("MagicCrystalGood1"));
    SoundObjectPlay(GetObjectByTag("MagicPortalEvil1"));

}