Page 1 of 1

Animal taming Помогите доделать

Posted: 2007-05-23 21:55:38
by deadbad
Хороший скрипт,но у меня проблема! На моем шарде когда тамишь животное второй раз оно пишет "The Liama remebers you and accepts you onse more as it's masrer."В журнале появляеться You see: (выше написанное). Помогите вписать так чтобы после этой фразы он писал алл релеасе и опять начинал тамить.зарание спасибо.


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

Posted: 2007-05-25 07:03:29
by mez
не понял а какая разница он всегда будет кричать олл реалайз в не зависимости затамил или нет!

Posted: 2007-05-28 22:53:20
by deadbad
Ну я не понимаю,вродь как в скрипте вбито что когда он затамил или не затамил он кричит,но тут не появляеться надписи что он затамил а типо животное вспомнило и само присоединилось.В следствии скрипт просто ниче не делает дальше вот !

Posted: 2007-05-29 08:12:57
by Rivory
в эту строчку

Code: Select all

until UO.InJournal('fail') or UO.InJournal('It seems') or UO.InJournal('see the creature')
добавь

Code: Select all

or uo.injournal("The Llama remebers you and accepts you onse more as it's master.")

Posted: 2007-05-29 17:29:38
by deadbad
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') or uo.InJournal("The Llama remebers you and accepts you once more as it's master.")
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


Неа все равно тоже самое просто останавливаеться и все

Posted: 2007-05-30 13:47:22
by Scripts Writer
Выкладывай в код скрипты

Code: Select all

[code][/code]

Posted: 2007-05-31 11:02:44
by deadbad

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') or uo.InJournal("The Llama remebers you and accepts you once more as it's master.")
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

Вот скрипт и он не работает,тоже самое останавливаеться и все