[LUA] Boss - How to kill himself?

[Kaidos]

Hi there!

I'm looking for a lua expert who can help me :P

I did a in Boss, Sartharion like^^

in the end spawn Alexstrasza and cast visual spells and i want to try to kill the Boss in the same moment she casts the spell. (At the time she spawns he is unattackable and immun to all attacks)

In the script of the Boss i tried many things like

-Cast Death touch on himself: doesn't work

-other Suicide spells: doesn't work

-:SetHealthPct(0) : doesn't work

How should i do this?

Script:

--[[Alereth]]--

function AlerethEarth(pUnit, event)
	pUnit:CastSpellOnTarget(30129, pUnit:GetRandomPlayer(0))
if pUnit:GetRandomPlayer(0) == nil then
        pUnit:CastSpellOnTarget(30129, pUnit:GetClosestPlayer())
        end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethBreath(pUnit, event)
	pUnit:CastSpellOnTarget(56908, pUnit:GetMainTank())
if pUnit:GetMainTank() == nil then
        pUnit:CastSpellOnTarget(56908, pUnit:GetClosestPlayer())
        end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethFirerain(pUnit, Event)
        pUnit:CastSpellOnTarget(42023, pUnit:GetRandomPlayer(0))
if pUnit:GetRandomPlayer(0) == nil then
        pUnit:CastSpellOnTarget(42023, pUnit:GetClosestPlayer())
end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethMiniEnrage(pUnit, event)
	pUnit:CastSpell(19812)
end

function AlerethMegaEnrage(pUnit, Event)
        pUnit:CastSpell(26662)
end

function AlerethImmun(pUnit, Event)
        pUnit:CastSpell(42354)
        pUnit:CastSpell(57679)
end

function AlerethBattleTalk(pUnit, Event)
local choice=math.random(1,3)
if choice==1 then
        pUnit:PlaySoundToSet(14099)
pUnit:SendChatMessage(14, 0, "Wie leicht Sie brennen, diese kleinen Maden.")
        end
if choice==2 then
        pUnit:PlaySoundToSet(14101)
        pUnit:SendChatMessage(14, 0, "Wie viel Hitze k\195\182nnt ihr vertragen?")
        end
if choice==3 then
        pUnit:PlaySoundToSet(14102)
        pUnit:SendChatMessage(14, 0, "Nur noch Asche wird \195\188brig bleiben!")
end
end

function AlerethSpawn(pUnit, Event)
        pUnit:SpawnCreature(700000, 3241, 483, 57, 1.463975, 2010, 20000)
        pUnit:SpawnCreature(700001, 3223, 512, 58, 0.439823, 2010, 20000)
        pUnit:SpawnCreature(700001, 3263, 509, 59, 2.517202, 2010, 20000)
end

function AlerethTalk1(pUnit, Event)
         pUnit:PlaySoundToSet(14103)
         pUnit:CastSpell(19798)
         pUnit:SendChatMessage(14, 0, "Dieser l\195\164cherliche Angriff endet jetzt!")
end


function AlerethAggro(pUnit, event)
	pUnit:PlaySoundToSet(14093)
	pUnit:SendChatMessage(14, 0, "Meine Aufgabe ist es \195\188ber diese Eier zu Wachen. Kommt ihnen zu Nahe und von Euch bleibt nur ein H\195\164uflein Asche.")
	pUnit:RegisterEvent("AlerethBattleTalk", 26000, 0)
        pUnit:RegisterEvent("AlerethBreath", 27000, 0)
	pUnit:RegisterEvent("AlerethEarth", 13000, 0)
	pUnit:RegisterEvent("AlerethFirerain", 17000, 0)
        pUnit:RegisterEvent("AlerethMiniEnrage", 19000, 0)
	pUnit:RegisterEvent("Alereth2", 1000, 0)
        pUnit:RegisterEvent("AlerethMegaEnrage", 360000, 0)
end

