Пятница, 27.04.2018, 09:28Главная | Регистрация | Вход

Меню сайта

Ссылки

Наш опрос

Как Вам наш гильдийный цвет?
Всего ответов: 74
Animal Taming - Форум
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Форум » Скрипты » Скрипты » Animal Taming (Качаем Animal Taming)
Animal Taming
AlligatorkrДата: Воскресенье, 04.09.2011, 12:41 | Сообщение # 1
Сержант
Группа: Администраторы
Сообщений: 21
Репутация: 0
Статус: Offline
var fruit='0x09D1' ##Тип еды, которой кормим животное
var food= '0x09BB' ##Тип того что сами будем кушать
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
 
Форум » Скрипты » Скрипты » Animal Taming (Качаем Animal Taming)
  • Страница 1 из 1
  • 1
Поиск:

Copyright Reflection © 2018 | Конструктор сайтов - uCoz