UI.lua

local addonName, Addon = ...

local selectedClass
local selectedSpec
local selectedSpell
local selectedCustomSpell
local selectedVoice
local assignmentOffset = 0

local renameSelectedClass
local renameSelectedSpec
local renameSelectedSpell
local renameSelectedCustomSpell
local renameOffset = 0
local RENAME_ROW_COUNT = 8
local ROW_COUNT = 8

local selectedNoteKey
local selectedNoteVoice
local selectedNoteTTSMode = "default"
local selectedNoteCustomTTS = ""
local noteReminderOffset = 0
local NOTE_ROW_COUNT = 5

local selectedEncounterID
local selectedEncounterDifficulty = 16
local selectedEncounterAlertKey
local selectedEncounterVoice
local encounterAssignmentOffset = 0
local ENCOUNTER_ROW_COUNT = 8

local frame
local contentFrame
local sidebar
local abilityPage
local renamePage
local notePage
local encounterPage
local optionsPage
local activePageKey = "abilities"
local navButtons = {}

local classDropdown
local specDropdown
local abilityDropdown
local voiceDropdown
local channelDropdown
local statusText
local customSpellSelectionText

local renameClassDropdown
local renameSpecDropdown
local renameAbilityDropdown
local renameTextBox
local renameStatusText
local renameCustomSpellSelectionText

local noteVoiceDropdown
local noteTTSModeDropdown
local noteTTSCustomLabel
local noteTTSCustomTextBox
local noteStatusText
local noteSummaryText
local noteScrollText

local encounterDropdown
local encounterDifficultyDropdown
local encounterAlertDropdown
local encounterVoiceDropdown
local encounterStatusText

local helpFrame
local helpRequirementsText
local helpVoiceText

local mainCloseButton
local mainHelpButton

local assignmentRows = {}
local renameRows = {}
local noteRows = {}
local encounterAssignmentRows = {}
local themeCards = {}

local voicePopup
local voiceScrollFrame
local voiceScrollChild
local voiceRows = {}
local voicePreviewToken = 0
local voiceContext
local VOICE_ROW_HEIGHT = 26

local RefreshAssignments
local RefreshRenameOptions
local RefreshRenameRows
local RefreshNoteOptions
local RefreshNoteRows
local RefreshEncounterOptions
local ShowPage
local SetNavButtonSelected

local THEME_ORDER = { "arcane", "bronze", "cyan" }
local THEMES = {
    arcane = {
        name = "Muted Arcane",
        description = "Muted gold headings with deep purple controls and soft neutral text.",
        windowBackground = { 0, 0, 0, 1 },
        windowBorder = { 0.42, 0.40, 0.42, 1 },
        panelBorder = { 0.34, 0.25, 0.46, 1 },
        divider = { 0.36, 0.28, 0.48, 0.85 },
        controlBackground = { 0.085, 0.065, 0.105, 0.98 },
        controlHover = { 0.12, 0.09, 0.15, 0.98 },
        buttonBackground = { 0.070, 0.055, 0.090, 0.98 },
        buttonHover = { 0.10, 0.08, 0.13, 0.98 },
        accent = { 0.43, 0.32, 0.56, 1 },
        heading = { 0.82, 0.67, 0.34, 1 },
        text = { 0.93, 0.93, 0.96, 1 },
        mutedText = { 0.75, 0.74, 0.79, 1 },
        selectedBackground = { 0.20, 0.14, 0.045, 0.98 },
        selectedText = { 0.88, 0.72, 0.39, 1 },
        actionBackground = { 0.075, 0.060, 0.085, 0.98 },
        actionHover = { 0.12, 0.09, 0.13, 0.98 },
        actionBorder = { 0.76, 0.59, 0.25, 1 },
    },
    bronze = {
        name = "Warm Bronze",
        description = "Warm bronze controls with parchment-gold headings and restrained amber highlights.",
        windowBackground = { 0.012, 0.010, 0.008, 1 },
        windowBorder = { 0.40, 0.31, 0.18, 1 },
        panelBorder = { 0.42, 0.30, 0.14, 1 },
        divider = { 0.42, 0.30, 0.14, 0.85 },
        controlBackground = { 0.13, 0.085, 0.025, 0.98 },
        controlHover = { 0.18, 0.12, 0.04, 0.98 },
        buttonBackground = { 0.105, 0.070, 0.025, 0.98 },
        buttonHover = { 0.15, 0.10, 0.035, 0.98 },
        accent = { 0.52, 0.34, 0.12, 1 },
        heading = { 0.91, 0.73, 0.36, 1 },
        text = { 0.94, 0.91, 0.83, 1 },
        mutedText = { 0.78, 0.73, 0.63, 1 },
        selectedBackground = { 0.24, 0.15, 0.035, 0.98 },
        selectedText = { 0.95, 0.78, 0.40, 1 },
        actionBackground = { 0.12, 0.075, 0.022, 0.98 },
        actionHover = { 0.18, 0.115, 0.035, 0.98 },
        actionBorder = { 0.76, 0.53, 0.18, 1 },
    },
    cyan = {
        name = "Cool Cyan",
        description = "Blue-grey controls with cool cyan headings and crisp high-contrast highlights.",
        windowBackground = { 0.003, 0.012, 0.017, 1 },
        windowBorder = { 0.18, 0.34, 0.40, 1 },
        panelBorder = { 0.15, 0.39, 0.48, 1 },
        divider = { 0.15, 0.39, 0.48, 0.85 },
        controlBackground = { 0.045, 0.105, 0.135, 0.98 },
        controlHover = { 0.065, 0.145, 0.18, 0.98 },
        buttonBackground = { 0.035, 0.075, 0.095, 0.98 },
        buttonHover = { 0.05, 0.11, 0.14, 0.98 },
        accent = { 0.10, 0.66, 0.72, 1 },
        heading = { 0.24, 0.82, 0.84, 1 },
        text = { 0.91, 0.95, 0.97, 1 },
        mutedText = { 0.68, 0.77, 0.82, 1 },
        selectedBackground = { 0.035, 0.19, 0.23, 0.98 },
        selectedText = { 0.28, 0.90, 0.91, 1 },
        actionBackground = { 0.025, 0.095, 0.12, 0.98 },
        actionHover = { 0.035, 0.14, 0.17, 0.98 },
        actionBorder = { 0.13, 0.68, 0.73, 1 },
    },
}

local themedButtons = {}
local themedDropdowns = {}
local themedActionButtons = {}
local themedDescriptors = {}
local themedHeadings = {}
local themedPanels = {}
local themedEditBoxes = {}
local themedRemoveButtons = {}
local ApplyTheme
local RefreshThemeCards

local function GetTheme()
    local key = Addon.db and Addon.db.theme or "arcane"
    return THEMES[key] or THEMES.arcane
end

local function SetTextureColor(texture, color)
    texture:SetColorTexture(color[1], color[2], color[3], color[4] or 1)
end

local function SetFontColor(fontString, color)
    if fontString and color then
        fontString:SetTextColor(color[1], color[2], color[3], color[4] or 1)
    end
end

