LuaNinja Macro Collection

**nemiz** · 12-26-2009

ok maybe im stupid, but i rly want help with this and im rly new. i want this macro to do this in this exact priority
Bloodrage if under 80 rage every time it can
use Battleshout whenever its not up.
use Bloodsurge (the insta slam proc) whenever its up
use whirlwind whenever its usable
use bloodthirst whenever usable
if im over 60 rage cast cleave
if the target is under 20% and whirlwind and bloodthirst is on cooldown cast execute instead of cleave.

this is what i want the macro to do, but its not what it does. can u please help me edit the macro or even make a new one?

#showtooltip Whirlwind
/run local _,d,_ = GetSpellCooldown("Bloodrage") if (d == 0) then CastSpellByName("Bloodrage") end
/run if not UnitBuff("player", "Battle Shout") then CastSpellByName("Battle Shout") end
/startattack
/run if UnitBuff("player", "Slam!") then CastSpellByName("Slam") end
/run local _,a,_ = GetSpellCooldown("Whirlwind") if (a == 0) then CastSpellByName("Whirlwind") end
/run local _,d,_ = GetSpellCooldown("Bloodthirst") if (d == 0) then CastSpellByName("Bloodthirst") end
/run if UnitPower("Player") > 60 then CastSpellByName("Cleave") end
/run local _,d,_ = GetSpellCooldown("Execute") if (d == 0) then CastSpellByName("Execute") end

and with this macro, when i have Blessing of Might it just spams battle shout cuz its supposed to hold it up, but since they dont stack it just spams battleshout thinking its not on.

**osbornx22** · 12-26-2009

/run local _, d, _ = GetSpellCooldown("Bloodrage") if d == 0 and UnitPower("player") < 80 then CastSpellByName("Bloodrage") end

/run if not UnitBuff("player", "Battle Shout") and not UnitBuff("player", "Blessing of Might") then CastSpellByName("Battle Shout") end

**kakamonster** · 12-26-2009

Originally Posted by nemiz

ok maybe im stupid, but i rly want help with this and im rly new. i want this macro to do this in this exact priority
Bloodrage if under 80 rage every time it can
use Battleshout whenever its not up.
use Bloodsurge (the insta slam proc) whenever its up
use whirlwind whenever its usable
use bloodthirst whenever usable
if im over 60 rage cast cleave
if the target is under 20% and whirlwind and bloodthirst is on cooldown cast execute instead of cleave.

this is what i want the macro to do, but its not what it does. can u please help me edit the macro or even make a new one?

#showtooltip Whirlwind
/run local _,d,_ = GetSpellCooldown("Bloodrage") if (d == 0) then CastSpellByName("Bloodrage") end
/run if not UnitBuff("player", "Battle Shout") then CastSpellByName("Battle Shout") end
/startattack
/run if UnitBuff("player", "Slam!") then CastSpellByName("Slam") end
/run local _,a,_ = GetSpellCooldown("Whirlwind") if (a == 0) then CastSpellByName("Whirlwind") end
/run local _,d,_ = GetSpellCooldown("Bloodthirst") if (d == 0) then CastSpellByName("Bloodthirst") end
/run if UnitPower("Player") > 60 then CastSpellByName("Cleave") end
/run local _,d,_ = GetSpellCooldown("Execute") if (d == 0) then CastSpellByName("Execute") end

and with this macro, when i have Blessing of Might it just spams battle shout cuz its supposed to hold it up, but since they dont stack it just spams battleshout thinking its not on.

Code:

/run if IsUsableSpell("Execute")==1 and GetSpellCooldown("Execute")==0 and IsSpellInRange("Execute", "target")==1 then CastSpellByName("Execute") end
/run if IsUsableSpell("Bloodrage") and GetSpellCooldown("Bloodrage")==0 and UnitPower("player")<80 then CastSpellByName("Bloodrage") end
/run if not(UnitBuff("player","Battle Shout") or UnitBuff("player","Blessing of Might") or UnitBuff("player","Greater Blessing of Might")) and IsUsableSpell("Battle Shout")==1 and not IsMounted() then CastSpellByName("Battle Shout") end
/run if IsUsableSpell("Slam") and IsSpellInRange("Slam", "target")==1 and UnitBuff("player", "Slam!") then CastSpellByName("Slam") end
/run if IsUsableSpell("Whirlwind") and GetSpellCooldown("Whirlwind")==0 and IsSpellInRange("Bloodthirst", "target")==1 then CastSpellByName("Whirlwind") end
/run if IsUsableSpell("Bloodthirst") and GetSpellCooldown("Bloodthirst")==0 and IsSpellInRange("Bloodthirst", "target")==1 then CastSpellByName("Bloodthirst") end
/run if IsUsableSpell("Cleave") and GetSpellCooldown("Cleave")==0 and IsSpellInRange("Bloodthirst", "target")==1 and UnitPower("player")>60 then CastSpellByName("Cleave") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/startattack [exists,harm,nodead]

