ICC teleporter

local GameObject_ID = 202242

local function On_Gossip(pUnit, event, pPlayer)
    pUnit:GossipCreateMenu(3000, pPlayer, 0)
    pUnit:GossipMenuAddItem(2, "The Lower Spire", 1, 0)
    pUnit:GossipMenuAddItem(2, "The Plagueworks", 2, 0)
    pUnit:GossipMenuAddItem(2, "The Crimson Hall", 3, 0)
    pUnit:GossipMenuAddItem(2, "The Frostwing Halls", 4, 0)
    pUnit:GossipMenuAddItem(2, "The Frozen Throne", 5, 0)
    pUnit:GossipMenuAddItem(4, "Remove Ressurection sickness", 900, 0)
    pUnit:GossipSendMenu(pPlayer)
end

local function Gossip_Submenus(pUnit, event, pPlayer, id, intid, code)

    if(intid == 999) then
        On_Gossip(pUnit, event, pPlayer)
    elseif(intid == 1) then
        pUnit:GossipCreateMenu(3000, pPlayer, 0)
        pUnit:GossipMenuAddItem(2, "Lord Marrowgar", 300, 0)
        pUnit:GossipMenuAddItem(2, "Lady Deathwhisper", 301, 0)
        pUnit:GossipMenuAddItem(2, "Gunship Battle", 302, 0)
        pUnit:GossipMenuAddItem(2, "Deathbringer Saurfang", 303, 0)
        pUnit:GossipMenuAddItem(0, "[Back]", 999, 0)
        pUnit:GossipSendMenu(pPlayer)
        return
    elseif(intid == 2) then
        pUnit:GossipCreateMenu(3000, pPlayer, 0)
        pUnit:GossipMenuAddItem(2, "Festergut", 304, 0)
        pUnit:GossipMenuAddItem(2, "Rotface", 305, 0)
        pUnit:GossipMenuAddItem(2, "Professor Putricide", 306, 0)
        pUnit:GossipMenuAddItem(0, "[Back]", 999, 0)
        pUnit:GossipSendMenu(pPlayer)
        return
    elseif(intid == 3) then
        pUnit:GossipCreateMenu(3000, pPlayer, 0)
        pUnit:GossipMenuAddItem(2, "Blood Prince Council", 307, 0)
        pUnit:GossipMenuAddItem(2, "Blood-Queen Lana'thel", 308, 0)
        pUnit:GossipMenuAddItem(0, "[Back]", 999, 0)
        pUnit:GossipSendMenu(pPlayer)
        return
    elseif(intid == 4) then
        pUnit:GossipCreateMenu(3000, pPlayer, 0)
        pUnit:GossipMenuAddItem(3, "Valithria Dreamwalker", 309, 0)
        pUnit:GossipMenuAddItem(3, "Sindragosa", 310, 0)
        pUnit:GossipMenuAddItem(0, "[Back]", 999, 0)
        pUnit:GossipSendMenu(pPlayer)
        return
    elseif(intid == 5) then
        pUnit:GossipCreateMenu(3000, pPlayer, 0)
        pUnit:GossipMenuAddItem(3, "The Lich King", 311, 0)
        pUnit:GossipMenuAddItem(0, "[Back]", 999, 0)
        pUnit:GossipSendMenu(pPlayer)
        return
    elseif(intid == 900) then
        if(pPlayer:HasNegativeAura(15007)) then
            pPlayer:RemoveAura(15007)
        end
        pPlayer:SendAreaTriggerMessage("Resurrection sickness removed")
        On_Gossip(pUnit, event, pPlayer)
        return
    elseif(intid == 300) then
        pPlayer:Teleport(631, -17.090115, 2211.440430, 30.115721)
    elseif(intid == 301) then
        pPlayer:Teleport(631, -503.285339, 2211.499268, 62.823330)
    elseif(intid == 302) then
        pPlayer:Teleport(631, -615.354980, 2211.466309, 199.971100)
    elseif(intid == 303) then
        pPlayer:Teleport(631, -549.196106, 2211.171631, 539.290466)
    elseif(intid == 304) then
        pPlayer:Teleport(631, 4268.282715, 3083.905029, 360.443359)
    elseif(intid == 305) then
        pPlayer:Teleport(631, 4446.13960, 3081.873047, 360.524475)
    elseif(intid == 306) then
        pPlayer:Teleport(631, 4356.679199, 3166.011230, 389.398712)
    elseif(intid == 307) then
        pPlayer:Teleport(631, 4452.511230, 2769.268555, 349.352020)
    elseif(intid == 308) then
        pPlayer:Teleport(631, 4559.946777, 2769.475098, 400.138641)
    elseif(intid == 309) then
        pPlayer:Teleport(631, 4356.701172, 2674.051270, 349.336792)
    elseif(intid == 310) then
        pPlayer:Teleport(631, 4356.701172, 2674.051270, 349.336792)
    elseif(intid == 311) then
        pPlayer:Teleport(631, 529.727905, -2414.865234, 1040.869056)
    end
    pPlayer:GossipComplete()
end

RegisterGameObjectEvent(GameObject_ID, 4, On_Gossip)
RegisterGOGossipEvent(GameObject_ID, 2, Gossip_Submenus)