Нет больше сил искать...

Anything and all.

Moderators: Murderator+, Murderator

Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Только вот кол-во элементов массива 4 зделай, а не 5
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

smi wrote:Слушайте а как вставлять такое поле в форум Code: ????

Code: Select all

[code]Может быть вот так? -)[/code]
smi
Posts: 8
Joined: 2006-11-08 21:59:59

Post by smi »

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

Code: Select all

 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

Гуру инжекта, подскажите мне плс теперь как в этот скрипт добавить чтоб он ресал еще по другому слову,и чтобы отвечал на эти слова тем кого в списке нет;))
Mihail
Expert!
Posts: 548
Joined: 2005-05-20 20:30:10
Contact:

Post by Mihail »

Code: Select all

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 чара
:)
Post Reply