Initial commit

.gitattributes

@@ -0,0 +1,2 @@
+# Auto detect text files and perform LF normalization
+* text=auto

Chat/Chat messages.txt

@@ -0,0 +1,21 @@
+Print a string of your current target to chat log
+
+/run DEFAULT_CHAT_FRAME:AddMessage("Hello world! my target name is "..GetUnitName("target"))
+
+
+
+If your current target is a player then send a chat whisper to him/her
+
+/run if UnitExists("target") then SendChatMessage("This is a test but insert whatever you are casting here","WHISPER",nil,UnitName("target")) end
+
+
+
+The following will send your current location into PARTY chat:
+
+/run local x,y=GetPlayerMapPosition("player") SendChatMessage("I'm at "..GetZoneText().." - "..GetMinimapZoneText().." - "..math.floor((x*100)+0,5).." "..math.floor((y*100)+0,5),"PARTY")
+
+
+
+The following will do the same into BATTLEGROUND chat:
+
+/run local x,y=GetPlayerMapPosition("player") SendChatMessage("I'm at "..GetZoneText().." - "..GetMinimapZoneText().." - "..math.floor((x*100)+0,5).." "..math.floor((y*100)+0,5),"BATTLEGROUND") 

Chat/Whisper.txt

@@ -0,0 +1,3 @@
+Whisper hi! to target (doesn't whisper yourself)
+
+/run if not UnitIsUnit("player","target") then SendChatMessage("hi!","WHISPER",nil,UnitName("target"))end 

Druid/Aquatic Travel Form.txt

@@ -0,0 +1,8 @@
+Travel Form
+
+/run local i,x=1,0 while UnitBuff("player",i) do if UnitBuff("player",i)=="Interface\\Icons\\Ability_Druid_TravelForm" then x=1 end i=i+1 end if x==0 then CastSpellByName("Travel Form") else end
+
+
+Aquatic / Travel Form
+
+/run UIErrorsFrame:UnregisterEvent"UI_ERROR_MESSAGE" for i = 2, GetNumShapeshiftForms(), 2 do local _, _, active = GetShapeshiftFormInfo(i) if not active then CastShapeshiftForm(i) end if i == 2 then UIErrorsFrame:RegisterEvent"UI_ERROR_MESSAGE" end end

Druid/Auto attack.txt

@@ -0,0 +1,35 @@
+Spammable Auto Attack Macro w/ Melee and Ranged swapping (put Shoot or Auto Shot into action slot 1)
+
+/run if CheckInteractDistance("target", 3) and (not PlayerFrame.inCombat) then AttackTarget() elseif not IsAutoRepeatAction(1) then CastSpellByName("Auto Shot OR Shoot") end
+
+Replace Auto Shot or Shoot with your classes ranged auto attack
+
+
+
+Start Melee Attack
+
+/script if (not PlayerFrame.inCombat) then AttackTarget() end
+
+
+
+Auto Shot
+
+/script if not IsAutoRepeatAction(xx) then CastSpellByName("Auto Shot"); end
+
+
+
+Auto attack
+
+/run for z=1,172 do if IsAttackAction(z)then if not IsCurrentAction(z)then UseAction(z);end;end;end;
+
+
+
+Melee shoot
+
+/script local _,_,i=strfind(GetInventoryItemLink("player",18),"\124Hitem:(%d+)")local _,_,_,_,_,p=GetItemInfo(i)local t={}t.Bows="Bow"t.Guns="Gun"t.Crossbows="Crossbow"t.Thrown="Throw"CastSpellByName((string.gsub(t[p],"^([^T])","Shoot %1")))
+
+
+
+Shoot (wand) Replace X with the Slot id of the skill on your hotbar 
+
+/script if not IsAutoRepeatAction(X) then CastSpellByName("Shoot"); end

Druid/Bear.txt

@@ -0,0 +1,15 @@
+Bear Form from any form, 2 clicks.
+
+/script local s,_ for i=1,5 do _,_,s=GetShapeshiftFormInfo(i)if s then CastShapeshiftForm(i)break end end if not s then CastShapeshiftForm(1) end
+
+
+
+Spammable bear form/feral charge
+
+/run local _, _, active = GetShapeshiftFormInfo(1) if not active or IsControlKeyDown() then CastShapeshiftForm(1) else CastSpellByName("Feral Charge")end
+
+
+
+Switch from any stance to Bear form, cast Bush
+
+/run local _, _, active = GetShapeshiftFormInfo(1) if not active or IsControlKeyDown() then for i = 2, 4 do _, _, active = GetShapeshiftFormInfo(i) if active then CastShapeshiftForm(i) return end end CastShapeshiftForm(1) else CastSpellByName"Bash" end 

Druid/Brilliant Oil.txt

@@ -0,0 +1,8 @@
+Enchant Brilliant Mana Oil on weapon
+
+/run for b=0,4 do for s=1,18 do local i=GetContainerItemLink if not(i(b,s)==nil)then if strfind(i(b,s), "Brilliant Mana Oil")then  UseContainerItem(b,s)PickupInventoryItem(16)ReplaceEnchant()end end end end
+
+
+Enchant Brilliant Wizard Oil on weapon
+
+/run for b=0,4 do for s=1,18 do local i=GetContainerItemLink if not(i(b,s)==nil)then if strfind(i(b,s), "Brilliant Wizard Oil")then  UseContainerItem(b,s)PickupInventoryItem(16)ReplaceEnchant()end end end end

Druid/Buff rank depending on target's level .txt

@@ -0,0 +1,21 @@
+Regrowth
+
+/script r=9;l={12,18,24,30,36,42,48,54,60};if not UnitIsFriend("player","target")thenTargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l-10) thenCastSpellByName("Regrowth(Rank "..i..")");break;end;end
+
+
+
+Rejuvenation
+
+/script r=10;l={4,10,16,22,28,34,40,46,52,58};if not UnitIsFriend("player","target")thenTargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l-10) thenCastSpellByName("Rejuvenation(Rank "..i..")");break;end;end
+
+
+
+Mark of the Wild
+
+/script r=7;l={1,10,20,30,40,50,60};if not UnitIsFriend("player","target")thenTargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l-10) thenCastSpellByName("Mark of the Wild(Rank "..i..")");break;end;end
+
+
+
+Thorns
+
+/script r=6;l={6,14,24,34,44,54};if not UnitIsFriend("player","target")thenTargetUnit("player");end;t=UnitLevel("target");for i=r,1,-1 do if (t>=l-10) thenCastSpellByName("Thorns(Rank "..i..")");break;end;end

