I can't get this teleport npc to work... I't works on older repacks and such but not the arcemu compiled one :s So, what am i doing wrong ? I don't get any errors either. I got rev 4128
NOT MY SCRIPT.
Here's the script:
local npcid = 55550
local race = {}
race[1] = 1 --Human
race[2] = 2 --Orc
race[3] = 1 --Dwarf
race[4] = 1 --Night elf
race[5] = 2 --Undead
race[6] = 2 --Tauren
race[7] = 1 --Gnome
race[8] = 2 --Troll
race[10] = 2 --Blood Elf
race[11] = 1 --Draenei
function Teleport_main_menu(pUnit, player)
local prace = player:GetPlayerRace()
pUnit:GossipCreateMenu(3544, player, 0)
if ( race[prace] == 1 ) then --Alliance Only Menu
pUnit:GossipMenuAddItem(0, "Alliance Cities", 1, 0)
pUnit:GossipMenuAddItem(0, "Mall", 12, 0)
end
if ( race[prace] == 2) then --Horde Only Menu
pUnit:GossipMenuAddItem(0, "Horde Cities", 7, 0)
pUnit:GossipMenuAddItem(0, "Mall", 12, 0)
end --Everyones menu
pUnit:GossipMenuAddItem(0, "Global Locations", 13, 0)
pUnit:GossipMenuAddItem(7, "Instances/Raids", 620, 0)
pUnit:GossipMenuAddItem(2, "Shattrath", 501, 0)
pUnit:GossipMenuAddItem(2, "Dalaran", 601, 0)
pUnit:GossipMenuAddItem(2, "Gurubashi Arena", 212, 0)
pUnit:GossipMenuAddItem(2, "Ebon Hold",666, 0)
pUnit:GossipMenuAddItem(8, "Buffs", 900, 0)
pUnit:GossipMenuAddItem(5, "Remove Ressurection Sickness", 901, 0)
pUnit:GossipMenuAddItem(8, "Healz!", 910, 0)
pUnit:GossipSendMenu(player)
end
function Teleport_on_gossip_talk(pUnit, event, player)
Teleport_main_menu(pUnit, player)
end
function Teleport_on_gossip_select(pUnit, event, player, id, intid, code, pMisc)
if(intid == 1) then
pUnit:GossipCreateMenu(3543, player, 0) --Alliance Citys
pUnit:GossipMenuAddItem(1, "Stormwind", 2, 0)
pUnit:GossipMenuAddItem(1, "Ironforge", 3, 0)
pUnit:GossipMenuAddItem(1, "Darnassus", 4, 0)
pUnit:GossipMenuAddItem(1, "Exodar", 5, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 2) then
player:Teleport(0, -4981.250000, -881.541992, 501.660004) --Stormwind
end
if(intid == 3) then
player:Teleport(0, -4977.095215, -888.452942, 501.621216) --Ironforge
end
if(intid == 4) then
player:Teleport(1, 9951.519531, 2280.320068, 1341.390015) --Darnassus
end
if(intid == 5) then
player:Teleport(530, -3987.566895, -11847.509766, -1.572268) --Exodar
end
if(intid == 7) then
pUnit:GossipCreateMenu(3543, player, 0) --Horde Cities
pUnit:GossipMenuAddItem(1, "Orgrimmar", 8, 0)
pUnit:GossipMenuAddItem(1, "Undercity", 9, 0)
pUnit:GossipMenuAddItem(1, "Thunder Bluff", 10, 0)
pUnit:GossipMenuAddItem(1, "Silvermoon City", 11, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 8) then
player:Teleport(1, 1500.200684, -4414.373047, 21.898052) --Orgrimmar
end
if(intid == 9) then
player:Teleport(0, 1586.479980, 239.561996, -52.148998) --Undercity
end
if(intid == 10) then
player:Teleport(1, -1196.219971, 29.094101, 176.949005) --Thunderbluff
end
if(intid == 11) then
player:Teleport(530, 9473.030273, -7279.669922, 14.228500) --Silvermoon City
end
if(intid == 12) then
player:Teleport(571, 5803.135742, 638.188477, 648.711548) -- Mall
end
if(intid == 13) then
pUnit:GossipCreateMenu(3543, player, 0) --Locations
pUnit:GossipMenuAddItem(2, "Azeroth Locations", 14, 0)
pUnit:GossipMenuAddItem(2, "Outlands Locations", 15, 0)
pUnit:GossipMenuAddItem(2, "Northrend Locations", 16, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 14) then
pUnit:GossipCreateMenu(3543, player, 0) --Azeorth Locations
pUnit:GossipMenuAddItem(2, "Kalimdor", 17, 0)
pUnit:GossipMenuAddItem(2, "Eastern Kingdom", 18, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 17) then
pUnit:GossipCreateMenu(3543, player, 0) --Kalimdor
pUnit:GossipMenuAddItem(5, "Ashenvale", 700, 0)
pUnit:GossipMenuAddItem(5, "Azshara", 701, 0)
pUnit:GossipMenuAddItem(5, "Azuremyst Isle", 702, 0)
pUnit:GossipMenuAddItem(5, "Bloodmyst Isle", 703, 0)
pUnit:GossipMenuAddItem(5, "Darkshore", 704, 0)
pUnit:GossipMenuAddItem(5, "Desolace", 705, 0)
pUnit:GossipMenuAddItem(5, "Durotar", 706, 0)
pUnit:GossipMenuAddItem(5, "Dustwallow Marsh", 707, 0)
pUnit:GossipMenuAddItem(5, "Felwood", 708, 0)
pUnit:GossipMenuAddItem(5, "Feralas", 709, 0)
pUnit:GossipMenuAddItem(5, "Moonglade", 710, 0)
pUnit:GossipMenuAddItem(5, "Mulgore", 711, 0)
pUnit:GossipMenuAddItem(5, "Silithus", 712, 0)
pUnit:GossipMenuAddItem(2, "Page 2", 713, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 700) then
player:Teleport(1, 1366.1154, -2256.9121, 89.9805) --Ashenvale
end
if(intid == 701) then
player:Teleport(1, 2794.6567, -3820.7402, 83.9876) --Azshara
end
if(intid == 702) then
player:Teleport(530, -4020.4799, -13783.2998, 73.9072) --Azuremyst Isle
end
if(intid == 703) then
player:Teleport(530, -2721.6799, -12208.9003, 9.0881) --Bloodmyst Isle
end
if(intid == 704) then
player:Teleport(1, 4214.5517, 94.6777, 34.2611) --Darkshore
end
if(intid == 705) then
player:Teleport(1, 266.2440, 1831.1944, 86.2293) --Desolace
end
if(intid == 706) then
player:Teleport(1, 112.5848, -4744.5537, 15.8076) --Durotar
end
if(intid == 707) then
player:Teleport(1, -3683.6269, -2544.6823, 61.9470) --Dustwallow Marsh
end
if(intid == 708) then
player:Teleport(1, 3620.8396, -1514.7908, 174.2075) --Felwood
end
if(intid == 709) then
player:Teleport(1, -4347.1621, -587.2303, 2.7642) --Feralas
end
if(intid == 710) then
player:Teleport(1, 7399.9453, -2184.0971, 526.1214) --Moonglade
end
if(intid == 711) then
player:Teleport(1, -2346.9624, -707.149, -9.166) --Mulgore
end
if(intid == 712) then
player:Teleport(1, -6301.7768, -357.8389, -0.7311) --Silithus
end
if(intid == 713) then
pUnit:GossipCreateMenu(3543, player, 0) --Kalimdor Page 2
pUnit:GossipMenuAddItem(5, "Stonetalon Mtns", 714, 0)
pUnit:GossipMenuAddItem(5, "Tanaris", 715, 0)
pUnit:GossipMenuAddItem(5, "Teldrassil", 716, 0)
pUnit:GossipMenuAddItem(5, "The Barrens", 717, 0)
pUnit:GossipMenuAddItem(5, "Thousand Needles", 718, 0)
pUnit:GossipMenuAddItem(5, "Un'Goro Crater", 719, 0)
pUnit:GossipMenuAddItem(5, "Winterspring", 720, 0)
pUnit:GossipMenuAddItem(2, "Page 1", 17, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 714) then
player:Teleport(1, 94.1146, -74.7517, 19.1363) --Stonetalon Mtns
end
if(intid == 715) then
player:Teleport(1, 94.1146, -74.7517, 19.1363) --Tanaris
end
if(intid == 716) then
player:Teleport(1, -6928.6640, -3735.3010, 54.0130) --Teldrassil
end
if(intid == 717) then
player:Teleport(1, -290.4556, -2678.8977, 92.9396) --The Barrens
end
if(intid == 718) then
player:Teleport(1, -4739.5937, -1802.5876, -45.4367) --Thousand Needles
end
if(intid == 719) then
player:Teleport(1, -8154.9887, -2079.0185, -124.0315) --Un'Goro Crater
end
if(intid == 720) then
player:Teleport(1, 6864.8046, -2304.7463, 580.5039) --Wintersprings
end
if(intid == 18) then
pUnit:GossipCreateMenu(3543, player, 0) --Eastern Kingdoms
pUnit:GossipMenuAddItem(5, "Alterac Mtns", 722, 0)
pUnit:GossipMenuAddItem(5, "Arathi Highlands", 723, 0)
pUnit:GossipMenuAddItem(5, "Badlands", 724, 0)
pUnit:GossipMenuAddItem(5, "Blasted Lands", 725, 0)
pUnit:GossipMenuAddItem(5, "Burning Steppes", 726, 0)
pUnit:GossipMenuAddItem(5, "Deadwind Pass", 727, 0)
pUnit:GossipMenuAddItem(5, "Dun Morogh", 728, 0)
pUnit:GossipMenuAddItem(5, "Duskwood", 729, 0)
pUnit:GossipMenuAddItem(5, "Eastern Plaguelands", 730, 0)
pUnit:GossipMenuAddItem(5, "Elywnn Forest", 731, 0)
pUnit:GossipMenuAddItem(5, "Eversong Woods", 732, 0)
pUnit:GossipMenuAddItem(5, "Ghostlands", 733, 0)
pUnit:GossipMenuAddItem(5, "Hillsbrad Foothills", 734, 0)
pUnit:GossipMenuAddItem(2, "Page 2", 735, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 722) then
player:Teleport(0, 344.8762, -611.2338, 148.6080) --Alterac Mtns
end
if(intid == 723) then
player:Teleport(0, -856.2793, -1607.5512, 53.0391) --Arathi Highlands
end
if(intid == 724) then
player:Teleport(0, -6544.7827, -3078.6198, 267.8353) --Badlands
end
if(intid == 725) then
player:Teleport(0, -10912.1455, -2937.4934, 12.7035) --Blasted Lands
end
if(intid == 726) then
player:Teleport(0, -8550.8603, -2559.7419, 133.1489) --Burning Steppes
end
if(intid == 727) then
player:Teleport(0, -10434.3105, -1828.9581, 101.1548) --Deadwind Pass
end
if(intid == 728) then
player:Teleport(0, -5342.2421, -522.2236, 391.4935) --Dun Morogh
end
if(intid == 729) then
player:Teleport(0, -10803.0966, -891.3734, 55.7209) --Duskwood
end
if(intid == 730) then
player:Teleport(0, 1924.3857, -2692.2719, 61.4165) --Eastern Plaguelands
end
if(intid == 731) then
player:Teleport(0, -9205.7666, 209.3540, 70.7219) --Elywnn Forest
end
if(intid == 732) then
player:Teleport(530, 9095.4482, -6685.3725, 20.5868) --Eversong Woods
end
if(intid == 733) then
player:Teleport(530, 7938.4790, -6856.7646, 59.1780) --Ghostlands
end
if(intid == 734) then
player:Teleport(0, -319.3767, -754.0145, 54.2098) --Hillsbrad Foothills
end
if(intid == 735) then
pUnit:GossipCreateMenu(3543, player, 0) --Eastern Kingdoms page 2
pUnit:GossipMenuAddItem(5, "Loch Modan", 736, 0)
pUnit:GossipMenuAddItem(5, "Redridge Mtns", 737, 0)
pUnit:GossipMenuAddItem(5, "Searing Gorge", 738, 0)
pUnit:GossipMenuAddItem(5, "Silverpine Forest", 739, 0)
pUnit:GossipMenuAddItem(5, "Stranglethorn Vale", 740, 0)
pUnit:GossipMenuAddItem(5, "Swamp of Sarrows", 741, 0)
pUnit:GossipMenuAddItem(5, "The Hinterlands", 742, 0)
pUnit:GossipMenuAddItem(5, "Tirisfal Glades", 743, 0)
pUnit:GossipMenuAddItem(5, "Western Plaguelands", 744, 0)
pUnit:GossipMenuAddItem(5, "Westfall", 745, 0)
pUnit:GossipMenuAddItem(5, "Wetlands", 746, 0)
pUnit:GossipMenuAddItem(2, "Page 1", 18, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 736) then
player:Teleport(0, -5201.8598, -3136.5900, 298.7666) --Loch Modan
end
if(intid == 737) then
player:Teleport(0, -9193.7851, -2353.6098, 87.7648) --Redridge Mtns
end
if(intid == 738) then
player:Teleport(0, -7342.4663, -1091.8979, 277.0691) --Searing Gorge
end
if(intid == 739) then
player:Teleport(0, 664.288940, 1303.7861, 82.9889) --Silverpine Forest
end
if(intid == 740) then
player:Teleport(0, -11708.6308, -213.8615, 39.5549) --Stranglethorn Vale
end
if(intid == 741) then
player:Teleport(0, -10493.9091, -2391.7707, 76.9919) --Swamp of Sarrows
end
if(intid == 742) then
player:Teleport(0, 179.4921, -2068.7617, 116.3315) --The Hinterlands
end
if(intid == 743) then
player:Teleport(0, 1946.0373, 251.7409, 44.1699) --Tirisfal Glades
end
if(intid == 744) then
player:Teleport(0, 1716.7626, -806.7587, 57.6930) --Western Plaguelands
end
if(intid == 745) then
player:Teleport(0, -9825.7880, 863.8468, 25.7381) --Westfall
end
if(intid == 736) then
player:Teleport(0, -4087.0834, -2642.9406, 39.7672) --Wetlands
end
if (intid == 15) then
pUnit:GossipCreateMenu(3543, player, 0) --Outland Locations
pUnit:GossipMenuAddItem(5, "Blade's Edge Mtns", 500, 0)
pUnit:GossipMenuAddItem(5, "Hellfire Peninsula/The Dark Portal", 510, 0)
pUnit:GossipMenuAddItem(5, "Nagrand", 520, 0)
pUnit:GossipMenuAddItem(5, "Netherstorm", 530, 0)
pUnit:GossipMenuAddItem(5, "Shadowmoon Valley", 540, 0)
pUnit:GossipMenuAddItem(5, "Terokkar Forest", 550, 0)
pUnit:GossipMenuAddItem(5, "Zangarmarsh", 560, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 500) then
player:Teleport(530, 1114.010254, 7090.967285, 122.127274) --Blade's Edge Mtns
end
if(intid == 510) then
player:Teleport(530, -248.431702, 939.013367, 84.379822) --Hellfire Peninsula/The Dark Portal
end
if(intid == 520) then
player:Teleport(530, -526, 8440, 47.426472) --Nagrand
end
if(intid == 530) then
player:Teleport(530, 2315.689209, 2535.836670, 119.271622) --Netherstorm
end
if(intid == 540) then
player:Teleport(530, -2847.810791, 3190.677246, 8.136728) --Shadowmoon Valley
end
if(intid == 550) then
player:Teleport(530, -1176.588989, 5336.273926, 29.897034) --Terrokkar Forest
end
if(intid == 560) then
player:Teleport(530, 30.284981, 6983.303711, 148.666779) --Zangermarsh
end
if(intid == 501) then
player:Teleport(530, -1887.510010, 5359.379883, -12.427300) --Shattrath
end
if(intid == 600) then
pUnit:GossipCreateMenu(3543, player, 0) --Northrend Locations
pUnit:GossipMenuAddItem(5, "Borean Tundra [68-72]", 602, 0)
pUnit:GossipMenuAddItem(5, "Crystalsong Forest[74-76]", 603, 0)
pUnit:GossipMenuAddItem(5, "Dragonblight[71-74]", 604, 0)
pUnit:GossipMenuAddItem(5, "Grizzly Hills[73-75]", 605, 0)
pUnit:GossipMenuAddItem(5, "Howling Fjord[68-72]", 606, 0)
pUnit:GossipMenuAddItem(5, "Icecrown[77-80]", 607, 0)
pUnit:GossipMenuAddItem(5, "Sholazar Basin[75-79]", 608, 0)
pUnit:GossipMenuAddItem(5, "The Storm Peaks[76-80]", 609, 0)
pUnit:GossipMenuAddItem(5, "Wintergrasp[PVP]", 610, 0)
pUnit:GossipMenuAddItem(5, "Zul'Drak[74-77]", 611, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 602) then
player:Teleport(571, 3160.7128, 4974.2856, 23.7720) --Borean Tundra
end
if(intid == 603) then
player:Teleport(571, 5292.6582, 150.4761, 181.6185) --Crystalsong Forest
end
if(intid == 604) then
player:Teleport(571, 5196.5292, 187.7377, 195.4812) --Dragonblight
end
if(intid == 605) then
player:Teleport(571, 3759.4084, -3934.1347, 181.9007) --Grizzly Hills
end
if(intid == 606) then
player:Teleport(571, 1150.1116, -4594.8374, 183.7915) --Howling Fjord
end
if(intid == 607) then
player:Teleport(571, 6411.6953, 1137.4199, 278.1251) --Icecrown
end
if(intid == 608) then
player:Teleport(571, 4693.2368, 5550.4287, 22.4131) --Sholazar Basin
end
if(intid == 609) then
player:Teleport(571, 5750.9946, -369.3374, 208.7518) --The Storm Peaks
end
if(intid == 610) then
player:Teleport(571, 4485.8344, 2826.4731, 394.3452) --Wintergrasp
end
if(intid == 611) then
player:Teleport(571, 5449.8715, -2044.0681, 248.2227) --Zul'Drak
end
if(intid == 601) then
player:Teleport(571, 5807.8920, 588.1856, 660.9390) --Dalaran
end
if(intid == 620) then
pUnit:GossipCreateMenu(3543, player, 0) -- Instances/Raids
pUnit:GossipMenuAddItem(2, "Raids", 621, 0)
pUnit:GossipMenuAddItem(5, "The Nexus", 622, 0)
pUnit:GossipMenuAddItem(5, "Ragefire Chams", 623, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 622) then
player:Teleport(571, 3900.379883, 6985.549805, 70.488503) --The Nexus
end
if(intid == 623) then
player:Teleport(1, 1813.059937, -4413.962402, -18.176699) --Ragefire Chams RFC
end
if(intid == 621) then
pUnit:GossipCreateMenu(3543, player, 0) -- Raids
pUnit:GossipMenuAddItem(5, "Naxxramas", 632, 0)
pUnit:GossipMenuAddItem(5, "Obsidian Sanctum", 633, 0)
pUnit:GossipMenuAddItem(5, "The Eye of Eternity", 634, 0)
pUnit:GossipMenuAddItem(2, "[Main Menu]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 632) then
player:Teleport(571, 3666.149902, -1268.829956, 243.509003) --Naxxramas
end
if(intid == 633) then
player:Teleport(571, 3456.954590, 262.589355, -113.760834) --Obsidian Sanctum
end
if(intid == 634) then
player:Teleport(571, 3860.425537, 6989.365234, 152.042938) --The Eye of Eternity
end
if(intid == 666) then
player:Teleport(609, 2354.077881, -5667.029785, 426.027863) --Ebon Hold
pUnit:GossipComplete(player)
end
if(intid == 212) then
player:Teleport(0, -13257.0292, 171.0934, 34.1141) --Gurubashi Arena
pUnit:GossipComplete(player)
end
if(intid == 900) then
pUnit:FullCastSpellOnTarget(48073, player) --Divine Spirit
pUnit:FullCastSpellOnTarget(48161, player) --Power Word: Fortitude
pUnit:FullCastSpellOnTarget(58054, player) --Blessing of Kings
player:GossipComplete()
end
if(intid == 910) then
pUnit:FullCastSpellOnTarget(61301, player) --Riptide
player:GossipComplete()
end
if(intid == 901) then --Res Sickness
if(player:HasAura(15007) == true) then
player:RemoveAura(15007)
player:SendBroadcastMessage("Removed Resurrection Sickness! Enjoy!")
else
player:SendBroadcastMessage("You do not currently have Resurrection Sickness!")
end
player:GossipComplete()
end
if(intid == 100) then
Teleport_main_menu(pUnit, player)
end
end
RegisterUnitGossipEvent(55550, 1, "Teleport_on_gossip_talk")
RegisterUnitGossipEvent(55550, 2, "Teleport_on_gossip_select")



LinkBack URL
About LinkBacks


Reply With Quote



Bookmarks