Macro for catching thiefs EasyUO only!! Freeshard tested : UO Submissions

;==================================
; Script Name: Thief catcher
; Author: Serus
; Version: 1.2
; Client Tested with: 4.0.1b
; EUO version tested with: 1.41
; Shard OSI / FS: Only tested on free shards Archeronne and
; UO Gamers - The RunUO Shard, OSI shard non tested
; Revision Date: N/A
; Public Release: 3-25-04
; Purpose: Watches journal to see if a thief is noticed stealing.
; If so then it calls guards automatically, runs to body,
; and picks up items if it can.
;==================================



;=====================Setup==========================

set %lootType ENK
set #lpc 10
set %linesToScan 5 ;How many lines it checks before starting again.
set %stealMessage steal ;put your steal message here
set %noLootMessage criminal_act ;If you dont have permission to loot ,what does your server say?

;===================End Setup========================



initevents

begin:

for %i 1 %linesToScan
{
scanjournal %i
if %stealMessage in #journal
{
msg #smc , #spc , guards!$
for %lbc 1 5
{
finditem YFM G_10
if #findkind = 1
{
if #FINDDIST >= 3
{
move #FINDX #FINDY 1 2s
wait 1s
}
set #LOBJECTID #findID
event macro 17
wait 5
SCANJOURNAL 1
if noLootMessage in #journal
{
ignoreitem #findid
goto noLoot
}
checkForMoreThief:
finditem %lootType C_ , #contID
if #findkind = 0
{
event drag #findID
wait 1s
key enter
click 1119 231 p
wait 30
}
if #findkind = -1
ignoreitem #contID
noLoot:
}
}
}
goto begin


Like I said in the script this has only been tested in a few free shards and has worked for all of them. This is for RunUO only.