Druid/Caster form.txt

@@ -0,0 +1,9 @@
+Caster Form
+
+/run for i = 1, GetNumShapeshiftForms() do local _, _, active = GetShapeshiftFormInfo(i) if active then CastShapeshiftForm(i) return end end
+
+
+
+Unshift
+
+/run for i=1, GetNumShapeshiftForms() do _, name, active = GetShapeshiftFormInfo(i) if( active ~= nil ) then CastShapeshiftForm(i) break end end

Druid/Cat.txt

@@ -0,0 +1,58 @@
+Spammable cat form
+
+/run local _, _, active = GetShapeshiftFormInfo(3) if not active then CastShapeshiftForm(3)end
+
+
+
+Cat Form / Prowl
+
+/run local _, _, active = GetShapeshiftFormInfo(3) if not active or IsControlKeyDown() then CastShapeshiftForm(3) else CastSpellByName"Prowl" end
+
+
+
+One button pounce/rake
+
+/run local i,x=1,0 while UnitBuff("player",i) do if UnitBuff("player",i)=="Interface\\Icons\\Ability_Ambush" then x=1 end i=i+1 end if x==1 then CastSpellByName("Pounce") else CastSpellByName("Rake")end
+
+
+
+One button Rake/Claw
+
+/run local i,x=1,0 while UnitDebuff("target",i) do if UnitDebuff("target",i)=="Interface\\Icons\\Ability_Druid_Disembowel" then x=1 end i=i+1 end if x==0 then CastSpellByName("Rake") else CastSpellByName("Claw")end
+
+
+
+One button Prowl/Ravage
+
+/run local i,x=1,0 while UnitBuff("player",i) do if UnitBuff("player",i)=="Interface\\Icons\\Ability_Ambush" then x=1 end i=i+1 end if x==0 then CastSpellByName("Prowl") else CastSpellByName("Ravage")end
+
+
+
+One button ravage/shred
+
+/run local i,x=1,0 while UnitBuff("player",i) do if UnitBuff("player",i)=="Interface\\Icons\\Ability_Ambush" then x=1 end i=i+1 end if x==1 then CastSpellByName("Ravage") else CastSpellByName("Shred")end
+
+
+
+Rip/rake
+
+/run if ( GetComboPoints() >= 3 ) then CastSpellByName("Rip"); else if (UnitMana("player") >= 40 ) then CastSpellByName("Rake")end end
+
+
+
+Powershift/shred
+
+/script u=UnitMana('Player'); c=CastSpellByName; f=UnitPowerType("Player"); if (u<=30) and (f==3) then c"Cat Form"; elseif (f==0) then c"Cat Form"; end;
+/cast Shred
+
+
+
+Unshift + cat + dash
+
+/run local f=0 for i=1,GetNumShapeshiftForms()do if({GetShapeshiftFormInfo(i)})[3]then f=i end end if f ~= 0 and f ~= 3 then CastShapeshiftForm(f) else if f == 3 then CastSpellByName("Dash") else CastShapeshiftForm(3) end end
+
+
+
+Unshift + cat + prowl
+
+/run local f=0 for i=1,GetNumShapeshiftForms()do if({GetShapeshiftFormInfo(i)})[3]then f=i end end if f ~= 0 and f ~= 3 then CastShapeshiftForm(f) else if f == 0 then CastShapeshiftForm(3) end end /cast [stance:3, nostealth] Prowl

