Thread: [LUA Release + the npc] Sangoma Healer (heal/buff/gear fix/rmv ress sickness)

......A Pieterkii presentation........................
............................/´¯/)............................
....(\_(\................,/¯../..........................
....(=' :')............../..../................................
...(,(")(").. ...../´¯/'...'/´¯¯·¸.................... .....
................/'/..../..../..../¨¨/¯\.....................
...............('(....´....´.... ¯;/'...')...................
.................\.................'...../..................
..................'\'...\..........._.·´ ......................
....................\..............(.............. .............
A Sangoma npc (Lua + sql) that:
-Fixes all your gear
-Removes ressurection sickness
-Heals you to maximum health
-Buffs you abit
all if you are not in combat(being attacked)

Installation:-Download the npc [Only registered and activated users can see links. ]
-Extract it and insert/import it into your world database
-Make a new textfile in your scripts folder and save file as sangoma.lua
-paste the code below into that file, and save.
-Restart your emulator
-.npc spawn 40009 ingame, or whatever command u use.

Code:

function Sangoma_OnTalk(Unit, event, player)
Unit:GossipCreateMenu(50, player, 0)
Unit:GossipMenuAddItem(0, "Spiritual blessings", 1, 0)
Unit:GossipSendMenu(player)
end

function Sangoma_OnSelect(unit, event, player, id, intid, code)
if (intid == 1)
then

if (player:IsInCombat() == false)
then

unit:SendChatMessage(12, 0, "Removing you of your weaknesses.")
player:RemoveAura(15007)
player:SetHealthPct(100)
player:RepairAllPlayerItems()
unit:FullCastSpellOnTarget(33077, player)
unit:FullCastSpellOnTarget(33078, player)
unit:FullCastSpellOnTarget(33079, player)
unit:FullCastSpellOnTarget(33080, player)
unit:FullCastSpellOnTarget(33081, player)
unit:FullCastSpellOnTarget(33082, player)
Unit:GossipComplete(player)

else
unit:SendChatMessage(12, 0, "You are in combat. ")

end
end
end

RegisterUnitGossipEvent(40009, 1, "Sangoma_OnTalk")
RegisterUnitGossipEvent(40009, 2, "Sangoma_OnSelect")

Hope you enjoy it :)


A talent reset npc that:
-resets your talents for free:]

Installation:
Same as the above installation guide, just use this script instead

Code:

function Talent_OnTalk(Unit, event, player)
Unit:GossipCreateMenu(50, player, 0)
Unit:GossipMenuAddItem(0, "Reset Talents", 1, 0)
Unit:GossipSendMenu(player)
end

function Talent_OnSelect(unit, event, player, id, intid, code)
if (intid == 1) then
player:ResetAllTalents(1) 
Unit:GossipComplete(player)
end
end

RegisterUnitGossipEvent(40009, 1, "Talent_OnTalk")
RegisterUnitGossipEvent(40009, 2, "Talent_OnSelect")