local function RegisterHeading(fontString)
    themedHeadings[#themedHeadings + 1] = fontString
    SetFontColor(fontString, GetTheme().heading)
    return fontString
end

local function RegisterPanel(panel)
    themedPanels[#themedPanels + 1] = panel
    if panel.SetBackdropBorderColor then
        local color = GetTheme().panelBorder
        panel:SetBackdropBorderColor(color[1], color[2], color[3], color[4])
    end
    return panel
end

local function SetControlBorders(control, color)
    for _, border in ipairs({ control.borderTop, control.borderBottom, control.borderLeft, control.borderRight }) do
        if border then SetTextureColor(border, color) end
    end
end

local function CreateControlBorders(control, anchor)
    control.borderTop = control:CreateTexture(nil, "ARTWORK")
    control.borderBottom = control:CreateTexture(nil, "ARTWORK")
    control.borderLeft = control:CreateTexture(nil, "ARTWORK")
    control.borderRight = control:CreateTexture(nil, "ARTWORK")
    control.borderTop:SetPoint("TOPLEFT", anchor, "TOPLEFT", 0, 0); control.borderTop:SetPoint("TOPRIGHT", anchor, "TOPRIGHT", 0, 0); control.borderTop:SetHeight(1)
    control.borderBottom:SetPoint("BOTTOMLEFT", anchor, "BOTTOMLEFT", 0, 0); control.borderBottom:SetPoint("BOTTOMRIGHT", anchor, "BOTTOMRIGHT", 0, 0); control.borderBottom:SetHeight(1)
    control.borderLeft:SetPoint("TOPLEFT", anchor, "TOPLEFT", 0, 0); control.borderLeft:SetPoint("BOTTOMLEFT", anchor, "BOTTOMLEFT", 0, 0); control.borderLeft:SetWidth(1)
    control.borderRight:SetPoint("TOPRIGHT", anchor, "TOPRIGHT", 0, 0); control.borderRight:SetPoint("BOTTOMRIGHT", anchor, "BOTTOMRIGHT", 0, 0); control.borderRight:SetWidth(1)
end

local function StyleFlatButton(button, text, primary, selector)
    if not button.flatBackground then
        button.flatBackground = button:CreateTexture(nil, "BACKGROUND")
        button.flatBackground:SetAllPoints()
        CreateControlBorders(button, button.flatBackground)
        button.flatLabel = button:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
        button.flatLabel:SetPoint("LEFT", selector and 13 or 9, 0)
        button.flatLabel:SetPoint("RIGHT", selector and -27 or -9, 0)
        button.flatLabel:SetJustifyH(selector and "LEFT" or "CENTER")
        button:SetFontString(button.flatLabel)
        if selector then
            button.flatArrow = button:CreateFontString(nil, "ARTWORK", "GameFontNormal")
            button.flatArrow:SetPoint("RIGHT", -10, 0)
            button.flatArrow:SetText("v")
        end
        button:SetScript("OnEnter", function(self)
            local theme = GetTheme()
            SetTextureColor(self.flatBackground, self.flatSelector and theme.controlHover or theme.buttonHover)
        end)
        button:SetScript("OnLeave", function(self)
            local theme = GetTheme()
            SetTextureColor(self.flatBackground, self.flatSelector and theme.controlBackground or theme.buttonBackground)
        end)
        themedButtons[#themedButtons + 1] = button
    end
    button.flatPrimary = primary and true or false
    button.flatSelector = selector and true or false
    local theme = GetTheme()
    SetTextureColor(button.flatBackground, button.flatSelector and theme.controlBackground or theme.buttonBackground)
    SetControlBorders(button, theme.accent)
    SetFontColor(button.flatLabel, theme.text)
    if button.flatArrow then SetFontColor(button.flatArrow, theme.heading) end
    button:SetText(text or "")
    return button
end

local function StyleActionButton(button, text)
    if not button.actionBackground then
        button.actionBackground = button:CreateTexture(nil, "BACKGROUND")
        button.actionBackground:SetAllPoints()
        button.actionTop = button:CreateTexture(nil, "ARTWORK")
        button.actionBottom = button:CreateTexture(nil, "ARTWORK")
        button.actionLeft = button:CreateTexture(nil, "ARTWORK")
        button.actionRight = button:CreateTexture(nil, "ARTWORK")
        button.actionTop:SetPoint("TOPLEFT", 0, 0); button.actionTop:SetPoint("TOPRIGHT", 0, 0); button.actionTop:SetHeight(1)
        button.actionBottom:SetPoint("BOTTOMLEFT", 0, 0); button.actionBottom:SetPoint("BOTTOMRIGHT", 0, 0); button.actionBottom:SetHeight(1)
        button.actionLeft:SetPoint("TOPLEFT", 0, 0); button.actionLeft:SetPoint("BOTTOMLEFT", 0, 0); button.actionLeft:SetWidth(1)
        button.actionRight:SetPoint("TOPRIGHT", 0, 0); button.actionRight:SetPoint("BOTTOMRIGHT", 0, 0); button.actionRight:SetWidth(1)
        button.actionLabel = button:CreateFontString(nil, "ARTWORK", "GameFontHighlight")
        button.actionLabel:SetPoint("CENTER")
        button:SetFontString(button.actionLabel)
        button:SetScript("OnEnter", function(self)
            SetTextureColor(self.actionBackground, GetTheme().actionHover)
        end)
        button:SetScript("OnLeave", function(self)
            SetTextureColor(self.actionBackground, GetTheme().actionBackground)
        end)
        themedActionButtons[#themedActionButtons + 1] = button
    end
    local theme = GetTheme()
    SetTextureColor(button.actionBackground, theme.actionBackground)
    for _, border in ipairs({ button.actionTop, button.actionBottom, button.actionLeft, button.actionRight }) do
        SetTextureColor(border, theme.actionBorder)
    end
    SetFontColor(button.actionLabel, theme.heading)
    button:SetText(text or "")
    return button
end

local function StyleFlatDropdown(dropdown, width)
    UIDropDownMenu_SetWidth(dropdown, width)
    dropdown:SetSize(width + 36, 32)

    for _, region in ipairs({ dropdown:GetRegions() }) do region:Hide() end
    for _, child in ipairs({ dropdown:GetChildren() }) do child:Hide() end

    dropdown.flatBackground = dropdown:CreateTexture(nil, "BACKGROUND")
    dropdown.flatBackground:SetPoint("TOPLEFT", 18, -2)
    dropdown.flatBackground:SetSize(width, 28)
    CreateControlBorders(dropdown, dropdown.flatBackground)
    dropdown.flatLabel = dropdown:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    dropdown.flatLabel:SetPoint("LEFT", dropdown.flatBackground, "LEFT", 13, 0)
    dropdown.flatLabel:SetPoint("RIGHT", dropdown.flatBackground, "RIGHT", -28, 0)
    dropdown.flatLabel:SetJustifyH("LEFT")
    dropdown.flatArrow = dropdown:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    dropdown.flatArrow:SetPoint("RIGHT", dropdown.flatBackground, "RIGHT", -10, 0)
    dropdown.flatArrow:SetText("v")

    dropdown.flatButton = CreateFrame("Button", nil, dropdown)
    dropdown.flatButton:SetAllPoints(dropdown.flatBackground)
    dropdown.flatButton:SetScript("OnEnter", function() SetTextureColor(dropdown.flatBackground, GetTheme().controlHover) end)
    dropdown.flatButton:SetScript("OnLeave", function() SetTextureColor(dropdown.flatBackground, GetTheme().controlBackground) end)
    dropdown.flatButton:SetScript("OnClick", function()
        ToggleDropDownMenu(1, nil, dropdown, dropdown, 18, -2)
    end)
    themedDropdowns[#themedDropdowns + 1] = dropdown
    local theme = GetTheme()
    SetTextureColor(dropdown.flatBackground, theme.controlBackground)
    SetControlBorders(dropdown, theme.accent)
    SetFontColor(dropdown.flatLabel, theme.text)
    SetFontColor(dropdown.flatArrow, theme.heading)
end

local function SetDropdownText(dropdown, text)
    if not dropdown then return end
    local value = text or "Select..."
    UIDropDownMenu_SetText(dropdown, value)
    if dropdown.flatLabel then dropdown.flatLabel:SetText(value) end
end

local function CreateLabel(parent, text, x, y)
    local label = parent:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    label:SetPoint("TOPLEFT", x, y)
    label:SetText(text)
    RegisterHeading(label)
    return label
end

local function CreateButton(parent, text, width, x, y, onClick)
    local button = CreateFrame("Button", nil, parent)
    button:SetSize(width, 26)
    button:SetPoint("TOPLEFT", x, y)
    if text == "Assign" then
        StyleActionButton(button, text)
    else
        StyleFlatButton(button, text, false, false)
    end
    button:SetScript("OnClick", onClick)
    return button
end

local function StyleDescriptorText(fontString)
    if not fontString.themeDescriptorRegistered then
        fontString.themeDescriptorRegistered = true
        themedDescriptors[#themedDescriptors + 1] = fontString
    end
    SetFontColor(fontString, GetTheme().mutedText)
    return fontString
end

local function CreateRemoveIconButton(parent)
    local button = CreateFrame("Button", nil, parent)
    button:SetSize(20, 20)
    button.bg = button:CreateTexture(nil, "BACKGROUND")
    button.bg:SetAllPoints()
    button.bg:SetColorTexture(0.14, 0.05, 0.05, 0.95)
    button.x = button:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    button.x:SetPoint("CENTER", 0, 0)
    button.x:SetText("X")
    button.x:SetTextColor(1, 0.32, 0.32)
    button:SetScript("OnEnter", function(self)
        self.bg:SetColorTexture(0.20, 0.06, 0.06, 0.98)
        GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
        GameTooltip:SetText("Remove")
        GameTooltip:Show()
    end)
    button:SetScript("OnLeave", function(self)
        self.bg:SetColorTexture(0.14, 0.05, 0.05, 0.95)
        GameTooltip:Hide()
    end)
    themedRemoveButtons[#themedRemoveButtons + 1] = button
    return button
end

local function StyleFlatEditBox(editBox)
    editBox:SetBackdrop({
        bgFile = "Interface\\Buttons\\WHITE8X8",
        edgeFile = "Interface\\Buttons\\WHITE8X8",
        edgeSize = 1,
        insets = { left = 1, right = 1, top = 1, bottom = 1 },
    })
    editBox:SetTextInsets(9, 9, 0, 0)
    editBox:SetFontObject(GameFontHighlightSmall)
    themedEditBoxes[#themedEditBoxes + 1] = editBox
    local theme = GetTheme()
    editBox:SetBackdropColor(theme.controlBackground[1], theme.controlBackground[2], theme.controlBackground[3], theme.controlBackground[4])
    editBox:SetBackdropBorderColor(theme.accent[1], theme.accent[2], theme.accent[3], theme.accent[4])
    editBox:SetTextColor(theme.text[1], theme.text[2], theme.text[3], theme.text[4])
end

ApplyTheme = function()
    local theme = GetTheme()

    for _, button in ipairs(themedButtons) do
        SetTextureColor(button.flatBackground, button.flatSelector and theme.controlBackground or theme.buttonBackground)
        SetControlBorders(button, theme.accent)
        SetFontColor(button.flatLabel, theme.text)
        if button.flatArrow then SetFontColor(button.flatArrow, theme.heading) end
    end

    for _, dropdown in ipairs(themedDropdowns) do
        SetTextureColor(dropdown.flatBackground, theme.controlBackground)
        SetControlBorders(dropdown, theme.accent)
        SetFontColor(dropdown.flatLabel, theme.text)
        SetFontColor(dropdown.flatArrow, theme.heading)
    end

    for _, button in ipairs(themedActionButtons) do
        SetTextureColor(button.actionBackground, theme.actionBackground)
        for _, border in ipairs({ button.actionTop, button.actionBottom, button.actionLeft, button.actionRight }) do
            SetTextureColor(border, theme.actionBorder)
        end
        SetFontColor(button.actionLabel, theme.heading)
    end

    for _, fontString in ipairs(themedDescriptors) do SetFontColor(fontString, theme.mutedText) end
    for _, fontString in ipairs(themedHeadings) do SetFontColor(fontString, theme.heading) end

    for _, panel in ipairs(themedPanels) do
        if panel.SetBackdropBorderColor then
            panel:SetBackdropBorderColor(theme.panelBorder[1], theme.panelBorder[2], theme.panelBorder[3], theme.panelBorder[4])
        end
    end

    for _, editBox in ipairs(themedEditBoxes) do
        editBox:SetBackdropColor(theme.controlBackground[1], theme.controlBackground[2], theme.controlBackground[3], theme.controlBackground[4])
        editBox:SetBackdropBorderColor(theme.accent[1], theme.accent[2], theme.accent[3], theme.accent[4])
        editBox:SetTextColor(theme.text[1], theme.text[2], theme.text[3], theme.text[4])
    end

    if frame then
        frame:SetBackdropColor(theme.windowBackground[1], theme.windowBackground[2], theme.windowBackground[3], theme.windowBackground[4])
        frame:SetBackdropBorderColor(theme.windowBorder[1], theme.windowBorder[2], theme.windowBorder[3], theme.windowBorder[4])
    end
    if sidebar then
        sidebar:SetBackdropColor(theme.windowBackground[1], theme.windowBackground[2], theme.windowBackground[3], theme.windowBackground[4])
        sidebar:SetBackdropBorderColor(theme.panelBorder[1], theme.panelBorder[2], theme.panelBorder[3], theme.panelBorder[4])
        if sidebar.divider then SetTextureColor(sidebar.divider, theme.divider) end
    end
    if helpFrame then
        helpFrame:SetBackdropColor(theme.windowBackground[1], theme.windowBackground[2], theme.windowBackground[3], theme.windowBackground[4])
        helpFrame:SetBackdropBorderColor(theme.panelBorder[1], theme.panelBorder[2], theme.panelBorder[3], theme.panelBorder[4])
    end
    if voicePopup then
        voicePopup:SetBackdropColor(theme.windowBackground[1], theme.windowBackground[2], theme.windowBackground[3], theme.windowBackground[4])
        voicePopup:SetBackdropBorderColor(theme.panelBorder[1], theme.panelBorder[2], theme.panelBorder[3], theme.panelBorder[4])
    end

    for _, button in pairs(navButtons) do SetNavButtonSelected(button, button.selected) end
    if mainHelpButton then SetNavButtonSelected(mainHelpButton, false) end
    if RefreshThemeCards then RefreshThemeCards() end
end

function Addon:SetTheme(themeKey)
    if not THEMES[themeKey] then return false end
    self.db.theme = themeKey
    ApplyTheme()
    return true
end

local function SetMainControlsVisible(visible)
    local method = visible and "Show" or "Hide"
    if mainCloseButton then mainCloseButton[method](mainCloseButton) end
    if mainHelpButton then mainHelpButton[method](mainHelpButton) end
    if sidebar then sidebar[method](sidebar) end
end

local function RefreshClassDropdown()
    local data = selectedClass and Addon.CLASS_DATA[selectedClass]
    SetDropdownText(classDropdown, data and data.name or "Select class")
end

local function RefreshSpecDropdown()
    local data = selectedSpec and Addon.SPEC_DATA[selectedSpec]
    SetDropdownText(specDropdown, data and data.name or "Select spec")
end

local function RefreshAbilityDropdown()
    local data = selectedSpell and Addon:GetSpellData(selectedSpell)
    SetDropdownText(abilityDropdown, data and (data.name .. "  [" .. data.id .. "]") or "Select class ability")
end

local function RefreshCustomSpellSelection()
    if not customSpellSelectionText then return end
    local data = selectedCustomSpell and Addon:GetSpellData(selectedCustomSpell)
    if data then
        customSpellSelectionText:SetText(("Selected: %s  [%d]"):format(data.name, data.id))
    else
        customSpellSelectionText:SetText("No custom spell selected")
    end
end

local function SetVoiceButtonText(button, voiceReference)
    if button then
        button:SetText(voiceReference and Addon:GetVoiceName(voiceReference) or "Select countdown voice")
    end
end

local function RefreshVoiceDropdown()
    SetVoiceButtonText(voiceDropdown, selectedVoice)
end

local function RefreshChannelDropdown()
    if not channelDropdown then return end
    local selectedLabel = Addon.db.soundChannel
    for _, channel in ipairs(Addon.SOUND_CHANNELS) do
        if channel.value == Addon.db.soundChannel then selectedLabel = channel.label end
    end
    SetDropdownText(channelDropdown, selectedLabel)
end

local function RefreshDropdowns()
    RefreshClassDropdown()
    RefreshSpecDropdown()
    RefreshAbilityDropdown()
    RefreshCustomSpellSelection()
    RefreshVoiceDropdown()
    RefreshChannelDropdown()
end

local function GetRenameText(saved)
    if type(saved) == "table" then return saved.text or "" end
    return saved or ""
end

local function GetSelectedRenameSpellID()
    return renameSelectedCustomSpell or renameSelectedSpell
end

local function RefreshRenameDropdowns()
    local class = renameSelectedClass and Addon.CLASS_DATA[renameSelectedClass]
    SetDropdownText(renameClassDropdown, class and class.name or "Select class")
    local spec = renameSelectedSpec and Addon.SPEC_DATA[renameSelectedSpec]
    SetDropdownText(renameSpecDropdown, spec and spec.name or "Select spec")
    local spellID = GetSelectedRenameSpellID()
    local spell = spellID and Addon:GetSpellData(spellID)
    SetDropdownText(renameAbilityDropdown, renameSelectedSpell and spell and (spell.name .. "  [" .. spell.id .. "]") or "Select class ability")
    if renameCustomSpellSelectionText then
        if renameSelectedCustomSpell and spell then
            renameCustomSpellSelectionText:SetText(("Selected: %s  [%d]"):format(spell.name, spell.id))
        else
            renameCustomSpellSelectionText:SetText("No custom spell selected")
        end
    end
    if renameTextBox then
        local saved = spellID and renameSelectedSpec and Addon:GetAbilityRename(renameSelectedSpec, spellID)
        renameTextBox:SetText(GetRenameText(saved))
    end
end

RefreshRenameRows = function()
    if not renamePage or not renamePage.renameCount then return end
    local renames = Addon:GetAbilityRenames()
    local maxOffset = math.max(0, #renames - RENAME_ROW_COUNT)
    renameOffset = math.min(renameOffset, maxOffset)
    for rowIndex = 1, RENAME_ROW_COUNT do
        local row = renameRows[rowIndex]
        local data = renames[rowIndex + renameOffset]
        row.data = data
        if data then
            row.icon:SetTexture(data.spellIcon)
            row.spell:SetText(("%s  |cFF888888[%d]|r"):format(data.spellName, data.spellID))
            row.spec:SetText(data.specName)
            row.replacement:SetText(data.replacement)
            row:Show()
        else
            row:Hide()
        end
    end
    renamePage.renameCount:SetText(("Saved ability renames: %d"):format(#renames))
end

RefreshRenameOptions = function()
    RefreshRenameDropdowns()
    RefreshRenameRows()
end

local function SetVoiceStatus(message)
    local target = voiceContext and voiceContext.statusTarget
    if target then target:SetText(message) elseif statusText then statusText:SetText(message) end
end

local function PreviewVoice(voiceID)
    if not voiceID or Addon:IsMuteVoice(voiceID) then return end
    local maximum = Addon:GetMaximumVoiceNumber(voiceID)
    if maximum < 1 then
        SetVoiceStatus("That voice is unavailable. Its countdown pack may be disabled.")
        return
    end

    local seconds = math.min(3, maximum)
    voicePreviewToken = voicePreviewToken + 1
    local token = voicePreviewToken
    for number = seconds, 1, -1 do
        local countdownNumber = number
        C_Timer.After(seconds - countdownNumber, function()
            if token == voicePreviewToken then
                Addon:PlayVoiceNumber(voiceID, countdownNumber)
            end
        end)
    end
end

local function GetVoicePopupSelection()
    if voiceContext and voiceContext.getSelected then
        return voiceContext.getSelected()
    end
end

local function RefreshVoicePopup()
    if not voicePopup or not voiceScrollChild then return end

    local voices = {}
    if voiceContext and voiceContext.includeDefault then
        voices[#voices + 1] = { id = "__NCC_DEFAULT__", name = "Use default countdown", default = true }
    end
    for _, voice in ipairs(Addon:GetVoiceList()) do voices[#voices + 1] = voice end

    local contentWidth = 366
    local selectedIndex
    local currentSelection = GetVoicePopupSelection()
    if voiceContext and voiceContext.includeDefault and currentSelection == nil then
        currentSelection = "__NCC_DEFAULT__"
    end

    for index, voice in ipairs(voices) do
        local row = voiceRows[index]
        if not row then
            row = CreateFrame("Frame", nil, voiceScrollChild)
            row:SetSize(contentWidth, VOICE_ROW_HEIGHT)

            row.background = row:CreateTexture(nil, "BACKGROUND")
            row.background:SetAllPoints()
            row.background:SetColorTexture(1, 1, 1, 0.035)

            row.check = row:CreateTexture(nil, "ARTWORK")
            row.check:SetSize(16, 16)
            row.check:SetPoint("LEFT", 4, 0)
            row.check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check")

            row.select = CreateFrame("Button", nil, row)
            row.select:SetPoint("TOPLEFT", 22, 0)
            row.select:SetPoint("BOTTOMRIGHT", -34, 0)
            row.select:SetHighlightTexture("Interface\\QuestFrame\\UI-QuestTitleHighlight", "ADD")
            row.select.text = row.select:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
            row.select.text:SetPoint("LEFT", 4, 0)
            row.select.text:SetPoint("RIGHT", -4, 0)
            row.select.text:SetJustifyH("LEFT")
            row.select:SetScript("OnClick", function(self)
                if voiceContext and voiceContext.onSelect then
                    local selection = self.voiceID == "__NCC_DEFAULT__" and nil or self.voiceID
                    voiceContext.onSelect(selection)
                end
                if voicePopup then voicePopup:Hide() end
            end)

            row.preview = CreateFrame("Button", nil, row)
            row.preview:SetSize(24, 24)
            row.preview:SetPoint("RIGHT", -4, 0)
            row.preview:SetNormalTexture("Interface\\Common\\VoiceChat-Speaker")
            row.preview:SetPushedTexture("Interface\\Common\\VoiceChat-Speaker")
            row.preview:SetHighlightTexture("Interface\\Buttons\\ButtonHilight-Square", "ADD")
            row.preview:SetScript("OnClick", function(self) PreviewVoice(self.voiceID) end)
            row.preview:SetScript("OnEnter", function(self)
                GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
                GameTooltip:SetText("Preview 3, 2, 1")
                GameTooltip:Show()
            end)
            row.preview:SetScript("OnLeave", function() GameTooltip:Hide() end)

            voiceRows[index] = row
        end

        row:ClearAllPoints()
        row:SetPoint("TOPLEFT", 0, -((index - 1) * VOICE_ROW_HEIGHT))
        row.select.voiceID = voice.id
        row.preview.voiceID = voice.id
        row.select.text:SetText(voice.name)
        row.preview:SetShown(not voice.muted and not voice.default)
        if voice.muted then
            local theme = GetTheme()
            SetFontColor(row.select.text, theme.heading)
            row.background:SetColorTexture(theme.selectedBackground[1], theme.selectedBackground[2], theme.selectedBackground[3], 0.70)
        elseif voice.default then
            SetFontColor(row.select.text, GetTheme().text)
            row.background:SetColorTexture(1, 1, 1, 0.055)
        else
            row.select.text:SetTextColor(1, 1, 1)
            row.background:SetColorTexture(1, 1, 1, 0.035)
        end
        if currentSelection == voice.id then
            row.check:Show()
            selectedIndex = index
        else
            row.check:Hide()
        end
        row:Show()
    end

    for index = #voices + 1, #voiceRows do voiceRows[index]:Hide() end

    local height = math.max(1, #voices * VOICE_ROW_HEIGHT)
    voiceScrollChild:SetSize(contentWidth, height)
    if voiceScrollFrame.UpdateScrollChildRect then voiceScrollFrame:UpdateScrollChildRect() end

    if #voices == 0 then voicePopup.emptyText:Show() else voicePopup.emptyText:Hide() end

    if selectedIndex then
        C_Timer.After(0, function()
            if not voicePopup or not voicePopup:IsShown() then return end
            local target = math.max(0, ((selectedIndex - 4) * VOICE_ROW_HEIGHT))
            local maximum = voiceScrollFrame:GetVerticalScrollRange() or 0
            voiceScrollFrame:SetVerticalScroll(math.min(target, maximum))
        end)
    else
        voiceScrollFrame:SetVerticalScroll(0)
    end
end

local function BuildVoicePopup()
    voicePopup = CreateFrame("Frame", "NSRTCountdownCompanionVoicePicker", UIParent, "BackdropTemplate")
    voicePopup:SetSize(410, 390)
    voicePopup:SetFrameStrata("FULLSCREEN_DIALOG")
    voicePopup:SetClampedToScreen(true)
    voicePopup:EnableMouse(true)
    voicePopup:EnableMouseWheel(true)
    voicePopup:SetBackdrop({
        bgFile = "Interface\\Buttons\\WHITE8X8",
        edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border",
        tile = false, edgeSize = 24,
        insets = { left = 8, right = 8, top = 8, bottom = 8 },
    })
    voicePopup:SetBackdropColor(0, 0, 0, 1)
    voicePopup:SetBackdropBorderColor(1, 1, 1, 1)
    RegisterPanel(voicePopup)

    local title = voicePopup:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    title:SetPoint("TOPLEFT", 16, -13)
    title:SetText("Select countdown voice")
    RegisterHeading(title)

    local hint = voicePopup:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall")
    hint:SetPoint("TOPLEFT", 16, -33)
    hint:SetPoint("RIGHT", -42, 0)
    hint:SetJustifyH("LEFT")
    hint:SetText("Select a countdown option or preview a voice")
    StyleDescriptorText(hint)

    local close = CreateFrame("Button", nil, voicePopup, "UIPanelCloseButton")
    close:SetPoint("TOPRIGHT", -3, -3)

    voiceScrollFrame = CreateFrame("ScrollFrame", nil, voicePopup, "UIPanelScrollFrameTemplate")
    voiceScrollFrame:SetPoint("TOPLEFT", 12, -56)
    voiceScrollFrame:SetPoint("BOTTOMRIGHT", -30, 12)
    voiceScrollFrame:EnableMouseWheel(true)

    voiceScrollChild = CreateFrame("Frame", nil, voiceScrollFrame)
    voiceScrollChild:SetSize(366, 1)
    voiceScrollFrame:SetScrollChild(voiceScrollChild)

    voicePopup.emptyText = voicePopup:CreateFontString(nil, "ARTWORK", "GameFontDisable")
    voicePopup.emptyText:SetPoint("CENTER", voiceScrollFrame, "CENTER", 0, 0); StyleDescriptorText(voicePopup.emptyText)
    voicePopup.emptyText:SetText("No countdown options found")
    voicePopup.emptyText:Hide()

    local function ScrollVoiceList(delta)
        local current = voiceScrollFrame:GetVerticalScroll() or 0
        local maximum = voiceScrollFrame:GetVerticalScrollRange() or 0
        local target = current - (delta * VOICE_ROW_HEIGHT * 3)
        voiceScrollFrame:SetVerticalScroll(math.max(0, math.min(maximum, target)))
    end
    voicePopup:SetScript("OnMouseWheel", function(_, delta) ScrollVoiceList(delta) end)
    voiceScrollFrame:SetScript("OnMouseWheel", function(_, delta) ScrollVoiceList(delta) end)
    voicePopup:SetScript("OnShow", function()
        RefreshVoicePopup()
        voicePopup:Raise()
    end)

    if UISpecialFrames then table.insert(UISpecialFrames, voicePopup:GetName()) end
    voicePopup:Hide()
end

local function ToggleVoicePopup(anchor, getSelected, onSelect, statusTarget, includeDefault)
    if not voicePopup then BuildVoicePopup() end
    if voicePopup:IsShown() and voiceContext and voiceContext.anchor == anchor then
        voicePopup:Hide()
        return
    end

    voiceContext = {
        anchor = anchor,
        getSelected = getSelected,
        onSelect = onSelect,
        statusTarget = statusTarget,
        includeDefault = includeDefault == true,
    }
    voicePopup:ClearAllPoints()
    voicePopup:SetPoint("TOPRIGHT", anchor, "BOTTOMRIGHT", 0, -4)
    voicePopup:Show()
end


RefreshAssignments = function()
    if not abilityPage then return end
    local assignments = Addon:GetAssignments()
    local maxOffset = math.max(0, #assignments - ROW_COUNT)
    assignmentOffset = math.min(assignmentOffset, maxOffset)

    for rowIndex = 1, ROW_COUNT do
        local row = assignmentRows[rowIndex]
        local data = assignments[rowIndex + assignmentOffset]
        row.data = data
        if data then
            row.icon:SetTexture(data.spellIcon)
            row.spell:SetText(data.spellName .. "  |cFF888888[" .. data.spellID .. "]|r")
            local className = Addon.CLASS_DATA[data.classFile] and Addon.CLASS_DATA[data.classFile].name or tostring(data.classFile or "Unknown")
            row.spec:SetText(className .. " - " .. data.specName)
            row.voice:SetText(data.voiceName)
            row:Show()
        else
            row:Hide()
        end
    end
    abilityPage.assignmentCount:SetText(("Player ability assignments: %d"):format(#assignments))
end

local function FormatReminderTime(value)
    value = tonumber(value) or 0
    local minutes = math.floor(value / 60)
    local seconds = value % 60
    if math.abs(seconds - math.floor(seconds)) < 0.001 then
        return ("%d:%02d"):format(minutes, math.floor(seconds))
    end
    return ("%d:%04.1f"):format(minutes, seconds)
end

local function GetSelectedNoteReminder()
    if not selectedNoteKey then return nil end
    for _, reminder in ipairs(Addon:GetCurrentNoteReminders()) do
        if reminder.key == selectedNoteKey then return reminder end
    end
end

local NOTE_TTS_MODE_LABELS = {
    default = "Use NSRT TTS",
    mute = "Mute TTS",
    custom = "Custom text",
}

local function RefreshNoteTTSControls()
    if noteTTSModeDropdown then
        SetDropdownText(noteTTSModeDropdown, NOTE_TTS_MODE_LABELS[selectedNoteTTSMode] or NOTE_TTS_MODE_LABELS.default)
    end
    local custom = selectedNoteTTSMode == "custom"
    if noteTTSCustomLabel then noteTTSCustomLabel:SetShown(custom) end
    if noteTTSCustomTextBox then
        noteTTSCustomTextBox:SetShown(custom)
        if custom and noteTTSCustomTextBox:GetText() ~= selectedNoteCustomTTS then
            noteTTSCustomTextBox:SetText(selectedNoteCustomTTS or "")
        end
    end
end

local function GetNoteRowVoiceReference(reminderKey)
    local assignment = Addon:GetNoteAssignment(reminderKey)
    if assignment and assignment.voice then return Addon:GetVoiceKey(assignment) end
end

local function SaveNoteRowCustomTTS(row)
    if not row or not row.data then return end
    local text = row.customBox:GetText() or ""
    if not text:match("%S") then
        noteStatusText:SetText("Enter the custom text NSRT should speak for " .. row.data.label .. ".")
        row.customBox:SetFocus()
        return
    end
    local voiceReference = GetNoteRowVoiceReference(row.data.key)
    if Addon:SetNoteOverrides(row.data, voiceReference, "custom", text) then
        noteStatusText:SetText(("Saved custom TTS for %s: %s."):format(row.data.label, text))
        row.customBox:ClearFocus()
        RefreshNoteRows()
    end
end

local function SetNoteRowTTSMode(row, mode)
    if not row or not row.data then return end
    mode = mode == "mute" and "mute" or mode == "custom" and "custom" or "default"
    row.ttsMode = mode
    SetDropdownText(row.ttsDropdown, NOTE_TTS_MODE_LABELS[mode])

    if mode == "custom" then
        local assignment = Addon:GetNoteAssignment(row.data.key)
        row.customBox:SetText(assignment and tostring(assignment.customTTS or "") or "")
        row.customBox:Show()
        row.customSave:Show()
        noteStatusText:SetText("Enter the custom TTS text for " .. row.data.label .. ", then press Enter or Save.")
        row.customBox:SetFocus()
        return
    end

    row.customBox:Hide()
    row.customSave:Hide()
    local voiceReference = GetNoteRowVoiceReference(row.data.key)
    if Addon:SetNoteOverrides(row.data, voiceReference, mode, nil) then
        noteStatusText:SetText(mode == "mute"
            and ("Muted the opening TTS for %s."):format(row.data.label)
            or ("Restored NSRT's opening TTS for %s."):format(row.data.label))
        RefreshNoteRows()
    end
end

local function SetNoteRowCountdown(row, voiceReference)
    if not row or not row.data then return end
    local assignment = Addon:GetNoteAssignment(row.data.key)
    local ttsMode = assignment and Addon:GetNoteTTSMode(row.data.key) or "default"
    local customTTS = assignment and assignment.customTTS or nil
    if Addon:SetNoteOverrides(row.data, voiceReference, ttsMode, customTTS) then
        local label = voiceReference and Addon:GetVoiceName(voiceReference) or "default countdown"
        noteStatusText:SetText(("Set %s to %s."):format(row.data.label, label))
        RefreshNoteRows()
    end
end

RefreshNoteRows = function()
    if not notePage then return end
    local reminders = Addon:GetCurrentNoteReminders()
    local maxOffset = math.max(0, #reminders - NOTE_ROW_COUNT)
    noteReminderOffset = math.min(noteReminderOffset, maxOffset)

    local assignedCount = 0
    for _, reminder in ipairs(reminders) do
        if Addon:GetNoteAssignment(reminder.key) then assignedCount = assignedCount + 1 end
    end

    for rowIndex = 1, NOTE_ROW_COUNT do
        local row = noteRows[rowIndex]
        local data = reminders[rowIndex + noteReminderOffset]
        row.data = data
        if data then
            local assignment = Addon:GetNoteAssignment(data.key)
            local ttsMode = assignment and Addon:GetNoteTTSMode(data.key) or "default"
            local voiceReference = assignment and assignment.voice and Addon:GetVoiceKey(assignment) or nil

            row.icon:SetTexture(data.icon or 134400)
            row.name:SetText(data.label)
            local countdownText = data.countdown and (tostring(data.countdown) .. "s countdown") or "|cFFFF6666countdown disabled|r"
            row.detail:SetText(("%s  •  P%s %s  •  %s  •  %s"):format(
                data.encounterName or ("Encounter " .. tostring(data.encID)),
                tostring(data.phase or 1), FormatReminderTime(data.time), data.tag or "", countdownText))

            row.ttsMode = ttsMode
            SetDropdownText(row.ttsDropdown, NOTE_TTS_MODE_LABELS[ttsMode] or NOTE_TTS_MODE_LABELS.default)
            row.countdownButton:SetText(voiceReference and Addon:GetVoiceName(voiceReference) or "Use default countdown")

            local custom = ttsMode == "custom"
            row.customBox:SetShown(custom)
            row.customSave:SetShown(custom)
            if custom and not row.customBox:HasFocus() then
                row.customBox:SetText(tostring(assignment.customTTS or ""))
            end

            row.remove:SetShown(assignment ~= nil)
            row:Show()
        else
            row:Hide()
        end
    end

    local sources = Addon:GetLoadedNoteSources()
    if #sources == 0 then
        noteSummaryText:SetText("No active NSRT shared or personal note is currently loaded.")
        if noteScrollText then noteScrollText:SetText("") end
    elseif #reminders == 0 then
        noteSummaryText:SetText("A note is loaded, but it contains no timed reminders matching this character.")
        if noteScrollText then noteScrollText:SetText("") end
    else
        local sourceNames = {}
        for _, source in ipairs(sources) do sourceNames[#sourceNames + 1] = source.name end
        noteSummaryText:SetText(("Applicable reminders: %d  •  Overrides: %d  •  Source: %s"):format(#reminders, assignedCount, table.concat(sourceNames, ", ")))
        if noteScrollText then
            local firstShown = noteReminderOffset + 1
            local lastShown = math.min(#reminders, noteReminderOffset + NOTE_ROW_COUNT)
            if #reminders > NOTE_ROW_COUNT then
                noteScrollText:SetText(("Showing %d-%d of %d  •  Mouse wheel to scroll"):format(firstShown, lastShown, #reminders))
            else
                noteScrollText:SetText(("Showing %d of %d"):format(#reminders, #reminders))
            end
        end
    end
end

RefreshNoteOptions = function()
    RefreshNoteRows()
end

local function EncounterExists(encID, encounters)
    for _, encounter in ipairs(encounters) do
        if encounter.id == encID then return true end
    end
    return false
end

local function GetSelectedEncounterAlert()
    if not selectedEncounterID or not selectedEncounterAlertKey then return nil end
    for _, alert in ipairs(Addon:GetEncounterAlerts(selectedEncounterID, selectedEncounterDifficulty)) do
        if alert.key == selectedEncounterAlertKey then return alert end
    end
end

local function EnsureEncounterSelection()
    local encounters = Addon:GetEncounterList(selectedEncounterDifficulty)
    if selectedEncounterID and not EncounterExists(selectedEncounterID, encounters) then
        selectedEncounterID = nil
        selectedEncounterAlertKey = nil
        selectedEncounterVoice = nil
    end
    if not selectedEncounterID and encounters[1] then selectedEncounterID = encounters[1].id end
    if selectedEncounterAlertKey and not GetSelectedEncounterAlert() then
        selectedEncounterAlertKey = nil
        selectedEncounterVoice = nil
    end
end

local function RefreshEncounterDropdowns()
    if not encounterPage then return end
    EnsureEncounterSelection()
    SetDropdownText(encounterDropdown, selectedEncounterID and Addon:GetEncounterName(selectedEncounterID) or "Select encounter")
    local difficultyNames = { [16] = "Mythic", [15] = "Heroic", [14] = "Normal" }
    SetDropdownText(encounterDifficultyDropdown, difficultyNames[selectedEncounterDifficulty] or tostring(selectedEncounterDifficulty))
    local alert = GetSelectedEncounterAlert()
    SetDropdownText(encounterAlertDropdown, alert and (alert.label or alert.name) or "Select encounter alert")
    SetVoiceButtonText(encounterVoiceDropdown, selectedEncounterVoice)
end

local function RefreshEncounterAssignments()
    if not encounterPage then return end
    local assignments = Addon:GetEncounterAssignments()
    local maxOffset = math.max(0, #assignments - ENCOUNTER_ROW_COUNT)
    encounterAssignmentOffset = math.min(encounterAssignmentOffset, maxOffset)
    for rowIndex = 1, ENCOUNTER_ROW_COUNT do
        local row = encounterAssignmentRows[rowIndex]
        local data = assignments[rowIndex + encounterAssignmentOffset]
        row.data = data
        if data then
            row.icon:SetTexture(data.alertIcon)
            row.encounter:SetText(data.encounterName)
            row.alert:SetText(data.alertName)
            row.voice:SetText(data.voiceName)
            row:Show()
        else
            row:Hide()
        end
    end
    encounterPage.assignmentCount:SetText(("Encounter alert assignments: %d"):format(#assignments))
end

RefreshEncounterOptions = function()
    if not encounterPage then return end
    RefreshEncounterDropdowns()
    RefreshEncounterAssignments()
end

function Addon:RefreshOptions()
    if abilityPage then
        RefreshDropdowns()
        RefreshAssignments()
    end
    if renamePage then RefreshRenameOptions() end
    if notePage then RefreshNoteOptions() end
    if encounterPage then RefreshEncounterOptions() end
end

local function IsAddonLoadedCompat(name)
    if C_AddOns and C_AddOns.IsAddOnLoaded then return C_AddOns.IsAddOnLoaded(name) end
    if IsAddOnLoaded then return IsAddOnLoaded(name) end
    return false
end

local function LoadedStatus(isLoaded)
    return isLoaded and "|cFF55FF55Loaded|r" or "|cFFFF5555Missing or disabled|r"
end

local function RefreshHelpStatus()
    if not helpFrame then return end
    local nsrtLoaded = IsAddonLoadedCompat("NorthernSkyRaidTools")
    local bigWigsLoaded = IsAddonLoadedCompat("BigWigs")
    local dbmLoaded = IsAddonLoadedCompat("DBM-Core")
    local counts = Addon:GetVoiceProviderCounts()
    local providerReady = bigWigsLoaded or dbmLoaded
    helpRequirementsText:SetText(
        "- Northern Sky Raid Tools: " .. LoadedStatus(nsrtLoaded) .. " |cFFAAAAAA(required)|r\n" ..
        "- Voice provider: " .. LoadedStatus(providerReady) .. " |cFFAAAAAA(BigWigs or DBM-Core)|r\n" ..
        "- Additional countdown voice pack: |cFFFFFF55Optional|r |cFFAAAAAA(any compatible BigWigs or DBM countdown pack)|r"
    )
    local colour = counts.total > 0 and "|cFF55FF55" or "|cFFFF5555"
    helpVoiceText:SetText(("%s%d voices detected: %d BigWigs and %d DBM.|r  Mute countdown is always available; speaker buttons preview 3, 2, 1."):format(
        colour, counts.total or 0, counts.BIGWIGS or 0, counts.DBM or 0))
end

local function BuildHelpFrame(parent)
    helpFrame = CreateFrame("Frame", "NSRTCountdownCompanionHelp", parent, "BackdropTemplate")
    helpFrame:SetAllPoints(parent)
    helpFrame:SetFrameLevel(parent:GetFrameLevel() + 100)
    helpFrame:EnableMouse(true)
    helpFrame:SetBackdrop({
        bgFile = "Interface\\Buttons\\WHITE8X8",
        edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border",
        edgeSize = 32,
        insets = { left = 11, right = 12, top = 12, bottom = 11 },
    })
    helpFrame:SetBackdropColor(0, 0, 0, 1)
    helpFrame:SetBackdropBorderColor(1, 1, 1, 1)
    RegisterPanel(helpFrame)

    local title = helpFrame:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
    title:SetPoint("TOP", 0, -18)
    title:SetText("NSRT Countdown Companion Help")
    RegisterHeading(title)
    local close = CreateFrame("Button", nil, helpFrame, "UIPanelCloseButton")
    close:SetPoint("TOPRIGHT", -5, -5)

    local reqTitle = CreateLabel(helpFrame, "Required addons", 34, -64)
    reqTitle:SetFontObject(GameFontNormalLarge)
    helpRequirementsText = helpFrame:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    helpRequirementsText:SetPoint("TOPLEFT", 42, -93)
    helpRequirementsText:SetPoint("TOPRIGHT", -34, -93)
    helpRequirementsText:SetJustifyH("LEFT")
    helpRequirementsText:SetSpacing(4)

    local voiceTitle = CreateLabel(helpFrame, "Voice-pack compatibility", 34, -177)
    voiceTitle:SetFontObject(GameFontNormalLarge)
    helpVoiceText = helpFrame:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    helpVoiceText:SetPoint("TOPLEFT", 42, -206)
    helpVoiceText:SetPoint("TOPRIGHT", -34, -206)
    helpVoiceText:SetJustifyH("LEFT")

    local modesTitle = CreateLabel(helpFrame, "Configuration pages", 34, -256)
    modesTitle:SetFontObject(GameFontNormalLarge)
    local modes = helpFrame:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    modes:SetPoint("TOPLEFT", 42, -286)
    modes:SetPoint("TOPRIGHT", -34, -286)
    modes:SetJustifyH("LEFT")
    modes:SetJustifyV("TOP")
    modes:SetSpacing(4)
    modes:SetText(
        "|cFFFFFF55Player Abilities|r sets a default voice for a spell ID wherever that spell appears in a personal or shared reminder.\n" ..
        "|cFFFFFF55Ability Rename|r replaces the spoken TTS name for a selected spell while leaving the visible reminder text unchanged.\n" ..
        "|cFFFFFF55Current Note|r reads active NSRT notes and enabled MRT note sources, then lists only timed reminders applicable to this character. Every reminder row has its own TTS dropdown on the left and Countdown selector on the right.\n" ..
        "|cFFFFFF55Encounter Alerts|r configures countdowns for NSRT's built-in boss alerts. The alert must have a numeric Countdown value enabled in NSRT.\n" ..
        "|cFFFFFF55Options|r contains the selectable interface themes. Theme changes apply immediately and do not affect assignments."
    )

    local matchTitle = CreateLabel(helpFrame, "Current Note matching", 34, -440)
    matchTitle:SetFontObject(GameFontNormalLarge)
    local matchText = helpFrame:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    matchText:SetPoint("TOPLEFT", 42, -470)
    matchText:SetPoint("TOPRIGHT", -34, -470)
    matchText:SetJustifyH("LEFT")
    matchText:SetSpacing(3)
    matchText:SetText("The addon mirrors NSRT's player filtering: character name, global nickname, everyone, role (tank/healer/damager), specialization ID, class ID, raid group, and melee/ranged position. Countdown overrides require an enabled numeric countdown. Opening-TTS mute or custom text only requires that NSRT would normally speak the reminder.")

    helpFrame:SetScript("OnShow", function()
        if voicePopup then voicePopup:Hide() end
        SetMainControlsVisible(false)
        RefreshHelpStatus()
    end)
    helpFrame:SetScript("OnHide", function()
        if frame and frame:IsShown() then SetMainControlsVisible(true) end
    end)
    helpFrame:Hide()
end

local function StyleVoiceButton(button)
    StyleFlatButton(button, "Select countdown voice", false, true)
end

local function BuildAbilityPage(parent)
    abilityPage = CreateFrame("Frame", nil, parent)
    abilityPage:SetAllPoints(parent)
    local title = CreateLabel(abilityPage, "Player Ability Countdowns", 25, -8)
    title:SetFontObject(GameFontNormalLarge)

    CreateLabel(abilityPage, "Class", 30, -45)
    classDropdown = CreateFrame("Frame", nil, abilityPage, "UIDropDownMenuTemplate")
    classDropdown:SetPoint("TOPLEFT", 12, -58)
    StyleFlatDropdown(classDropdown, 180)
    UIDropDownMenu_Initialize(classDropdown, function(_, level)
        for _, classFile in ipairs(Addon.CLASS_ORDER) do
            local class = Addon.CLASS_DATA[classFile]
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.icon, info.checked = class.name, class.icon, selectedClass == classFile
            info.func = function()
                selectedClass = classFile
                selectedSpec = classFile == Addon:GetCurrentClass() and Addon:GetCurrentSpecID() or (Addon.CLASS_SPECS[classFile] and Addon.CLASS_SPECS[classFile][1])
                selectedSpell, selectedCustomSpell, selectedVoice = nil, nil, nil
                RefreshDropdowns()
            end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(abilityPage, "Specialisation", 260, -45)
    specDropdown = CreateFrame("Frame", nil, abilityPage, "UIDropDownMenuTemplate")
    specDropdown:SetPoint("TOPLEFT", 242, -58)
    StyleFlatDropdown(specDropdown, 180)
    UIDropDownMenu_Initialize(specDropdown, function(_, level)
        for _, specID in ipairs(Addon.CLASS_SPECS[selectedClass] or {}) do
            local spec = Addon.SPEC_DATA[specID]
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.icon, info.checked = spec.name, spec.icon, selectedSpec == specID
            info.func = function()
                selectedSpec = specID
                selectedSpell, selectedCustomSpell, selectedVoice = nil, nil, nil
                RefreshDropdowns()
                if selectedSpec ~= Addon:GetCurrentSpecID() and #Addon:GetKnownAbilities(selectedSpec) == 0 then
                    statusText:SetText("That spec has not been scanned on this character. Switch to it and use Scan current spec.")
                end
            end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(abilityPage, "Audio channel", 490, -45)
    channelDropdown = CreateFrame("Frame", nil, abilityPage, "UIDropDownMenuTemplate")
    channelDropdown:SetPoint("TOPLEFT", 472, -58)
    StyleFlatDropdown(channelDropdown, 160)
    UIDropDownMenu_Initialize(channelDropdown, function(_, level)
        for _, channel in ipairs(Addon.SOUND_CHANNELS) do
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.checked = channel.label, Addon.db.soundChannel == channel.value
            info.func = function() Addon.db.soundChannel = channel.value; RefreshChannelDropdown() end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(abilityPage, "Class ability", 30, -114)
    abilityDropdown = CreateFrame("Frame", nil, abilityPage, "UIDropDownMenuTemplate")
    abilityDropdown:SetPoint("TOPLEFT", 12, -127)
    StyleFlatDropdown(abilityDropdown, 310)
    UIDropDownMenu_Initialize(abilityDropdown, function(_, level)
        local abilities = Addon:GetKnownAbilities(selectedSpec)
        if #abilities == 0 then
            local info = UIDropDownMenu_CreateInfo()
            info.text = selectedSpec ~= Addon:GetCurrentSpecID() and "Not scanned: switch to this spec and scan it" or "No active class/spec abilities found; rescan spellbook"
            info.disabled = true
            UIDropDownMenu_AddButton(info, level)
            return
        end
        for _, ability in ipairs(abilities) do
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.icon, info.checked = ability.name .. "  [" .. ability.id .. "]", ability.icon, selectedSpell == ability.id
            info.func = function()
                selectedSpell, selectedCustomSpell = ability.id, nil
                local existing = Addon:GetAssignment(selectedSpec, selectedSpell)
                selectedVoice = existing and Addon:GetVoiceKey(existing) or nil
                RefreshDropdowns()
            end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(abilityPage, "Countdown voice", 390, -114)
    voiceDropdown = CreateFrame("Button", nil, abilityPage)
    voiceDropdown:SetSize(300, 24)
    voiceDropdown:SetPoint("TOPLEFT", 390, -132)
    StyleVoiceButton(voiceDropdown)
    voiceDropdown:SetScript("OnClick", function()
        ToggleVoicePopup(voiceDropdown, function() return selectedVoice end, function(id) selectedVoice=id; RefreshVoiceDropdown() end, statusText)
    end)

    CreateLabel(abilityPage, "Missing Ability", 30, -183)
    local scanHint = abilityPage:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall")
    StyleDescriptorText(scanHint)
    scanHint:SetPoint("TOPLEFT", 30, -204)
    scanHint:SetWidth(490)
    scanHint:SetJustifyH("LEFT")
    scanHint:SetText("If your desired class ability is missing from the above list, try to scan your current spec")
    CreateButton(abilityPage, "Scan current spec", 150, 540, -196, function()
        local currentSpec = Addon:GetCurrentSpecID()
        if selectedSpec and selectedSpec ~= currentSpec then
            local spec = Addon.SPEC_DATA[selectedSpec]
            statusText:SetText(("Switch to %s, then scan again."):format(spec and spec.name or "that spec"))
            return
        end
        local count = Addon:ScanCurrentSpellbook() or 0
        statusText:SetText(("Scanned the current spec and found %d active class/spec abilities."):format(count))
    end)

    CreateLabel(abilityPage, "Custom spell", 30, -251)
    local customHint = abilityPage:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall"); StyleDescriptorText(customHint)
    customHint:SetPoint("TOPLEFT", 30, -272)
    customHint:SetWidth(650)
    customHint:SetJustifyH("LEFT")
    customHint:SetText("If the spell in the NSRT note is not part of your class, such as an assigned use of Healthstone, you can add it here")
    local spellIDBox = CreateFrame("EditBox", nil, abilityPage, "BackdropTemplate")
    spellIDBox:SetSize(120, 24)
    spellIDBox:SetPoint("TOPLEFT", 32, -299)
    spellIDBox:SetAutoFocus(false)
    spellIDBox:SetNumeric(true)
    StyleFlatEditBox(spellIDBox)
    CreateButton(abilityPage, "Use spell ID", 110, 165, -298, function()
        local spellID = tonumber(spellIDBox:GetText())
        if not selectedClass or not selectedSpec then
            statusText:SetText("Select a class and spec before configuring a custom spell.")
        elseif not spellID or not Addon:AddCustomSpell(spellID, selectedSpec) then
            statusText:SetText("That spell ID could not be resolved.")
        else
            selectedCustomSpell, selectedSpell = spellID, nil
            local existing = Addon:GetAssignment(selectedSpec, selectedCustomSpell)
            selectedVoice = existing and Addon:GetVoiceKey(existing) or nil
            spellIDBox:SetText("")
            local spell = Addon:GetSpellData(spellID)
            statusText:SetText(("Selected custom spell %s [%d]. Choose a countdown option, then assign it."):format(spell and spell.name or "Spell", spellID))
            Addon:RefreshOptions()
        end
    end)
    customSpellSelectionText = abilityPage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    customSpellSelectionText:SetPoint("TOPLEFT", 300, -303)
    customSpellSelectionText:SetPoint("TOPRIGHT", -30, -303)
    customSpellSelectionText:SetJustifyH("LEFT")

    CreateButton(abilityPage, "Assign", 150, 285, -339, function()
        local spellID = selectedCustomSpell or selectedSpell
        if not selectedClass or not selectedSpec or not spellID or not selectedVoice then
            statusText:SetText("Select a class, spec, class ability or custom spell, and a countdown option.")
            return
        end
        if Addon:SetAssignment(selectedClass, selectedSpec, spellID, selectedVoice) then
            local spell = Addon:GetSpellData(spellID)
            statusText:SetText(("Assigned %s to %s."):format(Addon:GetVoiceName(selectedVoice), spell and spell.name or spellID))
            RefreshAssignments()
        end
    end)

    statusText = abilityPage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    statusText:SetPoint("TOPLEFT", 30, -380)
    statusText:SetPoint("TOPRIGHT", -30, -380)
    statusText:SetJustifyH("LEFT")
    statusText:SetText("These are spell-wide defaults. Use Current Note to override one specific reminder line.")
    StyleDescriptorText(statusText)
    abilityPage.assignmentCount = abilityPage:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    abilityPage.assignmentCount:SetPoint("TOPLEFT", 30, -411)
    RegisterHeading(abilityPage.assignmentCount)

    local list = CreateFrame("Frame", nil, abilityPage, "BackdropTemplate")
    list:SetPoint("TOPLEFT", 25, -432)
    list:SetSize(670, 238)
    list:SetBackdrop({ bgFile="Interface\\Buttons\\WHITE8X8", edgeFile="Interface\\Tooltips\\UI-Tooltip-Border", edgeSize=12, insets={left=3,right=3,top=3,bottom=3} })
    list:SetBackdropColor(0, 0, 0, 1)
    RegisterPanel(list)
    if list.SetClipsChildren then list:SetClipsChildren(true) end
    list:EnableMouseWheel(true)
    list:SetScript("OnMouseWheel", function(_, delta)
        local assignments = Addon:GetAssignments()
        assignmentOffset = math.max(0, math.min(math.max(0, #assignments - ROW_COUNT), assignmentOffset - delta))
        RefreshAssignments()
    end)
    for rowIndex=1,ROW_COUNT do
        local row=CreateFrame("Frame",nil,list); row:SetSize(650,24); row:SetPoint("TOPLEFT",10,-7-((rowIndex-1)*24))
        row.icon=row:CreateTexture(nil,"ARTWORK"); row.icon:SetSize(20,20); row.icon:SetPoint("LEFT",0,0)
        row.spell=row:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); row.spell:SetPoint("LEFT",row.icon,"RIGHT",7,0); row.spell:SetWidth(205); row.spell:SetJustifyH("LEFT")
        row.spec=row:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); row.spec:SetPoint("LEFT",235,0); row.spec:SetWidth(145); row.spec:SetJustifyH("LEFT")
        row.voice=row:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); row.voice:SetPoint("LEFT",385,0); row.voice:SetWidth(205); row.voice:SetJustifyH("LEFT")
        row.remove=CreateRemoveIconButton(row); row.remove:SetPoint("RIGHT",-2,0)
        row.remove:SetScript("OnClick",function() if row.data then Addon:RemoveAssignment(row.data.specID,row.data.spellID); statusText:SetText("Removed the assignment for "..row.data.spellName.."."); RefreshAssignments() end end)
        assignmentRows[rowIndex]=row
    end
end


local function BuildRenamePage(parent)
    renamePage = CreateFrame("Frame", nil, parent)
    renamePage:SetAllPoints(parent)

    local title = CreateLabel(renamePage, "Ability Rename", 25, -8)
    title:SetFontObject(GameFontNormalLarge)
    local intro = renamePage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    intro:SetPoint("TOPLEFT", 30, -38)
    intro:SetPoint("TOPRIGHT", -30, -38)
    intro:SetJustifyH("LEFT")
    intro:SetText("Choose an ability and enter the shorter name NSRT should speak. The visible reminder text is not changed.")
    StyleDescriptorText(intro)

    CreateLabel(renamePage, "Class", 30, -75)
    renameClassDropdown = CreateFrame("Frame", nil, renamePage, "UIDropDownMenuTemplate")
    renameClassDropdown:SetPoint("TOPLEFT", 12, -88)
    StyleFlatDropdown(renameClassDropdown, 180)
    UIDropDownMenu_Initialize(renameClassDropdown, function(_, level)
        for _, classFile in ipairs(Addon.CLASS_ORDER) do
            local class = Addon.CLASS_DATA[classFile]
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.icon, info.checked = class.name, class.icon, renameSelectedClass == classFile
            info.func = function()
                renameSelectedClass = classFile
                renameSelectedSpec = classFile == Addon:GetCurrentClass() and Addon:GetCurrentSpecID() or (Addon.CLASS_SPECS[classFile] and Addon.CLASS_SPECS[classFile][1])
                renameSelectedSpell, renameSelectedCustomSpell = nil, nil
                RefreshRenameDropdowns()
            end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(renamePage, "Specialisation", 260, -75)
    renameSpecDropdown = CreateFrame("Frame", nil, renamePage, "UIDropDownMenuTemplate")
    renameSpecDropdown:SetPoint("TOPLEFT", 242, -88)
    StyleFlatDropdown(renameSpecDropdown, 180)
    UIDropDownMenu_Initialize(renameSpecDropdown, function(_, level)
        for _, specID in ipairs(Addon.CLASS_SPECS[renameSelectedClass] or {}) do
            local spec = Addon.SPEC_DATA[specID]
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.icon, info.checked = spec.name, spec.icon, renameSelectedSpec == specID
            info.func = function()
                renameSelectedSpec = specID
                renameSelectedSpell, renameSelectedCustomSpell = nil, nil
                RefreshRenameDropdowns()
                if renameSelectedSpec ~= Addon:GetCurrentSpecID() and #Addon:GetKnownAbilities(renameSelectedSpec) == 0 then
                    renameStatusText:SetText("That spec has not been scanned on this character. Switch to it and use Scan current spec.")
                end
            end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(renamePage, "Class ability", 30, -144)
    renameAbilityDropdown = CreateFrame("Frame", nil, renamePage, "UIDropDownMenuTemplate")
    renameAbilityDropdown:SetPoint("TOPLEFT", 12, -157)
    StyleFlatDropdown(renameAbilityDropdown, 310)
    UIDropDownMenu_Initialize(renameAbilityDropdown, function(_, level)
        local abilities = Addon:GetKnownAbilities(renameSelectedSpec)
        if #abilities == 0 then
            local info = UIDropDownMenu_CreateInfo()
            info.text = renameSelectedSpec ~= Addon:GetCurrentSpecID() and "Not scanned: switch to this spec and scan it" or "No active class/spec abilities found; rescan spellbook"
            info.disabled = true
            UIDropDownMenu_AddButton(info, level)
            return
        end
        for _, ability in ipairs(abilities) do
            local info = UIDropDownMenu_CreateInfo()
            info.text, info.icon, info.checked = ability.name .. "  [" .. ability.id .. "]", ability.icon, renameSelectedSpell == ability.id
            info.func = function()
                renameSelectedSpell, renameSelectedCustomSpell = ability.id, nil
                RefreshRenameDropdowns()
            end
            UIDropDownMenu_AddButton(info, level)
        end
    end)

    CreateLabel(renamePage, "Replacement TTS text", 390, -144)
    renameTextBox = CreateFrame("EditBox", nil, renamePage, "BackdropTemplate")
    renameTextBox:SetSize(300, 28)
    renameTextBox:SetPoint("TOPLEFT", 390, -159)
    renameTextBox:SetAutoFocus(false)
    renameTextBox:SetMaxLetters(80)
    StyleFlatEditBox(renameTextBox)

    CreateLabel(renamePage, "Missing Ability", 30, -213)
    local scanHint = renamePage:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall")
    scanHint:SetPoint("TOPLEFT", 30, -234)
    scanHint:SetWidth(490)
    scanHint:SetJustifyH("LEFT")
    scanHint:SetText("If the ability is missing from the list, switch to that spec and scan its current spellbook.")
    StyleDescriptorText(scanHint)
    CreateButton(renamePage, "Scan current spec", 150, 540, -226, function()
        local currentSpec = Addon:GetCurrentSpecID()
        if renameSelectedSpec and renameSelectedSpec ~= currentSpec then
            local spec = Addon.SPEC_DATA[renameSelectedSpec]
            renameStatusText:SetText(("Switch to %s, then scan again."):format(spec and spec.name or "that spec"))
            return
        end
        local count = Addon:ScanCurrentSpellbook() or 0
        renameStatusText:SetText(("Scanned the current spec and found %d active class/spec abilities."):format(count))
        RefreshRenameDropdowns()
    end)

    CreateLabel(renamePage, "Custom spell", 30, -281)
    local customHint = renamePage:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall")
    customHint:SetPoint("TOPLEFT", 30, -302)
    customHint:SetWidth(650)
    customHint:SetJustifyH("LEFT")
    customHint:SetText("Enter a spell ID here when the ability is not part of the selected class spellbook.")
    StyleDescriptorText(customHint)

    local spellIDBox = CreateFrame("EditBox", nil, renamePage, "BackdropTemplate")
    spellIDBox:SetSize(120, 24)
    spellIDBox:SetPoint("TOPLEFT", 32, -329)
    spellIDBox:SetAutoFocus(false)
    spellIDBox:SetNumeric(true)
    StyleFlatEditBox(spellIDBox)
    CreateButton(renamePage, "Use spell ID", 110, 165, -328, function()
        local spellID = tonumber(spellIDBox:GetText())
        if not renameSelectedClass or not renameSelectedSpec then
            renameStatusText:SetText("Select a class and spec before configuring a custom spell.")
        elseif not spellID or not Addon:AddCustomSpell(spellID, renameSelectedSpec) then
            renameStatusText:SetText("That spell ID could not be resolved.")
        else
            renameSelectedCustomSpell, renameSelectedSpell = spellID, nil
            spellIDBox:SetText("")
            RefreshRenameDropdowns()
            local spell = Addon:GetSpellData(spellID)
            renameStatusText:SetText(("Selected custom spell %s [%d]. Enter its replacement TTS text."):format(spell and spell.name or "Spell", spellID))
        end
    end)
    renameCustomSpellSelectionText = renamePage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    renameCustomSpellSelectionText:SetPoint("TOPLEFT", 300, -333)
    renameCustomSpellSelectionText:SetPoint("TOPRIGHT", -30, -333)
    renameCustomSpellSelectionText:SetJustifyH("LEFT")

    local saveButton = CreateButton(renamePage, "Assign", 160, 280, -371, function()
        local spellID = GetSelectedRenameSpellID()
        local replacement = renameTextBox:GetText()
        if not renameSelectedClass or not renameSelectedSpec or not spellID then
            renameStatusText:SetText("Select a class, spec and ability or custom spell first.")
            return
        end
        if not replacement or strtrim(replacement) == "" then
            renameStatusText:SetText("Enter the text NSRT should speak for this ability.")
            return
        end
        if Addon:SetAbilityRename(renameSelectedClass, renameSelectedSpec, spellID, replacement) then
            local spell = Addon:GetSpellData(spellID)
            local saved = Addon:GetAbilityRename(renameSelectedSpec, spellID)
            renameStatusText:SetText(("%s will now be spoken as '%s'."):format(spell and spell.name or ("Spell " .. spellID), GetRenameText(saved)))
            RefreshRenameRows()
        else
            renameStatusText:SetText("The rename could not be saved. Keep it to 80 characters or fewer.")
        end
    end)
    StyleActionButton(saveButton, "Save rename")

    renameStatusText = renamePage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    renameStatusText:SetPoint("TOPLEFT", 30, -414)
    renameStatusText:SetPoint("TOPRIGHT", -30, -414)
    renameStatusText:SetJustifyH("LEFT")
    renameStatusText:SetText("Example: Beacon of Virtue can be spoken as Beacon. NSRT keeps its normal timing phrase, such as 'in 5'.")
    StyleDescriptorText(renameStatusText)

    renamePage.renameCount = renamePage:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    renamePage.renameCount:SetPoint("TOPLEFT", 30, -445)
    RegisterHeading(renamePage.renameCount)

    local list = CreateFrame("Frame", nil, renamePage, "BackdropTemplate")
    list:SetPoint("TOPLEFT", 25, -466)
    list:SetSize(670, 204)
    list:SetBackdrop({ bgFile="Interface\\Buttons\\WHITE8X8", edgeFile="Interface\\Tooltips\\UI-Tooltip-Border", edgeSize=12, insets={left=3,right=3,top=3,bottom=3} })
    list:SetBackdropColor(0, 0, 0, 1)
    RegisterPanel(list)
    list:EnableMouseWheel(true)
    list:SetScript("OnMouseWheel", function(_, delta)
        local renames = Addon:GetAbilityRenames()
        renameOffset = math.max(0, math.min(math.max(0, #renames - RENAME_ROW_COUNT), renameOffset - delta))
        RefreshRenameRows()
    end)

    for rowIndex = 1, RENAME_ROW_COUNT do
        local row = CreateFrame("Frame", nil, list)
        row:SetSize(650, 24)
        row:SetPoint("TOPLEFT", 10, -7 - ((rowIndex - 1) * 24))
        row.icon = row:CreateTexture(nil, "ARTWORK")
        row.icon:SetSize(20, 20)
        row.icon:SetPoint("LEFT", 0, 0)
        row.spell = row:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
        row.spell:SetPoint("LEFT", row.icon, "RIGHT", 7, 0)
        row.spell:SetWidth(225)
        row.spell:SetJustifyH("LEFT")
        row.spec = row:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
        row.spec:SetPoint("LEFT", 255, 0)
        row.spec:SetWidth(130)
        row.spec:SetJustifyH("LEFT")
        row.replacement = row:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
        row.replacement:SetPoint("LEFT", 390, 0)
        row.replacement:SetWidth(225)
        row.replacement:SetJustifyH("LEFT")
        row.remove = CreateRemoveIconButton(row)
        row.remove:SetPoint("RIGHT", -2, 0)
        row.remove:SetScript("OnClick", function()
            if row.data then
                Addon:RemoveAbilityRename(row.data.specID, row.data.spellID)
                if renameSelectedSpec == row.data.specID and GetSelectedRenameSpellID() == row.data.spellID then renameTextBox:SetText("") end
                renameStatusText:SetText("Removed the TTS rename for " .. row.data.spellName .. ".")
                RefreshRenameRows()
            end
        end)
        renameRows[rowIndex] = row
    end
end

local function BuildNotePage(parent)
    notePage = CreateFrame("Frame", nil, parent)
    notePage:SetAllPoints(parent)
    local title = CreateLabel(notePage, "Current Note Overrides", 25, -8)
    title:SetFontObject(GameFontNormalLarge)

    local intro = notePage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    intro:SetPoint("TOPLEFT", 25, -38)
    intro:SetPoint("TOPRIGHT", -25, -38)
    intro:SetJustifyH("LEFT")
    intro:SetText("Configure each applicable reminder directly. Opening TTS is on the left and the numbered countdown is on the right.")
    StyleDescriptorText(intro)

    CreateButton(notePage, "Refresh current note", 150, 545, -62, function()
        RefreshNoteOptions()
        noteStatusText:SetText("Refreshed the loaded note and player-specific reminder list.")
    end)

    noteSummaryText = notePage:CreateFontString(nil, "ARTWORK", "GameFontNormal")
    noteSummaryText:SetPoint("TOPLEFT", 25, -69)
    noteSummaryText:SetPoint("TOPRIGHT", -180, -69)
    noteSummaryText:SetJustifyH("LEFT")
    RegisterHeading(noteSummaryText)

    noteScrollText = notePage:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall")
    noteScrollText:SetPoint("TOPRIGHT", -25, -94)
    noteScrollText:SetJustifyH("RIGHT")
    StyleDescriptorText(noteScrollText)

    local list = CreateFrame("Frame", nil, notePage, "BackdropTemplate")
    list:SetPoint("TOPLEFT", 25, -108)
    list:SetSize(670, 530)
    list:SetBackdrop({ bgFile="Interface\\Buttons\\WHITE8X8", edgeFile="Interface\\Tooltips\\UI-Tooltip-Border", edgeSize=12, insets={left=3,right=3,top=3,bottom=3} })
    list:SetBackdropColor(0,0,0,1)
    RegisterPanel(list)
    if list.SetClipsChildren then list:SetClipsChildren(true) end
    list:EnableMouseWheel(true)
    list:SetScript("OnMouseWheel", function(_,delta)
        local reminders = Addon:GetCurrentNoteReminders()
        noteReminderOffset = math.max(0, math.min(math.max(0, #reminders - NOTE_ROW_COUNT), noteReminderOffset - delta))
        RefreshNoteRows()
    end)

    for rowIndex = 1, NOTE_ROW_COUNT do
        local row = CreateFrame("Frame", nil, list)
        row:SetSize(650, 104)
        row:SetPoint("TOPLEFT", 10, -7 - ((rowIndex - 1) * 104))

        row.background = row:CreateTexture(nil, "BACKGROUND")
        row.background:SetAllPoints()
        row.background:SetColorTexture(1,1,1,0.035)

        row.icon = row:CreateTexture(nil, "ARTWORK")
        row.icon:SetSize(28,28)
        row.icon:SetPoint("TOPLEFT", 5, -5)

        row.name = row:CreateFontString(nil, "ARTWORK", "GameFontHighlight")
        row.name:SetPoint("TOPLEFT", 42, -5)
        row.name:SetWidth(360)
        row.name:SetJustifyH("LEFT")

        row.detail = row:CreateFontString(nil, "ARTWORK", "GameFontDisableSmall")
        StyleDescriptorText(row.detail)
        row.detail:SetPoint("TOPLEFT", 42, -24)
        row.detail:SetWidth(555)
        row.detail:SetJustifyH("LEFT")

        row.remove = CreateRemoveIconButton(row)
        row.remove:SetPoint("TOPRIGHT", -2, -5)
        row.remove:SetScript("OnClick", function()
            if row.data then
                Addon:RemoveNoteAssignment(row.data.key)
                noteStatusText:SetText("Removed all overrides for " .. row.data.label .. ".")
                RefreshNoteRows()
            end
        end)
        row.remove:SetScript("OnEnter", function(self)
            self.bg:SetColorTexture(0.20, 0.06, 0.06, 0.98)
            GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
            GameTooltip:SetText("Remove all overrides")
            GameTooltip:Show()
        end)

        row.ttsLabel = row:CreateFontString(nil, "ARTWORK", "GameFontNormalSmall")
        row.ttsLabel:SetPoint("TOPLEFT", 42, -43)
        row.ttsLabel:SetText("TTS")
        RegisterHeading(row.ttsLabel)

        row.countdownLabel = row:CreateFontString(nil, "ARTWORK", "GameFontNormalSmall")
        row.countdownLabel:SetPoint("TOPLEFT", 350, -43)
        row.countdownLabel:SetText("Countdown")
        RegisterHeading(row.countdownLabel)

        row.ttsDropdown = CreateFrame("Frame", nil, row, "UIDropDownMenuTemplate")
        row.ttsDropdown:SetPoint("TOPLEFT", 24, -54)
        StyleFlatDropdown(row.ttsDropdown, 260)
        UIDropDownMenu_Initialize(row.ttsDropdown, function(_, level)
            if not row.data then return end
            for _, option in ipairs({
                { value="default", label="Use NSRT TTS" },
                { value="mute", label="Mute TTS" },
                { value="custom", label="Custom text" },
            }) do
                local info = UIDropDownMenu_CreateInfo()
                info.text = option.label
                info.checked = row.ttsMode == option.value
                info.func = function() SetNoteRowTTSMode(row, option.value) end
                UIDropDownMenu_AddButton(info, level)
            end
        end)

        row.countdownButton = CreateFrame("Button", nil, row)
        row.countdownButton:SetSize(285, 24)
        row.countdownButton:SetPoint("TOPLEFT", 350, -57)
        StyleVoiceButton(row.countdownButton)
        row.countdownButton:SetScript("OnClick", function()
            if not row.data then return end
            ToggleVoicePopup(
                row.countdownButton,
                function() return GetNoteRowVoiceReference(row.data.key) end,
                function(voiceReference) SetNoteRowCountdown(row, voiceReference) end,
                noteStatusText,
                true
            )
        end)

        row.customBox = CreateFrame("EditBox", nil, row, "BackdropTemplate")
        row.customBox:SetSize(210, 22)
        row.customBox:SetPoint("TOPLEFT", 42, -81)
        row.customBox:SetAutoFocus(false)
        row.customBox:SetMaxLetters(120)
        StyleFlatEditBox(row.customBox)
        row.customBox:SetScript("OnEnterPressed", function() SaveNoteRowCustomTTS(row) end)
        row.customBox:SetScript("OnEscapePressed", function(self) self:ClearFocus() end)

        row.customSave = CreateFrame("Button", nil, row)
        row.customSave:SetSize(64, 22)
        row.customSave:SetPoint("TOPLEFT", 258, -81)
        StyleFlatButton(row.customSave, "Save", false, false)
        row.customSave:SetScript("OnClick", function() SaveNoteRowCustomTTS(row) end)

        row.customBox:Hide()
        row.customSave:Hide()
        noteRows[rowIndex] = row
    end

    noteStatusText = notePage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    noteStatusText:SetPoint("TOPLEFT", 25, -648)
    noteStatusText:SetPoint("TOPRIGHT", -25, -648)
    noteStatusText:SetJustifyH("LEFT")
    noteStatusText:SetText("Changes save per reminder. Scroll the list with the mouse wheel; the red X removes both overrides from that row.")
    StyleDescriptorText(noteStatusText)
end

local function BuildEncounterPage(parent)
    encounterPage=CreateFrame("Frame",nil,parent); encounterPage:SetAllPoints(parent)
    local title=CreateLabel(encounterPage,"NSRT Encounter Alert Countdowns",25,-8); title:SetFontObject(GameFontNormalLarge)
    local intro=encounterPage:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); intro:SetPoint("TOPLEFT",25,-38); intro:SetPoint("TOPRIGHT",-25,-38); intro:SetJustifyH("LEFT")
    intro:SetText("Assign a custom numbered voice to NSRT's built-in boss alerts. The normal opening TTS remains unchanged.")
    StyleDescriptorText(intro)

    CreateLabel(encounterPage,"Encounter",30,-76)
    encounterDropdown=CreateFrame("Frame",nil,encounterPage,"UIDropDownMenuTemplate"); encounterDropdown:SetPoint("TOPLEFT",12,-89); StyleFlatDropdown(encounterDropdown,330)
    UIDropDownMenu_Initialize(encounterDropdown,function(_,level)
        local encounters=Addon:GetEncounterList(selectedEncounterDifficulty)
        if #encounters==0 then local info=UIDropDownMenu_CreateInfo(); info.text="No NSRT encounter alerts found"; info.disabled=true; UIDropDownMenu_AddButton(info,level); return end
        for _,encounter in ipairs(encounters) do local id=encounter.id; local info=UIDropDownMenu_CreateInfo(); info.text=encounter.name; info.icon=encounter.icon; info.checked=selectedEncounterID==id; info.func=function() selectedEncounterID=id; selectedEncounterAlertKey=nil; selectedEncounterVoice=nil; RefreshEncounterOptions() end; UIDropDownMenu_AddButton(info,level) end
    end)
    CreateLabel(encounterPage,"Difficulty filter",405,-76)
    encounterDifficultyDropdown=CreateFrame("Frame",nil,encounterPage,"UIDropDownMenuTemplate"); encounterDifficultyDropdown:SetPoint("TOPLEFT",387,-89); StyleFlatDropdown(encounterDifficultyDropdown,170)
    UIDropDownMenu_Initialize(encounterDifficultyDropdown,function(_,level)
        for _,difficulty in ipairs({{id=16,name="Mythic"},{id=15,name="Heroic"},{id=14,name="Normal"}}) do local id=difficulty.id; local info=UIDropDownMenu_CreateInfo(); info.text=difficulty.name; info.checked=selectedEncounterDifficulty==id; info.func=function() selectedEncounterDifficulty=id; selectedEncounterAlertKey=nil; selectedEncounterVoice=nil; RefreshEncounterOptions() end; UIDropDownMenu_AddButton(info,level) end
    end)
    CreateLabel(encounterPage,"Encounter alert",30,-145)
    encounterAlertDropdown=CreateFrame("Frame",nil,encounterPage,"UIDropDownMenuTemplate"); encounterAlertDropdown:SetPoint("TOPLEFT",12,-158); StyleFlatDropdown(encounterAlertDropdown,650)
    UIDropDownMenu_Initialize(encounterAlertDropdown,function(_,level)
        if not selectedEncounterID then local info=UIDropDownMenu_CreateInfo(); info.text="Select an encounter first"; info.disabled=true; UIDropDownMenu_AddButton(info,level); return end
        local alerts=Addon:GetEncounterAlerts(selectedEncounterID,selectedEncounterDifficulty)
        if #alerts==0 then local info=UIDropDownMenu_CreateInfo(); info.text="No alerts found"; info.disabled=true; UIDropDownMenu_AddButton(info,level); return end
        for _,alert in ipairs(alerts) do local key=alert.key; local info=UIDropDownMenu_CreateInfo(); info.text=alert.label or alert.name; info.icon=alert.icon; info.checked=selectedEncounterAlertKey==key; info.func=function() selectedEncounterAlertKey=key; local existing=Addon:GetEncounterAssignment(selectedEncounterID,key); selectedEncounterVoice=existing and Addon:GetVoiceKey(existing) or nil; RefreshEncounterOptions() end; UIDropDownMenu_AddButton(info,level) end
    end)
    CreateLabel(encounterPage,"Countdown voice",30,-219)
    encounterVoiceDropdown=CreateFrame("Button",nil,encounterPage); encounterVoiceDropdown:SetSize(500,24); encounterVoiceDropdown:SetPoint("TOPLEFT",30,-237); StyleVoiceButton(encounterVoiceDropdown)
    encounterVoiceDropdown:SetScript("OnClick",function() ToggleVoicePopup(encounterVoiceDropdown,function() return selectedEncounterVoice end,function(id) selectedEncounterVoice=id; SetVoiceButtonText(encounterVoiceDropdown,id) end,encounterStatusText) end)
    CreateButton(encounterPage,"Assign",130,550,-236,function()
        local alert=GetSelectedEncounterAlert()
        if not selectedEncounterID or not alert or not selectedEncounterVoice then encounterStatusText:SetText("Select an encounter, an alert, and a countdown option."); return end
        if Addon:SetEncounterAssignment(selectedEncounterID,alert.key,selectedEncounterVoice,alert.data) then encounterStatusText:SetText(("Assigned %s to %s - %s."):format(Addon:GetVoiceName(selectedEncounterVoice),Addon:GetEncounterName(selectedEncounterID),alert.name)); RefreshEncounterAssignments() end
    end)
    encounterStatusText=encounterPage:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); encounterStatusText:SetPoint("TOPLEFT",30,-278); encounterStatusText:SetPoint("TOPRIGHT",-30,-278); encounterStatusText:SetJustifyH("LEFT")
    encounterStatusText:SetText("Difficulty filters the list only. One assignment follows the same internal alert across difficulties.")
    StyleDescriptorText(encounterStatusText)
    encounterPage.assignmentCount=encounterPage:CreateFontString(nil,"ARTWORK","GameFontNormal"); encounterPage.assignmentCount:SetPoint("TOPLEFT",30,-309); RegisterHeading(encounterPage.assignmentCount)
    local list=CreateFrame("Frame",nil,encounterPage,"BackdropTemplate"); list:SetPoint("TOPLEFT",25,-330); list:SetSize(670,330)
    list:SetBackdrop({bgFile="Interface\\Buttons\\WHITE8X8",edgeFile="Interface\\Tooltips\\UI-Tooltip-Border",edgeSize=12,insets={left=3,right=3,top=3,bottom=3}}); list:SetBackdropColor(0,0,0,1); list:EnableMouseWheel(true)
    list:SetScript("OnMouseWheel",function(_,delta) local assignments=Addon:GetEncounterAssignments(); encounterAssignmentOffset=math.max(0,math.min(math.max(0,#assignments-ENCOUNTER_ROW_COUNT),encounterAssignmentOffset-delta)); RefreshEncounterAssignments() end)
    for rowIndex=1,ENCOUNTER_ROW_COUNT do
        local row=CreateFrame("Frame",nil,list); row:SetSize(650,39); row:SetPoint("TOPLEFT",10,-7-((rowIndex-1)*39))
        row.icon=row:CreateTexture(nil,"ARTWORK"); row.icon:SetSize(24,24); row.icon:SetPoint("LEFT",0,0)
        row.encounter=row:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); row.encounter:SetPoint("LEFT",row.icon,"RIGHT",7,0); row.encounter:SetWidth(165); row.encounter:SetJustifyH("LEFT")
        row.alert=row:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); row.alert:SetPoint("LEFT",205,0); row.alert:SetWidth(210); row.alert:SetJustifyH("LEFT")
        row.voice=row:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall"); row.voice:SetPoint("LEFT",420,0); row.voice:SetWidth(170); row.voice:SetJustifyH("LEFT")
        row.remove=CreateRemoveIconButton(row); row.remove:SetPoint("RIGHT",-2,0)
        row.remove:SetScript("OnClick",function() if row.data then Addon:RemoveEncounterAssignment(row.data.encID,row.data.alertKey); encounterStatusText:SetText("Removed the assignment for "..row.data.alertName.."."); RefreshEncounterAssignments() end end)
        encounterAssignmentRows[rowIndex]=row
    end
end

local function CreateThemeCard(parent, key, y)
    local preview = THEMES[key]
    local card = CreateFrame("Button", nil, parent, "BackdropTemplate")
    card:SetSize(640, 104)
    card:SetPoint("TOPLEFT", 30, y)
    card:SetBackdrop({
        bgFile = "Interface\\Buttons\\WHITE8X8",
        edgeFile = "Interface\\Buttons\\WHITE8X8",
        edgeSize = 1,
        insets = { left = 1, right = 1, top = 1, bottom = 1 },
    })
    card.themeKey = key

    card.name = card:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
    card.name:SetPoint("TOPLEFT", 18, -15)
    card.name:SetText(preview.name)
    card.name:SetTextColor(preview.heading[1], preview.heading[2], preview.heading[3], preview.heading[4])

    card.description = card:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    card.description:SetPoint("TOPLEFT", 18, -43)
    card.description:SetPoint("RIGHT", -145, 0)
    card.description:SetJustifyH("LEFT")
    card.description:SetText(preview.description)
    card.description:SetTextColor(preview.mutedText[1], preview.mutedText[2], preview.mutedText[3], preview.mutedText[4])

    card.swatches = {}
    for index, color in ipairs({ preview.controlBackground, preview.accent, preview.heading }) do
        local swatch = card:CreateTexture(nil, "ARTWORK")
        swatch:SetSize(30, 30)
        swatch:SetPoint("TOPRIGHT", -18 - ((3 - index) * 37), -18)
        SetTextureColor(swatch, color)
        card.swatches[index] = swatch
    end

    card.selectedText = card:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    card.selectedText:SetPoint("BOTTOMRIGHT", -18, 15)
    card.selectedText:SetText("Selected")
    card.selectedText:SetTextColor(preview.heading[1], preview.heading[2], preview.heading[3], preview.heading[4])

    card:SetScript("OnClick", function(self)
        Addon:SetTheme(self.themeKey)
    end)
    card:SetScript("OnEnter", function(self)
        local data = THEMES[self.themeKey]
        self:SetBackdropColor(data.controlHover[1], data.controlHover[2], data.controlHover[3], data.controlHover[4])
    end)
    card:SetScript("OnLeave", function()
        if RefreshThemeCards then RefreshThemeCards() end
    end)

    themeCards[key] = card
    return card
end

RefreshThemeCards = function()
    local selected = Addon.db and Addon.db.theme or "arcane"
    for key, card in pairs(themeCards) do
        local preview = THEMES[key]
        card:SetBackdropColor(preview.controlBackground[1], preview.controlBackground[2], preview.controlBackground[3], preview.controlBackground[4])
        local border = key == selected and preview.actionBorder or preview.accent
        card:SetBackdropBorderColor(border[1], border[2], border[3], border[4])
        card.selectedText:SetShown(key == selected)
    end
end

local function BuildOptionsPage(parent)
    optionsPage = CreateFrame("Frame", nil, parent)
    optionsPage:SetAllPoints(parent)

    local title = CreateLabel(optionsPage, "Options", 25, -8)
    title:SetFontObject(GameFontNormalLarge)
    CreateLabel(optionsPage, "Themes", 30, -55)

    local intro = optionsPage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    intro:SetPoint("TOPLEFT", 30, -80)
    intro:SetPoint("TOPRIGHT", -30, -80)
    intro:SetJustifyH("LEFT")
    intro:SetText("Choose the colour theme used by the addon. Changes apply immediately and are saved automatically.")
    StyleDescriptorText(intro)

    CreateThemeCard(optionsPage, "arcane", -118)
    CreateThemeCard(optionsPage, "bronze", -238)
    CreateThemeCard(optionsPage, "cyan", -358)

    local note = optionsPage:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall")
    note:SetPoint("TOPLEFT", 30, -490)
    note:SetPoint("TOPRIGHT", -30, -490)
    note:SetJustifyH("LEFT")
    note:SetText("Muted Arcane is the default theme. Theme selection only changes appearance; countdown assignments and audio settings are untouched.")
    StyleDescriptorText(note)
end

SetNavButtonSelected = function(button, selected)
    if not button then return end
    button.selected = selected and true or false
    local theme = GetTheme()
    if button.selected then
        SetTextureColor(button.background, theme.selectedBackground)
        SetTextureColor(button.accent, theme.actionBorder)
        SetFontColor(button.label, theme.selectedText)
    else
        SetTextureColor(button.background, theme.buttonBackground)
        SetTextureColor(button.accent, theme.accent)
        SetFontColor(button.label, theme.text)
    end
end

local function CreateSidebarButton(key, label, y, onClick)
    local button = CreateFrame("Button", nil, sidebar)
    button:SetSize(156, 38)
    button:SetPoint("TOPLEFT", 10, y)

    button.background = button:CreateTexture(nil, "BACKGROUND")
    button.background:SetAllPoints()
    button.accent = button:CreateTexture(nil, "ARTWORK")
    button.accent:SetPoint("TOPLEFT", 0, 0)
    button.accent:SetPoint("BOTTOMLEFT", 0, 0)
    button.accent:SetWidth(4)
    button.label = button:CreateFontString(nil, "ARTWORK", "GameFontHighlight")
    button.label:SetPoint("LEFT", 15, 0)
    button.label:SetPoint("RIGHT", -8, 0)
    button.label:SetJustifyH("LEFT")
    button.label:SetText(label)

    button:SetScript("OnEnter", function(self)
        if not self.selected then SetTextureColor(self.background, GetTheme().buttonHover) end
    end)
    button:SetScript("OnLeave", function(self) SetNavButtonSelected(self, self.selected) end)
    button:SetScript("OnClick", onClick or function() ShowPage(key) end)
    SetNavButtonSelected(button, false)
    if key then navButtons[key] = button end
    return button
end

local function CreateNavButton(key, label, y)
    return CreateSidebarButton(key, label, y, function() ShowPage(key) end)
end

ShowPage = function(key)
    activePageKey=key
    if voicePopup then voicePopup:Hide() end
    abilityPage:SetShown(key=="abilities")
    renamePage:SetShown(key=="rename")
    notePage:SetShown(key=="note")
    encounterPage:SetShown(key=="encounter")
    optionsPage:SetShown(key=="options")
    for navKey,button in pairs(navButtons) do SetNavButtonSelected(button, navKey == key) end
    if key=="abilities" then RefreshDropdowns(); RefreshAssignments()
    elseif key=="rename" then RefreshRenameOptions()
    elseif key=="note" then RefreshNoteOptions()
    elseif key=="encounter" then RefreshEncounterOptions()
    elseif key=="options" then RefreshThemeCards() end
end

local function BuildFrame()
    frame=CreateFrame("Frame","NSRTCountdownCompanionOptions",UIParent,"BackdropTemplate")
    frame:SetSize(960,740); frame:SetPoint("CENTER"); frame:SetFrameStrata("DIALOG"); frame:SetClampedToScreen(true); frame:SetMovable(true); frame:EnableMouse(true); frame:RegisterForDrag("LeftButton")
    frame:SetScript("OnDragStart",frame.StartMoving); frame:SetScript("OnDragStop",frame.StopMovingOrSizing)
    frame:SetBackdrop({bgFile="Interface\\Buttons\\WHITE8X8",edgeFile="Interface\\DialogFrame\\UI-DialogBox-Border",tile=false,edgeSize=32,insets={left=11,right=12,top=12,bottom=11}})
    frame:SetBackdropColor(0,0,0,1)
    frame:SetBackdropBorderColor(1,1,1,1)
    local title=frame:CreateFontString(nil,"ARTWORK","GameFontNormalLarge"); title:SetPoint("TOP",0,-18); title:SetText("NSRT Countdown Companion"); RegisterHeading(title)
    mainCloseButton=CreateFrame("Button",nil,frame,"UIPanelCloseButton"); mainCloseButton:SetPoint("TOPRIGHT",-5,-5)

    sidebar=CreateFrame("Frame",nil,frame,"BackdropTemplate"); sidebar:SetPoint("TOPLEFT",18,-52); sidebar:SetPoint("BOTTOMLEFT",18,38); sidebar:SetWidth(176)
    sidebar:SetBackdrop({bgFile="Interface\\Buttons\\WHITE8X8",edgeFile="Interface\\Buttons\\WHITE8X8",edgeSize=1,insets={left=1,right=1,top=1,bottom=1}})
    sidebar:SetBackdropColor(0,0,0,1); sidebar:SetBackdropBorderColor(0.34,0.25,0.46,1); RegisterPanel(sidebar)
    local navTitle=sidebar:CreateFontString(nil,"ARTWORK","GameFontNormal"); navTitle:SetPoint("TOPLEFT",15,-15); navTitle:SetText("CONFIGURATION"); RegisterHeading(navTitle)
    local navSubtitle=sidebar:CreateFontString(nil,"ARTWORK","GameFontDisableSmall"); navSubtitle:SetPoint("TOPLEFT",15,-34); navSubtitle:SetText("Choose what to configure"); StyleDescriptorText(navSubtitle)
    local divider=sidebar:CreateTexture(nil,"ARTWORK"); divider:SetColorTexture(0.36,0.28,0.48,0.85); divider:SetPoint("TOPLEFT",10,-52); divider:SetPoint("TOPRIGHT",-10,-52); divider:SetHeight(1); sidebar.divider=divider
    CreateNavButton("abilities","Player Abilities",-64)
    CreateNavButton("rename","Ability Rename",-108)
    CreateNavButton("note","Current Note",-152)
    CreateNavButton("encounter","Encounter Alerts",-196)
    CreateNavButton("options","Options",-240)
    mainHelpButton=CreateSidebarButton(nil,"Help",-628,function() if not helpFrame then BuildHelpFrame(frame) end; if helpFrame:IsShown() then helpFrame:Hide() else helpFrame:Show() end end)
    mainHelpButton:ClearAllPoints(); mainHelpButton:SetPoint("BOTTOMLEFT",10,12)

    contentFrame=CreateFrame("Frame",nil,frame); contentFrame:SetPoint("TOPLEFT",214,-48); contentFrame:SetSize(720,670)
    BuildAbilityPage(contentFrame)
    BuildRenamePage(contentFrame)
    BuildNotePage(contentFrame)
    BuildEncounterPage(contentFrame)
    BuildOptionsPage(contentFrame)
    ApplyTheme()

    frame:SetScript("OnHide",function() voicePreviewToken=voicePreviewToken+1; if voicePopup then voicePopup:Hide() end; if helpFrame then helpFrame:Hide() end end)
    frame:SetScript("OnShow",function()
        local currentClass,currentSpec=Addon:GetCurrentClass(),Addon:GetCurrentSpecID()
        if not selectedClass then selectedClass=currentClass end
        if not selectedSpec then selectedSpec=currentSpec end
        if not renameSelectedClass then renameSelectedClass=currentClass end
        if not renameSelectedSpec then renameSelectedSpec=currentSpec end
        Addon:ScanCurrentSpellbook()
        Addon:RefreshOptions()
        ShowPage(activePageKey or "abilities")
    end)
    ShowPage("abilities")
    frame:Hide()
end

function Addon:ToggleOptions()
    if not frame then BuildFrame() end
    if frame:IsShown() then frame:Hide() else frame:Show() end
end