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

Тейминг на 2 чара
http://forum.yoko.com.ua/viewtopic.php?f=17&t=13143		 Page 1 of 1
Author:  Shadowdancer [ 2008-01-28 22:12:38 ]
Post subject:  Тейминг на 2 чара
Может кто сможет помочь, короче такая тема :)
Стоит 2 моих чара и поочереди теймят одну хорсу. 1 Затеймил пишет алл релиз и начинает теймить другой :) а тот стоит и ждет пока 2й затеймит и напишет алл релиз
Author:  Nmy [ 2008-01-28 22:47:22 ]
Post subject: 
Code:
if uo.injournal('pervijchar: all release') then
taming()
end if
if uo.injournal('vtorojchar: all release') then
taming()
end if

если ктото будет мешать можно делать проверку на сериал через журнал
Author:  AGRS [ 2008-01-29 09:51:45 ]
Post subject: 
Предлагаю добавить в скрипт проверку на очередность, если один из чаров тамит не в свою очередь, второй на него матом орет и лупит посохом по голове. :lol:
Author:  Shadowdancer [ 2008-01-29 16:21:57 ]
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.msg('All release') 
Endif 
wend 
end sub
Author:  Kynep [ 2008-01-29 16:34:03 ]
Post subject: 
Shadowdancer wrote:
Вот мой макрос как бы правльно это зделать ?


Попробуй так:

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.msg('All release') 
      UO.Say('Vasya Ready') #Вместо Vasya, поставь ник того кто качает
    Endif 
    UO.DeleteJournal() 
    repeat 
      wait(1000) 
    until UO.InJournal('Vasya2 Ready') #Здесь ник второго перца
  wend 
end sub


Меняешь ники в сообщениях у первого так у второго наоборот, сначала тамишь ПЕРВЫМ, пока не скажет Вася реди, ПОТОМ ЗАПУСКАЕШЬ СКРИПТ у второго и смотришь что получается, в принципе должно работать. Пробуй. На всякий случай пример для второго:

Code:
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') #Здесь ник первого перца


Надеюсь понятно обьяснил.
Author:  Kynep [ 2008-01-30 09:03:34 ]
Post subject: 
Ну если аффтар молчит, значит все работает.... :oops: логично 8)
Author:  Shadowdancer [ 2008-02-06 10:03:59 ]
Post subject: 
Все класно, спасибо!

Только пишет что хорса вас вспомнила :(( иза этого у меня на шарде не будет расти тейминг :( Теперь нада найти скрипт что бы зверюшек 50 теймило!
Author:  AGRS [ 2008-02-06 10:21:55 ]
Post subject: 
Придется писать скрипт, который бы шлялся по лесу и тамил всякую животину. Помнится я писал такой, только животина убивалась, а не тамилась. :)

Сделай поиск по форуму с ключем "asmGetTrace", примеры использования были тут точно. Как напишешь, выкладывай. Мы заценим. :D
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/