Стоит 2 моих чара и поочереди теймят одну хорсу. 1 Затеймил пишет алл релиз и начинает теймить другой
Тейминг на 2 чара
Moderators: Murderator+, Murderator
-
Shadowdancer
- Posts: 96
- Joined: 2005-08-25 23:35:29
Тейминг на 2 чара
Может кто сможет помочь, короче такая тема 
Стоит 2 моих чара и поочереди теймят одну хорсу. 1 Затеймил пишет алл релиз и начинает теймить другой
а тот стоит и ждет пока 2й затеймит и напишет алл релиз
Стоит 2 моих чара и поочереди теймят одну хорсу. 1 Затеймил пишет алл релиз и начинает теймить другой
Code: Select all
if uo.injournal('pervijchar: all release') then
taming()
end if
if uo.injournal('vtorojchar: all release') then
taming()
end if
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net
-
Shadowdancer
- Posts: 96
- Joined: 2005-08-25 23:35:29
Вот мой макрос как бы правльно это зделать ?
Code: Select all
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.msg('All release')
Endif
wend
end sub
Попробуй так:Shadowdancer wrote:Вот мой макрос как бы правльно это зделать ?
Code: Select all
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.msg('All release')
UO.Say('Vasya Ready') #Вместо Vasya, поставь ник того кто качает
Endif
UO.DeleteJournal()
repeat
wait(1000)
until UO.InJournal('Vasya2 Ready') #Здесь ник второго перца
wend
end sub
Code: Select all
If Uo.InJournal('It seems') Then
UO.msg('All release')
UO.Say('Vasya2 Ready') #Вместо Vasya2, поставь ник второго
Endif
UO.DeleteJournal()
repeat
wait(1000)
until UO.InJournal('Vasya Ready') #Здесь ник первого перца
-
Shadowdancer
- Posts: 96
- Joined: 2005-08-25 23:35:29