function Alereth2(pUnit, event)
        if pUnit:GetHealthPct() <= 6 then
        pUnit:RemoveEvents()
        pUnit:SetFaction(1852)
        pUnit:SetCombatCapable(1)
	pUnit:PlaySoundToSet(14096)
	pUnit:SendChatMessage(14, 0, "Ihr seid in einer tottraurigen Lage.")
	pUnit:RegisterEvent("AlerethImmun", 200, 1)
	pUnit:RegisterEvent("AlerethSpawn", 3000, 1)
        pUnit:RegisterEvent("AlerethTalk1", 6500, 1)
        pUnit:RegisterEvent("AlerethExplode1", 7000, 1)
        pUnit:RegisterEvent("AlerethExplode2", 8000, 1)
        pUnit:RegisterEvent("AlerethDied", 9000, 1)
end
end

function AlerethExplode1(pUnit, event)
        pUnit:CastSpell(36373)
        pUnit:CastSpell(36092)
end

function AlerethExplode2(pUnit, event)
        pUnit:CastSpell(36373)
        pUnit:CastSpell(36092)
end

function AlerethDied(pUnit, event)
        pUnit:CastSpell(5162)
	pUnit:RemoveEvents()
end

function AlerethLeave(pUnit, event)
	pUnit:RemoveEvents()
	pUnit:RemoveAura(28131)
        pUnit:RemoveAura(42354)
end

function AlerethDeath(pUnit, event)
	pUnit:RemoveEvents()
	pUnit:PlaySoundToSet(14107)
	pUnit:SendChatMessage(14, 0, "Dies ist der Preis des Versagens...")
	pUnit:RemoveAura(28131)
end

RegisterUnitEvent(9, 1, "AlerethAggro")
RegisterUnitEvent(9, 2, "AlerethLeave")
RegisterUnitEvent(9, 4, "AlerethDeath")

Thanks for all help!

[TheZaronz]

You should try using a spell like:

pUnit:CastSpell(7)

7 is the ID for suicide spell

[stoneharry]

--[[Alereth]]--

function AlerethEarth(pUnit, event)
    pUnit:CastSpellOnTarget(30129, pUnit:GetRandomPlayer(0))
if pUnit:GetRandomPlayer(0) == nil then
        pUnit:CastSpellOnTarget(30129, pUnit:GetClosestPlayer())
        end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethBreath(pUnit, event)
    pUnit:CastSpellOnTarget(56908, pUnit:GetMainTank())
if pUnit:GetMainTank() == nil then
        pUnit:CastSpellOnTarget(56908, pUnit:GetClosestPlayer())
        end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethFirerain(pUnit, Event)
        pUnit:CastSpellOnTarget(42023, pUnit:GetRandomPlayer(0))
if pUnit:GetRandomPlayer(0) == nil then
        pUnit:CastSpellOnTarget(42023, pUnit:GetClosestPlayer())
end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethMiniEnrage(pUnit, event)
    pUnit:CastSpell(19812)
end

function AlerethMegaEnrage(pUnit, Event)
        pUnit:CastSpell(26662)
end

function AlerethImmun(pUnit, Event)
        pUnit:CastSpell(42354)
        pUnit:CastSpell(57679)
end

function AlerethBattleTalk(pUnit, Event)
local choice=math.random(1,3)
if choice==1 then
        pUnit:PlaySoundToSet(14099)
pUnit:SendChatMessage(14, 0, "Wie leicht Sie brennen, diese kleinen Maden.")
        end
if choice==2 then
        pUnit:PlaySoundToSet(14101)
        pUnit:SendChatMessage(14, 0, "Wie viel Hitze k\195\182nnt ihr vertragen?")
        end
if choice==3 then
        pUnit:PlaySoundToSet(14102)
        pUnit:SendChatMessage(14, 0, "Nur noch Asche wird \195\188brig bleiben!")
end
end

function AlerethSpawn(pUnit, Event)
        pUnit:SpawnCreature(700000, 3241, 483, 57, 1.463975, 2010, 20000)
        pUnit:SpawnCreature(700001, 3223, 512, 58, 0.439823, 2010, 20000)
        pUnit:SpawnCreature(700001, 3263, 509, 59, 2.517202, 2010, 20000)
end

function AlerethTalk1(pUnit, Event)
         pUnit:PlaySoundToSet(14103)
         pUnit:CastSpell(19798)
         pUnit:SendChatMessage(14, 0, "Dieser l\195\164cherliche Angriff endet jetzt!")
end


