Acidon
New member
- Joined
- Sep 8, 2005
- RedCents
- 0¢
Hey guys. For the longest time I didn't loot in the halls because I didn't want to slow my bard down. It's more than worth it to have some alt in there looting at least. I make anywhere from 3k to 6k a day when my bard is going at it all day. This really adds up. 20 to 40k a week isn't too bad for afk plat.
I didn't think it would be worth it because I have 100 to 200k in the bank usually from my trader, but plat is plat. My bard is currently 55 and the plat off each mob runs from 10 to 22 plat atm. Not too shabby for some squeaking rats.
There are a few loot macros around but I thought I would share mine as well since options are options. Inspiration and borrowed code is listed in there with links. some of the code is mine, or at least altered by me, but most is from other people in the community.
This also includes DoT code for my Druid, but that can be taken out of course. If you're going to use the DoT code, make sure to change all instances of "CharName" to the name of your Bard (or your puller if different).
The DoT code doesn't effect the Looting in any way. When my druid is done looting, he immediately assists and begins to DoT away.
Anyway, hope someone is inspired to loot now, or maybe this code will help someone.
|
I didn't think it would be worth it because I have 100 to 200k in the bank usually from my trader, but plat is plat. My bard is currently 55 and the plat off each mob runs from 10 to 22 plat atm. Not too shabby for some squeaking rats.
There are a few loot macros around but I thought I would share mine as well since options are options. Inspiration and borrowed code is listed in there with links. some of the code is mine, or at least altered by me, but most is from other people in the community.
This also includes DoT code for my Druid, but that can be taken out of course. If you're going to use the DoT code, make sure to change all instances of "CharName" to the name of your Bard (or your puller if different).
The DoT code doesn't effect the Looting in any way. When my druid is done looting, he immediately assists and begins to DoT away.
Anyway, hope someone is inspired to loot now, or maybe this code will help someone.

|
Rich (BB code):
| AcidLoot.mac
| --=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--
| Function : As NPC corpses are detected, this moves
| you to the corpse and fully loots it.
| Version : 1.2.4
| Date : October 13, 2005
| Author : Acidon Purplehaze
|
|
| Code Borrowed from, based upon, or inspired from:
|
| LOOT CODE:
| (MQ2 Forums) -toomanynames : http://www.macroquest2.com/phpBB2/viewtopic.php?t=11598
| http://www.macroquest2.com/phpBB2/viewtopic.php?t=11598&postdays=0&postorder=asc&start=15
| (RG Forums) -siddin : http://www.redguides.com/community/showthread.php?t=374
| -hamburgerhelper : http://www.redguides.com/community/showthread.php?t=992
|
| DoT CODE:
| (RG Forums) -armysoldier : http://www.redguides.com/community/showthread.php?t=6374
#Event MobPulled "CharName tells the group, 'INCOMING'"
#Event MobDied "#*# has been slain by#*#"
#Event MobDied "#*#You have slain#*#"
#event booted "You have entered Nedaria's Landing."
#turbo 10
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
| Main
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
Sub Main
|loot all items? (0 no, 1 yes)
/declare t int outer 0
/declare loottotal int outer
/declare lootslot int outer
/declare lootleft int outer 0
/echo AcidLoot.mac v1.2.4 ~ Started
:loop
/call GMcheck
/doevents
/delay 5s
/goto :loop
/return
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
| Mob Pulled - Time to DoT
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
Sub Event_MobPulled
/assist CharName
/doevents
/echo Mob pulled. Time to DoT
/delay 1
/assist CharName
/delay 1
:FirstDoT
/delay 3s
/delay 2
/if (${Target.PctHPs} < 95) {
/cast "Drifting Death"
} else {
/goto :FirstDoT
}
:SecondDoT
/delay 3s
/delay 2
/if (${Target.PctHPs} < 91) {
/cast "Drones of Doom"
} else {
/goto :SecondDoT
}
| :SecondDoT_Two
| /delay 3s
| /delay 2
| /if (${Target.PctHPs} < 87) {
| /cast "Creeping Crud"
| } else {
| /goto :SecondDoT_Two
| }
:ThirdDoT
/delay 3s
/delay 2
/if (${Target.PctHPs} < 65) {
/cast "Drifting Death"
} else {
/goto :ThirdDoT
}
:FourthDoT
/delay 3s
/delay 2
/if (${Target.PctHPs} < 61) {
/cast "Drones of Doom"
} else {
/goto :FourthDoT
}
| :FourthDoT_Two
| /delay 3s
| /delay 2
| /if (${Target.PctHPs} < 57) {
| /cast "Creeping Crud"
| } else {
| /goto :FourthDoT_Two
| }
:FifthDoT
/delay 3s
/delay 2
/if (${Target.PctHPs} < 35) {
/cast "Drifting Death"
} else {
/goto :FifthDoT
}
:SixthDoT
/delay 3s
/delay 2
/if (${Target.PctHPs} < 31) {
/cast "Drones of Doom"
} else {
/goto :SixthDoT
}
| :SixthDoT_Two
| /delay 3s
| /delay 2
| /if (${Target.PctHPs} < 27) {
| /cast "Creeping Crud"
| } else {
| /goto :SixthDoT_Two
| }
/return
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
| Mob Dead - Time to Loot
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
Sub Event_MobDied
/delay 3s
/echo Time to Loot.
/if (${Me.Sitting}) {
/sit off
}
/delay 2
/target npc corpse radius 200
:MovementLoop
/face fast nolook
/if (${Int[${Target.Distance}]}>13) {
/keypress forward hold
}
/if (${Int[${Target.Distance}]}<13&&${Int[${Target.Distance}]}>11) {
/keypress forward
}
/if (${Int[${Target.Distance}]}<9) {
/keypress back
}
/if (${Int[${Target.Distance}]}>13) {
/goto :MovementLoop
}
/keypress forward
/keypress back
/delay 5
/if (!${Defined[Param0]}) {
} else {
/varset lootleft ${Param0}
}
/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
/delay 2s
/echo Done looting cash. No items to loot.
/delay 5
/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
/delay 5s
/echo Done looting cash and items.
/delay 5
/return
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
| GM CHECK
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
Sub GMCheck
/if (${Spawn[gm].ID}) {
/echo Gm detected
/beep
/beep
/beep
/endmac
/unload
/q
}
/return
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
| Booted (Expedition)
|]==-==-==-==-==-==-==-==-==-==-==-==-==-==-==[|
Sub event_booted
/keypress forward
/keypress forward
/delay 1s
/keypress forward
/twist off
/circle off
/call gmcheck
/delay 3s
/sit on
/camp desk
/endmacro
/return


