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

Помогите с тамингом)
http://forum.yoko.com.ua/viewtopic.php?f=20&t=13836		 Page 1 of 1
Author:  ychenik [ 2008-07-29 23:04:09 ]
Post subject:  Помогите с тамингом)
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.UseSkill('Animal Taming') 
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



собственно скрипт идеальный) только есть одна проблема, на шарде не всегда выдвется сообщение об удачном/неудачном применении скила. Можно ли как то сделать проверку, чтобы если допустим черз 10 секунд нет никакого сообщения чар снова юзал таминг на животину? Хелп плс оч надо)
Author:  Scripts Writer [ 2008-07-29 23:22:00 ]
Post subject: 
Code:
sub Taming() 
var k
var count=0 
uo.print('Тотем') 
uo.exec('addobject TOT') 
while uo.targeting() 
wait(100) 
wend 
UO.DeleteJournal() 
while NOT UO.Dead() 
UO.DeleteJournal() 
k=0
UO.WaitTargetObject('TOT') 
UO.UseSkill('Animal Taming') 
repeat 
wait(1000) 
k=k+1
until UO.InJournal('You fail') OR UO.InJournal('It seems') OR (k>10)
If Uo.InJournal('It seems') Then 
UO.Say('All release') 
Endif 
wend 
end sub
Author:  ychenik [ 2008-07-29 23:40:07 ]
Post subject: 
огромное спасибо) а не мог бы обьяснить что в скрипте означает строчка к=к+1?
Author:  Scripts Writer [ 2008-07-30 00:26:47 ]
Post subject: 
Code:
repeat 
wait(1000) 
k=k+1 
until UO.InJournal('You fail') OR UO.InJournal('It seems') OR (k>10)

Смотри в каком случае происходит выход из цикла
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/