Enable Event Sysmessage
set #sysmsgcol 1371
event SysMessage ###Script Crafted by ILGARS###
event SysMessage ###Script Crafted by ILGARS###



move 5543 359 0
gosub attackbest





move 5532 363 0
gosub attackbest







move 5517 354 0
move 5516 346 0
gosub attackbest






move 5490 355 0
gosub attackbest







move 5492 328 0
gosub attackbest






move 5492 306 0
gosub attackbest










move 5492 328 0
gosub attackbest




move 5490 355 0
gosub attackbest




move 5502 359 0
gosub attackbest
move 5516 346 0
gosub attackbest


move 5532 363 0
gosub attackbest




move 5543 359 0
gosub attackbest

move 5535 355 0
gosub attackbest

move 5574 358 0
gosub attackbest
move 5570 363 0
gosub attackbest





move 5575 351 0
gosub attackbest
move 5604 372 0
gosub attackbest




move 5615 353 0
gosub attackbest



move 5603 352 0
gosub attackbest



move 5611 337 0
gosub attackbest

move 5595 338 0
gosub attackbest
move 5588 343 0
gosub attackbest

move 5588 331 0
gosub attackbest

move 5587 318 0
gosub attackbest

move 5578 311 0
gosub attckbest











MOVE 5602 343 0
gosub attackbest
move 5615 353 0
gosub attackbest







move 5604 372 0
gosub attackbest





move 5584 357 0
gosub attackbest
move 5570 363 0
gosub attackbest



































initevents
set %maxtries 15


sub attackbest
set %enemylevel6 3
set %mindist 18
set %bestenemylevel 0
set %bestenemy N/A
set %tries 0
set %firsttarget N/A
loopattackbest:
event macro 26
set %tries %tries + 1
finditem #ltargetid G_7
if #findkind = -1
{
event sysmessage
goto loopattackbest

}
if #findid = %firsttarget || %tries > %maxtries
goto endloopattackbest
if %firsttarget = N/A
set %firsttarget #ltargetid
if %enemylevel . #findrep > 0
{
if %bestenemy <> N/A
{
if %enemylevel . #findrep >= %bestenemylevel && #finddist < %mindist
{
set %bestenemy #findid
set %mindist #finddist
set %bestenemylevel %enemylevel . #findrep
}
}
if %bestenemy = N/A
{
set %bestenemy #findid
set %mindist #finddist
set %bestenemylevel %enemylevel . #findrep
}
}
goto loopattackbest
endloopattackbest:
if %bestenemy = N/A
{
if ! %alwayson
event sysmessage enemy not found
wait 10
return
}
if %bestenemy <> N/A
{
set #ltargetid %bestenemy
event macro 27
gosub follow
gosub follow
gosub loot
}
wait 10
gosub attackbest


sub follow
event SysMessage ###Script Crafted by ILGARS###
repeat
{
onhotkey %hotkeyOFF
{
set %on #false
event pathfind
return
}
finditem #enemyid
event pathfind
onhotkey %hotkeyOFF
{
set %on #false

event pathfind
return
}
}
 until #findcnt = 0
set %on #false

wait 1s
return




sub loot
set %loot AUD_XVH_OZF_POF
set %oB #scnt + 5
set %lootOverTime #scnt + 15
finditem YFM G_3
if #findcnt >= 1
{
set %body #findid
set #lobjectid %body
event macro 17 0
event exmsg %body 3 0 opening
if You_can't in #sysmsg
{
ignoreitem %body 1
wait 10
return
}
while #contkind <> ASEB && #contsize <> 144_212 && %ob > #scnt
wait 1
wait 10
if %ob <= #scnt
{
ignoreitem %body 1
event sysmessage Body not opened
wait 10
return
}
repeat
{
finditem %loot C_ , %body
if #findcnt >= 1
{
exevent drag #findid #findstack
exevent dropc #backpackid
wait 35
}
finditem %loot C_ , %body
}
until #findcnt = 0 || %lootOverTime < #scnt
ignoreitem %body 1
event exmsg %body 3 0 looted
}
else
event sysmessage No body found.
return
wait 10
}