Люди добрые помогите с Camping'om

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
VaskinPes
Posts: 3
Joined: 2005-05-22 09:53:13
Location: Латвия

Люди добрые помогите с Camping'om

Post by VaskinPes »

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
В этом скрипте он подберает мусор после костра, а на том шарде котором я играю этого нельзя зделать :x Можно ли просто зделать чтобы он кидал и поджегал и всё. Если возможно помогите :lol:
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

А в разделе Scripts! тяжело взглянуть?
VaskinPes
Posts: 3
Joined: 2005-05-22 09:53:13
Location: Латвия

Post by VaskinPes »

Я там стотрел только там он во всяким летанием...... я пробывал обрезать и неполучалось. А мне хотелось бы кинул и зажыгает пока незажег и всё =) Если можно помогите.
maximka4
Posts: 147
Joined: 2004-10-13 15:08:08

Post by maximka4 »

VaskinPes wrote:Я там стотрел только там он во всяким летанием...... я пробывал обрезать и неполучалось. А мне хотелось бы кинул и зажыгает пока незажег и всё =) Если можно помогите.
а скрипт askaneli не подойдет? 8)
maxim viktorovich
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

Сделал дело - флуди смело !!!
VaskinPes
Posts: 3
Joined: 2005-05-22 09:53:13
Location: Латвия

Post by VaskinPes »

Спасибо =)
Post Reply