[LUA]Boss - Titan Lord

[Kiyoshi]

Here is a custom boss I scripted:


Titan Lord:

--[[This script was fully made by [Cloud] of Mmowned. 
You can redistribute this script but please give credit 
where credit is due. To report  bug you can add my MSN at 
[email protected] or PM me on the forums, my name there is
also [Cloud] with the brackets included. I hope you guys 
enjoy the script and good day :D --]]

function TitanLord_OnEnterCombat(pUnit,event)
	pUnit:SendChatMessage(12, 0, "Who dare disturbs the Lord of Titans?!")
	pUnit:RegisterEvent("TitanLord_phase1", 1000, 0)
end

function TitanLord_phase1(pUnit,event)
	pUnit:RemoveEvents()
	if pUnit:GetHealthPct() < 90 then
	pUnit:SendChatMessage(12, 0, "You will pay for this treachery!")
	pUnit:RegisterEvent("TitanLord_phase1a", 8000, 0)
	pUnit:RegisterEvent("TitanLord_Knockbackshadow", 10000, 0)
	pUnit:RegisterEvent("TitanLord_phase2", 1000, 0)
end
 end
 
 function TitanLord_Knocbackshadow(pUnit,event)
 	pUnit:CastSpell(34436)
 end
 
function TitanLord_phase1a(pUnit,event)
	local spell1 = Math.Random(1,2)
	if (spell1 == 1) then
		pUnit:SendChatMessage(12, 0, "The power of darkness is upon thee!")
		pUnit:FullCastSpellOnTarget(40585,pUnit:GetRandomPlayer(0))
	end
	if (spell1 == 2) then
		pUnit:FullCastSpellOnTarget(29832,pUnit:GetRandomPlayer(0))
	end	
end
 
function TitanLord_phase2(pUnit,event)
	if pUnit:GetHealthPct() < 70 then
	pUnit:RemoveEvents()
	pUnit:SendChatMessage(12, 0, "You seem to be a formidable opponent, nevertheless, I will dispose of you")
	pUnit:CastSpell(30852)
	pUnit:RegiserEvent("TitanLord_phase2a", 5000, 0)
	pUnit:RegisterEvent("TitanLord_phase3", 1000, 0)
end
 end
 
 function TitanLord_phase2a(pUnit,event)
 	local spell2 = Math.Random(1,2)
 	if (spell2 == 1) then
 		pUnit:CastSpellOnTarget(38631,pUnit:GetRandomPlayer(0))
 	end
	if (spell2 == 2) then
		pUnit:CastSpellOnTarget(38942,pUnit:GetRandomPlayer(0))
end
 end

function TitanLord_phase3(pUnit,event)
	if pUnit:GetHealthPct() < 50 then
	pUnit:RemoveEvents()
	pUnit:SendChatMessage(12, 0, "This seems to be getting out of hand, I must destroy you quickly!")
	pUnit:FullCastSpell(33919)
	pUnit:RegisterEvent("TitanLord_phase3")
	pUnit:RegisterEvent("TitanLord_phase4", 1000, 0)
end
 end
 
 function TitanLord_phase3a(pUnit,event)
 	local spell3 = Math.Random(1,2)
 	if (spell3 == 1) then
 		pUnit:CastSpell(39965)
 	end
 	if (spell3 == 2) then
 		pUnit:FullCastSpellOnTarget(41032,pUnit:GetMainTank())
 	end
 
 function TitanLord_phase4(pUnit,event)
 	if pUnit:GetHealthPct() < 30 then
 	pUnit:RemoveEvents()
 	pUnit:SendChatMessage(12, 0, "So, it has come to this...Now it is time for you to feel my true wrath!")
 	pUnit:RegisterEvent("TitanLord_lastphase", 1000, 0)
 
 function TitanLord_phase4a(pUnit,event)
 	local allspell = Math.Random()
 	if (allspell == 1) then
		pUnit:SendChatMessage(12, 0, "The power of darkness is upon thee!")
		pUnit:FullCastSpellOnTarget(40585,pUnit:GetRandomPlayer(0))
	end
	if (allspell == 2) then
		pUnit:FullCastSpellOnTarget(29832,pUnit:GetRandomPlayer(0))
	end
	if (allspell == 3) then
 		pUnit:CastSpellOnTarget(38631,pUnit:GetRandomPlayer(0))
 	end
	if (allspell == 4) then
		pUnit:CastSpellOnTarget(38942,pUnit:GetRandomPlayer(0))
	end
	if (allspell == 5) then
 		pUnit:CastSpell(39965)
 	end
 	if (allspell == 6) then
 		pUnit:FullCastSpellOnTarget(41032,pUnit:GetMainTank())
 	end
