Хелп плиз !!!
Posted: 2006-07-07 13:46:10
Я хотел попрасить Мастеров написать мне скрипт плиз на Animal Taming и добавить в него функцыю Anatomy
И вот вам на всякий случай скрипт !
И вот вам на всякий случай скрипт !
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