puller macro

[bobbccatt]

i pieced together a pulling macro, its working so so, cant seem to get looting done. tried to use nijaloot.inc but i must have done somthing wrong so i removed it. big lerning curve coding this stuff. if any of you coders can help look through it and remove stuff not needed and improve it i'd jump for joy and send you red cent.
i have 1aa and 2 spells setup in the macro for my druid. i would like it to loot only the drop items with the option to opt out of some items like swords using som kind of loot table that it collect each time it loots somthing new.

its not rdy to run afk yet it sill has some bugs with the aquiretarget. have no idea how that part works.

thanks for any help.

 

[Siddin]

for looting try something like this (I don't know if mq2moveutils still works or not or if you use it. This macro code does)
Edited a couple lines for Sub Loot2 Everything else is from http://macroquest2.com/wiki/index.php/Loot_Any_Corpse

|Assuming target of corpse has already been acquired
Sub Loot
:gotocorpse
  /moveto ${Target.Y} ${Target.X}
  /delay 3s ${Target.Distance}<=7
  /if (${Target.Distance}>=8) {
    /goto :gotocorpse 
    } else {
              /call Loot2
             }
 /return

 Sub Loot 
    /declare t int outer 0 
    /declare loottotal int outer 
    /declare lootslot int outer 
    /declare lootleft int outer 0 
    /if (!${Defined[Param0]}) { 
    } else { 
       /varset lootleft ${Param0} 
    } 
    /if (${Target.Type.NotEqual[corpse]}) /return
    /loot
 | ----------------- 
 | -- Count items -- 
 | ----------------- 
    /delay 3s 
    :LootLag 
    /if (${loottotal}!=${Corpse.Items}) { 
       /varset loottotal ${Corpse.Items} 
       /delay 2s 
       /goto :LootLag 
    } 
    /if (${loottotal}<=${lootleft}) { 
       /notify LootWnd DoneButton leftmouseup 
       /return 
    } 
    /varset loottotal ${Math.Calc[${Corpse.Items}-${lootleft}]} 
 | --------------------- 
 | -- Loot the corpse -- 
 | --------------------- 
    /for lootslot 1 to ${loottotal} 
    :LootItem 
    /itemnotify loot${lootslot} rightmouseup 
    /delay 5 !${Corpse.Item[${lootslot}].ID} 
    /if (!${Corpse.Item[${lootslot}].ID}) { 
       /next lootslot 
    } else {
      /goto :LootItem 
    }
 | ----------------- 
 | -- Doublecheck -- 
 | ----------------- 
    /if (${Math.Calc[${Corpse.Items}-${lootleft}]}>0) /goto :LootLag 
    /notify LootWnd DoneButton leftmouseup 
 /return