Need help with a simple attack loot macro

Macro requests from before the user variable changes that broke all macros

Moderator: MacroQuest Developers

ilcoopil
orc pawn
orc pawn
Posts: 13
Joined: Mon Aug 04, 2003 11:18 pm

Need help with a simple attack loot macro

Post by ilcoopil » Mon Aug 04, 2003 11:24 pm

I just need a very simple macro. I need a macro that targets skeletons OR zombies. Then I need it to kill them loot up to 4 items and the items only have to be bone chips or zombie skins. then keep killing. Any help would be very appreciated. As you can tell I am new to this and I can't seem to get hunter.mac to do what I need it to do. Thanks again

User avatar
grimjack
Macro Author
Macro Author
Posts: 525
Joined: Thu Nov 07, 2002 6:51 am
Contact:

hunter

Post by grimjack » Tue Aug 05, 2003 1:47 am

The loot code on my hunter script was old. I have updated it. See if that will work now.

Thanks
GrimJack
When they come to me, they're in trouble, or they want some. I bust people out of prison, hunt down vampires, fight alien gods -- All the fun jobs people are too squeamish or too polite to do themselves.

Call me a mercenary. Call me an assassin. Call me a villain. I am all that and more.

My name's John Gaunt, but out on the streets of Cynosure, I am called...
GrimJack

ilcoopil
orc pawn
orc pawn
Posts: 13
Joined: Mon Aug 04, 2003 11:18 pm

Post by ilcoopil » Tue Aug 05, 2003 3:28 pm

Alright this is what I have come up with so far.
I do need to speed up the loot process also after killing a skeleton or zombie autoattack seems to stay on. I need it to kill the skeleton and/or zombie then loot the first two boxes then loop to kill another.
Thanks for your help.

Code: Select all

#define FirstItem v40
#define Times v41
#define StartingPlat v42
#define CurrentPlat v43
#define PlatMade v44
#event Zombiecorpse "There are no 'a zombie's corpse' around here." /target corpse radius 25 "corpse" 
Sub Main 
  /zapvars 
  /press esc 
  /press esc 
  /press esc 
  
  /alert clear 1 
  /alert add 1 "GM" 
  /alert clear 2 
  /alert add 1 "mob name"
  /varset Times 1
  /varcalc StartingPlat $char(plat)+$char(gold)/10+$char(silver)/100+$char(copper)/1000

 :loop 
  /if $alert(1)==True { 
  /afk 
 } 

 /if $alert(2)==True { 
  /zapvars 
  /goto :kill 
 } 

 :kill
 /varcalc CurrentPlat $char(plat)+$char(gold)/10+$char(silver)/100+$char(copper)/1000
 /varcalc PlatMade $CurrentPlat-$StartingPlat
 /echo Platinum made is: $PlatMade
 /delay 3s
 /face fast nopredict 
 /attack on
 
 /if n $target(id)==0 /call LootMob
 
 /goto :loop

 /return

sub LootMob
   /echo Looting...
   /attack off
   /target corpse radius 25 "a zombie's corpse"
   /if target=="a skeleton's corpse" then /loot
   /delay 1s
   /loot
   /loot
   
   /delay 1s 
   /varset FirstItem 0

   /click left corpse 0
   /delay 1s
   /if $cursor()==TRUE {
    /varset FirstItem 1
    /delay 1s
    /click left auto
   }

   /delay 1s

   /if n $FirstItem!=0 {
    /click left corpse 1
    /delay 1s 
    /if $cursor()==TRUE {
     /delay 1s
     /click left auto
    }
   }
   /cleanup
   /press esc

/return