LuaNinja Macro Collection

[Elitetech]

Wow Awesome job on the prot warrior script absolutely loving it, when you have a moment and i'm sure it'll take a while, could you add a little more functionailit to the arms warrior script.

I was wondring if the following features could be added:
Victory Rush
Change to Berserker Stance and pummel on target casting, then back to battle stance
Use of Enraged Regeneration, (perhaps use of health stone to).

Heya, past those lines wherever you want in the script

/run if UnitHealth('player')<10000 and GetSpellCooldown("Enraged Regeneration")==0 and IsUsableSpell("Enraged Regeneration")==1 then CastSpellByName("Enraged Regeneration") end
/run if GetSpellCooldown("Victory Rush")==0 and IsUsableSpell("Victory Rush")==1 then CastSpellByName("Victory Rush") end
/run if UnitCastingInfo("target") and GetSpellCooldown("Pummel")==0 then RunMacroText("/castsequence Berserker Stance, Pummel, Battle Stance") end
/run if UnitHealth('player')<10000 then RunMacroText("/use INSERT-NAME-OF-HEALTHSTONE") end

And this one in the beginning of the script if they above ain't going back to Battle Stance

/run if GetShapeshiftForm()==3 then CastSpellByName("Battle Stance") end

and if that doesn't work then

/run if GetShapeshiftForm("Battle Stance")==0 then CastSpellByName("Battle Stance") end

[asdjaa]

@asdjaa



Shouldn't that line be changed to elseif (cp == 4) if you want it to Envenom on 4 points?

No, there's some other lines for that further down. Those lines are for when your Slice and Dice is running low, so it casts an envenom to keep it from dropping.

Anyway, fixed my problem. I just copy-pasted the macro again, and edited the values as required. I must've done something to screw it up, but it doesn't matter now

[Mynewt]

Heya, past those lines wherever you want in the script

/run if UnitHealth('player')<10000 and GetSpellCooldown("Enraged Regeneration")==0 and IsUsableSpell("Enraged Regeneration")==1 then CastSpellByName("Enraged Regeneration") end
/run if GetSpellCooldown("Victory Rush")==0 and IsUsableSpell("Victory Rush")==1 then CastSpellByName("Victory Rush") end
/run if UnitCastingInfo("target") and GetSpellCooldown("Pummel")==0 then RunMacroText("/castsequence Berserker Stance, Pummel, Battle Stance") end
/run if UnitHealth('player')<10000 then RunMacroText("/use INSERT-NAME-OF-HEALTHSTONE") end

And this one in the beginning of the script if they above ain't going back to Battle Stance

/run if GetShapeshiftForm()==3 then CastSpellByName("Battle Stance") end

and if that doesn't work then

/run if GetShapeshiftForm("Battle Stance")==0 then CastSpellByName("Battle Stance") end

Wow that was damn fast thank you so much!

[Mynewt]

I'm guessing (i'm trying to learn how to write these myself but its slow going-- but i will get there at some point) that if i also added the line:

/run if UnitHealth('player')<4000 then RunMacroText("/use Runic Helath Potion") end

That i'd use the health potion if at 4K hp or lower is that right?

[frallan123]

could anyone explain to me what I should do with the DK macros. should I make one macro with everything inside or macro one by one. I tried one by one and it says blizzard blocked ui, im using windows 7 btw.

[Elitetech]

I'm guessing (i'm trying to learn how to write these myself but its slow going-- but i will get there at some point) that if i also added the line:

/run if UnitHealth('player')<4000 then RunMacroText("/use Runic Helath Potion") end

That i'd use the health potion if at 4K hp or lower is that right?

That one will work mate. Just fix the health potion typo. What you're saying there is that if your health is below 4000 then use a Runic Health Potion. Works just fine

[CrazyCactuaR]

Any of you lads know how to postpone a command from executing until loot is fully received. Idea is to cast pickpocket and wait until its done before doing the opening attack. So hate missing out on those greys ;p

[Elitetech]

Any of you lads know how to postpone a command from executing until loot is fully received. Idea is to cast pickpocket and wait until its done before doing the opening attack. So hate missing out on those greys ;p

