Нужна помощь по скрипту Taming

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
viorus
Posts: 7
Joined: 2011-09-18 11:44:44

Нужна помощь по скрипту Taming

Post by viorus »

Приветствую вас!
Вопрос заключается вот в чём, нашёл классный скрипт на таминг одной живки с помощью таминг стафа, как её тамит пишет all release, но к сожалению качать на одной живке не получится на нашем шарде, ибо при повторном таминге пишет к примеру: The Llama remembers you and accepts you once more as it's master , т.е. стоит какаято задержка на повторное приручение...вот хотелось бы чтобы кто-нибудь поправил скрипт и сделал чтобы таминг качать на 10 животных одного типа, т.е. тамил одну живку, писал олл релис, потом переходил на следующую, и так с первой по десятую, как затамит 10, то переходил бы заново на первую...
Помогите плз кто может, заранее благодарен.
исходник скрипта вот:

var fruit='0x09D1' ##Тип еды, которой кормим животное
var food= '0x097B' ##Тип того что сами будем кушать
var Timer=UO.Timer()
var Animal, Staff

sub AnimalTaming()
UO.Msg('All release')

UO.Print('Выбери Животину...')
UO.Exec('addobject Animal')
while uo.Targeting()
wait(100)
wend

UO.Print('Выбери Палку...')
UO.Exec('addobject Staff')
while uo.Targeting()
wait(100)
wend

UO.DeleteJournal()
while not UO.InJournal('It seems') or not UO.InJournal('see the creature')
UO.DeleteJournal()
UO.WaitTargetObject('Animal')
UO.UseObject('Staff')
repeat
wait(100)
until UO.InJournal('fail') or UO.InJournal('It seems') or UO.InJournal('see the creature')
if UO.Timer()>(Timer+1200) then
UO.SetReceivingContainer('Animal')
wait(500)
UO.FindType(fruit)
if UO.GetQuantity('finditem')>0 then
UO.Grab('5','finditem')
wait(500)
end if
UO.UnSetReceivingContainer('Animal')
wait(500)
UO.UseType(food)
Timer=UO.Timer()
end if
UO.Msg('All release')
wend
end sub
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:

Re: Нужна помощь по скрипту Taming

Post by ZeroDX »

А где будет проходить сам процесс таминга? в поле или загоне каком?ещё попробуй затами ламу, запри в доме, релиз сделай, погуляй минут 30 и попробуй затами. Играл на шарде, где 2 раза подряд 1 животное не затамить. Таминг качался вдвоем
viorus
Posts: 7
Joined: 2011-09-18 11:44:44

Re: Нужна помощь по скрипту Taming

Post by viorus »

тамить в загоне у дома.
Ну тут задержка стоит 20минут, после чего можно тамить заного, вернее 20минут задержка на забывание живкой хозяина
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Нужна помощь по скрипту Taming

Post by Mirage »

В загон однотипных животных (чем больше тем лучше - я работал с 6 и 50). В пак жрачка в виде жареной рыбы.

Code: Select all

sub AnimalTaming()
   VAR n=1
   var animal = '0x00D0' #тип животного
   UO.Set('quiet','0')
   uo.ignorereset()
   uo.warmode('0')
   Repeat
      uo.Set('finddistance', 8)
      uo.FindType(animal, -1, 'ground')
      if uo.FindCount()>0 then
         uo.warmode(0)
         UO.DeleteJournal()
         UO.WaitTargetObject('finditem') 
         UO.Useskill('Animal Taming')
         repeat
            wait(100)
         until UO.InJournal('fail|It seems|already|rememb|creature') or uo.GetX('finditem')==0
         If Uo.InJournal('It seems|already|creature') Then
            UO.Hide('finditem')
            UO.Ignore('finditem')
            uo.say('all release')
         endif
      else
         uo.ignorereset()
         UO.Msg(".resync")
         wait(500)
         eat()
      endif
      wait(500)
   Until uo.Dead()
end sub
Sub eat()
   var havka      = '0x097B', LastTimer
   REPEAT
      UO.DeleteJournal()
      LastTimer=UO.Timer()
      UO.findtype(havka,-1,'backpack')
      If UO.FindCount() > 0 Then
         UO.Useobject('finditem')
         wait(200)
      Else
         UO.Print( 'кончилась рыба' )
         return 0
      end if
   Until UO.InJournal("stuffed!|think|found|Вы ничего не можете") OR UO.Timer()>LastTimer+200
end sub
Если будет долго стоять между действиями - проверь сообщения в журнале.
viorus
Posts: 7
Joined: 2011-09-18 11:44:44

Re: Нужна помощь по скрипту Taming

Post by viorus »

вот прочитал скрипт, всё вроде отлично написал, но негде таминг стафф не прописал, как я понял тамит он у тебя со скила, а нужен обязательно таминг стафф, без него некак...как в примере в первом посту со стафом...
да и кормить можно не жареной рыбой а просто фиш стаками по 1 фиш стеку давать, ну это как я понял можно поменять в типе еды...

пропиши пожалуйста чтобы он тамил с таминг стафом и если сломается стаф, чтобы брал другой с пака...

заранее благодарен за твой бесценный труд!
Post Reply