#include "69_inc_henai"

void main()
{
    object oMaster = GetMaster();
    ClearAllActions();
    SetAssociateState(NW_ASC_IS_BUSY);
    int bFound = FALSE;
    string sName;
    location lCenter = GetLocation(OBJECT_SELF);
    object oThing = GetFirstObjectInShape(SHAPE_SPHERE, 15.0, lCenter, TRUE, OBJECT_TYPE_PLACEABLE | OBJECT_TYPE_ITEM);
    
    // Create a list of party members
    object oPartyMember = GetFirstFactionMember(oMaster);
    
    while (GetIsObjectValid(oThing))
    {
        if (GetObjectType(oThing) == OBJECT_TYPE_ITEM)
        {
            bFound = TRUE;
            sName = GetName(oThing);
            TurnToFaceObject(oThing);
            ActionPickUpItem(oThing);

            // Loop through all party members and send a message to each
            while (GetIsObjectValid(oPartyMember))
            {
                if (GetIsPC(oPartyMember))
                {
                    ActionDoCommand(SendMessageToPC(oPartyMember, GetName(OBJECT_SELF) + " picked up " + sName + "."));
                }
                oPartyMember = GetNextFactionMember(oMaster);
            }
        }
        else // oThing is a placeable
        {
            if (GetHasInventory(oThing)) // Containers (including corpses)
            {
                // Don't search locked containers
                // Only search trapped containers if you can't see the trap
                if (!GetLocked(oThing) && (!GetIsTrapped(oThing) || (GetIsTrapped(oThing) && !GetTrapDetectedBy(oThing, OBJECT_SELF))))
                {
                    bFound = TRUE;
                    ActionMoveToObject(oThing);
                    ActionDoCommand(AssignCommand(oThing, PlayAnimation(ANIMATION_PLACEABLE_OPEN)));
                    TurnToFaceObject(oThing);
                    ActionPlayAnimation(ANIMATION_LOOPING_GET_MID, 1.0, 3.0);
                    object oItem = GetFirstItemInInventory(oThing);
                    while (GetIsObjectValid(oItem))
                    {
                        ActionDoCommand(SendMessageToPC(oMaster, GetName(OBJECT_SELF) + " picked up " + GetName(oItem) + " from " + GetName(oThing) + "."));

                        // Loop through all party members and send a message to each
                        while (GetIsObjectValid(oPartyMember))
                        {
                            if (GetIsPC(oPartyMember))
                            {
                                ActionDoCommand(SendMessageToPC(oPartyMember, GetName(OBJECT_SELF) + " picked up " + GetName(oItem) + " from " + GetName(oThing) + "."));
                            }
                            oPartyMember = GetNextFactionMember(oMaster);
                        }

                        ActionTakeItem(oItem, oThing);
                        oItem = GetNextItemInInventory(oThing);
                    }
                    ActionDoCommand(AssignCommand(oThing, PlayAnimation(ANIMATION_PLACEABLE_CLOSE)));
                }
            }
        } // else
        oThing = GetNextObjectInShape(SHAPE_SPHERE, 15.0, lCenter, TRUE, OBJECT_TYPE_PLACEABLE | OBJECT_TYPE_ITEM);
    } // while(GetIsObjectValid(oThing))
    ActionDoCommand(SetAssociateState(NW_ASC_IS_BUSY, FALSE));
    if (!bFound)
        SpeakString("I don't see where I can find any around here.");
}