Page 1 of 1

подправте пожалуйсто

Posted: 2007-12-19 13:07:03
by pika
прет=() подправте пожалуйсто этот скрипт.
он делает щиты и выкидывает в мусорник.но вначале писал 'no wait time' щас пишет 'no menu opened' и так он не запустился=(
если не трудно помогите

Code: Select all

sub Blacksmithing()
var hammer='0x13E3'
var ingots='0x1BEF'
var buckler='0x1B73'
var Trash='0x40022808'
var Sunduk='0x402F7A23'



 uo.UseObject(Sunduk)
 wait(1000)
 uo.UseObject(Trash)
 wait(1000)
 while not uo.Dead()
 if uo.Count(ingots)==0 || uo.Count(ingots)>20 then
 uo.FindType(ingots,'-1',Sunduk)
 if uo.FindCount() then
 uo.moveitem('finditem','250')
 wait(1000)
 end if
 end if
uo.DeleteJournal()
uo.WaitMenu('Blacksmithing','shields','shields','buckler')
uo.UseType('01BEF')
while not uo.InJournal('You put') and not uo.InJournal('You have failed')
wait(500)
wend
if uo.InJournal('put') then
uo.FindType(buckler,'-1','backpack')
if uo.FindCount() then
uo.moveitem('finditem','all',Trash)
wait(500)
end if
end if
wend
end sub