im pretty sure im doing something wrong but Idk, I just started and its already giving me Errors.

Code:
function XT-002_Deconstructor_OnCombat(pUnit, Event)
pUnit:SendChatMessage(14, 0, "New toys? For me? I promise I won't break them this time!")
pUnit:RegisterEvent("XT-002_Deconstructor_Tympanic_Tantrum", 60000, 0)
pUnit:RegisterEvent("XT-002_Deconstructor_Light_Bomb", 20000, 0)
pUnit:RegisterEvent("XT-002_Deconstructor_Gravity_Bomb", 30000, 0)
end
function XT-002_Deconstructor_OnLeaveCombat(pUnit, Event)
pUnit:RemoveEvents()
end
function XT-002_Deconstructor_OnKillTarget(pUnit, Event)
local choice = math.random(1, 2)
if (choice == 1) then
pUnit:PlaySoundToSet(15728)
pUnit:SendChatMessage(14, 0, "I... I think I broke it.")
elseif (choice == 2) then
pUnit:PlaySoundToSet(15729)
pUnit:SendChatMessage(14, 0, "I guess it doesn't bend that way.")
end
end
function XT-002_Deconstructor_OnDeath(pUnit, Event)
pUnit:RemoveEvents()
pUnit:SendChatMessage(14, 0, "You are bad... Toys... Very... Baaaaad!")
end
RegisterUnitEvent(33293, 1, "XT-002_Deconstructor_OnCombat")
RegisterUnitEvent(33293, 2, "XT-002_Deconstructor_OnLeaveCombat")
RegisterUnitEvent(33293, 3, "XT-002_Deconstructor_OnKillTarget")
RegisterUnitEvent(33293, 4, "XT-002_Deconstructor_OnDeath")
function XT-002_Deconstructor_Tympanic_Tantrum(pUnit, Event)
pUnit:FullCastSpell(62776)
end
function XT-002_Deconstructor_Light_Bomb(pUnit, Event)
pUnit:FullCastSpellOnTarget(63018, pUnit:GetRandomPlayer(0))
end
function XT-002_Deconstructor_Gravity_Bomb(pUnit, Event)
pUnit:FullCastSpellOnTarget(63024, pUnit:GetRandomPlayer(0))
end
Anyone know whats wrong?
thanks