Таргет на атакующего

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Lord
Posts: 56
Joined: 2005-01-14 20:05:16
Contact:

Таргет на атакующего

Post by Lord »

У меня снова возникла проблема. Мне срочно нужен скрипт, чтобы как только меня атакуюет чар, то его сразу же метило, и первый же каст любой магии шол на него. Возможно ли такое, и если возможно, то как это сделать?
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Re: Таргет на атакующего

Post by Sfagnum »

Lord wrote:У меня снова возникла проблема. Мне срочно нужен скрипт, чтобы как только меня атакуюет чар, то его сразу же метило, и первый же каст любой магии шол на него. Возможно ли такое, и если возможно, то как это сделать?
в журнале ловишь сообщение об атаке и кидаешь ответку на него... как найти айдишник смотри в соседней ветке.
Lord
Posts: 56
Joined: 2005-01-14 20:05:16
Contact:

Post by Lord »

Спасибо конечно, но именно как кинуть ответку на него, я не знаю, при айдишник, ты про какую ветку говоришь?
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

про эту
Lord
Posts: 56
Joined: 2005-01-14 20:05:16
Contact:

Post by Lord »

Code: Select all

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) скрипт должен выглядеть примерно так, но вот, как сделать ответку я не понял. Помогите пожалуйста
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Lord wrote:

Code: Select all

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
Lord
Posts: 56
Joined: 2005-01-14 20:05:16
Contact:

Post by Lord »

Sfagnum большое тебе спасибо за помошь.
mike
Posts: 82
Joined: 2004-04-06 19:53:41

Post by mike »

Sfagnum wrote:
Lord wrote:

Code: Select all

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

хм. пишет инвалид сериал индекс... :?
Dron D.
Posts: 190
Joined: 2004-12-13 01:27:00

Post by Dron D. »

Мде очень весело будет посмареть на етот скрипт... какой нить нуп в гзз оденет свою едсинввенную рарку и выху... и будет понтоватся тут кто то его проатачит и тут понеслось... :D
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

mike wrote:хм. пишет инвалид сериал индекс... :?


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

Code: Select all

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
mike
Posts: 82
Joined: 2004-04-06 19:53:41

Post by mike »

Leo wrote:
mike wrote:хм. пишет инвалид сериал индекс... :?


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

Code: Select all

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 каст, а потом чтобы скрипт вырубался тогда как?
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Тогда вот так:

Code: Select all

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
Entertainer
Posts: 20
Joined: 2005-02-08 23:06:49

Post by Entertainer »

можно вопрос: какое практическое применение у этого скрипта?
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Entertainer wrote:можно вопрос: какое практическое применение у этого скрипта?


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

Ну или можно так:
Изменяить фразу с "is attacking you" на любую фразу при касте и ты будешь сбивать всем этот каст. Даже себе :D
SAMURAI
Posts: 203
Joined: 2004-07-10 00:38:43
Location: From DrW
Contact:

Post by SAMURAI »

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

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

Code: Select all

sub UO() 
UO.Chto-To("S Chem-To")
end sub

© I'm
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

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

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


Ну тогда второе. :lol:
Lord
Posts: 56
Joined: 2005-01-14 20:05:16
Contact:

Post by Lord »

Вообще-то этот скрипт меня попросил написать мой друг для пвп. У него с реакцией плохо. А так таргет сразу на враге и вперед кастить на падонка всё что хочешь. Всем спасибо за помощь.
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Да незачто!
admir
Posts: 528
Joined: 2005-01-13 07:20:54

Post by admir »

СКОЛЬКО не тестил этот скрипт - не работает . тоест таргет не переводиться, он ваще работал , ктонить тестил?
еще хотел разобраться как работает команда
,target
расскажите .
Thasd
Posts: 5
Joined: 2005-08-15 16:13:32

Post by Thasd »

Mne toza nerabotaet.
Post Reply