Poznámka č. 2: uo.Injournal je case sensitive, čili "Papezi a" a "papezi" nebere za totéž.
Kód: Vybrat vše
#---------------------------------------------------------------
sub afkalarm()
#---------------------------------------------------------------
UO.Print('Automaticke hlidani spusteno.')
#UO.IgnoreReset()
var i
UO.DeleteJournal()
while NOT UO.DEAD()
if UO.InJournal('Laro|laro|lara|papez|Papezi|None|Dobry vecer|cau|Cau|hoj|afk|AFK|Afk|kontrola|Kontrola|KONTROLA|MAKER|attacking you|deathly sick|First|Second|None|Redd|Third|Worldsave|Sea Serpent|Kraken') then
UO.Print('Ze by prislo GM?')
UO.PlayWav('C:\Windows\Media\ringin.wav')
Wait(1000)
for i=0 to 2
UO.PlayWav('C:\Windows\Media\notify.wav')
wait(1000)
next
UO.DeleteJournal()
i=0
endif
Wait(1000)
if UO.InJournal('Worldsave has been initiated|Resync') then
UO.PlayWav('C:\Windows\Media\notify.wav')
UO.Exec('terminate all')
return
endif
UO.FindType('0x0DDA',-1,'ground')
if UO.FindCount() AND UO.getDistance('finditem')< 12 AND 0 then
UO.PlayWav('C:\Windows\Media\ringin.wav')
Wait(1000)
for i=0 to 2
UO.PlayWav('C:\Windows\Media\notify.wav')
wait(1000)
next
wait(3000)
endif
UO.FindType('0x0F6C',-1,'ground')
if UO.FindCount() AND UO.getDistance('finditem')< 12 AND 0 then
UO.PlayWav('C:\Windows\Media\ringin.wav')
Wait(1000)
for i=0 to 2
UO.PlayWav('C:\Windows\Media\notify.wav')
wait(1000)
next
wait(3000)
endif
wait(500)
wend
end sub