LUA Cutsom Teleporter

[Zazi529]

ZaZi's Custom LUA Teleporter

Hello everyone! This is my Custom Teleporter NPC for ArcEmu (This is my first release).
I spent about 6 hours on this writing it and getting it just perfect, hope you enjoy!

FEATURES
• Colorful<3
• Buff's
• Heal's
• Has Alliance Cities for Alliance to teleport to only, and has Horde Cities for Horde to port to only.
• Two potential Mall Locations!

•Here's some ScreenShot's of the Teleporter's I have pre-made for you guys (Also, the Teleporter's Menu)



•Image - TinyPic - Free Image Hosting, Photo Sharing & Video Hosting - Script Menu

•Image - TinyPic - Free Image Hosting, Photo Sharing & Video Hosting - Warper_Loken

•Image - TinyPic - Free Image Hosting, Photo Sharing & Video Hosting - Warper_Globe

•Image - TinyPic - Free Image Hosting, Photo Sharing & Video Hosting - Warper_Algalon

•Here's the SQL's for the Pre-Made Teleporter NPC's

• https://rapidshare.com/files/918330203/Warper-Loken.rar - Loken

•https://rapidshare.com/files/2725318...rper-Globe.rar - Globe

•https://rapidshare.com/files/1686112...er-Algalon.rar - Agalon


Thanks, ZaZi.

--------------------------
-------Made by ZaZi-------
-----------529------------
--------------------------
---Release on OwnedCore---
--------------------------
--------------------------
-------ArcEmu Core--------
--------------------------

function Teleport_on_gossip_talk(pUnit, event, player)
pUnit:GossipCreateMenu(3544, player, 0)
if(player:GetTeam() == 1) then

pUnit:GossipMenuAddItem(8, "|CFF3366FF Alliance Cities", 3, 0)
else
end
if(player:GetTeam() == 0 ) then
pUnit:GossipMenuAddItem(8, "|CFFCC0000 Horde Cities", 2, 0)
else
end

pUnit:GossipMenuAddItem(8, "|cff388E8E Mall [Dalaran]", 348, 0)
pUnit:GossipMenuAddItem(8, "|cff388E8E Mall [Shattrath]", 342, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Outland Dungeons", 4, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Outland Raids", 5, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Azeroth Dungeons", 6, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Azeroth Raids", 7, 0)
pUnit:GossipMenuAddItem(9, "|cffFF4500 [PVP]", 8, 0)
pUnit:GossipMenuAddItem(5, "|CFF00FF00 Heal me!", 994, 0)
pUnit:GossipMenuAddItem(4, "|CFF00FF00 Buff Me!", 995, 0)
pUnit:GossipSendMenu(player)
end

function Teleport_on_gossip_select(pUnit, event, player, id, intid, code)

