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

Animal taming Помогите доделать
http://forum.yoko.com.ua/viewtopic.php?f=17&t=11989		 Page 1 of 1
Author:  deadbad [ 2007-05-23 21:55:38 ]
Post subject:  Animal taming Помогите доделать
Хороший скрипт,но у меня проблема! На моем шарде когда тамишь животное второй раз оно пишет "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
Author:  mez [ 2007-05-25 07:03:29 ]
Post subject: 
не понял а какая разница он всегда будет кричать олл реалайз в не зависимости затамил или нет!
Author:  deadbad [ 2007-05-28 22:53:20 ]
Post subject: 
Ну я не понимаю,вродь как в скрипте вбито что когда он затамил или не затамил он кричит,но тут не появляеться надписи что он затамил а типо животное вспомнило и само присоединилось.В следствии скрипт просто ниче не делает дальше вот !
Author:  Rivory [ 2007-05-29 08:12:57 ]
Post subject: 
в эту строчку
Code:
until UO.InJournal('fail') or UO.InJournal('It seems') or UO.InJournal('see the creature')
добавь
Code:
or uo.injournal("The Llama remebers you and accepts you onse more as it's master.")
Author:  deadbad [ 2007-05-29 17:29:38 ]
Post subject: 
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


Неа все равно тоже самое просто останавливаеться и все
Author:  Scripts Writer [ 2007-05-30 13:47:22 ]
Post subject: 
Выкладывай в код скрипты

Code:
[code][/code]
Author:  deadbad [ 2007-05-31 11:02:44 ]
Post subject: 
Code:
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

Вот скрипт и он не работает,тоже самое останавливаеться и все
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/