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

 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