Yoko
http://forum.yoko.com.ua/

подправте пожалуйсто
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12931		 Page 1 of 1
Author:  pika [ 2007-12-19 13:07:03 ]
Post subject:  подправте пожалуйсто
прет=() подправте пожалуйсто этот скрипт.
он делает щиты и выкидывает в мусорник.но вначале писал 'no wait time' щас пишет 'no menu opened' и так он не запустился=(
если не трудно помогите
Code:
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
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/