if(intid == 990) then
pUnit:GossipMenuAddItem(8, "|cff388E8E Mall [Dalaran]", 348, 0)
pUnit:GossipMenuAddItem(8, "|cff388E8E Mall [Santcuary]", 342, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Outland Dungeons", 4, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Outland Raids", 5, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Azeroth Dungeons", 6, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Azeroth Raids", 7, 0)
pUnit:GossipMenuAddItem(9, "|cffFF4500 [PVP]", 8, 0)
pUnit:GossipMenuAddItem(5, "|CFF00FF00 Heal me!", 994, 0)
pUnit:GossipMenuAddItem(4, "|CFF00FF00 Buff Me!", 995, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 2) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(8, "|CFFCC0000 Orgrimmar", 300, 0)
pUnit:GossipMenuAddItem(8, "|CFFCC0000 Undercity", 301, 0)
pUnit:GossipMenuAddItem(8, "|CFFCC0000 Thunder Bluff", 302, 0)
pUnit:GossipMenuAddItem(8, "|CFFCC0000 Silvermoon City", 303, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 3) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(8, "|CFF3366FF Stormwind", 304, 0)
pUnit:GossipMenuAddItem(8, "|CFF3366FF Ironforge", 305, 0)
pUnit:GossipMenuAddItem(8, "|CFF3366FF Darnassus", 306, 0)
pUnit:GossipMenuAddItem(8, "|CFF3366FF The Exodar", 307, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 4) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(2, "|cff388E8E Hellfire Ramparts", 308, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Blood Furnace", 309, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Shattered Halls", 310, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Underbog", 311, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Slave Pens", 312, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Mana Tombs", 313, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Sethekk Halls", 314, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Shadow Labyrinth", 315, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E The Mechanar", 316, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Arcatraz", 317, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Caverns of Time", 318, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Serpentshrine Cavern", 319, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 5) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(2, "|cff388E8E Black Temple", 330, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Tempest Keep", 331, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Karazhan", 337, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Zul'Aman", 347, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Gruul's Lair", 346, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Maghteridon's Lair", 332, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end 

if(intid == 6) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(2, "|cff388E8E Shadowfang Keep", 326, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Scarlet Monastery", 327, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Zul'Farrak", 328, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Scholomance", 329, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E The Deadmines", 330, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Uldaman", 331, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Sunken temple", 332, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Lower Blackrock Depths", 333, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Dire Maul", 334, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Upper Blackrock Depths", 335, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 7) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(2, "|cff388E8E Onyxia's Lair", 336, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Molten Core", 337, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Blackwing Lair", 338, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Zul'Gurub", 339, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Ruins of Ahn'Qiraj 340", 69, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Temple of Ahn'Qiraj 341", 70, 0)
pUnit:GossipMenuAddItem(2, "|cff388E8E Naxxramas", 342, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4 [Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 8) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:GossipMenuAddItem(2, "|cffFF4500 Nagrand Arena", 343, 0)
pUnit:GossipMenuAddItem(2, "|cffFF4500 Gurubashi Arena", 345, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 994) then
pUnit:GossipCreateMenu(3544, player, 0)
pUnit:GossipMenuAddItem(5, "|cff71C671 Heal me!", 994, 0)
pUnit:GossipMenuAddItem(7, "|cffFF6EB4[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end

-----Coordinates Go Below-----

if(intid == 300) then --Orgrimmar--
player:Teleport(1, 1371.068970, -4370.801758, 26.052483)
pUnit:GossipComplete(player)
end

if(intid == 301) then --Undercity--
player:Teleport(0, 2050.203125, 285.650604, 56.994549)
pUnit:GossipComplete(player)
end

if(intid == 302) then --Thunder Bluff--
player:Teleport(1, -1304.569946, 205.285004, 68.681396)
pUnit:GossipComplete(player)
end

if(intid == 303) then --Silvermooon City--
player:Teleport(530, 9400.486328, -7278.376953, 14.206780)
pUnit:GossipComplete(player)
end

-----------------------------------------------------------

if(intid == 304) then --Stormwind City--
player:Teleport(0, -9165.678711,470.176544, 103.978409)
pUnit:GossipComplete(player)
end

if(intid == 305) then --Ironforge--
player:Teleport(0, -4977.095215, -888.452942, 501.621216)
pUnit:GossipComplete(player)
end

if(intid == 306) then --Darnassus--
player:Teleport(1, 9943.809570, 2275.350098, 1341.390015)
pUnit:GossipComplete(player)
end

if(intid == 307) then --The Exodar--
player:Teleport(530, -3792.557861, -11691.3, -105.241)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 308) then --HellFire Ramparts--
player:Teleport(530, -360.670990, 3071.899902, -15.097700)
pUnit:GossipComplete(player)
end

if(intid == 309) then --Blood Furnace--
player:Teleport(530, -303.506012, 3164.820068, 31.742500)
pUnit:GossipComplete(player)
end

if(intid == 310) then --Shattered Halls--
player:Teleport(530, -311.083527, 3083.291748, -3.745923)
pUnit:GossipComplete(player)
end

if(intid == 311) then --Underbog--
player:Teleport(530, 777.088989, 6763.450195, -72.062561)
pUnit:GossipComplete(player)
end

if(intid == 312) then --Slave Pens--
player:Teleport(530, 719.507996, 6999.339844, -73.074303)
pUnit:GossipComplete(player)
end

if(intid == 313) then --Mana-Tombs--
player:Teleport(530, -3079.810059, 4943.040039, -101.046997)
pUnit:GossipComplete(player)
end

if(intid == 314) then --Setthek Halls--
player:Teleport(530, -3362.219971, 4660.410156, -101.049004)
pUnit:GossipComplete(player)
end

if(intid == 315) then --Shadow Labyrinth--
player:Teleport(530, -3645.060059, 4943.620117, -101.047997)
pUnit:GossipComplete(player)
end

if(intid == 316) then --The Mechanar--
player:Teleport(530, 2862.409912, 1546.089966, 252.158691)
pUnit:GossipComplete(player)
end

if(intid == 317) then --Arcatraz--
player:Teleport(530, 3311.598145, 1332.745117, 505.557251)
pUnit:GossipComplete(player)
end

if(intid == 318) then --Cavern of Time--
player:Teleport(1, -8519.718750, -4297.542480, -208.441376)
pUnit:GossipComplete(player)
end

if(intid == 319) then --Serpentshrine Cavern--
player:Teleport(530, 830.542908, 6865.445801, -63.785503)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 330) then --Black Temple--
player:Teleport(530, -3628.623291, 314.697510, 38.257904)
pUnit:GossipComplete(player)
end

if(intid == 331) then --Tempest Keep--
player:Teleport(530, 3089.057129, 1394.752197, 186.302628)
pUnit:GossipComplete(player)
end

if(intid == 332) then --Magtheridon's Lair--
player:Teleport(530, -313.678986, 3088.350098, -116.501999)
pUnit:GossipComplete(player)
end

if(intid == 337) then --Karazhan--
player:Teleport(0, -11124.789063, -2016.765259, 47.125431)
pUnit:GossipComplete(player)
end

if(intid == 341) then --Zul'Aman--
player:Teleport(530, 6850, -7950, 170)
pUnit:GossipComplete(player)
end

if(intid == 337) then --Gruul's Lair--
player:Teleport(530, 3530.207031, 5126.354492, 2.917513)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 333) then --Onyxia's Lair--
player:Teleport(1, -4746, -3749, -4)
pUnit:GossipComplete(player)
end

if(intid == 334) then --Molten Core--
player:Teleport(409, 1089.486816, -470.366241, -106.475876)
pUnit:GossipComplete(player)
end

if(intid == 335) then --Blackwing Lair--
player:Teleport(469, -7665.55, -1102.49, 400.679)
pUnit:GossipComplete(player)
end

if(intid == 336) then --Zul'Gurub--
player:Teleport(0, -11919.073242, -1202.459374, 92.298744)
pUnit:GossipComplete(player)
end

if(intid == 338) then --Ruins of Ahn'Qiraj
player:Teleport(1, -8394.730469, 1485.658447, 21.038563)
pUnit:GossipComplete(player)
end

if(intid == 339) then --Temple of Ahn'Qiraj
player:Teleport(1, -8247.316406, 1970.156860, 129.071472)
pUnit:GossipComplete(player)
end

if(intid == 340) then --Naxxramas
player:Teleport(533, 3006.06, -3436.72, 293.891)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 320) then --Shadowfang Keep--
player:Teleport(0, -10349.1, -3849.67, -24.6078)
pUnit:GossipComplete(player)
end

