Подсстройте скрипт на bowcraft

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Tw
Posts: 31
Joined: 2006-06-24 11:22:43

Подсстройте скрипт на bowcraft

Post by Tw »

Code: Select all

"СКРИПТ САВАДЖА" 
Code: 

sub bowcraft() 
VAR Exit=0 
   repeat 
      UO.DeleteJournal() 
      UO.FindType('0x1BDD','0x0000','0x400BE391') 
      if UO.GetQuantity('finditem')>0 then 
         UO.Grab('3','finditem') 
         UO.SetReceivingContainer('0x400BE391') 
         UO.Grab('2','finditem') 
         UO.WaitMenu('What','shaft') 
         UO.WaitTargetObject('finditem') 
         UO.UseType('0x0F51') 
         while NOT UO.InJournal('You put') AND NOT UO.InJournal('fail') 
            wait(500) 
         wend 
         UO.FindType('0x1BD4','0x0000','my') 
         if UO.GetQuantity('finditem')>0 then 
            UO.Grab('all','finditem') 
         Endif 
         UO.UnSetReceivingContainer() 
      Else 
         Exit=1 
      endif 
   until Exit==1 
end sub 
 Играю на дрв если что 

скрипт прекрасно работает, токо для более эфективной прокачки после 55% надо переходить на цветные логи и делать из них "гилду" (правда я незнаю что это) 
переделайте чтобы можно было ее крафтить 
Всякие типы логов и ИД сундуков я сам уже могу ставить :)
Post Reply