Druid/Dismount shift.txt

@@ -0,0 +1,39 @@
+1. Dismount macro - not very useful by itself, but is used for other macros. I placed it into slot №27, see the action bar slot reference:
+
+ActionBar page 1: slots 1 to 12
+ActionBar page 2: slots 13 to 24
+ActionBar page 3 (Right ActionBar): slots 25 to 36
+ActionBar page 4 (Right ActionBar 2): slots 37 to 48
+ActionBar page 5 (Bottom Right ActionBar): slots 49 to 60
+ActionBar page 6 (Bottom Left ActionBar): slots 61 to 72
+
+
+/run local i=0 g=GetPlayerBuff while not (g(i) == -1) do if(strfind(GetPlayerBuffTexture(g(i)),"Mount"))then CancelPlayerBuff(g(i)) end i=i+1 end
+
+2. Dismount + switch to caster form - somewhat useful, but still mainly used by other macros. I placed it into slot №37.
+
+/run UseAction(27)
+/run for i=1, GetNumShapeshiftForms() do _, name, active = GetShapeshiftFormInfo(i) if( active ~= nil ) then CastShapeshiftForm(i) break end end
+
+3. Cat form.
+
+It will dismount/cancel any other form and then switch to the cat form, and if you're already there, it will activate "Track Humanoids".
+
+/script c=CastSpellByName; f=UnitPowerType("Player"); if not (f==3) then UseAction(37); else c"Track Humanoids"; end; if (f==0) then c"Cat Form"; end;
+
+4. Bear form.
+Same as above, but for dire bear form. You have to edit it if you only have normal bear form. 
+
+/script c=CastSpellByName; f=UnitPowerType("Player"); if not (f==1) then UseAction(37); else end; if (f==0) then c"Dire Bear Form"; end;
+
+5. Travel form.
+
+Unlike other macros, it won't cancel any other form, so you have to use it while you're in caster form already.
+
+/run local i,x=1,0 while UnitBuff("player",i) do if UnitBuff("player",i)=="Interface\\Icons\\Ability_Druid_TravelForm" then x=1 end i=i+1 end if x==0 then CastSpellByName("Travel Form") else end
+
+You can place all those macros whenever you want, just make sure that commands like UseAction() link to a correct macro.
+
+
+
+Made by Oakenlix

