Подскажите... недоучке

Ask for help

Moderators: Murderator+, Murderator

Post Reply
Waterboy
Posts: 25
Joined: 2006-02-02 23:16:49

Подскажите... недоучке

Post by Waterboy »

Скрипт:


sub BS()

var tItem='0x1010' ;тип продукции

var idForge='0x400501E1' ;форж на котором плавить продукцию

UO.FindType(tItem,-1,'backpack')
if UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(idForge)
wait(1000)
end if
end sub




Как поставить чтоб он повторялся ну скажем 500 раз....

Да это плавка какого либо предмета... конкретно ключей у тинкра...

или лутше это условие пока подобных итэм не останеться в рюкзаке...
CFA
Posts: 64
Joined: 2006-02-03 06:53:36

Re: Подскажите... недоучке

Post by CFA »

Code: Select all

sub BS()
    var tItem='0x1010' ;тип продукции
    var idForge='0x400501E1' ;форж на котором плавить продукцию

    uo.FindType(tItem, -1, 'backpack')
    while uo.FindCount()
        uo.UseObject(idForge)
        uo.WaitTargetObject('finditem')
        wait(1000)
        uo.FindType(tItem, -1, 'backpack')
    wend

end sub
Last edited by CFA on 2006-03-10 23:02:35, edited 1 time in total.
Waterboy
Posts: 25
Joined: 2006-02-02 23:16:49

Re: Подскажите... недоучке

Post by Waterboy »

Спасибо
CFA
Posts: 64
Joined: 2006-02-03 06:53:36

Re: Подскажите... недоучке

Post by CFA »

Небольшая поправка - забыл сразу findtype поставить перед wend
Post Reply