Yoko :: БС не куёт

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

БС не куёт http://forum.yoko.com.ua/viewtopic.php?f=20&t=13214	Page 1 of 1

Author:

pika [ 2008-02-09 16:31:19 ]

Post subject:

БС не куёт

здравствуйте
помогите пожалуйсто.вот скрипт он изначально делал дагеры а я изменил на другое оружие но он не куёт=(
а пишется Warning: Menu Swords & Blades opened waiting canceled

Code:

sub Blacksmithing() 
var Exit=0, LastTimer 
while Exit<>1 
uo.DeleteJournal() 
LastTimer=uo.Timer() 
uo.WaitMenu('Blacksmithing','Weapons','Weapons','Maces & Hammers','Maces & Hammers','mace') 
uo.UseType('0x1BEF') 
  
while not uo.InJournal('You put') and not uo.InJournal('You have failed') 
wait(500) 
wend 

if uo.InJournal('You have failed') then 
repeat 
wait(100) 
until uo.Timer()>=LastTimer+100 
end if 

uo.FindType('0x0F5C',-1,'backpack') 
wait(2500) 

if uo.GetQuantity('finditem') then 
uo.WaitTargetObject('finditem') 
uo.UseObject('0x400546E5') ; Форж 
end if 

uo.FindType('0x1BEF',-1,'backpack') 
if uo.GetQuantity('finditem')<500 then 
uo.FindType('0x1BEF','0x0000','0x40481292') ;Cундук с ингами 
wait(1000) 
uo.Grab('500','finditem') 
Endif 
wait(1000) 
wend    
end sub

Author:

Avel Mink [ 2008-02-09 16:38:41 ]

Post subject:

попробуй замени

Code:

uo.WaitMenu('Blacksmithing','Weapons','Weapons','Maces & Hammers','Maces & Hammers','mace')

на

Code:

         uo.AutoMenu('Blacksmithing','Colored Armor & Weapons') 
         uo.AutoMenu('Colored Armor & Weapons','Weapons') 
         uo.AutoMenu('Weapons','Maces & Hammers') 
         uo.AutoMenu('Maces & Hammers','mace')

Author:	pika [ 2008-02-09 16:49:44 ]
Post subject:
Avel Mink сенк но он не куёт опять=( вылетает уйма каких то строк и в конце пишется - Menu choise not found : menu ignored может сделать по ласт что он сделал? ну что он последнее сделал и это вставить Можете помочь пожалуйсто

Author:

pika [ 2008-02-09 17:00:47 ]

Post subject:

этолт скрипт вышел из под контроля))
если вас не затруднит посмотрите этот скрипт правельый он или нет
чар просто делает вещь а потом выкидывает в мусорник

Code:

sub BlacksmithyIM() 
var Exit=0, LastTimer 
uo.Print('Выбери Сундук: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
while Exit<>1 
uo.DeleteJournal() 
uo.FindType('0x0F51','0x0000','backpack') 
if uo.GetQuantity('finditem')>0 then 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('all','finditem') 
wait(1000) 
uo.UnSetReceivingContainer() 
end if 
uo.FindType('0x1BEF ',-1,'backpack')  
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x1BEF ','0x0000','Chest') 
wait(1000) 
uo.Grab('300','finditem') 
wait(1000) 
end if 
LastTimer=uo.Timer() 
uo.DeleteJournal() 
uo.WaitMenu ('Blacksmithing','Shields','Shields','buckler')
uo.UseType('0x13E3') 
wait(12000) 
wend 
end sub

Author:

pika [ 2008-02-09 17:02:29 ]

Post subject:

этолт скрипт вышел из под контроля
если вас не затруднит посмотрите этот скрипт правельый он или нет
чар просто делает вещь а потом выкидывает в мусорник

Code:

sub BlacksmithyIM() 
var Exit=0, LastTimer 
uo.Print('Выбери Сундук: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
while Exit<>1 
uo.DeleteJournal() 
uo.FindType('0x0F51','0x0000','backpack') 
if uo.GetQuantity('finditem')>0 then 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('all','finditem') 
wait(1000) 
uo.UnSetReceivingContainer() 
end if 
uo.FindType('0x1BEF ',-1,'backpack')  
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x1BEF ','0x0000','Chest') 
wait(1000) 
uo.Grab('300','finditem') 
wait(1000) 
end if 
LastTimer=uo.Timer() 
uo.DeleteJournal() 
uo.WaitMenu ('Blacksmithing','Shields','Shields','buckler')
uo.UseType('0x13E3') 
wait(12000) 
wend 
end sub

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/