Druid/Druid macros.txt

@@ -0,0 +1,92 @@
+Innervate and whisper to target
+
+/cast Innervate
+/run if UnitExists"target"then SendChatMessage("flavor text","WHISPER",nil,UnitName"target")end
+
+
+
+
+Rebirth and yell
+
+/cast Rebirth(Rank 5)
+/y Casting Rebirth on %T!
+
+
+
+
+Nature's Swiftness and Max Healing Touch combo
+
+/cast Nature's Swiftness
+/cast Healing Touch(Rank 11)
+
+
+
+
+Barkskin with auto remove
+
+/run local i=0 g=GetPlayerBuff while not (g(i) == -1) do if(strfind(GetPlayerBuffTexture(g(i)),"Spell_Nature_StoneClawTotem"))then CancelPlayerBuff(g(i)) end i = i + 1; end; CastSpellByName("Barkskin")
+
+Clicking once casts Barkskin. Clicking again will remove it.
+
+
+
+
+Faerie Fire in any form
+
+/script i=1;m=0;while(UnitBuff("player",i)~=nil) do if(strfind(UnitBuff("player",i),"Form")~=nil) then m=1; end;i=i+1;end; c=CastSpellByName; if(m==1) then c("Faerie Fire (Feral)()");else c("Faerie Fire(Rank 4)");end;
+
+
+
+
+Bear, Cat, and Shapeshift Macros
+
+
+Enrage with auto remove
+
+/run local i=0 g=GetPlayerBuff while not (g(i) == -1) do if(strfind(GetPlayerBuffTexture(g(i)),"Ability_Druid_Enrage"))then CancelPlayerBuff(g(i)) end i=i+1 end CastSpellByName("Enrage")
+
+Clicking once casts Enrage. Clicking again will remove it.
+
+
+
+
+Ravage and Shred auto select
+
+/script i=1;m=0;while(UnitBuff("player",i)~=nil) do if(strfind(UnitBuff("player",i),"Ability_Ambush")~=nil) then m=1; end;i=i+1;end; c=CastSpellByName; if(m==1) then c("Ravage(rank 4)");else c("Shred(rank 5)");end;
+
+
+
+
+Claw and Ferocious Bite combo
+
+/run if GetComboPoints()>=4 then CastSpellByName("Ferocious Bite") else CastSpellByName("Claw") end
+
+Change 4 to 5 if you want it to build to 5 combo points before Ferocious Bite casts
+
+
+
+Shred and Ferocious Bite combo
+
+/run if GetComboPoints()>=4 then CastSpellByName("Ferocious Bite") else CastSpellByName("Shred") end
+
+Change 4 to 5 if you want it to build to 5 combo points before Ferocious Bite casts
+
+
+
+Shred and Powershifting
+
+/cast Shred(Rank 5)
+/script u=UnitMana('Player'); c=CastSpellByName; f=UnitPowerType("Player"); if (u<=30) and (f==3) then c"Cat Form"; elseif (f==0) then c"Cat Form"; end;
+
+Energy level is set to 30. Change to a different number for a different cutoff for when you shift to caster
+
+
+
+Shred, Ferocious Bite, and Powershifting one button brainless option
+
+/run if GetComboPoints()>=4 then CastSpellByName("Ferocious Bite") else CastSpellByName("Shred") end
+/script u=UnitMana('Player'); c=CastSpellByName; f=UnitPowerType("Player"); if (u<=30) and (f==3) then c"Cat Form"; elseif (f==0) then c"Cat Form"; end;
+
+
+
+Made by Taladril 

