[LuaNinja] Combat Rogue Levelling Macro's

[CrazyCactuaR]

[Quick Info]
Designed to be used with a keyspammer, all macro's at once. Later levels will be added as i reach them.

[Level 35]

Macro 1 - Stealth

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [nostealth, combat]
/targetenemy [noharm]
/run Stealth=UnitBuff("player", "Stealth")
/run Creature=UnitCreatureType("target")
/run InMeleeRange=CheckInteractDistance("target",2)
/run if Stealth and InMeleeRange and (Creature == "Humanoid" or Creature == "Undead" or Creature == "Demon") then RunMacroText("/cast Pick Pocket") end
/run if Stealth then CastSpellByName("Cheap Shot") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

Macro 2 - AntiCaster

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/run Casting=UnitCastingInfo("target")
/run Channeling=UnitChannelInfo("target")
/run KickCD=GetSpellCooldown("Kick")
/run KidneyCD=GetSpellCooldown("Kidney Shot")
/run GougeCD=GetSpellCooldown("Gouge")
/run InCombat = UnitAffectingCombat("player")
/run Points=GetComboPoints("player","target")
/run if (Casting or Channeling) and KickCD  == 0  and InCombat then RunMacroText("/cast Kick") end
/run if (Casting or Channeling) and KickCD > 0 and Points > 0 and KidneyCD == 0 and InCombat then CastSpellByName("Kidney Shot") end
/run if (Casting or Channeling) and KickCD > 0 and KidneyCD > 0 and GougeCD == 0 and InCombat then CastSpellByName("Gouge") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

Macro 3 - AntiMelee

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]
/run InCombat = UnitAffectingCombat("player")
/run RiposteCD=GetSpellCooldown("Riposte")
/run Riposte=IsUsableSpell("Riposte")
/run Creature=UnitCreatureType("target")
/run if RiposteCD == 0 and Riposte then CastSpellByName("Riposte") end
/run n = UnitName("target"); if n ~= _G["disarmTarget"] then _G["disarmTarget"] = n; _G["disarmAble"] = 0; _G["disarmTry"] = 1; end
/run if UnitName("target") == _G["disarmTarget"] and (UnitDebuff("target", "Dismantle") or UnitDebuff("target", "Disarm")) then _G["disarmAble"] = 1 end
/run if GetSpellCooldown("Dismantle")==0 and IsUsableSpell("Dismantle") and (_G["disarmAble"]==1 or _G["disarmTry"]==1) and not (UnitDebuff("target", "Dismantle") or UnitDebuff("target", "Disarm")) then CastSpellByName("Dismantle"); _G["disarmTry"] = 0; end
/run if UnitName("target") == _G["disarmTarget"] and (UnitDebuff("target", "Dismantle") or UnitDebuff("target", "Disarm")) then _G["disarmAble"] = 1 end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+Credit to Viral Fly By for the dismantle code.

Macro 4 - Buff's

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]
/run Flurry=GetSpellCooldown("Blade Flurry")
/run InCombat=UnitAffectingCombat("player")
/run EMFH=GetSpellCooldown("Every Man for Himself")
/run Trapped=UnitIsCharmed("player")
/run if Trapped and EMFH == 0 then CastSpellByName("Every Man For Himself") end
/run if UnitHealth("target") == 0 then StopMacro() end
/run if Flurry and InCombat then CastSpellByName("Blade Flurry") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

Macro 5 - Combat

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]
/run Points=GetComboPoints("player","target")
/run Slice=UnitBuff("player", "Slice and Dice")
/run InCombat = UnitAffectingCombat("player")
/run if Points < 2 and InCombat then CastSpellByName("Sinister Strike") end
/run if Points > 1 and not Slice and InCombat then CastSpellByName("Slice and Dice") end
/run if (Points > 1 or Points == 2) and Slice and InCombat then CastSpellByName("Eviscerate") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

[Level 40]

Macro 4 - Buff's Upgraded

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]
/run Flurry=GetSpellCooldown("Blade Flurry")
/run InCombat=UnitAffectingCombat("player")
/run InMeleeRange=CheckInteractDistance("target",2)
/run ARush=GetSpellCooldown("Adrenaline Rush")
/run Power=UnitPower("Player")
/run if UnitHealth("target") == 0 then StopMacro() end
/run if ARush == 0 and InCombat and InMeleeRange and Power < 30  then CastSpellByName("Adrenaline Rush") end
/run if Flurry and InCombat and InMeleeRange then CastSpellByName("Blade Flurry") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

[Level 50]

