DMH-Online

NWScript:

// Copyright (C) 2002, Leo Lipelis
// need to declare this function ahead of its use
// to avoid compilation error;
// this function will destroy an object and everything
// inside of it recursively
void TrashObject(object obj)
{
    // if this is not a container, just destroy it and we're done
    if (GetHasInventory(obj) == FALSE) {
        DestroyObject(obj);
    } else {
        object oItem = GetFirstItemInInventory(obj);
        // destroy everything in the inventory first
        while (oItem != OBJECT_INVALID)
        {
            TrashObject(oItem);
            oItem = GetNextItemInInventory(obj);
        }
        // destroy the container itself
        DestroyObject(obj);
    }
}
void main()
{
    int iItemDropLifeSpan = 20;
    // iCounterMax must always be greater than iItemDropLifeSpan
    int iCounterMax = 1000;
    string sTrashMark = "iTrashMark";
    int iCounter = GetLocalInt(OBJECT_SELF, "iCounter");
    iCounter++;
    iCounter = iCounter % iCounterMax;
    if (iCounter == 0) { iCounter++; } // 0 is reserved
    SetLocalInt(OBJECT_SELF, "iCounter", iCounter);
    object obj = GetFirstObjectInArea();
    while (obj != OBJECT_INVALID)
    {
        int iObjType = GetObjectType(obj);
        // match based on type first, because comparing int
        // is faster than string; wrong types don't reach
        // string comparison
        if (iObjType == OBJECT_TYPE_PLACEABLE)
        {
            string sTag = GetTag(obj);
            // this assumes that every item drop from a monster
            // comes in a placeable container with a tag name
            // of "Body Bag"; it seems to be true, but if this
            // assumption is false, this code needs to be fixed
            if (sTag == "Body Bag")
            {
                int iTrashMark = GetLocalInt(obj, sTrashMark);
                if (iTrashMark == 0) {
                    SetLocalInt(obj, sTrashMark, iCounter);
                } else {
                    int iTimeAlive = 0;
                    if (iCounter >= iTrashMark) {
                        iTimeAlive = iCounter - iTrashMark;
                    } else {
                        iTimeAlive = iCounterMax - iTrashMark + iCounter - 1;
                    }
                    if (iTimeAlive > iItemDropLifeSpan) {
                        TrashObject(obj);
                    }
                }
            }
        }
        obj = GetNextObjectInArea();
    }
}