Дозагруз

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
R4nd
Posts: 28
Joined: 2009-10-24 23:36:23

Дозагруз

Post by R4nd »

клоуз сделал спс
Last edited by R4nd on 2014-03-31 12:31:42, edited 1 time in total.
Incorrect User
Posts: 949
Joined: 2011-05-23 00:33:30

Re: Дозагруз

Post by Incorrect User »

Держи, только в типе инвизок укажи вместо 15 штук 1, я не знаю ваш тип инвиза.

Code: Select all

sub loot()
    var currentX, i, quantity,REGBag = "0x410A7DA9", box = "0x410A7DA9"
    dim Ore[4]
    Ore[1]=0x19B9 ; 4 and more ore
    Ore[2]=0x19B7 ; 1 ore
    Ore[3]=0x19BA ; 2 ore
    Ore[4]=0x19B8 ; 3 ore
    uo.useobject("backpack")
    wait(300)
    for i = 1 to 4
        repeat
            if uo.findtype(Ore[i], -1, "backpack") then
                uo.moveitem("finditem", 0, box)
                wait(500)
            end if
        until not uo.findcount()
    next
    uo.useobject("backpack")
    wait(300)
    uo.useobject(REGBag)
    wait(300)
    mdim R[9][2]
    R[1][0] = "0x0c77"
    R[1][1] = 15
    R[2][0] = "0x0F09"
    R[2][1] = 15
    R[3][0] = "0x0F8D"
    R[3][1] = 15
    R[4][0] = "0x0F8C"
    R[4][1] = 15
    R[5][0] = "0x0F84"
    R[5][1] = 15
    R[6][0] = "0x0F86"
    R[6][1] = 15
    R[7][0] = "0x0F7B"
    R[7][1] = 15
    R[8][0] = "0x0F7A"
    R[8][1] = 15
    for i = 1 to 8
        quantity = R[i][1]
        if uo.findtype(R[i][0], -1, "backpack") and uo.getquantity("finditem") < quantity then
            quantity = R[i][1] - uo.getquantity("finditem")
            if uo.findtype(R[i][0], -1, REGBag) and uo.getquantity("finditem") >= quantity then
                uo.moveitem("finditem", quantity, "backpack")
                wait(500)
            else
                uo.print("Слишком мало чтобы брать...")
                wait(100)
            end if
        end if
    next
    currentX=uo.GetX()
    uo.msg("Go")
    wait(10000)
    while currentX==uo.GetX()
        uo.msg("Go")
        wait(10000)
    wend
end sub
R4nd
Posts: 28
Joined: 2009-10-24 23:36:23

Re: Дозагруз

Post by R4nd »

сделал клоуз спс
Last edited by R4nd on 2014-03-31 12:32:02, edited 1 time in total.
Incorrect User
Posts: 949
Joined: 2011-05-23 00:33:30

Re: Дозагруз

Post by Incorrect User »

В этом скрипте ты сможешь указать, для каждого типа ресурсов, свое количество при желании. Ругается скорее всего из за того что у тебя старый инжект, он не поддерживает многомерные массивы. Обновись viewtopic.php?f=1&t=17391
Post Reply