Buff Npc

Made for my friends who wanted this to be in my next repack.

You do not have to give credits,you may edit it anyway you like.

The code

Code:

---


local npcid = 5000003
function Buff_OnGossipTalk(pUnit, event, player, pMisc)
pUnit:GossipCreateMenu(100, player, 0)
pUnit:GossipMenuAddItem(5, "Buff's.", 1, 0)
pUnit:GossipMenuAddItem(9, "Remove Rez Sickness", 2, 0)
pUnit:GossipMenuAddItem(4, "Heal", 90, 0)
pUnit:GossipSendMenu(player)
end
function Buff_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
player:UnlearnSpell(15007)
pUnit:GossipComplete(player)
end
if (intid == 3) then
pUnit:CastSpellOnTarget(33077, player)
pUnit:GossipComplete(player)
end
if (intid == 4) then
pUnit:CastSpellOnTarget(33078, player)
pUnit:GossipComplete(player)
end
if (intid == 5) then
pUnit:CastSpellOnTarget(33079, player)
pUnit:GossipComplete(player)
end
if (intid == 6) then
pUnit:CastSpellOnTarget(33080, player)
pUnit:GossipComplete(player)
end
if (intid == 7) then
pUnit:CastSpellOnTarget(33081, player)
pUnit:GossipComplete(player)
end
if (intid == 8) then
pUnit:CastSpellOnTarget(33082, player)
pUnit:GossipComplete(player)
end

if (intid == 90) then 
pUnit:GossipCreateMenu(3543, player, 0)
pUnit:GossipMenuAddItem(4, "Health", 91, 0)
pUnit:GossipSendMenu(player)
end
if (intid == 91) then
pUnit:CastSpellOnTarget(25213,player)
pUnit:GossipComplete()
end
end
RegisterUnitGossipEvent(npcid, 1, "Buff_OnGossipTalk")
RegisterUnitGossipEvent(npcid, 2, "Buff_OnGossipSelect")

---

The Npc

Code:

---


INSERT INTO `creature_names` VALUES ('5000003', 'Buffer', 'Your servers name', '', '0', '7', '0', '0', '0', null, '16202', '16202', '0', '0', '1', '1', '1', null);
 
INSERT INTO `creature_proto` VALUES ('5000003', '70', '70', '35', '10000000', '10000000', '10000000', '1', '1', '1800', '0', '1500', '2500', '1800', '500', '650', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '36000', '0', '0', '0', '0', '0', '0', '0', '1', '0', 'MEMO', '0', '0', '0', '0', '2.5', '8', '14', '0', '0', '0', '0', '0', '0');

---

Pictures

http://i231.photobucket.com/albums/e...608_024509.jpg
http://i231.photobucket.com/albums/e...608_024520.jpg

Update

Code:

---


local npcid = 5000003
function Buff_OnGossipTalk(pUnit, event, player, pMisc)
pUnit:GossipCreateMenu(100, player, 0)
pUnit:GossipMenuAddItem(5, "Buff's.", 1, 0)
pUnit:GossipMenuAddItem(9, "Remove Rez Sickness", 2, 0)
pUnit:GossipMenuAddItem(4, "Heal", 90, 0)
pUnit:GossipSendMenu(player)
end
function Buff_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
player:UnlearnSpell(15007)
pUnit:GossipComplete(player)
end
if (intid == 3) then
pUnit:CastSpellOnTarget(33077, player)
pUnit:GossipComplete(player)
end
if (intid == 4) then
pUnit:CastSpellOnTarget(33078, player)
pUnit:GossipComplete(player)
end
if (intid == 5) then
pUnit:CastSpellOnTarget(33079, player)
pUnit:GossipComplete(player)
end
if (intid == 6) then
pUnit:CastSpellOnTarget(33080, player)
pUnit:GossipComplete(player)
end
if (intid == 7) then
pUnit:CastSpellOnTarget(33081, player)
pUnit:GossipComplete(player)
end
if (intid == 8) then
pUnit:CastSpellOnTarget(33082, player)
pUnit:GossipComplete(player)
end

if (intid == 90) then 
pUnit:GossipCreateMenu(3543, player, 0)
pUnit:GossipMenuAddItem(4, "Health", 91, 0)
pUnit:GossipSendMenu(player)
end
if (intid == 91) then
pUnit:CastSpellOnTarget(25213,player)
pUnit:GossipComplete()
end
end
RegisterUnitGossipEvent(npcid, 1, "Buff_OnGossipTalk")
RegisterUnitGossipEvent(npcid, 2, "Buff_OnGossipSelect")

---

Oh Wow, I like this.

Hey Noob.. I've tried this a few times.. Sorry not your Script but it pertains to a script such as yours so i thought id respond here..

is it possible using LUa to make the NPC do a check for a certain item in persons inventory and remove it upon completing the function.. Ie you need a Runed copper rod to be buffed with Str.. After buffing str it removes 1 runed copper rod from players inventory?.. I know thats a stupid example but its just off the top of my head.. or perhaps maybe even simply gold?....

Hey, this is a very nice script, but i was wondering about something, when i try to execute the INSERT INTO `creature_proto` VALUES ('66698', '70', '70', '35', '10000000', '10000000', '10000000', '1', '1', '1800', '0', '1500', '2500', '1800', '500', '650', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '36000', '0', '0', '0', '0', '0', '0', '0', '1', '0', 'MEMO', '0', '0', '0', '0', '2.5', '8', '14', '0', '0', '0', '0', '0', '0');

it says

[Err] 1136 - Column count doesn't match value count at row 1
[Err] INSERT INTO `creature_proto` VALUES ('66698', '70', '70', '35', '10000000', '10000000', '10000000', '1', '1', '1800', '0', '1500', '2500', '1800', '500', '650', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '36000', '0', '0', '0', '0', '0', '0', '0', '1', '0', 'MEMO', '0', '0', '0', '0', '2.5', '8', '14', '0', '0', '0', '0', '0', '0');
[Msg] Finished - Unsuccessfully

could someone give me some help?

Quote:

---

Originally Posted by Kreegoth

Hey Noob.. I've tried this a few times.. Sorry not your Script but it pertains to a script such as yours so i thought id respond here..

is it possible using LUa to make the NPC do a check for a certain item in persons inventory and remove it upon completing the function.. Ie you need a Runed copper rod to be buffed with Str.. After buffing str it removes 1 runed copper rod from players inventory?.. I know thats a stupid example but its just off the top of my head.. or perhaps maybe even simply gold?....

---

here is the code

if pMisc:GetItemCount(998000) > 1 then
pUnit:CastSpellOnTarget(33077, player)
pMisc:RemoveItem(998000)
end