[Release] Teleporter NPC (LUA++) menu

These ads disappear when you log in.

Results 1 to 10 of 10
  1. #1
    Vaudville's Avatar Sergeant
    Reputation
    10
    Join Date
    Aug 2008
    Posts
    47
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    [Release] Teleporter NPC (LUA++)

    'Allo again. This is a functioning teleporter NPC in LUA++, and yes, it works. We have it active on our server, and needlessly said, it beats the shit out of portals!

    LUA++ is (obviously) required to have this script running. You can get that here.

    You can change the NPCID to whatever you like, but make sure your npc has its flags set to 3! Else it won't work.

    This NPC has faction checks between horde and alliance, so that those of us with funservers don't have to deal with PvP tickets constantly. Easily removable should you choose.

    Code:
    local npcid = 500000
    
    function WarpNPC_OnGossipTalk(pUnit, event, player, pMisc)
    pUnit:GossipCreateMenu(100, player, 0)
    local race=player:GetPlayerRace()
    if race==1 or race==3 or race==4 or race==7 or race==11 then
    pUnit:GossipMenuAddItem(0, "Alliance Locations", 1, 0)
    end
    local race=player:GetPlayerRace()
    if race==2 or race==5 or race==6 or race==8 or race==10 then
    pUnit:GossipMenuAddItem(0, "Horde Locations", 2, 0)
    end
    pUnit:GossipMenuAddItem(0, "Outland Locations", 3, 0)
    pUnit:GossipMenuAddItem(0, "Instances", 4, 0)
    pUnit:GossipMenuAddItem(0, "Neutral/Event Areas", 80, 0)
    pUnit:GossipMenuAddItem(5, "Buff me up.", 57, 0)
    pUnit:GossipMenuAddItem(9, "Remove Rez Sickness", 58, 0)
    pUnit:GossipSendMenu(player)
    end
    
    function WarpNPC_OnGossipSelect(pUnit, event, player, id, intid, code, pMisc)
    if (intid == 1) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Alliance Leveling Area 1", 9, 0)
    pUnit:GossipMenuAddItem(2, "Alliance Leveling Area 2", 10, 0)
    pUnit:GossipMenuAddItem(2, "Hunter Zoo", 11, 0)
    pUnit:GossipMenuAddItem(2, "Skill Leveling Area", 12, 0)
    pUnit:GossipMenuAddItem(2, "Alliance Mall", 65, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 2) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Horde Leveling Area 1", 5, 0)
    pUnit:GossipMenuAddItem(2, "Horde Leveling Area 2", 6, 0)
    pUnit:GossipMenuAddItem(2, "Hunter Zoo", 7, 0)
    pUnit:GossipMenuAddItem(2, "Skill Leveling Area", 8, 0)
    pUnit:GossipMenuAddItem(2, "Horde Mall", 66, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 3) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Shattrath", 13, 0)
    pUnit:GossipMenuAddItem(2, "Blade's Edge Mountains", 53, 0)
    pUnit:GossipMenuAddItem(2, "Hellfire Peninsula/The Dark Portal", 50, 0)
    pUnit:GossipMenuAddItem(2, "Nagrand", 52, 0)
    pUnit:GossipMenuAddItem(2, "Netherstorm", 54, 0)
    pUnit:GossipMenuAddItem(2, "Shadowmoon Valley", 55, 0)
    pUnit:GossipMenuAddItem(2, "Terokkar Forest", 51, 0)
    pUnit:GossipMenuAddItem(2, "Zangarmarsh", 56, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 4) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(0, "Eastern Kingdom Instances", 14, 0)
    pUnit:GossipMenuAddItem(0, "Kalimdor Instances", 15, 0)
    pUnit:GossipMenuAddItem(0, "Outland Instances", 16, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 80) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Exiles' Neutral Mall", 70, 0)
    pUnit:GossipMenuAddItem(2, "PVP Event Arena", 71, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 14) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Blackrock Mountains", 17, 0)
    pUnit:GossipMenuAddItem(2, "The Deadmines", 18, 0)
    pUnit:GossipMenuAddItem(2, "Gnomeregan", 19, 0)
    pUnit:GossipMenuAddItem(2, "Karazhan", 20, 0)
    pUnit:GossipMenuAddItem(2, "Naxxramas", 22, 0)
    pUnit:GossipMenuAddItem(2, "Scholomance", 23, 0)
    pUnit:GossipMenuAddItem(2, "Shadowfang Keep", 24, 0)
    pUnit:GossipMenuAddItem(2, "Scarlet Monastery", 25, 0)
    pUnit:GossipMenuAddItem(2, "The Stockade", 26, 0)
    pUnit:GossipMenuAddItem(2, "Stratholme", 27, 0)
    pUnit:GossipMenuAddItem(2, "The Sunken Temple", 28, 0)
    pUnit:GossipMenuAddItem(2, "Uldaman", 30, 0)
    pUnit:GossipMenuAddItem(2, "Zul'Gurub", 32, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 15) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Ahn'Qiraj", 33, 0)
    pUnit:GossipMenuAddItem(2, "Blackfathom Deeps", 34, 0)
    pUnit:GossipMenuAddItem(2, "Caverns of Time", 35, 0)
    pUnit:GossipMenuAddItem(2, "Dire Maul", 36, 0)
    pUnit:GossipMenuAddItem(2, "Maraudon", 37, 0)
    pUnit:GossipMenuAddItem(2, "Onyxia's Lair", 38, 0)
    pUnit:GossipMenuAddItem(2, "Ragefire Chasm", 39, 0)
    pUnit:GossipMenuAddItem(2, "Razorfen Downs", 40, 0)
    pUnit:GossipMenuAddItem(2, "Razorfen Kraul", 41, 0)
    pUnit:GossipMenuAddItem(2, "Wailing Caverns", 42, 0)
    pUnit:GossipMenuAddItem(2, "Zul'Farrak", 43, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 16) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(2, "Auchindoun", 44, 0)
    pUnit:GossipMenuAddItem(2, "Black Temple", 45, 0)
    pUnit:GossipMenuAddItem(2, "Coilfang Reservoir", 46, 0)
    pUnit:GossipMenuAddItem(2, "Gruul's Lair", 47, 0)
    pUnit:GossipMenuAddItem(2, "Hellfire Citadel", 48, 0)
    pUnit:GossipMenuAddItem(2, "Magisters' Terrace", 21, 0)
    pUnit:GossipMenuAddItem(2, "Tempest Keep", 49, 0)
    pUnit:GossipMenuAddItem(2, "Sunwell Plateau", 29, 0)
    pUnit:GossipMenuAddItem(2, "Zul'Aman", 31, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 57) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(3, "Agility", 59, 0)
    pUnit:GossipMenuAddItem(3, "Intellect", 60, 0)
    pUnit:GossipMenuAddItem(3, "Protection", 61, 0)
    pUnit:GossipMenuAddItem(3, "Spirit", 62, 0)
    pUnit:GossipMenuAddItem(3, "Stamina", 63, 0)
    pUnit:GossipMenuAddItem(3, "Strength", 64, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 5) then
    player:Teleport(1, 4612.279785, -3862.540039, 944.182983) -- HLeveling Area 1
    end
    if (intid == 6) then
    player:Teleport(1, 6913.299805, -2289.810059, 590.745972) -- HLeveling Area 2
    end
    if (intid == 7) then
    player:Teleport(0, -7545.097656, -3468.961182, 170.881744) -- H Hunter Zoo
    end
    if (intid == 8) then
    player:Teleport(0, -7666.701660, -3208.601807, 170.881744) -- H Skill Area
    end
    if (intid == 9) then
    player:Teleport(0, -9586.009766, -1936.000000, 64.082199) -- A Leveling Area 1
    end
    if (intid == 10) then
    player:Teleport(0, -635.450134, -4072.639893, 238.461533) -- A Leveling Area 2
    end
    if (intid == 11) then
    player:Teleport(0, -8207.745117, -3558.475830, 170.924362) -- A Hunter Zoo
    end
    if (intid == 12) then
    player:Teleport(0, -8073.417969, -3518.160400, 170.882813) -- A Skill Area
    end
    if (intid == 13) then
    player:Teleport(530, -1887.510010, 5359.379883, -12.427300) -- Shattrath
    end
    if (intid == 17) then
    player:Teleport(0, -7491.719238, -1074.845947, 265.089935) -- Blackrock Mountains
    end
    if (intid == 18) then
    player:Teleport(0, -11067.506836, 1527.711304, 43.282364) -- The Deadmines
    end
    if (intid == 19) then
    player:Teleport(0, -5182.464355, 607.487427, 408.965881) -- Gnomeregan
    end
    if (intid == 20) then
    player:Teleport(0, -11121.247070, -2012.714355, 47.096985) -- Karazahn
    end
    if (intid == 21) then
    player:Teleport(530, 12889.763672, -7326.697266, 65.491798) -- Magisters' Terrace
    end
    if (intid == 22) then
    player:Teleport(0, 3164.131592, -3747.983887, 132.852615) -- Naxxramas
    end
    if (intid == 23) then
    player:Teleport(0, 1230.314575, -2599.220703, 88.976143) -- Scholomance
    end
    if (intid == 24) then
    player:Teleport(0, -246.683914, 1532.607666, 77.124901) -- Shadowfang Keep
    end
    if (intid == 25) then
    player:Teleport(0, 2843.495605, -692.977295, 139.330276) -- Scarlet Monastery
    end
    if (intid == 26) then
    player:Teleport(0, -8772.176758, 840.297913, 91.003372) -- The Stockade
    end
    if (intid == 27) then
    player:Teleport(0, 3343.937744, -3379.550781, 144.775574) -- Stratholme
    end
    if (intid == 28) then
    player:Teleport(0, -10449.789063, -3823.687988, 18.066645) -- The Sunken Temple
    end
    if (intid == 29) then
    player:Teleport(530, 12588.159180, -6775.057617, 15.091800) -- Sunwell Plateau
    end
    if (intid == 30) then
    player:Teleport(0, -6071.516133, -2955.536377, 209.783035) -- Uldaman
    end
    if (intid == 31) then
    player:Teleport(530, 6851.177246, -7946.305664, 170) -- Zul'Aman
    end
    if (intid == 32) then
    player:Teleport(0, -11915.947266, -1187.432007, 85.137840) -- Zul'Gurub
    end
    if (intid == 33) then
    player:Teleport(1, -8166.177734, 1531.099487, 4.195099) -- Ahn'Qiraj
    end
    if (intid == 34) then
    player:Teleport(1, 4247.057129, 741.940735, -25.184605) -- Blackfathom Deeps
    end
    if (intid == 35) then
    player:Teleport(1, -8369.945313, -4253.909820, -204.333389) -- Caverns of Time
    end
    if (intid == 36) then
    player:Teleport(1, -3520.068848, 1113.661337, 161.026123) -- Dire Maul
    end
    if (intid == 37) then
    player:Teleport(1, -1421.904297, 2910.345703, 137.410583) -- Maraudon
    end
    if (intid == 38) then
    player:Teleport(1, -4672.532227, -3702.960693, 46.147873) -- Onyxia's Lair
    end
    if (intid == 39) then
    player:Teleport(1, 1809.329834, -4404.645508, -18.714394) -- Ragfire Chasm
    end
    if (intid == 40) then
    player:Teleport(1, -4651.700684, -2500.510254, 81.400879) -- Razorfen Downs
    end
    if (intid == 41) then
    player:Teleport(1, -4473.704102, -1683.995361, 80.525322) -- Razorfen Kraul
    end
    if (intid == 42) then
    player:Teleport(1, -740.448181, -2215.664063, 16.156469) -- Wailing Caverns
    end
    if (intid == 43) then
    player:Teleport(1, -6808.160645, -2890.859131, 8.885407) -- Zul'Farrak
    end
    if (intid == 44) then
    player:Teleport(530, -3329.651855, 4936.043457, -90.39930) -- Auchindoun
    end
    if (intid == 45) then
    player:Teleport(530, -3624.857910, 315.062836, 38.903099) -- Black Temple
    end
    if (intid == 46) then
    player:Teleport(530, 730.947876, 6866.012695, -70.749023) -- Coilfang Reservoir
    end
    if (intid == 47) then
    player:Teleport(530, 3523.798340, 5153.760742, -1.424888) -- Gruul's Lair
    end
    if (intid == 48) then
    player:Teleport(530, -575.380798, 3119.677734, 5.5155335) -- Hellfire Citadel
    end
    if (intid == 49) then
    player:Teleport(530, 3098.487793, 1513.052124, 190.300110) -- Tempest Keep
    end
    if (intid == 50) then
    player:Teleport(530, -248.431702, 939.013367, 84.379822) -- Hellfire Peninsula/ The Dark Portal
    end
    if (intid == 51) then
    player:Teleport(530, -1176.588989, 5336.273926, 29.897034) -- Terokkar Forest
    end
    if (intid == 52) then
    player:Teleport(530, -526, 8440, 47.426472) -- Nagrand
    end
    if (intid == 53) then
    player:Teleport(530, 1114.010254, 7090.967285, 122.127274) -- Blade's Edge Mountains
    end
    if (intid == 54) then
    player:Teleport(530, 2315.689209, 2535.836670, 119.271622) -- Netherstorm
    end
    if (intid == 55) then
    player:Teleport(530, -2847.810791, 3190.677246, 8.136728) -- Shadowmoon Valley
    end
    if (intid == 56) then
    player:Teleport(530, 30.284981, 6983.303711, 148.666779) -- Zangarmarsh
    end
    if (intid == 66) then
    player:Teleport(0, -11217.500000, -1739.180054, -28.797300) -- Horde Mall
    end
    if (intid == 65) then
    player:Teleport(530, -3516.149902, -132.516998, 282.747986) -- Alliance Mall
    end
    if (intid == 70) then
    player:Teleport(0, -941.559021, -3429.497070, 70.934082) -- Exile Mall
    end
    if (intid == 71) then
    player:Teleport(1, -3787.889893, 1084.719971, 131.970001) -- PVP Arena
    end
    if (intid == 58) then
    player:LearnSpell(15007) -- Remove Resurrection Sickness
    player:UnlearnSpell(15007)
    pUnit:SendChatMessage(12, 0, "Nub...lulz")
    pUnit:GossipComplete(player)
    end
    if (intid == 59) then
    pUnit:FullCastSpellOnTarget(33077, player)
    pUnit:GossipComplete(player)
    end
    if (intid == 60) then
    pUnit:FullCastSpellOnTarget(33078, player)
    pUnit:GossipComplete(player)
    end
    if (intid == 61) then
    pUnit:FullCastSpellOnTarget(33079, player)
    pUnit:GossipComplete(player)
    end
    if (intid == 62) then
    pUnit:FullCastSpellOnTarget(33080, player)
    pUnit:GossipComplete(player)
    end
    if (intid == 63) then
    pUnit:FullCastSpellOnTarget(33081, player)
    pUnit:GossipComplete(player)
    end
    if (intid == 64) then
    pUnit:FullCastSpellOnTarget(33082, player)
    pUnit:GossipComplete(player)
    end
    end
    
    RegisterUnitGossipEvent(npcid, 1, "WarpNPC_OnGossipTalk")
    RegisterUnitGossipEvent(npcid, 2, "WarpNPC_OnGossipSelect")
    Enjoy the warper!

    These ads disappear when you log in.

  2. #2
    Zaeoir's Avatar Knight
    Reputation
    66
    Join Date
    May 2008
    Posts
    188
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Is it working?
    Need help? Add my MSN or PM me here.

  3. #3
    Vaudville's Avatar Sergeant
    Reputation
    10
    Join Date
    Aug 2008
    Posts
    47
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    If you took the time to read the post.. you'd see that it does work. I've tested it personally and it's live on a server I work on.

  4. #4
    stoneharry's Avatar Moderator Harry

    CoreCoins User Authenticator enabled
    Reputation
    1518
    Join Date
    Sep 2007
    Posts
    4,377
    Thanks G/R
    102/95
    Trade Feedback
    0 (0%)
    But the script engines change depending on what your running. So it may not work on some servers. I've seen about 4 working Lua++ teleporter npc's already on mmowned, and there's loads more out there, so sorry to say i'm not impressed But +rep for trying anyway! =p

  5. #5
    Vindicated's Avatar Contributor
    Reputation
    226
    Join Date
    Aug 2008
    Posts
    1,068
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    And what is the difference between this and the other 9999999 teleporters for lua I've seen?


  6. #6
    Sounddead's Avatar Contributor
    Reputation
    160
    Join Date
    Sep 2007
    Posts
    1,126
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Why did you release 2 things that we already have on these forums?

  7. #7
    Vaudville's Avatar Sergeant
    Reputation
    10
    Join Date
    Aug 2008
    Posts
    47
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Originally Posted by DudeWheresMYEmu View Post
    And what is the difference between this and the other 9999999 teleporters for lua I've seen?
    A. It works
    B. I haven't seen one for Lua++
    C. It has the word "Nub" in it for the NPC to say. So, obv, It's pretty ****ing hardcore.


  8. #8
    stoneharry's Avatar Moderator Harry

    CoreCoins User Authenticator enabled
    Reputation
    1518
    Join Date
    Sep 2007
    Posts
    4,377
    Thanks G/R
    102/95
    Trade Feedback
    0 (0%)
    Originally Posted by Vaudville View Post
    A. It works
    B. I haven't seen one for Lua++
    C. It has the word "Nub" in it for the NPC to say. So, obv, It's pretty ****ing hardcore.

    A: A lot work
    B: I've seen loads in Lua++ including one i made.
    C: Nub in the npc say is hardcore?...

    Phail

  9. #9
    Vaudville's Avatar Sergeant
    Reputation
    10
    Join Date
    Aug 2008
    Posts
    47
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Originally Posted by stoneharry View Post
    A: A lot work
    B: I've seen loads in Lua++ including one i made.
    C: Nub in the npc say is hardcore?...

    Phail
    I was being sarcastic.

  10. #10
    stoneharry's Avatar Moderator Harry

    CoreCoins User Authenticator enabled
    Reputation
    1518
    Join Date
    Sep 2007
    Posts
    4,377
    Thanks G/R
    102/95
    Trade Feedback
    0 (0%)
    Did you know that being sarcastic or ironic is very hard to tell on the internet because there is no vocal cords etc being heard, only the text we see infront of us, so if you are, and don't make it obvious, then we wont tell...
    "reading in-between the lines" has always been my downside though, so meh

Similar Threads

  1. [Release] Fun Teleporter npc [Lua++]
    By stoneharry in forum WoW EMU General Releases
    Replies: 24
    Last Post: 02-23-2009, 06:48 PM
  2. [Release]Buffer npc lua
    By Noobcraft in forum WoW EMU General Releases
    Replies: 8
    Last Post: 10-04-2008, 07:20 AM
  3. Teleporter NPC LUA
    By Performer in forum WoW EMU Questions & Requests
    Replies: 7
    Last Post: 08-21-2008, 08:04 AM
  4. [Release] Info NPC -- LUA
    By Babbaa in forum WoW EMU General Releases
    Replies: 6
    Last Post: 08-17-2008, 02:29 PM
  5. Will this teleporter npc lua script work?
    By Bapes in forum World of Warcraft Emulator Servers
    Replies: 9
    Last Post: 05-22-2008, 11:50 AM
All times are GMT -5. The time now is 05:27 AM. Powered by vBulletin® Version 4.2.3
Copyright © 2019 vBulletin Solutions, Inc. All rights reserved. Digital Point modules: Sphinx-based search