AE farming quick loot macro

[Valen2257]

Looking for something quick & easy to target all corpses within a small radius, and loot/autoinventory all the loot.. I do some AE farming of low greenies & it sucks that I have to keep waiting for the corpse to rot before I can click next one to loot.

Thanks in advance.

 

[Taron]

Untested. Should work for the most part I believe.

Edit: Getting sloppy. I just assumed it would work fine as a copy with extra parts edited out.
Fixed LootCheck
Fixed Done Button

|-- LootSub shamelessly stolen from HunterNoWarp.mac
|---------------------------------------------------

Sub Main

:UsualLoopNameHere
/if (${SpawnCount[corpse radius 13]}>0) {
   /call LootSub
} else {
   /if (${SpawnCount[corpse radius 25]}>0) {
   /tar corpse
   /face fast
   /keypress up
:YetAnotherLoop
   /if (${Target.Distance}>13) /goto :YetAnotherLoop
   /keypress up
   /call LootSub
   }
}
/goto :UsualLoopNameHere
/return

Sub LootSub
   /declare LootSlot    int inner  0 
   /declare LootTotal   int inner  0 
  /tar corpse
  /loot 
  /delay 2s 
  /if (!${Corpse.Items}) { 
    /notify LootWnd LW_DoneButton leftmouseup 
    /delay 2
    /return 
  } 
   /varset LootTotal ${Corpse.Items} 
   /for LootSlot 1 to ${LootTotal} 
      /itemnotify loot${LootSlot} leftmouseup 
      /delay 1s 
      /autoinventory 
      /delay 1s 
   /next LootSlot    
   /notify LootWnd LW_DoneButton leftmouseup 
   /delay 2
/return

 

[Valen2257]

works good!

I managed to add
/if (${SpawnCount[corpse radius 25]}<1) /endmacro
at the start of the first loop to end macro if it didn't see any corpses nearby. Other than that just what I was looking for!

Thanks again Taron!