LuaNinja Macro Collection

[brightemo]

You have to set it to check if Mind Flay is being cast on every line, otherwise it'll clip. I'd fix it myself, but I'm still learning this shiz.

/run 
cs=CastSpellByName;
cd=GetSpellCooldown;
ud=UnitDebuff;
ub=UnitBuff;
if not UnitChannelInfo("player") then
 if (UnitMana("player")/UnitManaMax("Player")<0.5) and (cd("Shadowfiend") == 0) then
  cs("Shadowfiend");
 else 
  n,_,_,s = ub("player","Shadow Weaving"); 
  if not ud("target", "Vampiric Touch", unitCaster~="player") and (cd("Vampiric Touch") == 0) then
   cs("Vampiric Touch")  
  elseif not ud("target", "Devouring Plague", unitCaster~="player") and (cd("Devouring Plague") == 0) then
   cs("Devouring Plague")  
  elseif (cd("Mind Blast") == 0) then
   cs("Mind Blast") 
  elseif s == 5 and not ud("target", "Shadow Word: Pain", unitCaster~="player") and (cd("Shadow Word: Pain") == 0) then
   cs("Shadow Word: Pain")  
  elseif s == 5 and not ud("target", "Vampiric Embrace", unitCaster~="player") and (cd("Vampiric Embrace") == 0) then
   cs("Vampiric Embrace") 
  elseif not ud("target","Mind Flay", unitCaster~="player") and (cd("Mind Flay") == 0) then
   cs("Mind Flay")  
  end
 end
end

[Albedo]

hi there ..

not tested but should do it (mostly copied from ganzerker)

