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
Поправьте плиз Скрипт
Moderators: Murderator+, Murderator
-
- Expert!
- Posts: 1205
- Joined: 2004-04-04 11:13:54
- Location: Балаково, Саратовская обл.
- Contact:
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
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
Спасибо Влад но не робит
Таргет появляется на животное, кидал его на цель
жду, не затамил он не повторяет , а когда затамил не алл комит (
Короче не робит ((