Yoko
http://forum.yoko.com.ua/

Огромная просьба помочь
http://forum.yoko.com.ua/viewtopic.php?f=16&t=15982
Page 1 of 1

Author:  SuperTester [ 2010-11-30 13:11:22 ]
Post subject:  Огромная просьба помочь

Есть стандартный скрипт на мининг для DRW от ветерана. Он работает, все ок. При выкапывании элемента - есть сигнал. А вот при появлении пк - почему-то нету. А я хотел бы попросить вас сделать так, чтобы звуковой сигнал был при появлении любого игрока - не важно пк или синий, серый.
Вот скрипт. Из него уже убраны реколы, так как мне не нужны.
Code:
sub maning() 
#BETEP™#
var mx, my, mz, i, j, jor, ser, noto

uo.print('!!Выбери Лопату!! ')
uo.exec('addobject Shovel')
while uo.targeting()
wait(100)
wend

na4alo:
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-4 to mx+4
for j = my -4 to my+4
while not UO.Hidden()
UO.Warmode("0")
uo.print("Прячемся...")
UO.UseSkill("Hiding")
wait(4000)
wend
UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore")
UO.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject("Shovel")
while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock")
wait (500)
if uo.injournal("heavy") or uo.dead() then
pwav()                   
Pause()
endif
for jor = 0 to 9   
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then
if uo.waiting() then
uo.canceltarget()
endif
pwavw()
wait(500) ; время в секундах при ожидании пока уйдет ПК
loot()
wait(3000)
goto reccal
endif
next   
wend
if uo.weight > 625 then  ; Максимальный вес при котором домой с рудой
goto end
endif
wend
UO.DeleteJournal()
next
next
goto na4alo
end:
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 21") ; домой ( в рунбуке слот 1 )
wait(10000)
loot()
wait(3000)
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 94") ; в шахту ( в рунбуке слот 8 )
mx = UO.GetX("self")
my = UO.GetY("self")
wait(10000)
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
goto reccal
endif
goto na4alo
end sub

sub pwav() ; звук при выкапывании ЭЛЕМЕНТАЛА
uo.playwav("C:\Program Files (x86)\Dragon World\Ultima Online\YokoInjection\UO-element.wav")
endsub

sub pwavw(); звук при появлении ПК
uo.playwav("C:\Program Files (x86)\Dragon World\Ultima Online\YokoInjection\UO-element.wav")
endsub

end sub



Подозреваю, что то, что нужно изменить в этих строках:

for jor = 0 to 9
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then
if uo.waiting() then
uo.canceltarget()
endif
pwavw()

Надеюсь на вашу помощь

Author:  kven [ 2010-12-16 01:06:40 ]
Post subject:  Re: Огромная просьба помочь

ну не совсем в том форуме написал. ты просто помощи хочешь или купить доделку скрипта даного. напиши мне в лс

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/