Druid/Faerie Fire.txt

@@ -0,0 +1,9 @@
+Feral Faerie Fire when shapeshifted, Faerie Fire if not
+
+/script i=1;m=0;while(UnitBuff("player",i)~=nil) do if(strfind(UnitBuff("player",i),"Form")~=nil) then m=1; end;i=i+1;end; c=CastSpellByName; if(m==1) then c("Faerie Fire (Feral)()");else c("Faerie Fire");end;
+
+
+
+Faerie Fire on targettarget if friendly target, else Faerie Fire
+
+/run if UnitCanAttack("player","target") == 1 then CastSpellByName("Faerie Fire")else TargetUnit("targettarget") CastSpellByName("Faerie Fire") TargetLastTarget() end

Druid/Feral Macros.txt

@@ -0,0 +1,42 @@
+Enrage + cancel buff
+
+The spell Enrage causes you to take more damage but is really nice when tanking if you’ve specced into it in talents. In order for it to be useful while tanking you have to remove the buff quickly enough. This is annoying when you have to click the buff with your mouse to cancel. This can be done quickly in one macro where you press it once to cast, and second to cancel the buff.
+
+/run local i=0 g=GetPlayerBuff while not (g(i) == -1) do if(strfind(GetPlayerBuffTexture(g(i)),"Ability_Druid_Enrage"))then CancelPlayerBuff(g(i)) end i=i+1 end CastSpellByName("Enrage")
+
+
+Barkskin + cancel buff
+
+The spell Barkskin reduces damage taken but increases casting speed. Its useful if you accidentally catch aggro but can be dangerous when you need to heal, its a tradeoff. This macro helps you quickly cancel it.
+
+/run local i=0 g=GetPlayerBuff while not (g(i) == -1) do if(strfind(GetPlayerBuffTexture(g(i)),"Spell_Nature_StoneClawTotem"))then CancelPlayerBuff(g(i)) end i = i + 1; end; CastSpellByName("Barkskin")
+
+
+Tiger’s Fury + Ravage combo spammable macro
+
+This macro will prevent accidentally overwriting Tiger’s Fury if its already active and also if it is active, attempt to use Ravage.
+
+/run i=0 m=0 c=CastSpellByName while not (GetPlayerBuff(i)==-1) do if (strfind(GetPlayerBuffTexture(GetPlayerBuff(i)),"Ability_Mount_JungleTiger")) then m=1 end i=i+1 end if m==0 then c("Tiger's Fury") else c("Ravage") end
+
+
+
+If you only want the Tiger’s Fury spammable without ravage you can get this one instead:
+
+/run i=0 m=0 c=CastSpellByName while not (GetPlayerBuff(i)==-1) do if (strfind(GetPlayerBuffTexture(GetPlayerBuff(i)),"Ability_Mount_JungleTiger")) then m=1 end i=i+1 end if m==0 then c("Tiger's Fury") end
+
+
+Claw / Ferocious Bite spammable macro
+
+This macro serves as a replacement for your claw ability. When you have 5 combo points on your target it will cast Ferocious bite instead.
+
+/run if GetComboPoints()>=5 then CastSpellByName("Ferocious Bite") else CastSpellByName("Claw") end
+
+
+
+Same as above but with auto targeting + auto attack.
+
+/run if GetUnitName("target")==nil then TargetNearestEnemy() end if not IsCurrentAction(25) then UseAction(25) end if GetComboPoints()>=5 then CastSpellByName("Ferocious Bite") else CastSpellByName("Claw") end
+
+
+
+Made by Sandsten

Druid/Heal nearest friend.txt

@@ -0,0 +1,3 @@
+Heal friends in range who is low on hp(Set to react on < 90%)
+
+/script for i=1,40 do TargetNearestFriend(); if UnitHealth("target")/UnitHealthMax("target") < 0.9 then if UnitIsPlayer("target") then CastSpellByName("Healing Touch(Rank 3)"); end end end; TargetLastEnemy();