/run if GetNumLootItems() > 0 then RunMacroText("/run print'Looting'") else CastSpellByName("Opener here") end

Will print "Looting" in your chat if you're looting. Otherwise it'll cast the spell "Opener here". Enjoy

[CrazyCactuaR]

/run if GetNumLootItems() > 0 then RunMacroText("/run print'Looting'") else CastSpellByName("Opener here") end

Will print "Looting" in your chat if you're looting. Otherwise it'll cast the spell "Opener here". Enjoy

Thank's dude, now modified it as;

/run if Stealth and InMeleeRange and (Creature == "Humanoid" or Creature == "Undead" or Creature == "Demon") then CastSpellByName("Pick Pocket") end
/run if GetNumLootItems() == 0 and Stealth then CastSpellByName("Cheap Shot") end

Wont be long till i need something else doing

Edit: After trying it out it still seems to do cheap shot while looting so still resulting in not collecting the full table.

[Elitetech]

Thank's dude, now modified it as;

/run if Stealth and InMeleeRange and (Creature == "Humanoid" or Creature == "Undead" or Creature == "Demon") then CastSpellByName("Pick Pocket") end
/run if GetNumLootItems() == 0 and Stealth then CastSpellByName("Cheap Shot") end

Wont be long till i need something else doing

Edit: After trying it out it still seems to do cheap shot while looting so still resulting in not collecting the full table.

/run if Stealth and InMeleeRange and (Creature == "Humanoid" or Creature == "Undead" or Creature == "Demon") then CastSpellByName("Pick Pocket") end
/run if GetNumLootItems() == 0 and Stealth then RunMacroText("/in 1 /cast Cheap Shot") end

Try that one. Your problem might be caused because of the loot window showing up AFTER your instant cast of Cheap shot. This should give you a 1 second chance to loot

[CrazyCactuaR]

/run if Stealth and InMeleeRange and (Creature == "Humanoid" or Creature == "Undead" or Creature == "Demon") then CastSpellByName("Pick Pocket") end
/run if GetNumLootItems() == 0 and Stealth then RunMacroText("/in 1 /cast Cheap Shot") end

Try that one. Your problem might be caused because of the loot window showing up AFTER your instant cast of Cheap shot. This should give you a 1 second chance to loot

It's throwing up spam flooding text in general tab of

"Error, /in cannot call secure command: /cast"

and refuses to do it.

[Elitetech]

lol wtf, thought that was why we had luaninja.

Try changing it to /run if GetNumLootItems() == 0 and Stealth then RunMacroText("/in 1 /run CastSpellByName("Cheap Shot")") end

[Mynewt]

Earlier in this thread I posted a request/question about stopping the propecting script, well after a little work i've figured it out myself. I'm sure someone can improve on it but at least it works and I personally don't think its a bad effort for my first real attempt. Anyway here goes:

/cast Disenchant
/StopMacro [mod]
/use [ITEM NAME]
/in 3 /run RunMacro("DE")

[CrazyCactuaR]

lol wtf, thought that was why we had luaninja.

Try changing it to /run if GetNumLootItems() == 0 and Stealth then RunMacroText("/in 1 /run CastSpellByName("Cheap Shot")") end

Alright so far i've done the following for my 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") else CastSpellByName("Cheap Shot") end
/run if GetNumLootItems() == 0 and Stealth then RunMacroText("/in 1 /run CastSpellByName("Cheap Shot")") else RunMacro("Stealth") end
/run StaticPopup_Hide("MACRO_ACTION_FORBIDDEN");

I'm finding it more and more common coming into simple problems, such as it'll loop pick pocket and never do cheap shot. On target's it cannot pick pocket but is 'presumed' it can by my creature check it'll just sit idle.

I think one thing that needs doing is having it cast pickpocket once and make sure only once. Then wait for the loot to be taken and cast cheap shot. No idea how to do those checks myself though.

[Mynewt]

What would be the script for pala healing to use Divine Plea on every cooldown, and arcane torrent on every cooldown?