LuaNinja Macro Collection

[Evilphtbstrd]

viral you need really need to make your own thread mate , your macros are second to none

[Viral Fly-by]

viral you need really need to make your own thread mate , your macros are second to none

Yea I'm still debating that.

[Evilphtbstrd]

cheers greenthing , i took this part of yoru macro---
/run local _,g, _ = GetSpellCooldown("Bone Shield") if (g == 0) and (not UnitBuff("player", "Bone Shield")) then CastSpellByName("Bone Shield") end

and added it to the one kxy1983 posted and it works great
/Run temp=aoespell
/Run timp=spell
/Run tamp=miscspell
/Run tump=intspell
/run if UnitDebuff("target", "Blood Plague",unitCaster~="player") then CastSpellByName(""..temp.."") else CastSpellByName(""..timp.."") end
/run CastSpellByName(""..timp.."")
/Run CastSpellByName(""..tamp.."")
/Run CastSpellByName(""..tump.."")
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

so macro looks like this now

/Run temp=aoespell
/Run timp=spell
/Run tamp=miscspell
/Run tump=intspell
/run local _,g, _ = GetSpellCooldown("Bone Shield") if (g == 0) and (not UnitBuff("player", "Bone Shield")) then CastSpellByName("Bone Shield") end
/run if UnitDebuff("target", "Blood Plague",unitCaster~="player") then CastSpellByName(""..temp.."") else CastSpellByName(""..timp.."") end
/run CastSpellByName(""..timp.."")
/Run CastSpellByName(""..tamp.."")
/Run CastSpellByName(""..tump.."")
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");


thank you both

EDIT ================= i've added your extra lines so my macro now looks like this
/use [nopet]Raise Dead
/run if UnitAffectingCombat("player") then RunMacroText("/petattack") else RunMacroText("/petfollow") end
/run if (not UnitBuff("player", "Blood Presence")) then CastSpellByName("Blood Presence") end
/Run temp=aoespell
/Run timp=spell
/Run tamp=miscspell
/Run tump=intspell
/run local _,g, _ = GetSpellCooldown("Bone Shield") if (g == 0) and (not UnitBuff("player", "Bone Shield")) then CastSpellByName("Bone Shield") end
/run if UnitDebuff("target", "Blood Plague",unitCaster~="player") then CastSpellByName(""..temp.."") else CastSpellByName(""..timp.."") end
/run CastSpellByName(""..timp.."")
/Run CastSpellByName(""..tamp.."")
/Run CastSpellByName(""..tump.."")
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

and it is working well in WSG , thx

[greenthing]

I use this for aoe using facesmasher on my UH dk, was pulling 14k dps on trash, with a 5k gearscore, was top dps most of the time, if not in top 3, with my pretty serious raiding guild, and thats after only playing my dk a couple weeks, thanks to LuaNinja.

I still use the other macro for single target dps.

It doesnt use much in the way of cds, which is kinda good, allows me to save my gargoyle for heroism pops and such. Its even easy to dps aoe tank heroics, i 4manned H UP, H UK and H HoL, while the tank was offline, its aoe is unbeatable, i was able to outthreat everyone.

Aah that line will help a lot... (Blood Plague check from the player).

Though I will be adding:

/use [nopet]Raise Dead
/run if (not UnitBuff("player", "Blood Presence")) then CastSpellByName("Blood Presence") end
/run local _,g, _ = GetSpellCooldown("Bone Shield") if (g == 0) and (not UnitBuff("player", "Bone Shield")) then CastSpellByName("Bone Shield") end
/run if UnitAffectingCombat("player") then RunMacroText("/petattack") else RunMacroText("/petfollow") end

at the beginning of it.

@Evilphtbstrd, didnt see your post because I started to make this 1 before you posted, but I added a bit more to his, his Blood Plague check is a winrar.

[Bugador]

Viral Fly-by your Mutilate Rogue macro not work...
fix pls

[Viral Fly-by]

Viral Fly-by your Mutilate Rogue macro not work...
fix pls

Well hot damn...that sure is informative. Thanks to your clear explanation of what is happening, what it's doing, and any error messages it's giving, I know exactly what the problem is!

