Quick and dirty AE ninjalootng

[zazoot]

this uses warp, assumes /warp target will send you to your target;o

also the mac ends when you hit a nodrop item (useful if your clearing mass trash for.. a nodrop item) it ill put you int he loot window with the yes/no optoin up and /endm on you

sorry about the sloppyness of the code, i used various snippets and frankensteined this together, its an older mac of mine

Sub main
    /declare LootTotal int local -1 
    /declare LootSlot int local 
:nloop
    /delay 5
    /target npc corpse
    /warp target
    /if (${Target.Type.NotEqual[CORPSE]} || !${Target.ID}) { 
    /target npc corpse
    }    
    /face ${If[${Me.Underwater},,nolook]} fast 
    /keypress forward hold 
    /delay 5s ${Target.Distance}<5 
    /keypress forward 
    /loot 
    /delay 1s 
    /if (${Me.State.NotEqual[BIND]}) { 
      /echo ** Massive lag or error getting to corpse.  Aborting! 
    } 
    /echo ** Looting ${Target.CleanName}  
    :LootLag 
    /if (${LootTotal}!=${Corpse.Items}) { 
      /varset LootTotal ${Corpse.Items} 
      /delay 5 
      /goto :LootLag 
    /target npc corpse
    } 
    /if (!${LootTotal}) { 
      /echo ** Empty corpse! 
      /goto :DoneLooting 
    } 
    /for LootSlot 1 to ${LootTotal} 
      /if (${Corpse.Item[${LootSlot}].ID}) { 
        /if (${Corpse.Item[${LootSlot}].NoDrop} && ${ninjamode.Equal[ALL]}) { 
          /echo ** Looting NODROP Item: ${Corpse.Item[${LootSlot}].Name} 
          /goto :LootItem 
    /target npc corpse
        } 
      } 
      /autoinv
      /itemnotify loot${LootSlot} leftmouseup 
      /delay 3 
      /autoinv
      :LootItem 
      /autoinv
      /itemnotify loot${LootSlot} leftmouseup 
      /delay 3 
      /autoinv
    /target npc corpse
    /target npc corpse
      /if (${Corpse.Item[${LootSlot}].ID}) { 
        /delay 2 
        /goto :LootItem 
    /target npc corpse
      } 
      :SkipIt 
    /next LootSlot 
    /echo ** Done looting ${Target.CleanName} 
    :DoneLooting 
    /delay 5 
    /notify LootWnd DoneButton leftmouseup 
    /delay 5 
/goto :nloop
/return