Try this should work but is untested.

**kakamonster** · 12-26-2009

Viral tested your version of my iterrupt macro and its not working.
maybe you should do it from scratch and not add to my logic =P

Code:

/run if (_G["RetInterrupt"==nil or GetTime()-_G["RetInterrupt"]>1) then if IsUsableSpell("Hammer of Justice") and (UnitCastingInfo("target") or UnitChannelInfo("target")) and GetSpellCooldown("Hammer of Justice")==0 and IsSpellInRange("Hammer of Justice", "target")==1 then SpellStopCasting() CastSpellByName("Hammer of Justice") _G["RetInterrupt"]=GetTime() elseif IsUsableSpell("Arcane Torrent") and (UnitCastingInfo("target") or UnitChannelInfo("target")) and GetSpellCooldown("Arcane Torrent")==0 and IsSpellInRange("Crusader Strike", "target")==1 then SpellStopCasting() CastSpellByName("Arcane Torrent") _G["RetInterrupt"]=GetTime() end end

**~~asdjaa~~** · 12-26-2009

Originally Posted by iq.kerberos

This can be broken up into macros, but I opted not to. I use Super Duper Macro addon so I can have unlimited space. I created this as a script in SDM because writing tons of macros just isn't fun. Especially when you have multiple toons.

Script: [Mutilate]

Code:

Mutilate = {}

function Mutilate.Init()
    
    if  UnitName("target") == nil or UnitIsFriend("player","target") ~= nil or UnitHealth("target") == 0 then
        return -- ignore the dead and friendly
    end

    local energy = UnitPower("player")
    local cp = GetComboPoints("player")
    local currentTime = GetTime()

    local ud = UnitDebuff
    local ub = UnitBuff
	
    local SuggestRupture = false --change this if you want to use a Rupture based rotation
    local SuggestVanish = true --change this if you don't want to automatically cast Vanish
    
    local snd = 0
    local hfb = 0
    local rupture = 0
    local dp = 0
    local vanish = 0
    local overkill = 0
    
    local bleeds = 0

    --
    -- Ensure that there is a bleed (ie. Rupture, Deep Wounds, Rend) on the target.
    --
	if  
		(
			ud("target","Rupture") 
			or ud("target","Garrote")
			or ud("target","Deep Wounds")
			or ud("target","Rend")
			or ud("target","Trauma")
			or ud("target","Mangle (Cat)")
			or ud("target","Mangle (Bear)")
			or ud("target","Pounce")
			or ud("target","Rake")
			or ud("target","Piercing Shots")
		)
	then
		bleeds = 1
	end

  
    --
    -- Slice and Dice
    --
    local name, _, _, _, _, _, expirationTime, _, _ = UnitBuff("player", "Slice and Dice")
    if name ~= nil then
        snd = expirationTime - currentTime
    end
    
    --
    -- Hunger for Blood
    --
    local name, _, _, _, _, _, expirationTime, _, _ = UnitBuff("player", "Hunger for Blood")
    if name ~= nil then
        hfb = expirationTime - currentTime
    end
    
    --
    -- Ruture
    --
    local name, _, _, _, _, _, expirationTime, isMine, _ = UnitDebuff("target", "Rupture")
    currentTime = GetTime()
    if name ~= nil and isMine == "player" then
        rupture = expirationTime - currentTime
    end    


    --
    -- Deadly Poison IX
    --
    local name, _, _, count, _, _, expirationTime, isMine, _ = UnitDebuff("target", "Deadly Poison IX")
    if name ~= nil and count >= 4 and isMine == "player" then
        dp = 1
    end

    
    --
    -- Vanish
    --
    local start, duration, _ = GetSpellCooldown("Vanish");
    if duration ~= nil then 
        vanish = duration + start - currentTime
    end    
    

    if UnitAura("player", "Stealth") ~= nil then
        if (energy >= 50) then
            RunMacroText("/cast Garrote");
        end
    elseif (hfb <= 5.0) then
        if (bleeds == 1) then
            if (energy >= 15) then
                RunMacroText("/cast Hunger for Blood");
            end
        else
            if (cp == 0) then
                if (energy >= 55) then
                    RunMacroText("/cast Mutilate");
                end
            else
                if (energy >= 25) then
                    RunMacroText("/cast Rupture");
                end 
            end
        end
    elseif (cp >= 1) and not ub("player","Slice and Dice") then
        if (energy >= 25) then
            RunMacroText("/cast Slice and Dice");
        end
    elseif (cp >= 1) and (snd <= 5.0) then
        if (energy >= 35) then
            RunMacroText("/cast Envenom");
        end
    elseif (vanish < 1) and not ub("player","Overkill") and SuggestVanish == true then
        RunMacroText("/cast Vanish");
    elseif (cp < 4) then
        if (energy >= 55) then
            RunMacroText("/cast Mutilate");    
        end
    elseif (rupture <= 2.5) and (SuggestRupture == true) then
        if (rupture <= 0.5) then    
           if (energy >= 25) then
                RunMacroText("/cast Rupture");
            end
        end
    elseif (dp == 1) then
        if (energy >= 35) 
           then
            RunMacroText("/cast Envenom");
        end
    else
        if (energy >= 80) then
            RunMacroText("/cast Mutilate");
        end
    end
end

I create a macro to initialize the script that's called inside my main macro:

Macro: [001]

Code:

/run if (Mutilate == nil) then RunMacroText("/sdm run Mutilate") end

The actual macro I run for my rotation is this:

Macro: [002]

Code:

#showinfo [stealth] Garrote; Mutilate
/startattack [combat]
/run RunMacro(1)
/cast Cold Blood
/run Mutilate.Init()

^ one button, full rotation spam.

This script is based off of the rotation found on EJ. You won't find a tighter Mutilate rotation than this.

Okay, so as suggested in the actual LuaNinja thread I used this macro instead of remaking the one on the first post. And I'm glad I did (besides not reading the suggestion until AFTER I'd remade the OP's one). But now I want more. I want this to be fully automatic. It's not too hard to get working reasonable well. I just had to add 2 lines to the macro you're meant to spam and one button press is all you need for the whole fight.

There's a slight bug when you target another non-friendly target after already using the macro, where it doesn't totally stop the macro, and starts again as soon as you get into range, which could prove a slight problem in instances and raids. It may also be a blessing. It just depends on you and how you like it.

Anyway, just replace the second macro from kerberos' post with this one, making sure the first macro is in slot 1 (name it 001 or something) in the macro menu, and this one is in slot 2 (name it 002 or something). Then just press the macro once and you should be set as long as you remain in combat. Even if you do get removed from combat then I think you might be fine. Best/worst case scenario, it lasts until logout.

Code:

#showinfo [stealth] Garrote; Mutilate
/startattack [combat]
/run RunMacro(1)
/run Mutilate.Init()
/run [nocombat] StopMacro(2)end
/cast [combat] Cold Blood
/in 1.5 /run RunMacro(2)

Also, the /in 1.5 is modifiable to how you want it. It's the interval in seconds between each macro press. I found 1.5 to work best, but you can adjust it to your liking. I don't suggest putting it at 1 since that's our GCD timer and it would probably interfere. But if you put it substantially lower it might work well. Who knows, I haven't tried yet.

EDIT: Tried .5 as the value for /in, seems to work fine. You can get pretty energy starved that way though, 1.5 seems to wait long enough to build energy up without it seeming like a long time.

Next task unless someone else wants to do it: Getting Tricks of the Trade working for when we get the T10 2-piece. I'm thinking of using a focus target for this, and using the same logic as for hunger for blood and whatnot, borrowing some code from other CD abilities and the like.

**Mynewt** · 12-26-2009

Is there a macro/scipt etc that will scan your inventory and if the item count for an item, or better yet several pre-selected items is zero, loot the mail box, and carry on disenchanting?

also in addition is there a way to stp the DE/prospect amcro on the first post if here are no further items to prospect/de/mill etc?

**Mynewt** · 12-26-2009

Also forgive me for being utterly stupid but i seem to emember around wow 2.0 an addon called lazywarrior (with modules for other classes) would Lua Ninja not allow for this to be ressurected?

Many of these macros are practically there, lazywarrior just made it really easy for a complete noob like myself to set up and run.

**Evilphtbstrd** · 12-26-2009

ye the lazy addons were great , but with these macros you just dont need those old addons

viral , elitetech and the others are doing a great job at the moment , its just a case of gettting an addon like super duper macro and doing a copy and paste

**Mynewt** · 12-26-2009

Oh they certainly are doing a superb job -i'm throughly impressed, I was just thinking with a base such as Kazy-addon they might not need to do as much work was all..

Though I guess if they're happy to continue supprting people let 'em be.

**Tardo** · 12-26-2009

Really great job once again ppl... Got my enha shaman macro working.

However, if someone is out of things to do I would appreciate so much if you made me a Combat Rogue script.

Thanks in advance.

Code:

Priority:
* Start up Slice and Dice however you please, really.
* Use cooldowns whenever possible. Killing spree + blade flurry, blade flurry +
adrenaline rush can be used. Adrenaline rush + killing spree is not recommended
due to energy capping.

1. Keep SnD up, no matter what the number of combo points are.
2. 5 point Eviscerate.

^ The rotation if someone is unfamiliar with it

Copied from EJ...

**Elitetech** · 12-26-2009

Originally Posted by CrazyCactuaR

Anyone recommend a more suitable way of getting a auto every man for himself code; only way i know so far is to just keep listing the debuff's it works on.

+2 rep to whoever can improve it or a big thank you if its viral fly by who i cant rep again

I can't think of any other way than shortening the macro. It can check if your debuff is magic or curse, but not if it slows you or not.

Code:

/stopmacro [stealth]
/run A=GetSpellCooldown("Every Man for Himself"); B=UnitDebuff("player", "Frost Nova"); C=UnitDebuff("player", "Web"); D=UnitDebuff("player", "Net"); E=UnitDebuff("player", "Hooked Net"); F=UnitDebuff("player", "Gouge"); G=UnitDebuff("player", "Polymorph"); H=UnitDebuff("player", "Entangling Roots"); I=UnitDebuff("player", "Hex"); J=UnitDebuff("player", "Slow"); K=UnitDebuff("player", "Slowing Poison"); L=UnitDebuff("player", "Fear"); M=UnitDebuff("player","Psychic Horror"); if B or C or D or E or F or G or H or I or J or K or L or M and A == 0 then CastSpellByName("Every Man for Himself") end

**Elitetech** · 12-26-2009

Originally Posted by asdjaa

Okay, so as suggested in the actual LuaNinja thread I used this macro instead of remaking the one on the first post. And I'm glad I did (besides not reading the suggestion until AFTER I'd remade the OP's one). But now I want more. I want this to be fully automatic. It's not too hard to get working reasonable well. I just had to add 2 lines to the macro you're meant to spam and one button press is all you need for the whole fight.

There's a slight bug when you target another non-friendly target after already using the macro, where it doesn't totally stop the macro, and starts again as soon as you get into range, which could prove a slight problem in instances and raids. It may also be a blessing. It just depends on you and how you like it.

Anyway, just replace the second macro from kerberos' post with this one, making sure the first macro is in slot 1 (name it 001 or something) in the macro menu, and this one is in slot 2 (name it 002 or something). Then just press the macro once and you should be set as long as you remain in combat. Even if you do get removed from combat then I think you might be fine. Best/worst case scenario, it lasts until logout.

Code:

#showinfo [stealth] Garrote; Mutilate
/startattack [combat]
/run RunMacro(1)
/run Mutilate.Init()
/run [nocombat] StopMacro(2)end
/cast [combat] Cold Blood
/in 1.5 /run RunMacro(2)

Also, the /in 1.5 is modifiable to how you want it. It's the interval in seconds between each macro press. I found 1.5 to work best, but you can adjust it to your liking. I don't suggest putting it at 1 since that's our GCD timer and it would probably interfere. But if you put it substantially lower it might work well. Who knows, I haven't tried yet.

EDIT: Tried .5 as the value for /in, seems to work fine. You can get pretty energy starved that way though, 1.5 seems to wait long enough to build energy up without it seeming like a long time.

Next task unless someone else wants to do it: Getting Tricks of the Trade working for when we get the T10 2-piece. I'm thinking of using a focus target for this, and using the same logic as for hunger for blood and whatnot, borrowing some code from other CD abilities and the like.

The global coooldown is 1.5 so I can't see any reason not to use 0.5 since this will work better with things like Bloodlust or Heroism and spells that are off the GCD (kick etc). Usually when you run the rotation manually you spam keys more than 5 times a second so to be honest 0.2 would be more like a real person using it. For energy-starvation you can add checks not to use any spells if energy is below XX(lets say 50). That way you'll ALWAYS have energy for kick. Macros will control it much better than any human players which is pretty cool

For spells based on UnitPower I like to use these macros. They're much more accurate than any human could EVER be.

**Elitetech** · 12-26-2009

Originally Posted by Mynewt

Is there a macro/scipt etc that will scan your inventory and if the item count for an item, or better yet several pre-selected items is zero, loot the mail box, and carry on disenchanting?

also in addition is there a way to stp the DE/prospect amcro on the first post if here are no further items to prospect/de/mill etc?

Try adding the IsShiftDown modifier (You'll be able to find it on the first page, or use the WoWAPI page (Search for SHIFT)) So it'll be something like

Code:

/run if IsShiftDown == 1 then RunMacroText("/run /in 1 RunMacro("\Disenchant"\)")

If you get the correct modifier for the shift, then it should work.

Hold down shift while disenchanting (Put a coin on your shift key or something lol) and release to stop.. Should work like that

(I'm not on my old computer, I'm on my grandma's old laptop so can't really do anything, the internet is like a thousand years old lol)

**Viral Fly-by** · 12-26-2009

Originally Posted by kakamonster

Code:

/run if IsUsableSpell("Execute")==1 and GetSpellCooldown("Execute")==0 and IsSpellInRange("Execute", "target")==1 then CastSpellByName("Execute") end
/run if IsUsableSpell("Bloodrage") and GetSpellCooldown("Bloodrage")==0 and UnitPower("player")<80 then CastSpellByName("Bloodrage") end
/run b={UnitBuff("player")} if not (b[1]=="Battle Shout" or b[1]=="Blessing of Might" or b[1]=="Greater Blessing of Might") and IsUsableSpell("Battle Shout") then CastSpellByName("Battle Shout") end
/run if IsUsableSpell("Slam") and IsSpellInRange("Slam", "target")==1 and UnitBuff("player", "Slam!") then CastSpellByName("Slam") end
/run if IsUsableSpell("Whirlwind") and GetSpellCooldown("Whirlwind")==0 and IsSpellInRange("Bloodthirst", "target")==1 then CastSpellByName("Whirlwind") end
/run if IsUsableSpell("Bloodthirst") and GetSpellCooldown("Bloodthirst")==0 and IsSpellInRange("Bloodthirst", "target")==1 then CastSpellByName("Bloodthirst") end
/run if IsUsableSpell("Cleave") and GetSpellCooldown("Cleave")==0 and IsSpellInRange("Bloodthirst", "target")==1 and UnitPower("player")>60 then CastSpellByName("Cleave") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/startattack [exists,harm,nodead]

Try this should work but is untested.

THANK YOU for realizing to check both Blessing of Might AND Greater Blessing of Might.

**Viral Fly-by** · 12-26-2009

Originally Posted by kakamonster

Viral tested your version of my iterrupt macro and its not working.
maybe you should do it from scratch and not add to my logic =P

Code:

/run if (_G["RetInterrupt"==nil or GetTime()-_G["RetInterrupt"]>1) then if IsUsableSpell("Hammer of Justice") and (UnitCastingInfo("target") or UnitChannelInfo("target")) and GetSpellCooldown("Hammer of Justice")==0 and IsSpellInRange("Hammer of Justice", "target")==1 then SpellStopCasting() CastSpellByName("Hammer of Justice") _G["RetInterrupt"]=GetTime() elseif IsUsableSpell("Arcane Torrent") and (UnitCastingInfo("target") or UnitChannelInfo("target")) and GetSpellCooldown("Arcane Torrent")==0 and IsSpellInRange("Crusader Strike", "target")==1 then SpellStopCasting() CastSpellByName("Arcane Torrent") _G["RetInterrupt"]=GetTime() end end

There was a typo in it...can you try this?

Code:

/run if (_G["RetInterrupt"]==nil or GetTime()-_G["RetInterrupt"]>1) then if IsUsableSpell("Hammer of Justice") and (UnitCastingInfo("target") or UnitChannelInfo("target")) and GetSpellCooldown("Hammer of Justice")==0 and IsSpellInRange("Hammer of Justice", "target")==1 then SpellStopCasting() CastSpellByName("Hammer of Justice") _G["RetInterrupt"]=GetTime() elseif IsUsableSpell("Arcane Torrent") and (UnitCastingInfo("target") or UnitChannelInfo("target")) and GetSpellCooldown("Arcane Torrent")==0 and IsSpellInRange("Crusader Strike", "target")==1 then SpellStopCasting() CastSpellByName("Arcane Torrent") _G["RetInterrupt"]=GetTime() end end

Shout-Out

User Tag List

Thread: LuaNinja Macro Collection

Thread Tools

Search Thread

Similar Threads

[Macro-Collection] All-In-One-Button Macro for all Classes from Level 15-90!

Addon For LuaNinja Macros

/Dump Macro Collection (WIP at mo!)

[HOW TO] Ascii Macro + my collection

Macro Love - My Collection of useful and/or Space saving Macro's!

OwnedCore Forums

casino

CoreCoins

My OwnedCore

About Us

Casino