Yoko

Только вот кол-во элементов массива 4 зделай, а не 5

[code]Может быть вот так? -)[/code]

Вот что у меня вышло и работает отлчно;)

 sub main() 
   var jrnl, i, p_len = 5 ; êîëè÷åñòâî èãðîêîâ, â ñïèñêå 
   var phrase = "Îáêàñòóé ìåíÿ äåòêà!" ; ôðàçà, íà êîòîðóþ ðåàãèðóåì. 
   DIM players[6] 
   ; Ñïèñîê ID èãðîêîâ, íà êîòîðûõ âåøàåì îáêàñò. 
   players[0] = '0x012E40A6'; Smiter
   players[1] = '0x00B380AC'; Malvin
   players[2] = '0x0051D929'; Eagle
   players[3] = '0x016F1491'; Pixel
   players[4] = '0x0050E47B'; Baron fon tarkin

repeat 
      jrnl = uo.inJournal(phrase); 
      if jrnl then 
         for i=0 to p_len-1 
            if uo.journalserial(jrnl-1) == players[i] then 
            obkast.do(uo.journalserial(jrnl-1)) 
endif 
         next 
         uo.setjournalline(jrnl-1, '') 
      endif 
      wait(200)
   until false
   uo.DeleteJournal()
end sub 

Sub obkast.do(serial) 
   uo.cast('Protection', serial)
   Wait(2000)
   uo.cast('Bless', serial)
   wait(50)
   uo.DeleteJournal()
end sub

Гуру инжекта, подскажите мне плс теперь как в этот скрипт добавить чтоб он ресал еще по другому слову,и чтобы отвечал на эти слова тем кого в списке нет;))

sub obkast() 
############### 
var keyword = 'обкаст' ; слово на которое реагировать 
var refreshtime = 0.5  ; время проверки сообщений в журнале в сек 
############## 
var i, t=0 
Dim a[5] 
# серийники 
a[0]='0x0000000' 
a[1]='0x0000000' 
a[2]='0x0000000' 
a[3]='0x0000000' 
a[4]='0x0000000' 
repeat 
if uo.injournal(keyword) then 
for i=0 to 4 
if uo.journalserial(uo.injournal(keyword))==a[i] then
repeat
uo.findtype('0x0000',-1,'ground') #тип трупа
if uo.findcount() and uo.getserial('finaitem')==a[i] then
uo.cast('Resurrection','finditem')  #спелл
uo.deletejournal()
end if
until uo.findcount()==0
else
t=t+1
end if 
next
if t==5 then
uo.msg('Пшел нах')
uo.deletejournal() 
end if 
wait(refreshtime*1000) 
until uo.dead()
end sub

будет работать только в том случае если ID трупа совпадает с ID чара