Yoko

Posted: **2010-04-08 09:34:15**

sub Alarm()
while 1==1
wait(1000)
if uo.Dead() or uo.injournal('GM') or uo.injournal('here?') or uo.injournal('Seer') then
uo.deletejournal()
gong(300)
endif
wend
end sub

sub Gong(times)
VAR i
for i=1 to times
UO.playwav('D:\faust.wav')
wait(500)
next
end sub
-----------------
запускаю параллельно со скриптом на ламбер, почему то не работает
подскажите как подправить, чтобы его можно было запустить, и как добавить условие чтобы он при любом объекте которые увидит запускал wav файл

Posted: **2010-04-08 09:59:41**

Чувствую что нужно переделать скрипт на ламбер. Скрипт на ламбер удаляет журнал до того, как в нём заметил нужное сообщение этот скрипт.

Или второй вариант, попроще, - поставь паузу в этом скрипте не 1000 а 100.

Code: Select all

sub Alarm()
while 1==1
wait(1000)

Posted: **2010-04-08 11:13:17**

Спасибо, а вот как добавить условие, чтобы при любом "You see" он алярмил,

Posted: **2010-04-08 12:06:50**

if .... or uo.injournal('You see') then

Posted: **2010-04-08 13:59:46**

Beyonder wrote:if .... or uo.injournal('You see') then

не работает так ((

Posted: **2010-04-13 18:02:57**

Вписываеш свои типы если надо!

Code: Select all

sub poisk()
var i
uo.ignore('0x017DDBC6') ;Айди себя или поставь ('self')
DIM H[2]
H[1]='0x0190' ;тип мужчины
H[2]='0x0191' ;тип женщины
UO.set('finddistance','20') ;Радиус на скоко искать!
while 1>0
for i=1 to 2
  UO.FindType(H[i],-1,'ground')
  If UO.FindCount() > 0 Then
Gong(1);проигрывает сигнал
  Wait( 300 )
else
     Wait( 300 )
     end if
next
wend
end sub

Sub Gong(times)
   VAR i
   for i=1 to times
      UO.Exec("playwav E:\WINDOWS\Media\WindowsXP"); тут ВНИМАТЕЛЬНО укажи путь к файлу БЕЗ расширения
      wait(1200)
   next
end sub

Yoko

Помогите со скриптом

Помогите со скриптом

Re: Помогите со скриптом

Re: Помогите со скриптом

Re: Помогите со скриптом

Re: Помогите со скриптом

Re: Помогите со скриптом