КЕМПИНГ.

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
zarg
Posts: 116
Joined: 2004-08-29 08:33:44

КЕМПИНГ.

Post by zarg »

У кого нить есть скрипт прокачки кемпинга???
kuviCk
Posts: 127
Joined: 2004-09-08 13:09:13
Contact:

Re: КЕМПИНГ.

Post by kuviCk »

zarg wrote:У кого нить есть скрипт прокачки кемпинга???

Code: Select all

sub Camping() 
var Exit=0 
uo.Print('Выбери Сундук с Хворостом: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
#uo.UseObject('Chest') 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
#uo.UseObject('TrashCan') 
while not uo.Dead() or Exit<>1 
uo.FindType('0x0DE1','0x0000','Chest') 
if uo.GetQuantity('finditem')>0 Then 
uo.Grab('1','finditem') 
wait(1000) 
uo.DropHere('finditem') 
wait(1000) 
uo.UseObject('finditem') 
wait(1000) 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('1','finditem') 
uo.UnSetReceivingContainer() 
else 
exit=1 
end if 
wend 
end sub 

Bawak
Posts: 5
Joined: 2004-05-06 01:51:52

Post by Bawak »

а на ДРВ теперь нельзя поднять хворост! есть скрипт под новые условия прокачки кемпинга на ДРВ? с ходьбой.
Post Reply