Results 1 to 2 of 2

Thread: Action Dp

  1. #1
    Normal User
    Join Date
    May 2012
    Posts
    20
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Reputation
    12
    Rep Power
    5

    Talking Action Dp

    Hello Guys


    Has anyone got an action script that will put my dragons items into the backpack that is inside depot ?:>

    for Example Depot>Yellow Backpack> (in that yellow backpack) 20 Brocade backpacks


    Thanks in Advance !!!

  2. #2
    Normal User lilb4l's Avatar
    Join Date
    Apr 2012
    Location
    Sweden
    Posts
    278
    Mentioned
    11 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    11 Post(s)
    Reputation
    66
    Rep Power
    5
    Credits to Sirmate..

    Code:
    local CONFIG = {
        LOOT_BACKPACK = "yellow backpack",
        
        STACKABLE_BACKPACK = "brocade backpack",
        STACKABLE_BACKPACK_AMOUNT = 2,
        
        NOT_STACKABLE_BACKPACK = "brocade backpack",
        NOT_STACKABLE_BACKPACK_AMOUNT = 18,
        
        DEPOSIT_ITEMS = {"great health potion", "fish fin"},
    }
    
    local NOT_STACKABLE_LAST_ON_TO, ITEM_INDEX = 0, 1
    
    while (#CONFIG.DEPOSIT_ITEMS >= ITEM_INDEX) do
        if (type(CONFIG.DEPOSIT_ITEMS[ITEM_INDEX]) == "string") then
            local ITEM_ID = itemid(CONFIG.DEPOSIT_ITEMS[ITEM_INDEX])
            
            if (ITEM_ID > 0) then
                CONFIG.DEPOSIT_ITEMS[ITEM_INDEX], ITEM_INDEX = ITEM_ID, ITEM_INDEX + 1
            else
                table.remove(CONFIG.DEPOSIT_ITEMS, ITEM_INDEX)
            end
        elseif (type(CONFIG.DEPOSIT_ITEMS[ITEM_INDEX]) == "number") then
            if (CONFIG.DEPOSIT_ITEMS[ITEM_INDEX] > 0) then
                ITEM_INDEX = ITEM_INDEX + 1
            else
                table.remove(CONFIG.DEPOSIT_ITEMS, ITEM_INDEX)
            end
        else
            table.remove(CONFIG.DEPOSIT_ITEMS, ITEM_INDEX)
        end
    end
    
    while (true) do
        for _, DEPOSIT_ITEM in ipairs(CONFIG.DEPOSIT_ITEMS) do
            if (itemcount(DEPOSIT_ITEM, CONFIG.LOOT_BACKPACK) > 0) then
                if (itemproperty(DEPOSIT_ITEM).isCumulative) then
                    local STACKABLE_LAST_ON_TO = 0
                    
                    while (CONFIG.STACKABLE_BACKPACK_AMOUNT > STACKABLE_LAST_ON_TO) do
                        local ITEM_COUNT_BEFORE = itemcount(DEPOSIT_ITEM, CONFIG.LOOT_BACKPACK)
                        
                        moveitemsonto(DEPOSIT_ITEM, "all", CONFIG.STACKABLE_BACKPACK, 100, STACKABLE_LAST_ON_TO) wait(500, 1000)
                        
                        local ITEM_COUNT_AFTER = itemcount(DEPOSIT_ITEM, CONFIG.LOOT_BACKPACK)
                        
                        if (ITEM_COUNT_BEFORE == ITEM_COUNT_AFTER and ITEM_COUNT_AFTER > 0) then
                            STACKABLE_LAST_ON_TO = STACKABLE_LAST_ON_TO + 1
                        elseif (ITEM_COUNT_AFTER == 0) then
                            break
                        end
                    end
                else
                    while (CONFIG.NOT_STACKABLE_BACKPACK_AMOUNT > NOT_STACKABLE_LAST_ON_TO) do
                        local ITEM_COUNT_BEFORE = itemcount(DEPOSIT_ITEM, CONFIG.LOOT_BACKPACK)
                        
                        moveitemsonto(DEPOSIT_ITEM, "all", CONFIG.NOT_STACKABLE_BACKPACK, 100, NOT_STACKABLE_LAST_ON_TO) wait(500, 1000)
                        
                        local ITEM_COUNT_AFTER = itemcount(DEPOSIT_ITEM, CONFIG.LOOT_BACKPACK)
                        
                        if (ITEM_COUNT_BEFORE == ITEM_COUNT_AFTER and ITEM_COUNT_AFTER > 0) then
                            NOT_STACKABLE_LAST_ON_TO = NOT_STACKABLE_LAST_ON_TO + 1
                        elseif (ITEM_COUNT_AFTER == 0) then
                            break
                        end
                    end
                end
            end
        end
        
        if (itemcount(CONFIG.LOOT_BACKPACK, CONFIG.LOOT_BACKPACK) > 0) then
            openitem(CONFIG.LOOT_BACKPACK, CONFIG.LOOT_BACKPACK, false) wait(2000, 3000)
        else
            break
        end
        
        wait(100)
    end
    and you neeed also this http://www.tibiaibot.com/forum/showt...Library-v1-1-1

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •