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

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Manyak
Posts: 11
Joined: 2004-08-30 02:29:19

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

Post by Manyak »

Короче нарыл на этом форуме скриптик на тейлоринг рабочий (один из немногих рабочих если честно). Но надо бы чтоб он сделаные бинты скидывал в сундук, тоесть так
Брал из сундука ткань
Делал штаны (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


Помогите если не влом! Заранее спасибо :)!
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

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

Post by Sfagnum »

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
Post Reply