Macro 1 - AntiCaster

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/run Casting=UnitCastingInfo("target")
/run Channeling=UnitChannelInfo("target")
/run KickCD=GetSpellCooldown("Kick")
/run KidneyCD=GetSpellCooldown("Kidney Shot")
/run GougeCD=GetSpellCooldown("Gouge")
/run InCombat = UnitAffectingCombat("player")
/run Points=GetComboPoints("player","target")
/run if (Casting or Channeling) and KickCD  == 0  and InCombat then RunMacroText("/cast Kick") end
/run if (Casting or Channeling) and KickCD > 0 and Points > 0 and KidneyCD == 0 and InCombat then CastSpellByName("Kidney Shot") end
/run if (Casting or Channeling) and KickCD > 0 and KidneyCD > 0 and GougeCD == 0 and InCombat then CastSpellByName("Gouge") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+ Kick's on cast
+ Kidney shot if Kick's on cooldown
+ Gouge if Kick and Kidney shot on cooldown

Macro 2 - AntiMelee

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]
/run InCombat = UnitAffectingCombat("player")
/run RiposteCD=GetSpellCooldown("Riposte")
/run Riposte=IsUsableSpell("Riposte")
/run if RiposteCD == 0 and Riposte then CastSpellByName("Riposte") end
/run n = UnitName("target"); if n ~= _G["disarmTarget"] then _G["disarmTarget"] = n; _G["disarmAble"] = 0; _G["disarmTry"] = 1; end
/run if UnitName("target") == _G["disarmTarget"] and (UnitDebuff("target", "Dismantle") or UnitDebuff("target", "Disarm")) then _G["disarmAble"] = 1 end
/run if GetSpellCooldown("Dismantle")==0 and IsUsableSpell("Dismantle") and (_G["disarmAble"]==1 or _G["disarmTry"]==1) and not (UnitDebuff("target", "Dismantle") or UnitDebuff("target", "Disarm")) then CastSpellByName("Dismantle"); _G["disarmTry"] = 0; end
/run if UnitName("target") == _G["disarmTarget"] and (UnitDebuff("target", "Dismantle") or UnitDebuff("target", "Disarm")) then _G["disarmAble"] = 1 end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+ Autoselect target in combat
+ Use riposte when available
+ Use disarm when available

Macro 3 - Buff's

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]

/run Flurry=GetSpellCooldown("Blade Flurry")
/run InCombat=UnitAffectingCombat("player")
/run InMeleeRange=CheckInteractDistance("target",2)
/run ARush=GetSpellCooldown("Adrenaline Rush")
/run Evasion=GetSpellCooldown("Evasion")
/run Power=UnitPower("Player")
/run THealth=UnitHealth("target")
/run PHealth=UnitHealth("player")/UnitHealthMax("player")
/run if THealth == 0 then StopMacro() end
/run if PHealth < 0.75 and InCombat and InMeleeRange then CastSpellByName("Evasion") end
/run if ARush == 0 and InCombat and InMeleeRange and Power < 30  then CastSpellByName("Adrenaline Rush") end
/run if Flurry and InCombat and InMeleeRange then CastSpellByName("Blade Flurry") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+ Stop macro if dead target
+ If lower than 75% health use Evasion
+ If lower than 30 energy, use Adrenaline Rush
+ If available and in melee range, use Blade flurry.

Macro 4 - Combat

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [nostealth]
/run Points=GetComboPoints("player","target")
/run Slice=UnitBuff("player", "Slice and Dice")
/run InCombat = UnitAffectingCombat("player")

/run i=1 while(i<=40)do a={UnitDebuff("player", i)} if (a[5]=="Bleed" or a[1]=="Rend") then break else i=i+1 end end; if i<=40 then RunMacroText("/use Luffa") end

/run if Points < 3 and InCombat then CastSpellByName("Sinister Strike") end
/run if Points > 0 and not Slice and InCombat then CastSpellByName("Slice and Dice") end
/run if Points > 2 and Slice and InCombat then CastSpellByName("Eviscerate") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

~ Luffa code can be removed if not equipped
+ Keep using Sinister strike
+ If any points and no slice and dice, use it
+ If slice and dice then get 3 or more points for Eviscerate

Macro 5 - Every Man for Himself

/stopmacro [stealth]
/run EMFHCD=GetSpellCooldown("Every Man for Himself")
/run FNova=UnitDebuff("player", "Frost Nova")
/run Web=UnitDebuff("player", "Web")
/run Net=UnitDebuff("player", "Net")
/run HNet=UnitDebuff("player", "Hooked Net")
/run Gouge=UnitDebuff("player", "Gouge")
/run Poly=UnitDebuff("player", "Polymorph")
/run Roots=UnitDebuff("player", "Entangling Roots")
/run Hex=UnitDebuff("player", "Hex")
/run Slow=UnitDebuff("player", "Slow")
/run SlowP=UnitDebuff("player", "Slowing Poison")
/run Fear=UnitDebuff("player", "Fear")
/run PHorror=UnitDebuff("player","Psychic Horror")
/run Banish=UnitDebuff("player","Banish")
/run BS=UnitDebuff("player","Black Sludge")
/run if FNova or Web or Net or Gouge or Poly or Hex or Roots or Slow or HNet or SlowP or Fear or PHorror or Banish or BS and EMFHCD == 0 then CastSpellByName("Every Man for Himself") end

