[Release] HelperNPC menu

These ads disappear when you log in.

Results 1 to 8 of 8
  1. #1
    berryman13's Avatar Contributor CoreCoins User
    Reputation
    251
    Join Date
    Dec 2006
    Posts
    856
    Thanks G/R
    0/2
    Trade Feedback
    3 (100%)

    [Release] HelperNPC

    Well this is just a quick job, done in about 15 mins. What it does is teleport you to all major cities, buffs you (In alphabetical order for the user's convenience) and Removes Rez Sickness. I will be adding more options such as morphing and such, but this is just a first release.


    Ver 1.0
    Code:
    local npcid = 123456789
    
    function Help_OnGossipTalk(pUnit, event, player, pMisc)
    pUnit:GossipCreateMenu(100, player, 0)
    pUnit:GossipMenuAddItem(5, "Buff Menu", 9,0)
    pUnit:GossipMenuAddItem(5, "Teleport Menu", 10,0)
    pUnit:GossipSendMenu(player)
    end
    function Help_OnGossipTalk(pUnit, event, player, pMisc)
    if (intid == 10) then
    pUnit:GossipCreateMenu(100, player, 0)
    pUnit:GossipMenuAddItem(player, 5, "Shattrath", 24, 0)
    pUnit:GossipMenuAddItem(player, 0, "Horde cities", 12, 0)
    pUnit:GossipMenuAddItem(player, 0, "Alliance cities", 13, 0)
    pUnit:GossipSendMenu(player)
    end
    function Help_OnGossip_select(pUnit, event, player, id, intid, code)
    if(intid == 12) then
    pUnit:GossipCreateMenu(100, player)
    pUnit:GossipMenuAddItem(player, 5, "Orgrimmar", 16, 0)
    pUnit:GossipMenuAddItem(player, 5, "Undercity", 17, 0)
    pUnit:GossipMenuAddItem(player, 5, "Thunder Bluff", 18, 0)
    pUnit:GossipMenuAddItem(player, 5, "Silvermoon City", 19, 0)
    pUnit:GossipSendMenu(player)
    end
    if(intid == 13) then
    pUnit:GossipCreateMenu(100, player)
    pUnit:GossipMenuAddItem(player, 5, "Stormwind", 20, 0)
    pUnit:GossipMenuAddItem(player, 5, "Ironforge", 21, 0)
    pUnit:GossipMenuAddItem(player, 5, "Darnassus", 22, 0)
    pUnit:GossipMenuAddItem(player, 5, "The Exodar", 23, 0)
    pUnit:GossipSendMenu(player)
    end
    
    if(intid == 24) then
    player:Teleport(530, -1887.510010, 5359.379883, -12.427300)
    end
    if(intid == 16) then
    player:Teleport(1, 1371.068970, -4370.801758, 26.052483)
    end
    if(intid == 17) then
    player:Teleport(0, 2050.203125, 285.650604, 56.994549)
    end
    if(intid == 18) then
    player:Teleport(1, -1304.569946, 205.285004, 68.681396)
    end
    if(intid == 19) then
    player:Teleport(530, 9400.486328, -7278.376953, 14.206780)
    end
    if(intid == 20) then
    player:Teleport(0, -9100.480469, 406.950745, 92.594185)
    end
    if(intid == 21) then
    player:Teleport(0, -5028.265137, -825.976563, 495.301575)
    end
    if(intid == 22) then
    player:Teleport(1, 9985.907227, 1971.155640, 1326.815674)
    end
    if(intid == 23) then
    player:Teleport(530, -4072.202393, -12014.337891, -1.277277)
    end
    function Help_OnGossipTalk(pUnit, event, player, pMisc)
    if (intid == 9) then
    pUnit:GossipCreateMenu(100, player, 0)
    pUnit:GossipMenuAddItem(5, "Buffs", 1, 0)
    pUnit:GossipMenuAddItem(9, "Remove Resurrection Sickness", 2, 0)
    pUnit:GossipSendMenu(player)
    end
    function Help_OnGossipSelect(pUnit, event, player, id, intid, code, pMisc)
    if (intid == 1) then
    pUnit:GossipCreateMenu(99, player, 0)
    pUnit:GossipMenuAddItem(3, "Agility", 3, 0)
    pUnit:GossipMenuAddItem(3, "Intellect", 4, 0)
    pUnit:GossipMenuAddItem(3, "Protection", 5, 0)
    pUnit:GossipMenuAddItem(3, "Spirit", 6, 0)
    pUnit:GossipMenuAddItem(3, "Stamina", 7, 0)
    pUnit:GossipMenuAddItem(3, "Strength", 8, 0)
    pUnit:GossipSendMenu(player)
    end
    if (intid == 2) then
    pUnit:CastSpellOnTarget(15007) 
    player:UnlearnSpell(15007)
    unit:SendChatMessage(12, 0, "You have been cleansed of Resurrection Sickness!")
    pUnit:GossipComplete(player)
    end
    if (intid == 3) then
    pUnit:CastSpellOnTarget(33077, player)
    unit:SendChatMessage(12, 0, "You have been granted the speed of a cat!")
    pUnit:GossipComplete(player)
    end
    if (intid == 4) then
    pUnit:CastSpellOnTarget(33078, player)
    unit:SendChatMessage(12, 0, "You have been granted the gift of Intelligence!")
    pUnit:GossipComplete(player)
    end
    if (intid == 5) then
    pUnit:CastSpellOnTarget(33079, player)
    unit:SendChatMessage(12, 0, "You have been granted Protection!")
    pUnit:GossipComplete(player)
    end
    if (intid == 6) then
    pUnit:CastSpellOnTarget(33080, player)
    unit:SendChatMessage(12, 0, "You have been granted the gift of great Spirit!")
    pUnit:GossipComplete(player)
    end
    if (intid == 7) then
    pUnit:CastSpellOnTarget(33081, player)
    unit:SendChatMessage(12, 0, "You have been granted the Stamina of a bear!")
    pUnit:GossipComplete(player)
    end
    if (intid == 8) then
    pUnit:CastSpellOnTarget(33082, player)
    unit:SendChatMessage(12, 0, "You have been granted the Strength of a tiger!")
    pUnit:GossipComplete(player)
    end
    intid = 0
    end
    RegisterUnitGossipEvent(npcid, 1, "Help_OnGossipTalk")
    RegisterUnitGossipEvent(npcid, 2, "Help_OnGossipSelect")
    You can make the SQL on your own, the ID is "123456789" but can be changed if you want.

    I haven't tested it yet, but it should work.

    These ads disappear when you log in.

  2. #2
    colincancer's Avatar Knight-Champion
    Reputation
    63
    Join Date
    Dec 2007
    Posts
    509
    Thanks G/R
    0/1
    Trade Feedback
    0 (0%)
    hmmmm cool thanks ill try it
    #JODYS'WATCHiN

  3. #3
    ducky69247's Avatar Sergeant
    Reputation
    5
    Join Date
    Jun 2008
    Posts
    39
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Lemme guess... It's for Ascent/Arcemu right?

  4. #4
    SuperChickenofDoom's Avatar Master Sergeant
    Reputation
    18
    Join Date
    Sep 2007
    Posts
    128
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    I'm pretty sure this is copy-pasted off a post from ArcEmu

  5. #5
    kreegoth's Avatar Contributor
    Reputation
    122
    Join Date
    Jun 2008
    Posts
    810
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Nice +rep if it works

  6. #6
    Vindicated's Avatar Contributor
    Reputation
    226
    Join Date
    Aug 2008
    Posts
    1,068
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    I believe this was taken from SectorSeven's *cough*my*cough* guide and you added a 2 new lines for the Rez sickness and rearranged them.

    Geif credits or share tag pl0x


  7. #7
    kreegoth's Avatar Contributor
    Reputation
    122
    Join Date
    Jun 2008
    Posts
    810
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    I cant get this or any LUA warp NPC to work for some reason and i have Lua++ enabled.

    I always get errors ive downloaded about 4 or 5 different ones..

  8. #8
    P1raten's Avatar Banned
    Reputation
    500
    Join Date
    Mar 2008
    Posts
    1,323
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Howdya get this to work? Save as Warp NPC.lua? and then just add a new creature in db that has same id?

Similar Threads

  1. [Release] Herbs to flag
    By Dave-evad in forum World of Warcraft Model Editing
    Replies: 9
    Last Post: 11-26-2006, 03:31 PM
  2. Burning Crusdade Release Date!
    By codydude815 in forum World of Warcraft General
    Replies: 22
    Last Post: 10-30-2006, 01:59 PM
  3. Burning Crusdade Release Date!
    By codydude815 in forum World of Warcraft Guides
    Replies: 15
    Last Post: 10-28-2006, 12:15 PM
  4. anti-warden Release #1
    By zhPaul in forum World of Warcraft Bots and Programs
    Replies: 40
    Last Post: 10-21-2006, 01:40 AM
  5. Burning Crusade Release
    By KOLOSSAL in forum World of Warcraft General
    Replies: 3
    Last Post: 10-10-2006, 12:33 AM
All times are GMT -5. The time now is 02:10 AM. Powered by vBulletin® Version 4.2.3
Copyright © 2019 vBulletin Solutions, Inc. All rights reserved. Digital Point modules: Sphinx-based search