SkillNPC [LUA]

[Performer]

Well here it is. Been working on it for ages. It loads in the console. But i get the error like i do with all GossipScripts. So id like some Feedback.

THANKS TO SOUNDDEAD FOR HELPING WITH THE ERROR!

--[[ SkillNPC.lua

This script was written and is protected
by the GPL v2. This script was released
by Performer/Performa of the Blua Scripting
Project. Please give proper accredidations
when re-releasing or sharing this script
with others in the emulation community.

Credits to Nebels for the C++ Version.
Thanks to Soundead for fixing an error.

~~End of License Agreement
-- Performa, August 25th, 2008. ]]

function Skill_Menu (pUnit, event, player, pMisc)
    pUnit:GossipCreateMenu(100, player, 0, 0)
    if player:GetPlayerClass() == 1  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Warriors Learn?", 50, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 2  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Paladins Learn?", 51, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 3  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Hunters Learn?", 52, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 4  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Rogues Learn?", 53, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 5  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Priests Learn?", 54, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 7  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Shamans Learn?", 55, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 8  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Mages Learn?", 56, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 9  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Warlocks Learn?", 57, 0)
    pUnit:GossipSendMenu(player)
    elseif player:GetPlayerClass() == 11  then
    pUnit:GossipMenuAddItem(0, "What Spells Can Druids Learn?", 58, 0)
    pUnit:GossipSendMenu(player)
    end
end

function Skill_OnSelect (pUnit, event, player, id, intid, code, pMisc)
    if(intid == 50) then
    pUnit:GossipCreateMenu(99, player, 0, 0)
    pUnit:GossipMenuAddItem(5, "Taunt", 3, 0)
    pUnit:GossipMenuAddItem(5, "Intercept", 4, 0)
    pUnit:GossipMenuAddItem(5, "Mortal Strike", 5, 0)
    pUnit:GossipMenuAddItem(5, "Defensive Stance", 6, 0)
    pUnit:GossipMenuAddItem(5, "Berserker Stance", 7, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 51) then
    pUnit:GossipCreateMenu(98, player, 0)
    pUnit:GossipMenuAddItem(5, "Redemption", 8, 0)
    pUnit:GossipMenuAddItem(5, "Summon Warhorse", 9, 0)
    pUnit:GossipMenuAddItem(5, "Summon Charger", 10, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 52) then
    pUnit:GossipCreateMenu(97, player, 0)
    pUnit:GossipMenuAddItem(5, "Pet Spells", 11, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 53) then
    pUnit:GossipCreateMenu(96, player, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 54) then
    pUnit:GossipCreateMenu(95, player, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 55) then
    pUnit:GossipCreateMenu(94, player, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 56) then
    pUnit:GossipCreateMenu(93, player, 0)
    pUnit:GossipMenuAddItem(5, "Ice Block", 22, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 57) then
    pUnit:GossipCreateMenu(92, player, 0)
    pUnit:GossipMenuAddItem(5, "Pet Spells", 12, 0)
    pUnit:GossipMenuAddItem(5, "Summon Felsteed", 13, 0)
    pUnit:GossipMenuAddItem(5, "Summon Dreadsteed", 14, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 58) then
    pUnit:GossipCreateMenu(91, player, 0)
    pUnit:GossipMenuAddItem(5, "Growl", 15, 0)
    pUnit:GossipMenuAddItem(5, "Maul", 16, 0)
    pUnit:GossipMenuAddItem(5, "Bear Form", 17, 0)
    pUnit:GossipMenuAddItem(5, "Dire Bear Form", 18, 0)
    pUnit:GossipMenuAddItem(5, "Aquatic Form", 19, 0)
    pUnit:GossipMenuAddItem(5, "Normal Flight Form", 20, 0)
    pUnit:GossipMenuAddItem(5, "Epic Flight Form", 21, 0)
    pUnit:GossipMenuAddItem(0, "[Back]", 0, 0)
    pUnit:GossipSendMenu(player)
end
    if(intid == 2) then
    pUnit:ResetTalent()
end
    if(intid == 3) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(355)
end
    if(intid == 4) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(25275)
end
    if(intid == 5) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(30330)
end
    if(intid == 6) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(71)
end
    if(intid == 7) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(2458)
end
    if(intid == 8) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(20773)
end
    if(intid == 9) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(13819)
end
    if(intid == 10) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(34767)
end
    if(intid == 11) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(1515)
    plr:LearnSpell(883)
    plr:LearnSpell(5149)
    plr:LearnSpell(982)
    plr:LearnSpell(6991)
end
    if(intid == 12) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(688)
    plr:LearnSpell(697)
    plr:LearnSpell(712)
    plr:LearnSpell(691)
end
    if(intid == 13) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(5784)
end
    if(intid == 14) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(23161)
end
    if(intid == 15) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(6795)
end
    if(intid == 16) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(26996)
end
    if(intid == 17) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(5487)
end
    if(intid == 18) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(9634)
end
    if(intid == 19) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(1066)
end
    if(intid == 20) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(33943)
end
    if(intid == 21) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(40120)
end
    if(intid == 22) then
    local plr = pUnit:GetClosestPlayer()
    plr:LearnSpell(45438)
end
    if(intid == 99) then
    
end
    intid = 0
end

RegisterUnitGossipEvent(500021, 1, "Skill_Menu")
RegisterUnitGossipEvent(500021, 2, "Skill_OnSelect")

Reset talents does not work atm. Because i do not know of a function to do it.

[Performer]

Bump.. No one interested at all? Or are all just leeching?

[OMGPWN]

Hey,I have no idea what that is... thats why no responce from he till now =P
Good luck with that ^^

[Performer]

Its a skill NPC... teaches missing spells. Save all the GM tickets

[logicd22]

I still get an error, I dont know if I am doing this right. I put it in my scripts folder as a .lua file and edit the

RegisterUnitGossipEvent(ENTRYID, 1, "Skill_Menu")
RegisterUnitGossipEvent(ENTRYID, 2, "Skill_OnSelect")

ENTRYID to the npc that I am using but when I click on the NPC nothing happens. Should there be something else I should edit or what?

[Bolleno]

i will try this

[Performer]

Dont say +rep if you cant give it.

[Sounddead]

Good work +rep.

And I will give it.

[Performer]

Thanks sounddead

And 400th post! Woo :P

[*Scripted*]

Very Nice +Rep to you.

[Snailz]

Bump.. No one interested at all? Or are all just leeching?

I leech. =D. jk gj +rep

[Performer]

Thanks Guys

Feedback Appreciated

[bras]

How do I get this into my Navicat DB?

[nickeg]

I LOVE YOU ... this is just what i have been looking for +rep m8 ....

[Performer]

How do I get this into my Navicat DB?

You dont put it in your DB. You put it in the scripts folder.