function AlerethAggro(pUnit, event)
    pUnit:PlaySoundToSet(14093)
    pUnit:SendChatMessage(14, 0, "Meine Aufgabe ist es \195\188ber diese Eier zu Wachen. Kommt ihnen zu Nahe und von Euch bleibt nur ein H\195\164uflein Asche.")
    pUnit:RegisterEvent("AlerethBattleTalk", 26000, 0)
        pUnit:RegisterEvent("AlerethBreath", 27000, 0)
    pUnit:RegisterEvent("AlerethEarth", 13000, 0)
    pUnit:RegisterEvent("AlerethFirerain", 17000, 0)
        pUnit:RegisterEvent("AlerethMiniEnrage", 19000, 0)
    pUnit:RegisterEvent("Alereth2", 1000, 0)
        pUnit:RegisterEvent("AlerethMegaEnrage", 360000, 0)
end

function Alereth2(pUnit, event)
        if pUnit:GetHealthPct() <= 6 then
        pUnit:RemoveEvents()
        pUnit:SetFaction(1852)
        pUnit:SetCombatCapable(1)
    pUnit:PlaySoundToSet(14096)
    pUnit:SendChatMessage(14, 0, "Ihr seid in einer tottraurigen Lage.")
    pUnit:RegisterEvent("AlerethImmun", 200, 1)
    pUnit:RegisterEvent("AlerethSpawn", 3000, 1)
        pUnit:RegisterEvent("AlerethTalk1", 6500, 1)
        pUnit:RegisterEvent("AlerethExplode1", 7000, 1)
        pUnit:RegisterEvent("AlerethExplode2", 8000, 1)
        pUnit:RegisterEvent("AlerethDied", 9000, 1)
end
end

function AlerethExplode1(pUnit, event)
        pUnit:CastSpell(36373)
        pUnit:CastSpell(36092)
end

function AlerethExplode2(pUnit, event)
        pUnit:CastSpell(36373)
        pUnit:CastSpell(36092)
end

function AlerethDied(pUnit, event)
    pUnit:RemoveEvents()
        Foe=pUnit;
end

