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



move 5539 355 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
move 5516 346 0
gosub attackbest

move 5532 363 0
gosub attackbest

move 5543 359 0
gosub attackbest

move 5577 351 0
move 5570 363 0
gosub attackbest

move 5575 351 0
move 5604 372 0
gosub attackbest

move 5615 353 0

gosub attackbest

move 5603 352 0
move 5611 337 0

gosub attackbest

move 5587 338 0
move 5587 318 0
move 5578 319 0
gosub attackbest

move 5589 305 0
gosub attackbest

move 5604 312 0
gosub attackbest

move 5622 330 0
gosub attackbest

move 5611 340 0
gosub attack best


move 5602 343 0 nevar pieklut
move 5615 353 0
gosub attackbest

move 5604 372 0
gosub attackbest

move 5577 351 0
move 5570 363 0
gosub attackbest

move 5564 354 0
move 5562 331 0
gosub attackbest

move 5544 332 0
move 5539 339 0
gosub attackbest

move 5539 332 0
move 5523 327 0
gosub attackbest

move 5514 333 0
move 5515 324 0   //// Dragon ANC
gosub attackbest

move 5519 331 0
move 5540 336 0
gosub attackbest

move 5540 309 0
move 5534 308 0
gosub attackbest




move 5580 311 0 netiek augha
gosub attackbest

move 5580 318 0
gosub attackbest

move 5580 317 0
move 5586 343 0
gosub attackbest

move 5609 341 0
gosub attackbest

move 5600 353 0
move 5620 355 0

gosub attackbest

move 5610 368 0
gosub attackbest

move 5580 351 0
move 5570 363 0
gosub attackbest

move 5565 355 0
move 5545 357 0

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
}