local NPC_ID = 112112

local function On_GossipMenu(event, player, unit)
    if (player:IsInCombat()) then
    player:SendNotification("You can not do that when in combat!")
    else
    if (player:IsGM()) then
    player:GossipMenuAddItem(8, "GM Spells", 0, 1, 0)
    end
    player:GossipMenuAddItem(9, "Morphs", 0, 203, 0)
    player:GossipMenuAddItem(2, "Max heal", 0, 2, 0)
    player:GossipMenuAddItem(2, "Remove Resurrection Sickness", 0, 3, 0)
    player:GossipMenuAddItem(3, "Learn weapon skills", 0, 4, 0)
    player:GossipMenuAddItem(3, "Advance weapon skills", 0, 5, 0)
    player:GossipMenuAddItem(3, "Artisan Riding", 0, 6, 0)
    player:GossipMenuAddItem(3, "Dual Talent Specialization", 0, 200, 0)
    player:GossipMenuAddItem(3, "Reset Talents", 0, 201, 0)
    player:GossipMenuAddItem(3, "Remove Cooldowns", 0, 202, 0)
    player:GossipSendMenu(1, unit)
    end
end

local function On_GossipSelect(event, player, unit, sender, intid, code)
    On_GossipMenu(event, player, unit)
    if (intid == 2) then
    player:SendAreaTriggerMessage("You are now fully healed!")
    player:CastSpell(69693)
    player:SetPower(0, 1000000)
    player:SetPower(3, 100)

    elseif (intid == 1) then
    player:LearnSpell(69693)
    player:LearnSpell(35874)        -- Here you can add more GM spells
    player:LearnSpell(35912)
    player:LearnSpell(38734)

    elseif (intid == 3) then
    player:SendAreaTriggerMessage("Ressurection Sickness is now removed!")
    local aura = player:GetAura(15007)
    if(aura) then
    aura:Remove()
    end

    elseif (intid == 4) then
    player:SendAreaTriggerMessage("You have learned all weapon skills!")
    player:LearnSpell(201)
    player:LearnSpell(202)
    player:LearnSpell(196)
    player:LearnSpell(197)
    player:LearnSpell(227)
    player:LearnSpell(200)
    player:LearnSpell(266)
    player:LearnSpell(264)
    player:LearnSpell(5011)
    player:LearnSpell(3018)
    player:LearnSpell(198)
    player:LearnSpell(199)
    player:LearnSpell(1180)
    player:LearnSpell(2567)
    player:LearnSpell(2764)
    player:LearnSpell(5009)
    player:LearnSpell(5019)

    elseif (intid == 5) then
    player:SendAreaTriggerMessage("Your weapon skills are now maxed!")
    player:AdvanceAllSkills(450)
    player:AdvanceSkill (176, 450)

    elseif (intid == 6) then
    player:SendAreaTriggerMessage ("You have learned Artisan Riding!")
    player:LearnSpell(34091)
    player:LearnSpell(54197)

    elseif (intid == 200) then
    player:SendAreaTriggerMessage("You now have Dual Talent Specialization!")
    player:CastSpell(63624)
    player:LearnSpell(63706)
    player:LearnSpell(63707)

    elseif (intid == 201) then
    player:SendAreaTriggerMessage("Your talents have been reset!")
    player:ResetTalents()

    elseif (intid == 202) then
    player:SendAreaTriggerMessage("Your cooldowns are removed!")
    player:ResetAllCooldowns()
    end
end
RegisterCreatureGossipEvent(NPC_ID, 1, On_GossipMenu)
RegisterCreatureGossipEvent(NPC_ID, 2, On_GossipSelect)