Yoko

Leo wrote:Тейлоринг
Прячется и шьёт боди сэши. Тут же режет на бинты.

Code: Select all

var Cont='0x4037E83B' ##ID сундука с тканью, так же туда будут складыватся бинты
var Creat='0x1541'    ##Тип того, что сшили
sub Tailoring()
#¤Leo¤#
   while NOT UO.Dead()
      ToHide()
      UO.FindType('0x175D','0x0000','backpack')
      if UO.GetQuantity('finditem')<4 then
         UO.UseObject(Cont)
         UO.FindType('0x0E21','0x0000','backpack')
         if UO.GetQuantity('finditem')>0 then
            UO.SetReceivingContainer(Cont)
               wait(1000)
            UO.Grab('all','finditem')
               wait(1000)
            UO.UnSetReceivingContainer()
         Endif 
         UO.FindType('0x175D','0x0000',Cont)
            wait(1000)
         UO.Grab('600','finditem')
            wait(1000)
      endif 
      CheckLag() 
      UO.WaitMenu('Cloth','Misc','Misc','body sash')
      UO.WaitTargetType('0x175D')
      UO.UseType('0x0F9D')
      UO.DeleteJournal()
         wait(1000) 
      repeat
         wait(100)
      until UO.InJournal('fail') or UO.InJournal('put')
      UO.DeleteJournal()
         wait(500)
      UO.WaitTargetType(Creat)
      UO.UseType('0x0F9E')
      CheckLag() 
         wait(500)    
   wend 
endsub

Sub ToHide()
   while NOT UO.Hidden()
      UO.DeleteJournal()
      UO.Exec('warmode 0') 
      UO.UseSkill('Stealth')
         repeat
            wait(50) 
         until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied')
   wend
end sub 

Sub CheckLag()
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(50) 
   until UO.InJournal('backpack') 
end sub

      UO.WaitTargetType(Creat) 
      UO.UseType('0x0F9E') 

1. У тебя не правильно стоят типы ленты или ножниц

2. У тебя он не видит созданные ленты:
а) Инжект глючит

1. Перезайди
б) Не находит ленты

1. Проставь типы
2. Ищи их дописав следущее , вместо этих 2ух строк:

 uo.FindType(Creat,'-1','backpack')
 if uo.FindCount() then
   UO.WaitTargetType(Creat) 
   UO.UseType('0x0F9E')
  end if  

You Must Die wrote:

Code: Select all

      UO.WaitTargetType(Creat) 
      UO.UseType('0x0F9E') 

Вот 2 строки, отвечающие за резку на бинты.

1. У тебя не правильно стоят типы ленты или ножниц

2. У тебя он не видит созданные ленты:
а) Инжект глючит

1. Перезайди
б) Не находит ленты

1. Проставь типы
2. Ищи их дописав следущее , вместо этих 2ух строк:

Code: Select all

 uo.FindType(Creat,'-1','backpack')
 if uo.FindCount() then
   UO.WaitTargetType(Creat) 
   UO.UseType('0x0F9E')
  end if  

dark wrote: Лео, у меня просто шьет, а на бинты не режет, подскажи что делать, пожалуйста.