Unworthy script

This script should work to make the Unworthy Initiates in ebon hold more like the ones on retail note that i can not change the sql files for you so you must make sure they are attackable can can be killed and have the right data in there.

If there are any errors port them in this forum and i will fix bugs.

Code:

---

function function Unworthy_cast1 (pUnit, event)
pUnit:FullCastSpell(52374)
end

function function Unworthy_cast2 (pUnit, event)
pUnit:FullCastSpell(52375)
end

function function Unworthy_cast3 (pUnit, event)
pUnit:FullCastSpell(49576)
end

function function Unworthy_cast4 (pUnit, event)
pUnit:FullCastSpell(52372)
end

function function Unworthy_cast5 (pUnit, event)
pUnit:FullCastSpell(52373)
end




function function Unworthy_EnterCombat (pUnit, event)
pUnit:SetModel(25375)
        pUnit:RegisterEvent("Unworthy_cast1", 15000, 0)
        pUnit:RegisterEvent("Unworthy_cast2", 17000, 0)
        pUnit:RegisterEvent("Unworthy_cast3", 20000, 0)
        pUnit:RegisterEvent("Unworthy_cast4", 16000, 0)
        pUnit:RegisterEvent("Unworthy_cast5", 19000, 0)

end

function Unworthy_LeaveCombat1 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25356)
    end
    if display == 2 then
    pUnit:SetModel(25367)
    end
    if display == 3 then
        pUnit:SetModel(25365)
    end
    if display == 4 then
        pUnit:SetModel(25366)
    end
    pUnit:RemoveEvents()
end

function Unworthy_LeaveCombat2 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25370)
    end
    if display == 2 then
    pUnit:SetModel(25368)
    end
    if display == 3 then
        pUnit:SetModel(25359)
    end
    if display == 4 then
        pUnit:SetModel(25354)
    end
    pUnit:RemoveEvents()
end

function Unworthy_LeaveCombat5 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25369)
    end
    if display == 2 then
    pUnit:SetModel(25363)
    end
    if display == 3 then
        pUnit:SetModel(25352)
    end
    if display == 4 then
        pUnit:SetModel(25360)
    end
    pUnit:RemoveEvents()
end

function Unworthy_LeaveCombat4 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25355)
    end
    if display == 2 then
    pUnit:SetModel(25371)
    end
    if display == 3 then
        pUnit:SetModel(25372)
    end
    if display == 4 then
        pUnit:SetModel(25361)
    end
    pUnit:RemoveEvents()
end

function Unworthy_LeaveCombat4 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25373)
    end
    if display == 2 then
    pUnit:SetModel(25357)
    end
    if display == 3 then
        pUnit:SetModel(25358)
    end
    if display == 4 then
        pUnit:SetModel(25364)
    end
    pUnit:RemoveEvents()
end

function Unworthy_Die1 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25356)
    end
    if display == 2 then
    pUnit:SetModel(25367)
    end
    if display == 3 then
        pUnit:SetModel(25365)
    end
    if display == 4 then
        pUnit:SetModel(25366)
    end
    pUnit:RemoveEvents()
end

function Unworthy_Die2 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25370)
    end
    if display == 2 then
    pUnit:SetModel(25368)
    end
    if display == 3 then
        pUnit:SetModel(25359)
    end
    if display == 4 then
        pUnit:SetModel(25354)
    end
    pUnit:RemoveEvents()
end

function Unworthy_Die5 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25369)
    end
    if display == 2 then
    pUnit:SetModel(25363)
    end
    if display == 3 then
        pUnit:SetModel(25352)
    end
    if display == 4 then
        pUnit:SetModel(25360)
    end
    pUnit:RemoveEvents()
end

function Unworthy_Die4 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25355)
    end
    if display == 2 then
    pUnit:SetModel(25371)
    end
    if display == 3 then
        pUnit:SetModel(25372)
    end
    if display == 4 then
        pUnit:SetModel(25361)
    end
    pUnit:RemoveEvents()
end

function Unworthy_Die4 (pUnit, event)
display = math.random (1 , 4)
    if display == 1 then
        pUnit:SetModel(25373)
    end
    if display == 2 then
    pUnit:SetModel(25357)
    end
    if display == 3 then
        pUnit:SetModel(25358)
    end
    if display == 4 then
        pUnit:SetModel(25364)
    end
    pUnit:RemoveEvents()
end

RegisterUnitEvent(29566, 1, "Unworthy_EnterCombat")
RegisterUnitEvent(29565, 1, "Unworthy_EnterCombat")
RegisterUnitEvent(29519, 1, "Unworthy_EnterCombat")
RegisterUnitEvent(29520, 1, "Unworthy_EnterCombat")
RegisterUnitEvent(29567, 1, "Unworthy_EnterCombat")
RegisterUnitEvent(29566, 2, "Unworthy_LeaveCombat1")
RegisterUnitEvent(29565, 2, "Unworthy_LeaveCombat2")
RegisterUnitEvent(29519, 2, "Unworthy_LeaveCombat3")
RegisterUnitEvent(29520, 2, "Unworthy_LeaveCombat4")
RegisterUnitEvent(29567, 2, "Unworthy_LeaveCombat5")
RegisterUnitEvent(29566, 4, "Unworthy_Die1")
RegisterUnitEvent(29567, 4, "Unworthy_Die2")
RegisterUnitEvent(29520, 4, "Unworthy_Die3")
RegisterUnitEvent(19519, 4, "Unworthy_Die4")
RegisterUnitEvent(29565, 4, "Unworthy_Die5")

---

Fixed an error

Very nice... I really thought you said this script was "Unworthy" lol... Glad I clicked on it. xD

Make download link please and the npc

Lots of unecessary code in this.