Yoko

Posted: **2004-10-05 00:45:07**

Короче нарыл на этом форуме скриптик на тейлоринг рабочий (один из немногих рабочих если честно). Но надо бы чтоб он сделаные бинты скидывал в сундук, тоесть так
Брал из сундука ткань
Делал штаны (long pants)
Резал штаны на бинты
Скидывал бинты в сундук

Скрипт вот

sub main()
UO.CancelMenu()
UO.AutoMenu('Legwear','long pants')
UO.AutoMenu('Cloth','Legwear')

while UO.Count('0x175D')>10
UO.DeleteJournal()
UO.WaitTargetType('0x175D')
UO.UseType('0x0F9D')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("Tailoring failed")
wait(50)
wend

UO.WaitTargetType('0x1539')
UO.UseType('0x0F9E')
wait(2000)
wend
UO.CancelMenu()

end sub

Помогите если не влом! Заранее спасибо

!

Posted: **2004-10-05 08:24:25**

Manyak wrote:

Code: Select all

sub main() 
var idSunduk='...'
   UO.CancelMenu() 
   UO.AutoMenu('Legwear','long pants') 
   UO.AutoMenu('Cloth','Legwear') 
    
   while UO.Count('0x175D')>10 
   UO.DeleteJournal() 
      UO.WaitTargetType('0x175D') 
      UO.UseType('0x0F9D') 
   while NOT UO.InJournal("You put") AND NOT UO.InJournal("Tailoring failed") 
         wait(50) 
   wend 

       UO.WaitTargetType('0x1539') 
      UO.UseType('0x0F9E') 
      wait(2000)
      
      UO.FindType('XxXXXX','-1','backpack')
      if UO.GetQuntity('finditem') > 0 then
             UO.MoveItem('finditem','-1',idSunduk)
      end if

   wend 
   UO.CancelMenu() 
end sub

Yoko

Помогите доделать скрипт на тейлоринг! Плзз!

Помогите доделать скрипт на тейлоринг! Плзз!

Re: Помогите доделать скрипт на тейлоринг! Плзз!