+ Automated racial

Macro 6 - Stealth

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [nostealth, combat]
/targetenemy [noharm]
/run Stealth=UnitBuff("player", "Stealth")
/run Creature=UnitCreatureType("target")
/run InMeleeRange=CheckInteractDistance("target",2)
/run if Stealth and InMeleeRange and (Creature == "Humanoid" or Creature == "Undead" or Creature == "Demon") then CastSpellByName("Pick Pocket") end
/run if Stealth then CastSpellByName("Cheap Shot") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+ Pickpocket Humanoid/Undead/Demon
+ Cast Cheap Shot

[Level 60]

Macro 3 - Improved Buff's

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [stealth]
/startattack [combat, nostealth]
/run Flurry=GetSpellCooldown("Blade Flurry")
/run InCombat=UnitAffectingCombat("player")
/run InMeleeRange=CheckInteractDistance("target",2)
/run ARush=GetSpellCooldown("Adrenaline Rush")
/run Evasion=GetSpellCooldown("Evasion")
/run KS=GetSpellCooldown("Killing Spree")
/run Power=UnitPower("Player")
/run THealth=UnitHealth("target")/UnitHealthMax("target")
/run PHealth=UnitHealth("player")/UnitHealthMax("player")
/run if THealth < 0.35 then StopMacro() end
/run if InCombat and InMeleeRange then RunMacroText("/use [combat, nostealth] 13") end
/run if InCombat and InMeleeRange then RunMacroText("/use [combat, nostealth] 14") end
/run if PHealth < 0.75 and InCombat and InMeleeRange then CastSpellByName("Evasion") end
/run if KS == 0 and InCombat then CastSpellByName("Killing Spree") end
/run if KS > 0 and ARush == 0 and InCombat and InMeleeRange and Power < 30  then CastSpellByName("Adrenaline Rush") end
/run if KS > 0 and Flurry and InCombat and InMeleeRange then CastSpellByName("Blade Flurry") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+ Dont use buff's if target is below 35% health
+ If your below 75% health then use Evasion
+ If Killing Spree is off cooldown use it before anything else
+ Use trinkets

Macro 6 - Improved Stealth

/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");
/stopmacro [nostealth, combat]
/targetenemy [noharm]
/run Stealth=UnitBuff("player", "Stealth")
/run Creature=UnitCreatureType("target")
/run InMeleeRange=CheckInteractDistance("target",2)
/run if Stealth then CastSpellByName("Pick Pocket") end 
/run if Stealth then n=GetNumLootItems(); if n>0 then for i=1,n do LootSlot(i) ConfirmLootSlot(i) end; end
/run if Stealth then CastSpellByName("Cheap Shot") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

+ Improved pick pocket looting
+ Credit to Elite Tech/Viral Fly By for the help

[marlboroman1982]

What level range are these macros?

[CrazyCactuaR]

What level range are these macros?

should be a wide range, cant say specifically the levels but if you have the abilities it'll work.

[marlboroman1982]

Might actually use these to level up my 72 rogue then, I'll let you know how it goes.

[tsincaat]

Looks good, so can you create another spammable macro to run all of these?
Something like:

/run RunMacro("stealth")
/run RunMacro("anticaster")
/run RunMacro("antimelee")
/run RunMacro("buffs")
/run RunMacro("combat")

Edit: Worked great! I wrote a 3 line autoit script to spam my macro key, though there's probably a more elegant way of doing it. Did pretty well in WSG all things considered.

[CrazyCactuaR]

Looks good, so can you create another spammable macro to run all of these?
Something like:


Edit: Worked great! I wrote a 3 line autoit script to spam my macro key, though there's probably a more elegant way of doing it. Did pretty well in WSG all things considered.

yeah you can amend the macro's to do that i'm just not a fan of chain linking them together incode. Rarther spam them individually so i can remove one if needed be without braking it.

[CrazyCactuaR]

Updated for Level 50. Lemme know how it works out everyone.

[kxy1983]

This is an EPIC thread, wish i had this when i was levelling my rogue.

[Viral Fly-by]

+Credit to Viral Fly By for the dismantle code.

<3

Nice looking macros man. I focus a lot on the level 80 stuff with all the requests I get but this is excellent work from a different perspective.

[marlboroman1982]

Leveled 71-73 with the combat macro, awesome work thanks man.