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

Таргет на атакующего
http://forum.yoko.com.ua/viewtopic.php?f=20&t=4666		 Page 1 of 1
Author:  Lord [ 2005-07-27 08:24:37 ]
Post subject:  Таргет на атакующего
У меня снова возникла проблема. Мне срочно нужен скрипт, чтобы как только меня атакуюет чар, то его сразу же метило, и первый же каст любой магии шол на него. Возможно ли такое, и если возможно, то как это сделать?
Author:  Sfagnum [ 2005-07-27 10:05:08 ]
Post subject:  Re: Таргет на атакующего
Lord wrote:
У меня снова возникла проблема. Мне срочно нужен скрипт, чтобы как только меня атакуюет чар, то его сразу же метило, и первый же каст любой магии шол на него. Возможно ли такое, и если возможно, то как это сделать?
в журнале ловишь сообщение об атаке и кидаешь ответку на него... как найти айдишник смотри в соседней ветке.
Author:  Lord [ 2005-07-27 11:16:45 ]
Post subject: 
Спасибо конечно, но именно как кинуть ответку на него, я не знаю, при айдишник, ты про какую ветку говоришь?
Author:  Sfagnum [ 2005-07-27 11:29:47 ]
Post subject: 
про эту
Author:  Lord [ 2005-07-27 16:31:40 ]
Post subject: 
Code:
sub main()
Var ser
 while not uo.dead()
 if uo.injournal("is attacking you")
 then
 ser=uo.getserial(uo.Journal(uo.InJournal("is attacking you")-1))
 endif   
 wend
end sub


Как я понял (благодаря Sfagnum) скрипт должен выглядеть примерно так, но вот, как сделать ответку я не понял. Помогите пожалуйста
Author:  Sfagnum [ 2005-07-28 08:33:21 ]
Post subject: 
Lord wrote:
Code:
sub main()
Var ser, ManaNeed=4, CastTime = 500
 while not uo.dead()
   if uo.injournal("is attacking you") then
     ser=uo.getserial(uo.Journal(uo.InJournal("is attacking you")-1))
     if UO.Mana>=ManaNeed then
          UO.Cast('Magic Arrow',ser)
     else
          UO.Print("Low mana!!!")
     end if
     wait(CastTime)
   else
        wait(1000)
   end if
 wend
end sub
Author:  Lord [ 2005-07-28 08:58:34 ]
Post subject: 
Sfagnum большое тебе спасибо за помошь.
Author:  mike [ 2005-08-07 09:32:59 ]
Post subject: 
Sfagnum wrote:
Lord wrote:
Code:
sub main()
Var ser, ManaNeed=4, CastTime = 500
 while not uo.dead()
   if uo.injournal("is attacking you") then
     ser=uo.getserial(uo.Journal(uo.InJournal("is attacking you")-1))
     if UO.Mana>=ManaNeed then
          UO.Cast('Magic Arrow',ser)
     else
          UO.Print("Low mana!!!")
     end if
     wait(CastTime)
   else
        wait(1000)
   end if
 wend
end sub

хм. пишет инвалид сериал индекс... :?
Author:  Dron D. [ 2005-08-07 13:31:14 ]
Post subject: 
Мде очень весело будет посмареть на етот скрипт... какой нить нуп в гзз оденет свою едсинввенную рарку и выху... и будет понтоватся тут кто то его проатачит и тут понеслось... :D
Author:  Leo [ 2005-08-07 21:47:31 ]
Post subject: 
mike wrote:
хм. пишет инвалид сериал индекс... :?


Ещё бы. Надо так:

Code:
sub main()
Var ser, ManaNeed=4, CastTime = 500
 while not uo.dead()
   if uo.injournal("is attacking you") then
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("is attacking you")-1))
     if UO.Mana>=ManaNeed then
          UO.Cast('Magic Arrow',ser)
     else
          UO.Print("Low mana!!!")
     end if
     wait(CastTime)
   else
        wait(1000)
   end if
 wend
end sub
Author:  mike [ 2005-08-08 18:38:42 ]
Post subject: 
Leo wrote:
mike wrote:
хм. пишет инвалид сериал индекс... :?


Ещё бы. Надо так:

Code:
sub main()
Var ser, ManaNeed=4, CastTime = 500
 while not uo.dead()
   if uo.injournal("is attacking you") then
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("is attacking you")-1))
     if UO.Mana>=ManaNeed then
          UO.Cast('Magic Arrow',ser)
     else
          UO.Print("Low mana!!!")
     end if
     wait(CastTime)
   else
        wait(1000)
   end if
 wend
end sub


а если мне нужен всего лишь 1 каст, а потом чтобы скрипт вырубался тогда как?
Author:  Leo [ 2005-08-08 18:55:33 ]
Post subject: 
Тогда вот так:

Code:
sub main() 
Var ser, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("is attacking you") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("is attacking you")-1)) 
     if UO.Mana>=ManaNeed then 
          UO.Cast('Magic Arrow',ser)
          UO.Exec("terminate main")
     else 
          UO.Print("Low mana!!!") 
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub
Author:  Entertainer [ 2005-08-10 23:26:20 ]
Post subject: 
можно вопрос: какое практическое применение у этого скрипта?
Author:  Leo [ 2005-08-11 11:36:47 ]
Post subject: 
Entertainer wrote:
можно вопрос: какое практическое применение у этого скрипта?


Ты стоишь и качаешь какой-нить лор. Тут какая-нить крыса решила тебя убить. Тока начала атаковать, а ты ему раз Flame Strike, два! Противник ошарашен, в страхе убегает.

Ну или можно так:
Изменяить фразу с "is attacking you" на любую фразу при касте и ты будешь сбивать всем этот каст. Даже себе :D
Author:  SAMURAI [ 2005-08-11 21:31:53 ]
Post subject: 
Leo wrote:
Ты стоишь и качаешь какой-нить лор. Тут какая-нить крыса решила тебя убить. Тока начала атаковать, а ты ему раз Flame Strike, два! Противник ошарашен, ...

Недолго думая он орёт GUARDS, твой чар плюхается замертво, через 5 минут твой труп лутают :roll: :lol: :lol:
Author:  Leo [ 2005-08-12 11:44:16 ]
Post subject: 
SAMURAI wrote:
Leo wrote:
Ты стоишь и качаешь какой-нить лор. Тут какая-нить крыса решила тебя убить. Тока начала атаковать, а ты ему раз Flame Strike, два! Противник ошарашен, ...

Недолго думая он орёт GUARDS, твой чар плюхается замертво, через 5 минут твой труп лутают :roll: :lol: :lol:


Ну тогда второе. :lol:
Author:  Lord [ 2005-08-12 15:49:50 ]
Post subject: 
Вообще-то этот скрипт меня попросил написать мой друг для пвп. У него с реакцией плохо. А так таргет сразу на враге и вперед кастить на падонка всё что хочешь. Всем спасибо за помощь.
Author:  Leo [ 2005-08-12 15:52:27 ]
Post subject: 
Да незачто!
Author:  admir [ 2005-08-13 04:19:15 ]
Post subject: 
СКОЛЬКО не тестил этот скрипт - не работает . тоест таргет не переводиться, он ваще работал , ктонить тестил?
еще хотел разобраться как работает команда
,target
расскажите .
Author:  Thasd [ 2005-08-18 15:24:47 ]
Post subject: 
Mne toza nerabotaet.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/