// Despawner Script - Used in OnExit in Area Properties
//
// The purpose of this script is to DestroyObject() all occurences of
// encounter spawned creatures when no PCs are left in the current
// area.
//
// -Aviston-

// Flash - include lod_include to get IsLoDBoss function
#include "lod_include"

void TrashObject(object oItem){

    if(GetHasInventory(oItem) == FALSE){
        DestroyObject(oItem);
    }else{
        object oItem2 = GetFirstItemInInventory(oItem);

        while(GetIsObjectValid(oItem2)){
            TrashObject(oItem2);
            oItem2 = GetNextItemInInventory(oItem);
        }//end while
        DestroyObject(oItem);
    }//end if/else
}

void main()
{
    // First check to see if the ExitingObject is a PC or not
    object oPC = GetExitingObject();
    // If not, we'll just exit
    if (!GetIsPC(oPC))
        return;
    // Start up the loop, setting oPC now to the first PC
    oPC = GetFirstPC();
    // Continue looping until there are no more PCs left
    while (oPC != OBJECT_INVALID)
    {
        // Check the Area against the Area of the current PC
        // If they are the same, exit the function, as we do not need to
        // check anymore PCs
        if (OBJECT_SELF == GetArea(oPC))
            return;
        // If not, continue to the next PC
        else oPC = GetNextPC();
    }
    // If we've made it this far, we know that there aren't any PCs in the area
    // Set oObject to the first object in the Area
    object oObject = GetFirstObjectInArea(OBJECT_SELF);
    // Continue looping until there are no more objects left
    while (oObject != OBJECT_INVALID)
    {
        // Test to see if oObject is a creature spawned from an encounter
        // If so, destroy the object
        // Flash - Don't delete if creature is a boss.
        if (GetIsEncounterCreature(oObject) && !IsLoDBoss(oObject))
            DestroyObject(oObject);

        /* Elvin - Maybe not needed as nearly all spawns don't leave loot
        if(GetObjectType(oObject) == OBJECT_TYPE_PLACEABLE && GetTag(oObject) == "BodyBag")
        {
          TrashObject(oObject);
        }
        */
        // Move on to the next object
        oObject = GetNextObjectInArea(OBJECT_SELF);
    }
}