Подсстройте скрипт на 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