--[[
		:14111: Ich fürchte nichts und niemanden. Am allerwenigsten Euch!
		:14112: Ihr seid bedeutungslos
		:14113: Welch mittelmäßiger Widerstand!
		:14114: Ihr seid so einfach zubesiegen!
		:14115: Vater hat mich einiges gelehrt
		:14116: Auf die Knie!
		:14117: Ich werde erbarmen mit Euch haben, Sartharion! Aber nur dieses eine Mal!
		:14118: Wir.. sind überlegen! Wie.. konnte das.. geschehen!?]]

function Shadron_OnCombat(pUnit, Event)
	pUnit:RegisterEvent("Schattenodem", 16500, 0)
	pUnit:RegisterEvent("Shadron_80", 1000, 0)
	pUnit:CastSpell(60639)
	pUnit:CastSpell(58105)
	pUnit:CastSpell(48582)
	pUnit:SendChatMessage(14, 0, "Ich f\195\188rchte nichts und niemanden. Am allerwenigsten Euch!")
	pUnit:PlaySoundToSet(14111)
	pUnit:RemoveEvents()
end

function Shadron_LeaveCombat(pUnit, Event)
	pUnit:SendChatMessage(14, 0, "Ihr seid so einfach zubesiegen!")
	pUnit:PlaySoundToSet(14114)
	pUnit:Despawn(1, 0)
end

function Shadron_Kill(pUnit, Event)
end

function Shadron_Dead(pUnit, Event)
	pUnit:SendChatMessage(14, 0, "Wir.. sind \195\188berlegen! Wie.. konnte das.. geschehen!?")
	pUnit:PlaySoundToSet(14118)
end

function Shadron_Spawn(pUnit, Event)
	pUnit:RemoveEvents()
end

function Shadron_80(pUnit, Event)
	   if (pUnit:GetHealthPct() <= 80) then
	pUnit:SendChatMessage(14, 0, "Ihr seid bedeutungslos")
	pUnit:PlaySoundToSet(14112)
	pUnit:RegisterEvent("Shadron_60", 1000, 0)
	pUnit:RemoveEvents()
end
end

function Shadron_60(pUnit, Event)
    if (pUnit:GetHealthPct() <= 60) then
	pUnit:SendChatMessage(14, 0, "Welch mittelm\195\164ßiger Widerstand")
	pUnit:PlaySoundToSet(14113)
	pUnit:RegisterEvent("Shadron_40", 1000, 0)
	pUnit:RemoveEvents()
end
end

function Shadron_40(pUnit, Event)
    if (pUnit:GetHealthPct() <= 40) then
	pUnit:SendChatMessage(14, 0, "Vater hat mich einiges gelehrt")
	pUnit:PlaySoundToSet(14115)
	pUnit:RegisterEvent("Shadron_20", 1000, 0)
	pUnit:RemoveEvents()
end
end

function Shadron_20(pUnit, Event)
    if (pUnit:GetHealthPct() <= 20) then
	pUnit:SendChatMessage(14, 0, "Auf die Knie")
	pUnit:PlaySoundToSet(14116)
	pUnit:RegisterEvent("Shadron_05", 1000, 0)
	pUnit:RemoveEvents()
end
end

function Shadron_05(pUnit, Event)
    if (pUnit:GetHealthPct() <= 05) then
	pUnit:SendChatMessage(14, 0, "Ich werde erbarmen mit Euch haben, Sartharion! Aber nur dieses eine Mal!")
	pUnit:PlaySoundToSet(14117)
	pUnit:RemoveEvents()
end
end

function Schattenodem(pUnit, Event)
	pUnit:CastSpellOnTarget(57570, pUnit:GetRandomPlayer(0))
end

function ShadronsMacht(pUnit, Event)
	pUnit:CastSpell(58105)
end

function RacheDesZwielichts02(pUnit, Event)
	pUnit:CastSpell(60639)
end

RegisterUnitEvent(99202, 1, "Shadron_OnCombat")
RegisterUnitEvent(99202, 2, "Shadron_LeaveCombat")
RegisterUnitEvent(99202, 3, "Shadron_Kill")
RegisterUnitEvent(99202, 4, "Shadron_Dead")
RegisterUnitEvent(99202, 18, "Shadron_Spawn")