Yoko
http://forum.yoko.com.ua/

Animal Taming
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2034		 Page 1 of 1
Author:  PARASITE [ 2004-11-22 11:01:53 ]
Post subject:  Animal Taming
Выложите пожалуйста скрипт на тайминг, чтобы он таймил животное, в случае удачи писал all release и кормил его едой из бэкпака.
Заранее благодарен.
Author:  Sfagnum [ 2004-11-22 11:04:24 ]
Post subject:  Re: Animal Taming
PARASITE wrote:
Выложите пожалуйста скрипт на тайминг, чтобы он таймил животное, в случае удачи писал all release и кормил его едой из бэкпака.
Заранее благодарен.
шард напиши...
дома его есть под ДРВ
Author:  PARASITE [ 2004-11-23 07:00:42 ]
Post subject: 
Именно под ДРВ и надо!
Author:  MitAl [ 2004-11-23 10:47:21 ]
Post subject: 
PARASITE wrote:
Именно под ДРВ и надо!


Code:
sub Taming() 
var count=0 
uo.print('Тотем') 
uo.exec('addobject TOT') 
while uo.targeting() 
wait(100) 
wend 
UO.DeleteJournal() 
while NOT UO.Dead() 
UO.DeleteJournal() 
UO.WaitTargetObject('TOT') 
UO.UseType('0x13F8') 
repeat 
wait(1000) 
until UO.InJournal('You fail') OR UO.InJournal('It seems') 
If Uo.InJournal('It seems') Then 
UO.Say('All release') 
Endif 
wend 
end sub
Author:  Sfagnum [ 2004-11-23 10:53:33 ]
Post subject: 
2 MitAl
а кормёжка хде?
Author:  kuviCk [ 2004-11-23 12:13:38 ]
Post subject:  Re: Animal Taming
PARASITE wrote:
Выложите пожалуйста скрипт на тайминг, чтобы он таймил животное, в случае удачи писал all release и кормил его едой из бэкпака.
Заранее благодарен.

Лови!
Code:
sub AnimalTaming() 
var Count=0 
uo.Print('Выбери Животное...') 
uo.Exec('addobject Creature') 
while uo.Targeting() 
wait(100) 
wend 
uo.DeleteJournal() 
while not uo.Dead() 
uo.DeleteJournal() 
uo.WaitTargetObject('Creature') 
uo.UseType('0x13F8')
repeat 
wait(1000) 
until uo.InJournal('You fail') or uo.InJournal('It seems') 
if uo.InJournal('It seems') then 
uo.Say('all release') 
GiveEatToCreature()
end if 
wend
end sub 

sub GiveEatToCreature() 
if uo.Waiting() then 
uo.CancelTarget() 
end if 
var f
dim Food[2] 
Food[0]=0x0994 ## - Грушы.
Food[1]=0x09D0 ## - Яблоки.
uo.Print('Кормим...')
uo.SetReceivingContainer('Creature')
wait(500) 
for f=0 to 1 
uo.FindType(Food[f]) 
if uo.GetQuantity('finditem')>0 then 
uo.Grab('20','finditem') 
wait(500) 
end if
next 
uo.UnSetReceivingContainer('Creature')
end sub
Author:  Yrilo [ 2004-11-25 13:43:22 ]
Post subject: 
Вот вам скрипт без Инжекта -
В УО option - f11 - say + all transfer
- f12 - last object + wait for target + last target
В AutoPilote - биндим на повтор этих кнопок с различным интервалом (сами подберете я не помню)!

Главное чтоб тварюга в помещении стояла типа сартир :)
Можно побольше живности поставить тока сменить last target на next target

Я до гма без проблем докачал :)
Author:  Goggy [ 2004-12-02 01:21:35 ]
Post subject: 
Yrilo wrote:
Вот вам скрипт без Инжекта -
В УО option - f11 - say + all transfer
- f12 - last object + wait for target + last target
В AutoPilote - биндим на повтор этих кнопок с различным интервалом (сами подберете я не помню)!

Главное чтоб тварюга в помещении стояла типа сартир :)
Можно побольше живности поставить тока сменить last target на next target

Я до гма без проблем докачал :)



гг :) молодец, так их всех :))))
Author:  BETEPAH [ 2004-12-02 13:53:10 ]
Post subject: 
Yrilo wrote:
Вот вам скрипт без Инжекта -
В УО option - f11 - say + all transfer
- f12 - last object + wait for target + last target
В AutoPilote - биндим на повтор этих кнопок с различным интервалом (сами подберете я не помню)!

Главное чтоб тварюга в помещении стояла типа сартир :)
Можно побольше живности поставить тока сменить last target на next target

Я до гма без проблем докачал :)


Умный да ?......а из дома оно в столовую покушать само будет ходить ?
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/