[Release] HelperNPC

[berryman13]

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

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.

[colincancer]

hmmmm cool thanks ill try it

[ducky69247]

Lemme guess... It's for Ascent/Arcemu right?

[SuperChickenofDoom]

I'm pretty sure this is copy-pasted off a post from ArcEmu

[kreegoth]

Nice +rep if it works

[Vindicated]

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

[kreegoth]

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..

[P1raten]

Howdya get this to work? Save as Warp NPC.lua? and then just add a new creature in db that has same id?