Page 1 of 1
Поправьте плиз Скрипт
Posted: 2009-04-04 17:02:17
by Lac0ste2
sub taming()
UO.UseSkill('Animal Taming');
wait(10000)
until UO.InJournal('You fail') OR UO.InJournal('вы')
If Uo.InJournal ('You fail')Then
UO.WaitTargetObject('lasttarget')
If Uo.InJournal('вы') Then
UO.Say('All Come')
UO.Usefromground('horse')
UO.Usefromground('0x00E2')
UO.Usefromground('0x00E4')
UO.Usefromground('0x00CC')
UO.Usefromground('0x00C8')
UO.Usefromground('0x00D2')
UO.Usefromground('0x00DB')
UO.Usefromground('0x00DC')
UO.Usefromground('0x00DA')
end sub
Posted: 2009-04-05 10:06:01
by Savage
Code: Select all
sub taming()
UO.DeleteJournal()
UO.UseSkill('Animal Taming')
Repeat
wait(500)
until UO.InJournal('You|вы')
While (Uo.InJournal('You fail'))
UO.DeleteJournal()
UO.WaitTargetObject('lasttarget')
UO.UseSkill('Animal Taming')
Repeat
wait(500)
until UO.InJournal('You|вы')
Wend
UO.Say('All Come')
wait(500)
UO.Usefromground('horse')
UO.Usefromground('0x00E2')
UO.Usefromground('0x00E4')
UO.Usefromground('0x00CC')
UO.Usefromground('0x00C8')
UO.Usefromground('0x00D2')
UO.Usefromground('0x00DB')
UO.Usefromground('0x00DC')
UO.Usefromground('0x00DA')
end sub
Posted: 2009-04-06 09:23:01
by Lac0ste2
Savage wrote:Code: Select all
sub taming()
UO.DeleteJournal()
UO.UseSkill('Animal Taming')
Repeat
wait(500)
until UO.InJournal('You|вы')
While (Uo.InJournal('You fail'))
UO.DeleteJournal()
UO.WaitTargetObject('lasttarget')
UO.UseSkill('Animal Taming')
Repeat
wait(500)
until UO.InJournal('You|вы')
Wend
UO.Say('All Come')
wait(500)
UO.Usefromground('horse')
UO.Usefromground('0x00E2')
UO.Usefromground('0x00E4')
UO.Usefromground('0x00CC')
UO.Usefromground('0x00C8')
UO.Usefromground('0x00D2')
UO.Usefromground('0x00DB')
UO.Usefromground('0x00DC')
UO.Usefromground('0x00DA')
end sub
Спасибо Влад но не робит
Таргет появляется на животное, кидал его на цель
жду, не затамил он не повторяет , а когда затамил не алл комит (
Короче не робит ((
Posted: 2009-04-06 10:13:14
by Savage
А раньше работало?
Я так понимаю, сообщения надо править.