/startattack [harm]
/run if UnitHealth("Player")/UnitHealthMax("Player") < 0.35 and (GetSpellCooldown("Frenzied Regeneration") == 0) then CastSpellByName("Frenzied Regeneration") end
/run if UnitHealth("Player")/UnitHealthMax("Player") < 0.15 and (GetSpellCooldown("Survival Instincts") == 0) then CastSpellByName("Survival Instincts") end
/run if (UnitPower("Player") > 25) then CastSpellByName("Maul") end
/run if (GetSpellCooldown("Mangle (Bear)") ==0) then CastSpellByName("Mangle (Bear)") end
/run local _,_,_,c,_,d,_,p,_=UnitDebuff("Target","Lacerate"); if ((not (c==5 )) and (p=="player")) or ((c==5) and (p=="player") and d<=2) ( then CastSpellByName("Lacerate") end
/run if (GetSpellCooldown("Faerie Fire(Feral)") == 0) then CastSpellByName("Faerie Fire(Feral)") end
/run CastSpellByName("Swipe (Bear)") end

for lacerate ..
1. thing is also cat dudus cast it so it could happen that there are more than your own.

2. it should check .. if you have 5 stacks of lacerate up .. if not cast lacerate ... if you have lacerate has 5 stacks but the duration is smaller than 2seconds ... than it will also cast alcerate ...



sincery spud .. hf :wave:

The duration check still doesn't work, as far as i can tell.

And thanks, Brightemo . +rep

[CrazyCactuaR]

Someone help a noob out, cant figure out for the life of me what's wrong, it just doesnt show any love

/run b=IsUsableSpell("Ravage");if b and UnitBuff("player", "Prowl") then RunMacroText("/cast Ravage") else if (not b) and UnitBuff("player", "Prowl") then RunMacroText("/cast Pounce") end

It's my poor attempt at doing Ravage if i'm behind or Pounce otherwise.

[brightemo]

The duration check still doesn't work, as far as i can tell.

Replace

/run local _,_,_,c,_,d,_,p,_=UnitDebuff("Target","Lacerate"); if ((not (c==5 )) and (p=="player")) or ((c==5) and (p=="player") and d<=2) ( then CastSpellByName("Lacerate") end

With (untested)

/run local n,_,_,s,_,_,e,c=UnitDebuff("Target","Lacerate"); if (not n) or (c ~= "player") or (s < 5) or (e-GetTime()<2) then CastSpellByName("Lacerate") end

Will cast Lacerate if the target does not have the Lacerate debuff, or if that debuff was not cast by the player or if that debuff does not have 5 stacks, or if it will expire in under 2 seconds.

[brightemo]

Someone help a noob out, cant figure out for the life of me what's wrong, it just doesnt show any love

/run b=IsUsableSpell("Ravage");if b and UnitBuff("player", "Prowl") then RunMacroText("/cast Ravage") else if (not b) and UnitBuff("player", "Prowl") then RunMacroText("/cast Pounce") end

It's my poor attempt at doing Ravage if i'm behind or Pounce otherwise.

IsUsableSpell only checks if you have enough mana/energy/rage to cast the spell. As far as I can tell there is no API function to let you know if you are behind the target.

[CrazyCactuaR]

IsUsableSpell only checks if you have enough mana/energy/rage to cast the spell. As far as I can tell there is no API function to let you know if you are behind the target.

ahah so that's why it was giving me so much grief huh. Thanks for letting me know i'll just put up with pounce for now.

[Albedo]

/run local n,_,_,s,_,_,e,c=UnitDebuff("Target","Lacerate"); if (not n) or (c ~= "player") or (s < 5) or (e-GetTime()<2) then CastSpellByName("Lacerate") end

Will cast Lacerate if the target does not have the Lacerate debuff, or if that debuff was not cast by the player or if that debuff does not have 5 stacks, or if it will expire in under 2 seconds.

Awesome Works yet again. I knew it had something to do with GetTime().

[CrazyCactuaR]

Here's my small contribution to the collection your making. Hope you find it somehow useful. It's for a 40ish Feral Cat Druid.

Macro 1
/cast [combat] Tiger's Fury
/cast [combat] Barkskin
/cast [combat] Nature's Grasp

Macro 2
/run if not UnitDebuff('target','Faerie Fire (Feral)') and not UnitBuff("player", "Prowl") then CastSpellByName('Faerie Fire (Feral)') end

Macro 3
/startattack [combat]
# Stealth
/run if UnitBuff("player", "Prowl") then RunMacroText("/cast Pounce") end
# 3 Claw's then Ferocious Bite
/run p=GetComboPoints("player","target");if p<3 and not UnitBuff("player", "Prowl") then RunMacroText("/cast Claw") end
/run a=GetComboPoints("player","target");if a>2 and not UnitBuff("player", "Prowl") then RunMacroText("/cast Ferocious Bite") end

Having seperated the buff's and FF because too many casts were limiting the buffs from regular use. Another thing i noticed is that if FF does not land when cast, it would stop the rest of the code from being executed. So to avoid this, have all 3 macro's be spammed by a keyspammer.

[pewpewlazerz]

Has anyone messed with other possibilites with this? I wonder if there is a way to roll like /random 98-100 but it shows 1-100

I don't know much about it but I'm reading into it to see if anything like this could be possible.

[CrazyCactuaR]

Has anyone messed with other possibilites with this? I wonder if there is a way to roll like /random 98-100 but it shows 1-100

I don't know much about it but I'm reading into it to see if anything like this could be possible.

Isn't that handled server side?

[brightemo]

Isn't that handled server side?

Yes. See RandomRoll - World of Warcraft Programming: A Guide and Reference for Creating WoW Addons

[kakamonster]

how do i add GetSpellCooldown to this script?

/run local n,_,_,_,_,_,e,c=UnitDebuff("Target","Flame Shock"); if (not n) or (c ~= "player") or (e-GetTime()<2) then CastSpellByName("Flame Shock") end

[brightemo]

how do i add GetSpellCooldown to this script?

/run local n,_,_,_,_,_,e,c=UnitDebuff("Target","Flame Shock"); if (not n) or (c ~= "player") or (e-GetTime()<2) then CastSpellByName("Flame Shock") end

/run local n,_,_,_,_,_,e,c=UnitDebuff("Target","Flame Shock"); if ((not n) or (c ~= "player") or (e-GetTime()<2)) and GetSpellCooldown("Flame Shock") == 0 then CastSpellByName("Flame Shock") end

[kakamonster]

thanks! is there a way to add check for in combat and has target?

for trinkets and elemental mastery

[kakamonster]

why is ths not working? gets stuck on frost shock

/run if UnitHealth("target")/UnitHealthMax("target") < 0.20 and (GetSpellCooldown("Frost Shock") == 0) then CastSpellByName("Frost Shock") end