Page 1 of 1

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

Posted: 2006-03-10 21:45:11
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 раз....

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

или лутше это условие пока подобных итэм не останеться в рюкзаке...

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

Posted: 2006-03-10 22:51:26
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

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

Posted: 2006-03-10 22:59:23
by Waterboy
Спасибо

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

Posted: 2006-03-10 23:04:48
by CFA
Небольшая поправка - забыл сразу findtype поставить перед wend