Таргет на атакующего
Moderators: Murderator+, Murderator
Таргет на атакующего
У меня снова возникла проблема. Мне срочно нужен скрипт, чтобы как только меня атакуюет чар, то его сразу же метило, и первый же каст любой магии шол на него. Возможно ли такое, и если возможно, то как это сделать?
Re: Таргет на атакующего
в журнале ловишь сообщение об атаке и кидаешь ответку на него... как найти айдишник смотри в соседней ветке.Lord wrote:У меня снова возникла проблема. Мне срочно нужен скрипт, чтобы как только меня атакуюет чар, то его сразу же метило, и первый же каст любой магии шол на него. Возможно ли такое, и если возможно, то как это сделать?
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) скрипт должен выглядеть примерно так, но вот, как сделать ответку я не понял. Помогите пожалуйста
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
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
хм. пишет инвалид сериал индекс...

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
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 каст, а потом чтобы скрипт вырубался тогда как?
Тогда вот так:
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
-
- Posts: 20
- Joined: 2005-02-08 23:06:49
Entertainer wrote:можно вопрос: какое практическое применение у этого скрипта?
Ты стоишь и качаешь какой-нить лор. Тут какая-нить крыса решила тебя убить. Тока начала атаковать, а ты ему раз Flame Strike, два! Противник ошарашен, в страхе убегает.
Ну или можно так:
Изменяить фразу с "is attacking you" на любую фразу при касте и ты будешь сбивать всем этот каст. Даже себе

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



Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...
© I'm
Кто ИЩЕТ, тот всегда найдёт...
Code: Select all
sub UO()
UO.Chto-To("S Chem-To")
end sub
© I'm