if(intid == 321) then --Scarlet Monastarey--
player:Teleport(0, 2843.570069, -692.133972, 139.330734)
pUnit:GossipComplete(player)
end

if(intid == 322) then --Zul'Farrak--
player:Teleport(1, -6815.975586, -2888, 540273, 8.895924)
pUnit:GossipComplete(player)
end

if(intid == 323) then --Scholomance--
player:Teleport(0, 1264.672363, -2558.375000, 94.128685)
pUnit:GossipComplete(player)
end

if(intid == 324) then --The Deamines--
player:Teleport(0, -11208.843750, 1667.725952, 24.624727)
pUnit:GossipComplete(player)
end

if(intid == 325) then --Uldaman--
player:Teleport(0, -6085.118652, -3220.368164, 262.885529)
pUnit:GossipComplete(player)
end

if(intid == 326) then --Sunken Temple--
player:Teleport(0, -10349.099609, -3849.669922, -41.240356)
pUnit:GossipComplete(player)
end

if(intid == 327) then --Lower Blackrock Spire--
player:Teleport(0, -7189,741211, -911.613281, 165.490372)
pUnit:GossipComplete(player)
end

if(intid == 328) then --Dire Maul--
player:Teleport(1, -3981.025391, 788.601379, 161.007019)
pUnit:GossipComplete(player)
end

if(intid == 329) then --Upper Blackrock Spire--
player:Teleport(469, -766.245117, -1103.233154, 399.680328)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 342) then --Shattrath (Mall)--
player:Teleport(530, -1863.719971, 5429.959961, -9.705180)
pUnit:GossipComplete(player)
end

if(intid == 348) then --Dalaran City (Mall #2)--
player:Teleport(571, 5805.218262, 640.216064, 647.766174)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 343) then --Nagrand Arena--
player:Teleport(530, -2044.768799, 6654.127441, 13.054342)
pUnit:GossipComplete(player)
end


if(intid == 345) then --Gurubashi Arena--
player:Teleport(530,-2011.498413, 6601.716797, 12.434589)
pUnit:GossipComplete(player)
end

----------------------------------------------------------

if(intid == 994) then
pUnit:GossipCreateMenu(3543, player, 0)
pUnit:FullCastSpellOnTarget(71782, player)
pUnit:GossipSendMenu(player)
end

if(intid == 995) then
pUnit:GossipCreateMenu(3544, player, 0)
pUnit:FullCastSpellOnTarget(33077, player)
pUnit:FullCastSpellOnTarget(33078, player)
pUnit:FullCastSpellOnTarget(33079, player)
pUnit:FullCastSpellOnTarget(33080, player)
pUnit:FullCastSpellOnTarget(33081, player)
pUnit:FullCastSpellOnTarget(33082, player)
pUnit:FullCastSpellOnTarget(42995, player)
pUnit:FullCastSpellOnTarget(48161, player)
pUnit:FullCastSpellOnTarget(25898, player)
pUnit:SendChatMessage(13, 0, "You're now Buffed!", 0, 0)
pUnit:GossipMenuAddItem(7, "[Main Menu]", 990, 0)
pUnit:GossipSendMenu(player)
end
end

RegisterUnitGossipEvent(NPCIDHERE, 1, "Teleport_on_gossip_talk")
RegisterUnitGossipEvent(NPCIDHERE, 2, "Teleport_on_gossip_select")

[Bladeward11]

Well done.

[boosacknoodle]

Great! Works flawlessly.

[jewknowit]

Thanks, using this now!