function AlerethLeave(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:RemoveAura(28131)
        pUnit:RemoveAura(42354)
end

function AlerethDeath(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:PlaySoundToSet(14107)
    pUnit:SendChatMessage(14, 0, "Dies ist der Preis des Versagens...")
    pUnit:RemoveAura(28131)
end

RegisterUnitEvent(9, 1, "AlerethAggro")
RegisterUnitEvent(9, 2, "AlerethLeave")
RegisterUnitEvent(9, 4, "AlerethDeath")

local npcid = 50

RegisterUnitEvent(npcid, 18, "ControllNpc")

function ControllNpc(Unit, event)
   Unit:SetScale(0.01)
   x = Unit:GetX();
   y = Unit:GetY();
   z = Unit:GetZ();
   o = Unit:GetO();
   Unit:SpawnCreature(npcid, x, y, z, o, 35, 0);
   Unit:CastSpell(5, Foe)
   Unit:Despawn(1,0)
end

What you need to do is make a npc with the id of 50 (can change at bottom of the script) and give it a displayid of 4 and scale of 1.
Basically what should happen is when you get to the death phase of the boss it spawns a invisible mob on it, and the invisible mob casts death touch on the boss, then despawns again.
Hope this helps.

[Kaidos]

Thanks for the answers, i will try both

RegisterUnitEvent(npcid, 18, "ControllNpc")

function ControllNpc(Unit, event)
Unit:SetScale(0.01)
x = Unit:GetX();
y = Unit:GetY();
z = Unit:GetZ();
o = Unit:GetO();
Unit:SpawnCreature(npcid, x, y, z, o, 35, 0);
Unit:CastSpell(5, Foe)
Unitespawn(1,0)
end

So, the Boss must get an evil faction for the Invisible mob?

Edit: What is the Foe in [...](5, Foe)?

[stoneharry]

It can be the same faction, if you scroll up on the boss fight I put in
"Foe=pUnit;"
Now when the other npc spawns he will look for the target "Foe" to cast the spell on. The npc has been defined as foe, so even if it's the same faction it will cast spell 5 on him, which is death touch, which means instant kill hopefully

[Kaidos]

It can be the same faction, if you scroll up on the boss fight I put in
"Foe=pUnit;"
Now when the other npc spawns he will look for the target "Foe" to cast the spell on. The npc has been defined as foe, so even if it's the same faction it will cast spell 5 on him, which is death touch, which means instant kill hopefully

This would be uber

i reply, when i have tested this

[Kaidos]

Hm, i create a npc and it appears as a box^^

When i fight against him, at the phase the arcemu-world.exe shows the Error:

      C Stack overflow
      C Stack overflow
      C Stack overflow
      C Stack overflow
      C Stack overflow

and nothing happened^^

[stoneharry]

Displayid 4 is a box, then I said to on spawn set scale 0.01 so you cant see him.
If your getting that error... I'm not sure, going to google and test on localhost.
What Lua Scripting engine are you using though?


Edit: I was stupid, done a load of errors. Hang on while I fix
Edit 2: Fixed it, what I did for some stupid reason is that when the creature is spawned, to spawn it again, and it keeps doing it, which would cause a server crash. Thats what the overflow is Fixed it so when the boss gets to the death phase, spawns the npc which then kills the boss and then the npc spawned despawns after 1.5 seconds.

Tell me if you get errors.

--[[Alereth]]--
local npcid = 50

function AlerethEarth(pUnit, event)
    pUnit:CastSpellOnTarget(30129, pUnit:GetRandomPlayer(0))
if pUnit:GetRandomPlayer(0) == nil then
        pUnit:CastSpellOnTarget(30129, pUnit:GetClosestPlayer())
        end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethBreath(pUnit, event)
    pUnit:CastSpellOnTarget(56908, pUnit:GetMainTank())
if pUnit:GetMainTank() == nil then
        pUnit:CastSpellOnTarget(56908, pUnit:GetClosestPlayer())
        end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethFirerain(pUnit, Event)
        pUnit:CastSpellOnTarget(42023, pUnit:GetRandomPlayer(0))
if pUnit:GetRandomPlayer(0) == nil then
        pUnit:CastSpellOnTarget(42023, pUnit:GetClosestPlayer())
end
if pUnit:GetClosestPlayer() == nil then
return
end
end

function AlerethMiniEnrage(pUnit, event)
    pUnit:CastSpell(19812)
end

function AlerethMegaEnrage(pUnit, Event)
        pUnit:CastSpell(26662)
end

function AlerethImmun(pUnit, Event)
        pUnit:CastSpell(42354)
        pUnit:CastSpell(57679)
end

function AlerethBattleTalk(pUnit, Event)
local choice=math.random(1,3)
if choice==1 then
        pUnit:PlaySoundToSet(14099)
pUnit:SendChatMessage(14, 0, "Wie leicht Sie brennen, diese kleinen Maden.")
        end
if choice==2 then
        pUnit:PlaySoundToSet(14101)
        pUnit:SendChatMessage(14, 0, "Wie viel Hitze k\195\182nnt ihr vertragen?")
        end
if choice==3 then
        pUnit:PlaySoundToSet(14102)
        pUnit:SendChatMessage(14, 0, "Nur noch Asche wird \195\188brig bleiben!")
end
end

function AlerethSpawn(pUnit, Event)
        pUnit:SpawnCreature(700000, 3241, 483, 57, 1.463975, 2010, 20000)
        pUnit:SpawnCreature(700001, 3223, 512, 58, 0.439823, 2010, 20000)
        pUnit:SpawnCreature(700001, 3263, 509, 59, 2.517202, 2010, 20000)
end

function AlerethTalk1(pUnit, Event)
         pUnit:PlaySoundToSet(14103)
         pUnit:CastSpell(19798)
         pUnit:SendChatMessage(14, 0, "Dieser l\195\164cherliche Angriff endet jetzt!")
end


function AlerethAggro(pUnit, event)
    pUnit:PlaySoundToSet(14093)
    pUnit:SendChatMessage(14, 0, "Meine Aufgabe ist es \195\188ber diese Eier zu Wachen. Kommt ihnen zu Nahe und von Euch bleibt nur ein H\195\164uflein Asche.")
    pUnit:RegisterEvent("AlerethBattleTalk", 26000, 0)
        pUnit:RegisterEvent("AlerethBreath", 27000, 0)
    pUnit:RegisterEvent("AlerethEarth", 13000, 0)
    pUnit:RegisterEvent("AlerethFirerain", 17000, 0)
        pUnit:RegisterEvent("AlerethMiniEnrage", 19000, 0)
    pUnit:RegisterEvent("Alereth2", 1000, 0)
        pUnit:RegisterEvent("AlerethMegaEnrage", 360000, 0)
end

function Alereth2(pUnit, event)
        if pUnit:GetHealthPct() <= 6 then
        pUnit:RemoveEvents()
        pUnit:SetFaction(1852)
        pUnit:SetCombatCapable(1)
    pUnit:PlaySoundToSet(14096)
    pUnit:SendChatMessage(14, 0, "Ihr seid in einer tottraurigen Lage.")
    pUnit:RegisterEvent("AlerethImmun", 200, 1)
    pUnit:RegisterEvent("AlerethSpawn", 3000, 1)
        pUnit:RegisterEvent("AlerethTalk1", 6500, 1)
        pUnit:RegisterEvent("AlerethExplode1", 7000, 1)
        pUnit:RegisterEvent("AlerethExplode2", 8000, 1)
        pUnit:RegisterEvent("AlerethDied", 9000, 1)
end
end

function AlerethExplode1(pUnit, event)
        pUnit:CastSpell(36373)
        pUnit:CastSpell(36092)
end

function AlerethExplode2(pUnit, event)
        pUnit:CastSpell(36373)
        pUnit:CastSpell(36092)
end

function AlerethDied(pUnit, event)
    pUnit:RemoveEvents()
        Foe=pUnit;
        x = pUnit:GetX();
        y = pUnit:GetY();
        z = pUnit:GetZ();
        o = pUnit:GetO();
        pUnit:SpawnCreature(npcid, x, y, z, o, 35, 1500);
end

function AlerethLeave(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:RemoveAura(28131)
        pUnit:RemoveAura(42354)
end

function AlerethDeath(pUnit, event)
    pUnit:RemoveEvents()
    pUnit:PlaySoundToSet(14107)
    pUnit:SendChatMessage(14, 0, "Dies ist der Preis des Versagens...")
    pUnit:RemoveAura(28131)
end

RegisterUnitEvent(9, 1, "AlerethAggro")
RegisterUnitEvent(9, 2, "AlerethLeave")
RegisterUnitEvent(9, 4, "AlerethDeath")


RegisterUnitEvent(npcid, 18, "ControllNpc")

function ControllNpc(Unit, event)
   Unit:SetScale(0.01)
   Unit:CastSpell(5, Foe)
end

[Kaidos]

[COLOR=Wheat]

Displayid 4 is a box, then I said to on spawn set scale 0.01 so you cant see him.
If your getting that error... I'm not sure, going to google and test on localhost.
What Lua Scripting engine are you using though?


Edit: I was stupid, done a load of errors. Hang on while I fix
Edit 2: Fixed it, what I did for some stupid reason is that when the creature is spawned, to spawn it again, and it keeps doing it, which would cause a server crash. Thats what the overflow is Fixed it so when the boss gets to the death phase, spawns the npc which then kills the boss and then the npc spawned despawns after 1.5 seconds.

Tell me if you get errors.

Yeah, i was thinking too, why would he spawn himself again?^^

Thanks, i test it

EDIT: I have ArcEmu Core 2278 from Keazain, ArcScripts i think...

[Kaidos]

Ok, it seems to be nothing happened...the npc spawn, but he didn't kill him...


Edit: Also no Error in arcemu-world.exe

Edit2: Ok, i see an error,

function ControllNpc(Unit, event)
   Unit:SetScale(0.01)
   Unit:CastSpell(5, Foe)
end

CastSpell is for Cast on the npc himself
I try CastSpellOnTarget


Edit3: The Mob spawns and kill himself
i try CastSpell, CastSpellOnTarget, FullCastSpellOnTarget ...

Try it with a Frostbolt also.

[stoneharry]

You don't need a local before foe. Try changing the 5 to a 11 and see if he casts a frostbolt on him, then you know it's the spell not the script. Just use finger of death etc instead

Edit: Also edit the post before instead of double posting