Детект Пк
Posted: 2010-07-14 00:22:05
Скрипт должен постоянно проверять журнал и искать пк но почему то детектит только первые несколько минут потом ни на что не реагирует хоть кагал Пк пробегает.Извелся уже танцуя с бубном в поисках косяка.
Code: Select all
sub Pkchec()
on()
filterspeechcler()
UO.DeleteJournal()
While UO.asmGetFlag('twi')=='UNCHECKED'
UO.asmClickFlag('twi')
Wend
uo.resend ()
var pip
var ser
var noto
var me=uo.getserial('self')
repeat
for pip=0 to 9
ser=uo.journalserial(pip)
noto=uo.getnotoriety(ser)
if not ser==me then
if noto<>0 and noto<>1 and noto<>3 and not uo.injournal("Harpy|Gargoyle|Imp|Fire Efreet|Hellcat|Molech|Stone Gargoyle|Fire Elemental|Elder Gazer|Lava Serpent|Hell Hound")OR uo.injournal("Man|Woman") then
uo.TextOpen()
uo.TextPrint(uo.getname(ser)+' '+(UO.asmGetTime("'Время 'h:n")))
uo.msg('\w Derik valim')
uo.print('!!Вижу пк!! ')
UO.DeleteJournal()
else
wait(1)
endif
endif
next
wait(1)
until not uo.dead()
end sub
sub on()
uo.Set('quiet', 0)
Endsub
sub filterspeechcler()
uo.filterspeech('clear')
endsub