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

Yoko http://forum.yoko.com.ua/

Переплавка коритиков ДРВ. http://forum.yoko.com.ua/viewtopic.php?f=17&t=16989	Page 1 of 1

Author:	ugabuga [ 2012-04-28 13:57:02 ]
Post subject:	Переплавка коритиков ДРВ.
Всем доброго времени суток!!! Нужна Ваша помощь в предоставлений скрипта под шард ДРВ. Ищу скрипт для переплавления кортиков. Алгоритм такой : есть сундук в нем много мешков с кортиками,хотелось бы чтобы персонаж брал мешок из сундука делал переплавку кортика и последующего выброса ингот в сундук. Если у кого-то есть такое добро,Будьте так добры и выложите здесь. Заранее благодарен ! Не тот раздел форума! © Mirage

Author:

ZeroDX [ 2012-04-28 19:06:03 ]

Post subject:

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

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

Code:

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

Author:	ugabuga [ 2012-05-09 07:24:32 ]
Post subject:	Re: Переплавка коритиков ДРВ.
Круто! Все работает! Спасибо тебе брат! Серьезно выручил! Респект! (hug)

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/