function Curser_OnCombat(Unit, Event)
Unit:SendChatMessage(14, 0, "Hope you're not afraid of Fire!")
Unit:RegisterEvent("Curser_Fireball", timerinmilisec, howmanytimes)end
function Curser_OnDied(Unit, Event)
Unit:SendChatMessage(14, 0, "You... are too.. Late!..")
Unit:RemoveEvents()
end
function Curser_Fireball(pUnit, Event)
local plr = pUnit:GetRandomPlayer(0)
if (plr ~= nil) then
pUnit:FullCastSpellOnTarget(133, plr)
end
end
RegisterUnitEvent(111206, 1, "Curser_OnCombat")
RegisterUnitEvent(111206, 2, "Curser_OnDied")
RegisterUnitEvent(111206, 3, "Curser_Fireball") <- This is impossible 