just a quick lil help

local function TimedEvent(eventID, delay, pCall, unit)
    unit:SendUnitYell("Test 1, Test 2!", 0)
end

local function Frost_Bolt(Unit, Event)			--Part I need help with
	Unit:SendUnitSay("Do you feel the chill reaching up your spine!", 0)
	Unit:CastSpell(21369)
	Unit:RegisterEvent("Frost_Bolt", 0)
end							--end of the part I need help with--

local function OnCombat(event, unit, victim)
    unit:RegisterEvent(TimedEvent, 5000, 1)
	unit:RegisterEvent(Frost_Bolt, 10000, 0)
end

RegisterCreatureEvent(18946, 1, OnCombat)