Code:
function LuaTestSwe_OnCombat(Unit, Event)
Unit:SendChatMessage(12, 0, "Hej min mästare! Jag är dum i huvet!")
end
function LuaTestSwe_Imbazor(pUnit, Event)
pUnit:CastSpell(37856, pUnit:GetRandomPlayer(7))
end
function LuaTestSwe_Imbazor2(pUnit, Event)
pUnit:CastSpell(31457, pUnit:GetClosestPlayer())
end
function LuaTestSwe_Imbazor3(pUnit, Event)
pUnit:CastSpell(43439, pUnit:GetMainTank())
end
function LuaTestSwe_Imbazor4(pUnit, Event)
pUnit:FullCastSpellOnTarget(38628, pUnit:GetRandomPlayer(7))
end
function LuaTestSwe_Imbazor5(pUnit, Event)
pUnit:CastSpell(31472, pUnit:GetClosestPlayer())
end
function LuaTestSwe_Imbazor6(pUnit, Event)
pUnit:CastSpell(45034, pUnit:GetRandomPlayer(0))
end
function _Spawn(pUnit, Event)
pUnit:SpawnCreature(, , , , , , )
end
function LuaTestSwe_TransformBerserk(pUnit, Event)
pUnit:CastSpell(41924, pUnit:CastOnSelf())
end
function LuaTestSwe_Transform(pUnit, Event)
if pUnit:GetHealthPct() < 20 then
pUnit:RemoveEvents();
pUnit:FullCastSpell(0)
pUnit:SetModel(23226)
pUnit:RegisterEvent("_Spawn",,0)
end
end
function LuaTestSwe_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "Jag är ju dum i huvet ... Tusan!")
end
function LuaTestSwe_OnDied(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(12, 0, "Bra gjort!")
end
function LuaTestSwe_OnKilledTarget(Unit, Event)
Unit:SendChatMessage(12, 0, "Men va tusan ... Du ska ju inte dö! Jag tror jag gör självmord ...")
end
RegisterUnitEvent(506612, 1, "LuaTestSwe_OnCombat")
RegisterUnitEvent(506612, 2, "LuaTestSwe_OnLeaveCombat")
RegisterUnitEvent(506612, 3, "LuaTestSwe_OnKilledTarget")
RegisterUnitEvent(506612, 4, "LuaTestSwe_OnDied")
Please help and tell what the problem is .. If you find any other things that's wrong, please tell.