end

function TitanLord_lastphase(pUnit,event)
	if pUnit:GetHealthPct() < 15 then
	pUnit:RemoveEvents()
	pUnit:SendChatMessage(12, 0, "I'm getting weaker! I must go to my last resort...Die you insignificant pests!")
	pUnit:RegisterEvent("TitanLord_phase4a", 8000, 0)
	pUnit:RegisterEvent("TitanLord_deathwish", 15000, 0)
	
function TitanLord_deathwish(pUnit,event)
	pUnit:FullCastSpellOnTarget(40251,pUnit:GetRandomPlayer(7))
	

function TitanLord_OnKilledTarget(pUnit,event)
	local trash = Math.Random()
	if (trash == 1) then
		pUnit:SendChatMessage(12, 0, "Child's play!")
	if (trash == 2) then
		pUnit:SendChatMessage(12, 0, "Is that all the anger you can conjur")
	if (trash == 3) then
		pUnit:SendChatMessage(12, 0, "You are nothing compared to my wrath")

function TitanLord_OnLeaveCombat(pUnit,event)
	pUnit:RemoveEvents()
	
function TitanLord_OnDead(pUnit,event)
	pUnit:RemoveEvents()
	pUnit:SendChatMessage(12, 0, "Arghh! This...Cannot...Be!")
	
RegisterUnitEvent(12345, 1, "TitanLord_OnEnterCombat")
RegisterUnitEvent(12345, 2, "TitanLord_OnLeaveCombat")
RegisterUnitEvent(12345, 3, "TitanLord_OnKilledTarget")
RegisterUnitEvent(12345, 4, "TitanLord_OnDead")

Here's the SQL's(just modify them if you think they're too OP):

INSERT INTO creature_names (entry, name, subname, info_str, Flags1, type, family, rank, male_displayid, female_displayid, male_displayid2, female_displayid2, civilian, leader) VALUES ('12345','Prometheus','Lord of the Titans','','0','5','0','3','18839','0','0','0','0','0')

INSERT INTO creature_proto (entry, minlevel, maxlevel, faction, minhealth, maxhealth, mana, scale, npcflags, attacktime, mindamage, maxdamage, rangedattacktime, rangedmindamage, rangedmaxdamage, mountdisplayid, equipmodel1, equipmodel2, equipmodel3, respawntime, armor, resistance1, resistance2, resistance3, resistance4, resistance5, resistance6, combat_reach, auras, boss, money, invisibility_type, death_state, walk_speed, run_speed, fly_speed) VALUES ('12345','73','73','1825','10000000','10000000','100000','0','2000','20000','30000','0','0','0','0','','','0','360000','8000','30','30','30','30','30','30','1','0','1','0','0','0','2.5','8','14')

Spells used (in order used):

Shadow Burst - Spell - World of Warcraft

Dark Barrage - Spell - World of Warcraft

Shadow Cleave - Spell - World of Warcraft

Shadow Nova - Spell - World of Warcraft

Avenger's Shield - Spell - World of Warcraft

Frost Arrow - Spell - World of Warcraft

Earthquake - Spell - World of Warcraft

Frost Grenade - Spell - World of Warcraft

Shear - Spell - World of Warcraft

Shadow of Death - Spell - World of Warcraft

He hasn't been tested so if someone could test and report any bugs I would be happy to fix them. This is my first boss ever guys so don't be too mean . Feedback is appreciated (and some constructive criticism). You can redistribute but please give credit where it's due.

I will be making AI's of Thrall and Magni Bronzebeard soon so keep posted!

~[Cloud]~

[mager1794]

Good Job Cloud you have trained well lol XD

[Kiyoshi]

Lol yeah thanks to you and latruwski I'm getting better at LUA

[**Sweeny**]

Great job, +Rep

[runiker]

well done!

[Kiyoshi]

Thanks

Took about an hour to get the spells together and everything. I'll post them all up in a min

[Kiyoshi]

Updated post, added links to site.

[kebabkungen]

Sweet maybee adding it to my Db later on +rep

[Kiyoshi]

Thanks

Report any bugs that you find to me (MSN: [email protected]) please.

[sadgonewild]

the last few functions...are not.. .... no comment

[Kiyoshi]

Ah error identified. Fixed, and thanks for the report (I inferred )