viewtopic.php?p=30260#30260
Author or poster:_________
Leo privmsg.php?mode=post&u=3146
Tested on:_______________
Dragon World (v0.55i) http://www.drw.ru
Must work:_______________
Sphere emu
Customization required:____
Yes/Char
Description:______________
Cкрипт тамит животное, если затамил, отпускает и опять тамит. Каждые 2 минуты даёт животному поесть и кушает сам.
Вписываем типы еды.
Запускаем скрипт, выбираем животное, потом таминг стафф.
Yoko comment:___________
none
________________________
Code: Select all
var fruit='0x09D1' ##Тип еды, которой кормим животное
var food= '0x097B' ##Тип того что сами будем кушать
var Timer=UO.Timer()
var Animal, Staff
sub AnimalTaming()
#¤Leo¤#
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