Хелп плиз !!!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Happyk
Posts: 2
Joined: 2006-07-07 13:35:23
Contact:

Хелп плиз !!!

Post by Happyk »

Я хотел попрасить Мастеров написать мне скрипт плиз на Animal Taming и добавить в него функцыю Anatomy :roll:
И вот вам на всякий случай скрипт ! :roll:


Code: Select all

var fruit='0x0C77' ##Вид еды которую вы будете есть 
var food= '0x097B' ##Тип еды которой кормить живку
var Timer=UO.Timer()
var Animal, Staff

sub AnimalTaming()
#¤Leo¤#
UO.Msg('all release')

UO.Print(Select Animal...')
UO.Exec('addobject Animal')
   while uo.Targeting()
      wait(100)
   wend

UO.Print('Select Staff...')
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
klonuk
Posts: 145
Joined: 2006-05-23 11:48:22
Contact:

Post by klonuk »

сцуки мою аватраку сперли :( О ужас....(флуд )
klonuk
Posts: 145
Joined: 2006-05-23 11:48:22
Contact:

Post by klonuk »

Ты хотябы шард на писал.... как тайминг работает и т.д скрипт который ты выложил .... на нем качаешь ты тайминг?
Spirit
Posts: 101
Joined: 2006-03-23 19:25:23

Post by Spirit »

klonuk wrote:Ты хотябы шард на писал.... как тайминг работает и т.д скрипт который ты выложил .... на нем качаешь ты тайминг?


А знаю такого, Шард у него ДрВ, нубик 1 такой)
:O
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Code: Select all

   UO.DeleteJournal()
   UO.WaitTargetObject('Animal')
   UO.UseObject('Staff')


Code: Select all

   UO.DeleteJournal()
   UO.WaitTargetObject('Animal')
   UO.UseSkill('Anatomy')
   UO.WaitTargetObject('Animal')
   UO.UseObject('Staff')


Code: Select all

var fruit='0x0C77' ##Âèä åäû êîòîðóþ âû áóäåòå åñòü
var food= '0x097B' ##Òèï åäû êîòîðîé êîðìèòü æèâêó
var Timer=UO.Timer()
var Animal, Staff

sub AnimalTaming()
#¤Leo¤#
UO.Msg('all release')

UO.Print(Select Animal...')
UO.Exec('addobject Animal')
   while uo.Targeting()
      wait(100)
   wend

UO.Print('Select Staff...')
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.UseSkill('Anatomy')
   wait(2500) ;if anatomy dont fuck up taming then set wait(200)
   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
Post Reply