Untitled

local LOOT_ITEMS = {"gold coin", "wyrm scale", "small diamond", "wand of draconia", "lightning pendant", "focus cape", "wand of sandstorm", "hibiscus dress", "shockwave amulet", "dragonbone staff", "composite hornbow", "crystal sword", "small amethyst", "wand of cosmic energy", "guardian shield"}

local LOOT_BACKPACK = "Beach Backpack"

 

for i, LOOT_ITEM in ipairs(LOOT_ITEMS) do

    LOOT_ITEMS[i] = Item.GetID(LOOT_ITEM)

end

 

local VALID_CONTAINERS = {3253, 2853, 5949, 5950, 2869, 2861, 8860, 8861, 14249, 2872, 2864, 9605, 14248, 9601, 10326, 10324, 10325, 7342, 7343, 2871, 2863, 2865, 2857, 2870, 2862, 10202, 5801, 10327, 9604, 3244, 9602, 9603, 5926, 5927, 2868, 2860}

 

while (true) do

    local FROM_CONTAINER, TO_CONTAINER = Container.GetFirst(), Container.GetFromIndex(LOOT_BACKPACK)

 

    while (FROM_CONTAINER:isOpen() and TO_CONTAINER:isOpen()) do

        local FROM_CONTAINER_CURRENT_SPOT = 0

       

        if (FROM_CONTAINER:Name():match("^Dead") or FROM_CONTAINER:Name():match("^Slain") or FROM_CONTAINER:Name():match("^Dissolved")) or FROM_CONTAINER:Name():match("^Remains") or FROM_CONTAINER:Name():match("^Elemental") then

            while (FROM_CONTAINER:ItemCount() + 1 > FROM_CONTAINER_CURRENT_SPOT and FROM_CONTAINER_CURRENT_SPOT < 20) do

                local FROM_CONTAINER_ITEM_DATA = FROM_CONTAINER:GetItemData(FROM_CONTAINER_CURRENT_SPOT)

               

                if (table.find(LOOT_ITEMS, FROM_CONTAINER_ITEM_DATA.id)) then

                    local TO_CONTAINER_CURRENT_SPOT = 0

       

                    while (TO_CONTAINER:ItemCount() + 1 > TO_CONTAINER_CURRENT_SPOT and TO_CONTAINER_CURRENT_SPOT < 20) do

                        local TO_CONTAINER_ITEM_DATA = TO_CONTAINER:GetItemData(TO_CONTAINER_CURRENT_SPOT)

                       

                        if (table.find(LOOT_ITEMS, TO_CONTAINER_ITEM_DATA.id) or not table.find(VALID_CONTAINERS, TO_CONTAINER_ITEM_DATA.id)) then

                            if (not (table.find(LOOT_ITEMS, TO_CONTAINER_ITEM_DATA.id) and math.max(TO_CONTAINER_ITEM_DATA.count, 1) == 100)) then

                                FROM_CONTAINER:MoveItemToContainer(FROM_CONTAINER_CURRENT_SPOT, TO_CONTAINER:Index(), TO_CONTAINER_CURRENT_SPOT, math.max(FROM_CONTAINER_ITEM_DATA.count, 1))

                                break

                            else

                                TO_CONTAINER_CURRENT_SPOT = TO_CONTAINER_CURRENT_SPOT + 1

                            end

                        else

                            TO_CONTAINER_CURRENT_SPOT = TO_CONTAINER_CURRENT_SPOT + 1

                        end

                    end

                else

                    FROM_CONTAINER_CURRENT_SPOT = FROM_CONTAINER_CURRENT_SPOT + 1

                end

            end

        end

       

        FROM_CONTAINER = FROM_CONTAINER:GetNext()

    end    

    wait(100)

end