PDA

View Full Version : Weapon skills trainer (maxes skills out)



*Alexz*
13-06-10, 08:18 AM
When you set this up for your server..
Make local NPC_ID = 8
Equal the id of the npc you want to do this


local NPC_ID = 8

function Skills_GossipTalk(pUnit, event, player)

pUnit:GossipCreateMenu(100, player, 0)
pUnit:GossipMenuAddItem(10, "Hello there "..player:GetName()..".",0, 0)
pUnit:GossipMenuAddItem(10, "|cFF0000A0Max out my weapon skills!",1, 0)
pUnit:GossipMenuAddItem(10, "|cFF0000A0Teach me Dual-Wield!",3, 0)
pUnit:GossipMenuAddItem(10, "|cFF0000A0No Thanks!",2, 0)
pUnit:GossipSendMenu(player)
end

function Skills_GossipSelect(pUnit, event, player, id, intid, code)

if(intid == 2) then
player:GossipComplete()
end

if(intid == 1) then
player:GossipComplete()
player:SendAreaTriggerMessage("All skills at max Have fun!")
player:AdvanceSkill(43,1275)
player:AdvanceSkill(44,1275)
player:AdvanceSkill(45,1275)
player:AdvanceSkill(46,1275)
player:AdvanceSkill(54,1275)
player:AdvanceSkill(55,1275)
player:AdvanceSkill(95,1275)
player:AdvanceSkill(136,1275)
player:AdvanceSkill(160,1275)
player:AdvanceSkill(162,1275)
player:AdvanceSkill(172,1275)
player:AdvanceSkill(173,1275)
player:AdvanceSkill(176,1275)
player:AdvanceSkill(226,1275)
player:AdvanceSkill(228,1275)
player:AdvanceSkill(229,1275)
player:AdvanceSkill(473,1275)
pUnit:CastSpell(25465)
pUnit:CastSpell(25465)
end


if(intid == 3) then
if (player:HasSpell(674) == true) then
player:SendAreaTriggerMessage("You already have Dual-Wield, if it doesnt work try to relog!")
else
player:GossipComplete()
player:UnlearnSpell(674)
player:LearnSpell(674)
player:SendAreaTriggerMessage("You Have Learned Dual-Weild!")
end
end
end

RegisterUnitGossipEvent(8, 1, "Skills_GossipTalk")
RegisterUnitGossipEvent(8, 2, "Skills_GossipSelect")

Dimman
13-06-10, 11:51 AM
Nice share alexz, +Rep when i can

*Alexz*
14-06-10, 06:12 AM
Lol that owed rep pile just keeps adding up