[Release] Denatharion Whisperwind boss Script!

[svedin]

*****Update Wisperwind with some new spells and fixed a bug******

Info: Works with ArcEmu (Build 1878+)
[Denatharion Whisperwind] is the banish brother to [Tyrande Whisperwind], and he can be used like a world boss or something like that.
Hp: 5,578,000
Mana: 67,740

"Arch-Druid" Denatharion Whisperwind

Screenshots of his abilities.









Sql And Lua Codes.

Sql:

insert into `creature_names` (`entry`, `name`, `subname`, `info_str`, `Flags1`, `type`, `family`, `rank`, `unk4`, `spelldataid`, `male_displayid`, `female_displayid`, `male_displayid2`, `female_displayid2`, `unknown_float1`, `unknown_float2`, `civilian`, `leader`) 
values ('910831', "Denatharion Whisperwind", "Archdruid of Darnassus", '', '0', '7', '0', '3', '0', '0', '1542', '0', '0', '0', '1', '1', '0', '0');

insert into `creature_proto` (`entry`, `minlevel`, `maxlevel`, `faction`, `minhealth`, `maxhealth`, `mana`, `scale`, `npcflags`, `attacktime`, `attacktype`, `mindamage`, `maxdamage`, `can_ranged`, `rangedattacktime`, `rangedmindamage`, `rangedmaxdamage`, `respawntime`, `armor`, `resistance1`, `resistance2`, `resistance3`, `resistance4`, `resistance5`, `resistance6`, `combat_reach`, `bounding_radius`, `auras`, `boss`, `money`, `invisibility_type`, `death_state`, `walk_speed`, `run_speed`, `fly_speed`, `extra_a9_flags`, `spell1`, `spell2`, `spell3`, `spell4`, `spell_flags`, `modImmunities`) 
values ('910831', '80', '80', '14', '5578000', '5578000', '104500', '1', '0', '1670', '0', '6500', '8000', '0', '0', '0', '0', '0', '8000', '0', '0', '50', '0', '0', '0', '0', '0', "0", '1', '4000000', '0', '0', '2.50', '8.00', '14.00', '0', '0', '0', '0', '0', '0', '0');

Lua:

--[[
Script Made By Svedin]]


function Denatharion_Whisperwind_OnCombat(Unit, Event) 
Unit:SendChatMessage(12, 0, "A Brave Champions, now you will stand infront the biggest challenge in your life!")
Unit:RegisterEvent("Denatharion_Whisperwind_Wrath", 52000, 20)
Unit:RegisterEvent("Denatharion_Whisperwind_Thunder", 91000, 6)
Unit:RegisterEvent("Denatharion_Whisperwind_Rejuvenation", 86000, 7)
Unit:RegisterEvent("Denatharion_Whisperwind_Entanglingroot", 76000, 10)
Unit:RegisterEvent("Denatharion_Whisperwind_Moonfire", 67000, 13)
Unit:RegisterEvent("Denatharion_Whisperwind_Cyclone", 84000, 7)
Unit:RegisterEvent("Denatharion_Whisperwind_Eyebeam", 70000, 24)
Unit:RegisterEvent("Denatharion_Whisperwind_Spellreflection", 64000, 7)
Unit:RegisterEvent("Denatharion_Whisperwind_Balllightning", 79000, 14)
Unit:RegisterEvent("Denatharion_Whisperwind_Shadowbane", 60000, 8)
Unit:RegisterEvent("Denatharion_Whisperwind_pahseone",1000,0)
Unit:RegisterEvent("Denatharion_Whisperwind_Maul", 45000, 15)
Unit:RegisterEvent("Denatharion_Whisperwind_Mangle", 65000, 10)
Unit:RegisterEvent("Denatharion_Whisperwind_Direbearbuff", 100, 1)
Unit:RegisterEvent("Denatharion_Whisperwind_Rendflesh", 41000, 14)
Unit:RegisterEvent("Denatharion_Whisperwind_Fetidrot", 45000, 16)
end

