Переплавка коритиков ДРВ.

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
ugabuga
Posts: 3
Joined: 2012-04-28 13:25:54

Переплавка коритиков ДРВ.

Post by ugabuga »

Всем доброго времени суток!!!

Нужна Ваша помощь в предоставлений скрипта под шард ДРВ.
Ищу скрипт для переплавления кортиков.
Алгоритм такой : есть сундук в нем много мешков с кортиками,хотелось бы чтобы персонаж брал мешок из сундука делал переплавку кортика и последующего выброса ингот в сундук. Если у кого-то есть такое добро,Будьте так добры и выложите здесь. Заранее благодарен !

Не тот раздел форума! © Mirage
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Переплавка коритиков ДРВ.

Post by ZeroDX »

не выставлены типы и прочее, ну и наверняка есть парочка ошибок.

Code: Select all

sub smelt()
    var id_container = '0x4022CF83', t_bag = '0x0E76', t_dagger = '0x0F51', id_forge = '0x402BC500', t_ingots = '0x1BEF', id_bag
    uo.useobject(id_container)
    while true
        uo.findtype(t_bag, -1, id_container)
        if uo.findcount() then
            id_bag = uo.getserial('finditem')
            uo.useobject(id_bag)
            wait(500)
            uo.findtype(t_dagger, -1, id_bag)
            if uo.findcount() then
                checklag()
                uo.moveitem(id_bag, -1, 'backpack')
                wait(1000)
                repeat
                    uo.findtype(t_dagger, -1, id_bag)
                    if uo.findcount() then
                        uo.moveitem('finditem', -1, 'backpack')
                        uo.waittargetobject('finditem')
                        uo.useobject(id_forge)
                        wait(200)
                    endif
                until not uo.findcount()
                checklag()
                uo.moveitem(id_bag, -1, id_container)
                wait(1000)
                uo.ignore(id_bag)
                uo.findtype(t_ingots, -1, 'backpack')
                if uo.findcount() then
                    uo.moveitem('finditem', -1, id_container)
                    wait(1000)
                endif
            else
                uo.ignore(id_bag)
            endif
        else
            return
        endif
    wend
endsub

Sub checklag()
    var msg = 'ackpack'
    deljournal(msg)
    uo.click('backpack')
    repeat
        wait(100)
    until uo.injournal(msg)
endsub

Sub deljournal(msg)
    while uo.injournal(msg)
        uo.setjournalline(uo.injournal(msg) - 1, '')
    wend
endsub
Last edited by ZeroDX on 2012-05-08 16:12:13, edited 5 times in total.
ugabuga
Posts: 3
Joined: 2012-04-28 13:25:54

Re: Переплавка коритиков ДРВ.

Post by ugabuga »

Круто! Все работает! Спасибо тебе брат!
Серьезно выручил!
Респект! (hug)
Post Reply