(BTW...that was full of sarcasm in case you couldn't tell. You have to tell me what it's doing, what in particular it is doing or not doing...and what errors it's giving if any.)

[Bugador]

^^
Nothing happens when you try to use the macro. Sorry poor english.

How could I turn this a macro.

Rotation:
* Ensure that there is a bleed (ie. Rupture, Deep Wounds, Rend) on the target.
* Start up Hunger for Blood.
* Start up Slice and Dice however you please, really.

1. Mutilate to 4+ Combo Points
2. Make sure Hunger for Blood isn't going to drop soon. Refresh it if it will.
3. Is Rupture up? If yes, Envenom. Go to step 1.
4. Does Slice and Dice have >12 seconds left? If no, Envenom. Go to Step 1.
5. Rupture. Go to Step 1.

/Ty for your Attention.

[reveng_]

Do you even have LuaNinja installed?

[Bugador]

Yes I have, but I lack knowledge to do.

[greenthing]

What is wrong in this macro?

/run local _,_,_,n,_,_,_,_,_=UnitDeBuff("player","Arcane Blast"); if( (n=4) and UnitBuff("player", "Missile Barrage") ) then CastSpellByName("Arcane Missiles") else CastSpellByName("Arcane Blast");

[Viral Fly-by]

What is wrong in this macro?

/run local _,_,_,n,_,_,_,_,_=UnitDeBuff("player","Arcane Blast"); if( (n=4) and UnitBuff("player", "Missile Barrage") ) then CastSpellByName("Arcane Missiles") else CastSpellByName("Arcane Blast");

1. You misspelled UnitDebuff...no capital B.
2. Arcane Blast is a BUFF not a DEBUFF anyway.
3. You need an "end" to finish your if statement.

[greenthing]

It's a Debuff

/run if (not UnitDebuff("player", "Arcane Blast")) then CastSpellByName("Arcane Blast")
/run local _,_,_,n,_,_,_,_,_ = UnitDebuff("player", "Arcane Blast"); if (n == 4)  then CastSpellByName("Arcane Missiles") else CastSpellByName("Arcane Blast") end

Fixed my issues.

[Gnobiwan]

Anyone thought of making a disc priest one? I know they are faceroll to heal with to begin with, but might be cool.

[greenthing]

Well my fairly advanced mage macro (for a friend) is done. The tests looked good so it should be working as intended.

/run local s,_,_,_,_,_,_,_=UnitChannelInfo("player"); if( s=="Arcane Missiles" ) then StopMacro(); end;
/run if (not UnitDebuff("player", "Arcane Blast")) then CastSpellByName("Arcane Blast")
/run local q,_,_,_,_,_,_,_=UnitCastingInfo("player"); local _,_,_,w,_,_,_,_,_ = UnitDebuff("player", "Arcane Blast"); if( q=="Arcane Blast" ) and (w == 3) and UnitBuff("player", "Missile Barrage") then StopMacro(); end;
/run local _,_,_,n,_,_,_,_,_ = UnitDebuff("player", "Arcane Blast"); if (n == 4) and UnitBuff("player", "Missile Barrage") then CastSpellByName("Arcane Missiles")  elseif UnitPower("player") < 3000 and (n == 4) then CastSpellByName("Arcane Missiles") else CastSpellByName("Arcane Blast") end

It will only start casting Arcane Missiles if you have 4 stacks of Arcane Blast AND Missile Barrage is up (it also checks if you are already casting a 4th Arcane Blast when you have 3 stacks and Missile Barrage is up, to avoid clipping and casting 1 additional expensive and unneccesary Arcane Blast). If either of those is not the case, it will just spam Arcane Blast BUT if you are below 3000 mana (this can easily be changed to a custom wanted variable of course) the macro will make you cast Arcane Missiles to lose the stacks because it's just too expensive at that point.

To add cooldowns to it add these to the top:

Icy Veins

/run local _,d,_ = GetSpellCooldown("Icy Veins") if (d == 0) then CastSpellByName("Icy Veins") end

Arcane Power

/run local _,e,_ = GetSpellCooldown("Arcane Power") if (e == 0) then CastSpellByName("Arcane Power") end

Presence of Mind

/run local _,f,_ = GetSpellCooldown("Presence of Mind") if (f == 0) then CastSpellByName("Presence of Mind") end

Trinkets and other on USE items (replace XXXXXXXXXXX with the item's name)

/run local _,g,_ = GetItemCooldown("XXXXXXXXXXX") if (g == 0) then UseItemByName("XXXXXXXXXXX") end

Evocation (uses Evocation when not on cooldown and you are below 35% of your mana)

/run local _,h,_ = GetSpellCooldown("Evocation") if (h == 0) and UnitPower("player")/UnitPowerMax("player")<=0.35 then CastSpellByName("Evocation") end

Mana Sapphire (uses your Mana Sapphire when not on cooldown and you are below 35% of your mana)

/run local _,i,_ = GetItemCooldown("Mana Sapphire") if (i == 0) and UnitPower("player")/UnitPowerMax("player")<=0.35 then UseItemByName("Mana Sapphire")end

--------------

Oh there was an Arcane Mage macro in the TS, damn I scrolled over that 1 then .

[Fropper]

Viral Fly-by the feral macro isn't working. first i thought i made a mistake translating the names of the abilitys into german, but after installing the english wow version it still doesn't work.
btw there are (atleast) two different faerie fire debuffs and spells (dunno about the skilled moonkin one). the feral one is actually called Faerie Fire (Feral).
after changing the Faerie Fire to Faerie Fire (Feral) the macro atleast casted Faerie Fire (Feral). But nothing else, its just doing nothing. (yep luaninja works, the old feral macro is working)


edit: non-working versions deleted

edit2: working german version
German version:

#show Schreddern
/run if UnitHealth("player")/UnitHealthMax("player")<0.40 and GetSpellCooldown("Baumrinde")==0 then CastSpellByName("Baumrinde") end
/run vWB=0 b={UnitBuff("player","Wildes Brüllen")}; if b[7]~=nil then vWB=b[7]-GetTime() end;
/run vTrauma=0 i=1 while(i<=40)do a={UnitDebuff("target",i)} if a[8]~="player" and (a[1]=="Zerfleischen (Katze)" or a[1]=="Zerfleischen (Bär)" or a[1]=="Trauma") then vTrauma=1 break else i=i+1 end end;
/run vZerfetzen=0; vKrallenhieb=0; vZerfleischen=0; for i=1,40 do a={UnitDebuff("target",i)} if a[8]=="player" then d=a[7]-GetTime(); if a[1]=="Zerfetzen" then vZerfetzen=d elseif a[1]=="Krallenhieb" then vKrallenhieb=d elseif a[1]=="Zerfleischen (Katze)" then vZerfleischen=d end end end
/run c=CastSpellByName; p=UnitPower("player"); if GetSpellCooldown("Tigerfuror")==0 and not UnitBuff("player","Berserker") and p<30 then if GetComboPoints("player")>4 then if vZerfetzen==0 or 60+p+vZerfetzen*10<100 then c("Tigerfuror") end else c("Tigerfuror") end end
/run WBe=({GetSpellInfo("Wildes Brüllen")})[4]; if GetComboPoints("player")>0 and (vWB==0 or vWB-vZerfetzen<1 or (vWB<=3 and vZerfetzen>9)) and UnitPower("player")>=WBe then CastSpellByName("Wildes Brüllen") end
/run c=CastSpellByName; p=UnitPower("player"); if GetComboPoints("player")>4 then if vZerfetzen==0 then if p>({GetSpellInfo("Zerfetzen")})[4] then c("Zerfetzen") end else d=vZerfetzen*10-5; me=({GetSpellInfo("Zerfleischen (Katze)")})[4]; re=({GetSpellInfo("Krallenhieb")})[4]; se=({GetSpellInfo("Schreddern")})[4]; if d+p>=100 then if p>=me and vTrauma==0 and vZerfleischen<3 then c("Zerfleischen (Katze)") elseif p>=re and vKrallenhieb<3 then c("Krallenhieb") elseif p>=se then c("Schreddern") end end end end
/run if not UnitDebuff("target","Feenfeuer") and not UnitDebuff("target","Feenfeuer (Tiergestalt)") and GetSpellCooldown("Feenfeuer (Tiergestalt)")==0 then CastSpellByName("Feenfeuer (Tiergestalt)") end
/run cp=GetComboPoints("player"); p=UnitPower("player"); if vTrauma==0 and vZerfleischen<=vKrallenhieb and not (((vWB==0 or vWB-vZerfetzen<0.5) and cp>0 and p<25) or cp>4) then me=({GetSpellInfo("Zerfleischen (Katze)")})[4]; if vZerfleischen<3 and p>=me then CastSpellByName("Zerfleischen (Katze)") end end
/run cp=GetComboPoints("player"); p=UnitPower("player"); if not (((vWB==0 or vWB-vZerfetzen<0.5) and cp>0 and p<25) or cp>4) and vKrallenhieb<vZerfleischen then re=({GetSpellInfo("Krallenhieb")})[4]; if vKrallenhieb<2.5 and p>=re then CastSpellByName("Krallenhieb") end end
/run cp=GetComboPoints("player"); p=UnitPower("player"); se=({GetSpellInfo("Schreddern")})[4]; if not (((vWB==0 or vWB-vZerfetzen<0.5) and cp>0 and p<25) or cp>4) then if p>se then CastSpellByName("Schreddern") end end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");