function Denatharion_Whisperwind_Thunder(pUnit, Event) 
pUnit:FullCastSpellOnTarget(53630, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Rejuvenation(pUnit, Event) 
pUnit:CastSpell(20701, pUnit:GetClosestPlayer()) 
end

function Denatharion_Whisperwind_Entanglingroot(pUnit, Event) 
pUnit:FullCastSpellOnTarget(57095, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Moonfire(pUnit, Event) 
pUnit:FullCastSpellOnTarget(20690, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Eyebeam(pUnit, Event) 
pUnit:FullCastSpellOnTarget(59965, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Spellreflection(pUnit, Event) 
pUnit:FullCastSpellOnTarget(47981, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Balllightning(pUnit, Event) 
pUnit:FullCastSpellOnTarget(59800, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Shadowbane(pUnit, Event) 
pUnit:FullCastSpellOnTarget(48294, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Wrath(pUnit, Event) 
pUnit:FullCastSpellOnTarget(20698, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Thunder(pUnit, Event) 
pUnit:FullCastSpellOnTarget(53630, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Rejuvenation(pUnit, Event) 
pUnit:CastSpell(20701, pUnit:GetClosestPlayer()) 
end

function Denatharion_Whisperwind_Moonfire(pUnit, Event) 
pUnit:FullCastSpellOnTarget(20690, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Cyclone(pUnit, Event) 
pUnit:FullCastSpellOnTarget(61662, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Balllightning(pUnit, Event) 
pUnit:FullCastSpellOnTarget(59800, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Spellreflection(pUnit, Event) 
pUnit:FullCastSpellOnTarget(47981, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Shadowbane(pUnit, Event) 
pUnit:FullCastSpellOnTarget(48294, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Maul(pUnit, Event) 
pUnit:FullCastSpellOnTarget(54459, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Mangle(pUnit, Event) 
pUnit:FullCastSpellOnTarget(31041, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Rendflesh(pUnit, Event) 
pUnit:FullCastSpellOnTarget(42397, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Maul(pUnit, Event) 
pUnit:FullCastSpellOnTarget(54459, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Mangle(pUnit, Event) 
pUnit:FullCastSpellOnTarget(31041, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Direbearbuff(pUnit, Event) 
pUnit:CastSpell(9634, pUnit:GetClosestPlayer()) 
end

function Denatharion_Whisperwind_Rendflesh(pUnit, Event) 
pUnit:FullCastSpellOnTarget(42397, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_Fetidrot(pUnit, Event) 
pUnit:FullCastSpellOnTarget(59300, pUnit:GetRandomPlayer(0)) 
end

function Denatharion_Whisperwind_pahseone(pUnit, Event) 
if pUnit:GetHealthPct() < 100 then 
pUnit:RemoveEvents(); 
pUnit:FullCastSpell(20698, 57095, 61662)
pUnit:RegisterEvent("Denatharion_Whisperwind_Wrath", 52000, 20)
pUnit:RegisterEvent("Denatharion_Whisperwind_Rejuvenation", 86000, 7)
pUnit:RegisterEvent("Denatharion_Whisperwind_Entanglingroot", 76000, 16)
pUnit:RegisterEvent("Denatharion_Whisperwind_Cyclone", 84000, 7)
pUnit:RegisterEvent("Denatharion_Whisperwind_phasetwo",1000,0)
end 
end

function Denatharion_Whisperwind_phasetwo(pUnit, Event) 
if pUnit:GetHealthPct() < 75 then 
pUnit:RemoveEvents();
pUnit:SendChatMessage(14, 0, "Ashes to ashes, dust to dust!")
pUnit:PlaySoundToSet(11055) 
pUnit:FullCastSpell(20698, 59965, 53630)
pUnit:RegisterEvent("Denatharion_Whisperwind_Wrath", 52000, 20)
pUnit:RegisterEvent("Denatharion_Whisperwind_Rejuvenation", 86000, 7)
pUnit:RegisterEvent("Denatharion_Whisperwind_Thunder", 91000, 6)
pUnit:RegisterEvent("Denatharion_Whisperwind_Eyebeam", 70000, 24)
pUnit:RegisterEvent("Denatharion_Whisperwind_Moonfire", 67000, 13)
pUnit:RegisterEvent("Denatharion_Whisperwind_phasethree",1000,0)
end 
end

function Denatharion_Whisperwind_phasethree(pUnit, Event) 
if pUnit:GetHealthPct() < 50 then 
pUnit:RemoveEvents(); 
pUnit:FullCastSpell(48294, 47981, 59800, 59300)
pUnit:RegisterEvent("Denatharion_Whisperwind_Rejuvenation", 86000, 7)
pUnit:RegisterEvent("Denatharion_Whisperwind_Spellreflection", 64000, 7)
pUnit:RegisterEvent("Denatharion_Whisperwind_Balllightning", 65000, 14)
pUnit:RegisterEvent("Denatharion_Whisperwind_Shadowbane", 60000, 8)
pUnit:RegisterEvent("Denatharion_Whisperwind_Fetidrot", 45000, 16)
pUnit:RegisterEvent("Denatharion_Whisperwind_phasefour",1000,0)
end 
end

function Denatharion_Whisperwind_phasefour(pUnit, Event) 
if pUnit:GetHealthPct() < 25 then 
pUnit:RemoveEvents();
pUnit:SendChatMessage(12, 0, "The Beast will show no mercy ") 
pUnit:FullCastSpell(0)
pUnit:SetModel(1083)
pUnit:RegisterEvent("Denatharion_Whisperwind_Maul", 45000, 15)
pUnit:RegisterEvent("Denatharion_Whisperwind_Mangle", 65000, 10)
pUnit:RegisterEvent("Denatharion_Whisperwind_Direbearbuff", 100, 1)
pUnit:RegisterEvent("Denatharion_Whisperwind_Rendflesh", 41000, 14)
pUnit:RegisterEvent("Denatharion_Whisperwind_phasefive",1000,0)
end 
end

function Denatharion_Whisperwind_phasefive(pUnit, Event) 
if pUnit:GetHealthPct() < 5 then 
pUnit:RemoveEvents(); 
pUnit:FullCastSpell(61662, 20698, 59965)
pUnit:SetModel(1542)
pUnit:RegisterEvent("Denatharion_Whisperwind_Wrath", 5200, 20)
pUnit:RegisterEvent("Denatharion_Whisperwind_Rejuvenation", 13000, 7)
pUnit:RegisterEvent("Denatharion_Whisperwind_Moonfire", 37000, 13)
end 
end

function Denatharion_Whisperwind_OnLeaveCombat(Unit, Event) 
Unit:RemoveEvents() 
Unit:SendChatMessage(12, 0, "Nothing can stand in the way of the nature!") 
end

function Denatharion_Whisperwind_OnDied(Unit, Event) 
Unit:RemoveEvents() 
Unit:SendChatMessage(12, 0, "Aaaah! The nature betrayed me!") 
end

function Denatharion_Whisperwind_OnKilledTarget(Unit, Event) 
Unit:SendChatMessage(12, 0, "Your soul will rest in the mothernatures cradle!") 
end

RegisterUnitEvent(910831, 1, "Denatharion_Whisperwind_OnCombat")
RegisterUnitEvent(910831, 2, "Denatharion_Whisperwind_OnLeaveCombat")
RegisterUnitEvent(910831, 3, "Denatharion_Whisperwind_OnKilledTarget")
RegisterUnitEvent(910831, 4, "Denatharion_Whisperwind_OnDied")

Enjoy!
//Svedin

[Djfrederick]

You are getting better and better to this!

Pew pew +Rep from me

Still got to spread Oo

[Edude]

LOL I have never seen as many "Register Events" together in all my life! Rofl

Back on Topic, its a good Veteran script, so you deserve a +Rep cookie, and continue to work

[Mango Jerry]

Nice script!
Keep working on it.

[MasterOfMU]

I like that Bear Form, nice work.

[svedin]

LOL I have never seen as many "Register Events" together in all my life! Rofl

hehe :P thanks for all the comments =D

[svedin]

Bump... leechers?

****Updated Wisperwind*****

[stoneharry]

I know i'm bumping this a page by commenting but in less than I day I didn't even see this post on the front page. If it sinks that fast even though it's a good Lua, cuts to the point, brilliant SS (perfect size) and still nobody even commenting much? This deserves more. +Rep x3 well worth it. Best script in a long time
Edit: Shame, I need to rep up to 10 other people before I can rep you again Sorry.

[VictoRo]

really nice script there mate, you get a +rep from me (;

[svedin]

Thanks for the comments, and if you got some buggs so please post them so i can try to fix the buggs

//Svedin

[larzzon]

Assume Script buddy! +Rep! Keep work up

[youngbuck]

WoW Great Work i write C++ so i dont understand LUA that much but yea....WOW great job. You have some major talent.

[svedin]

Haha thanks Larzzon and youngbuck.. i thought that this thread was dead ^^

[Mircast]

LOL!
Aaaah! The nature betrayed me!
Best quote.

+Rep btw