Camping

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
shrt
Posts: 6
Joined: 2004-12-08 23:47:58

Camping

Post by shrt »

Вобщем смысл скрипта прост, игрок берёт из бэкпека 1 хворост , кидает под ноги и поджигает, если не получается , пробует еще раз, если хворост заканчивается , то скрипт завершает работу. Заранее спасибо !
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post 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
shrt
Posts: 6
Joined: 2004-12-08 23:47:58

Post by shrt »

On kladjot na pol vse, a nuzhno , 4tobi po odnomu
shrt
Posts: 6
Joined: 2004-12-08 23:47:58

Post by shrt »

Так, с этим я разобрался, теперь напишите плиз скрипт еще легче: чар использует ветки с бекпека, затем делает менюселект 2.. макрос останавливается, если ветки кончаются. Заранее огромное спасибо !
shrt
Posts: 6
Joined: 2004-12-08 23:47:58

Post by shrt »

vsjo , selal, mozhete zakrivatj temu
Post Reply