КЕМПИНГ.

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