Page 1 of 1

Camping

Posted: 2005-09-09 22:14:31
by shrt
Вобщем смысл скрипта прост, игрок берёт из бэкпека 1 хворост , кидает под ноги и поджигает, если не получается , пробует еще раз, если хворост заканчивается , то скрипт завершает работу. Заранее спасибо !

Posted: 2005-09-10 00:18:11
by Leo

Code: Select all

sub camping() 
# BETEP™ # 
VAR Exit=0 
while NOT UO.Dead() OR Exit<>1 
UO.FindType('0x0DE1','0x0000','backpack') 
If UO.GetQuantity('finditem')>0 Then 
UO.DropHere('finditem') 
wait(1000) 
UO.UseObject('finditem') 
wait(1000) 
Else 
Exit=1 
Endif 
wend 
end sub 

Posted: 2005-09-11 00:22:34
by shrt
On kladjot na pol vse, a nuzhno , 4tobi po odnomu

Posted: 2005-09-11 11:51:49
by shrt
Так, с этим я разобрался, теперь напишите плиз скрипт еще легче: чар использует ветки с бекпека, затем делает менюселект 2.. макрос останавливается, если ветки кончаются. Заранее огромное спасибо !

Posted: 2005-09-11 13:51:29
by shrt
vsjo , selal, mozhete zakrivatj temu