local Bolvar = 1748
local kingsSpell = 25898
local wisdomSpell = 25918
local mightSpell = 25916

-- Sound ID for the blessing of kings
local KINGS_SOUND_ID = 20423

-- Emote ID for the blessing of kings
local KINGS_EMOTE_ID = 113

-- Sound ID for the blessing of wisdom
local WISDOM_SOUND_ID = 20424

-- Emote ID for the blessing of wisdom
local WISDOM_EMOTE_ID = 153

local MIGHT_SOUND_ID = 20425

local function OnSpawn(event, creature)
    creature:CastSpell(creature, kingsSpell, true)
end

local function OnGossipHello(event, player, creature)
    player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_magic_magearmor:50:50:-23:0|tGrant me a Blessing of Kings", 0, 1, false, "", 0)
    player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_holy_sealofwisdom:50:50:-23:0|tGrant me a Blessing of Wisdom", 0, 2, false, "", 0)
    player:GossipMenuAddItem(9, "|TInterface\\Icons\\spell_holy_fistofjustice:50:50:-23:0|tGrant me a Blessing of Might", 0, 3, false, "", 0)
    player:GossipSendMenu(1, creature)
end

local function OnGossipSelect(event, player, creature, sender, intid, code, menuid)
    if intid == 1 then
        player:CastSpell(player, kingsSpell, true)
        creature:PlayDistanceSound(KINGS_SOUND_ID)
        creature:PerformEmote(KINGS_EMOTE_ID)
    elseif intid == 2 then
        player:CastSpell(player, wisdomSpell, true)
        creature:PlayDistanceSound(WISDOM_SOUND_ID)
        creature:PerformEmote(WISDOM_EMOTE_ID)
    elseif intid == 3 then
        player:CastSpell(player, mightSpell, true)
		creature:PlayDistanceSound(MIGHT_SOUND_ID)
    end
    player:GossipComplete()
end

RegisterCreatureEvent(Bolvar, 5, OnSpawn)
RegisterCreatureGossipEvent(Bolvar, 1, OnGossipHello)
RegisterCreatureGossipEvent(Bolvar, 2, OnGossipSelect)