local statsBarTop
local statsBarBottom

local statsBars = {}
local statsBarDeepInfo = {}

-- If you want to add more placements/dimensions, you'll need to add them here.
-- This is used in getStatsBarMenuOptions(), createStatsBarWidgets(),
--                         hideAll() and destroyAllIcons() functions.
local statsBarsPlacements = {
    "Top",
    "Bottom"
}

-- This is used in constructStatsBar(), getStatsBarMenuOptions(),
--                   reloadCurrentTab(), createStatsBarWidgets(),
--                       hideAll() and destroyALlIcons functions.
local statsBarsDimensions = {
    Large = {
        height = 52
    },
    Default = {
        height = 52
    },
    Parallel = {
        height = 55
    },
    Compact = {
        height = 20
    }
}

-- Geometry of each stats bar layout that depends on the GameProficiency feature.
-- `on` mirrors 30-statsbar.otui; `off` closes the gap left by the hidden proficiency
-- Supported properties: right (anchor right edge to <id>.left), marginLeft, marginRight, width.
local proficiencyLayouts = {
    largeOnTop = {
        on  = { health = { right = 'proficiencyIcon' }, icons = { width = 52 } },
        off = { health = { right = 'icons' },           icons = { width = 75 } }
    },
    largeOnBottom = {
        on  = { health = { right = 'proficiencyIcon' } },
        off = { health = { right = 'icons' } }
    },
    compactOnTop = {
        on  = { health = { right = 'proficiencyTopBar', marginRight = 6 }, icons = { marginLeft = 57 } },
        off = { health = { right = 'icons', marginRight = 3 },             icons = { marginLeft = 0 } }
    },
    compactOnBottom = {
        on  = { health = { right = 'proficiencyTopBar', marginRight = 7 }, icons = { marginLeft = 57 } },
        off = { health = { right = 'icons', marginRight = 7 },             icons = { marginLeft = 0 } }
    },
    parallelOnTop = {
        on  = { icons = { marginLeft = 60 } },
        off = { icons = { marginLeft = 0 } }
    },
    parallelOnBottom = {
        on  = { icons = { marginLeft = 60 } },
        off = { icons = { marginLeft = 0 } }
    },
    defaultOnTop = {
        on  = { icons = { marginLeft = 60 } },
        off = { icons = { marginLeft = 0 } }
    },
    defaultOnBottom = {
        on  = { icons = { marginLeft = 60 } },
        off = { icons = { marginLeft = 0 } }
    }
}

local DEFAULT_DIMENSION = "compact"
local DEFAULT_PLACEMENT = "top"

local isWarriorVocation = false

local currentStats = {
    dimension = "hide",
    placement = "hide"
}

local skillsLineHeight = 20
local skillsTuples = {
    { skill = nil,             key = 'experience', icon = '/images/icons/icon_experience', placement = 'center', order = 0, name = "Level" },
    { skill = nil,             key = 'magic',      icon = '/images/icons/icon_magic',      placement = 'left',   order = 1, name = "Magic Level" },
    { skill = Skill.Axe,       key = 'axe',        icon = '/images/icons/icon_axe',        placement = 'right',  order = 1, name = "Axe Fighting Skill" },
    { skill = Skill.Club,      key = 'club',       icon = '/images/icons/icon_club',       placement = 'left',   order = 2, name = "Club Fighting Skill" },
    { skill = Skill.Distance,  key = 'distance',   icon = '/images/icons/icon_distance',   placement = 'right',  order = 2, name = "Distance Fighting Skill" },
    { skill = Skill.Fist,      key = 'fist',       icon = '/images/icons/icon_fist',       placement = 'left',   order = 3, name = "Fist Fighting Skill" },
    { skill = Skill.Shielding, key = 'shielding',  icon = '/images/icons/icon_shielding',  placement = 'right',  order = 3, name = "Shielding Fighting Skill" },
    { skill = Skill.Sword,     key = 'sword',      icon = '/images/icons/icon_sword',      placement = 'left',   order = 4, name = "Sword Fighting Skill" },
    { skill = Skill.Fishing,   key = 'fishing',    icon = '/images/icons/icon_fishing',    placement = 'right',  order = 4, name = "Fishing Fighting Skill" },
}

StatsBar = {}

function getConfigurations()
    -- This method will return all the stats bar configurations.
    local configs = {}
    for _, statsBar in pairs(statsBars) do
        for _, placement in ipairs(statsBarsPlacements) do
            for dimension, _ in pairs(statsBarsDimensions) do
                local dimensionOnPlacement = tostring(dimension):lower() .. "On" .. placement
                local key = "statsBar" .. placement:gsub("^%l", string.upper)
                if statsBar[key] then
                    table.insert(configs, statsBar[key][dimensionOnPlacement])
                end
            end
        end
    end
    return configs
end

local function reloadSkillsTab(skills, parent)
    -- This method might need some refactoring if you want to add side stats bars.
    local player = g_game.getLocalPlayer()
    if not player then
        return
    end

    local tuples = {}
    for i = 1, #skillsTuples do
        local skillTuple = skillsTuples[i]
        if skillTuple and g_settings.getBoolean('top_statsbar_' .. skillTuple.key) then
            table.insert(tuples, skillTuple)
        end
    end

    local statsBar = StatsBar.getCurrentStatsBar()
    if not statsBar then
        return
    end

    statsBar:setHeight(statsBar:getHeight() - skills:getHeight())

    parent:setHeight(parent:getHeight() - (40 + skills:getHeight()))
    skills:setHeight(0)
    skills:destroyChildren()
    local lines = 0
    local lastPlacement = 'left'
    for i = 1, #tuples do
        local skillTuple = tuples[i]
        local widget = g_ui.createWidget('TopStatsSkillElement', skills)
        widget:setId('statsbar_skill_' .. skillTuple.key)
        widget:addAnchor(AnchorTop, 'parent', AnchorTop)
        if lastPlacement == 'left' then
            widget:setMarginTop(lines * skillsLineHeight)
        else
            widget:setMarginTop((lines - 1) * skillsLineHeight)
        end
        widget.level = widget:getChildById('level')
        widget.icon = widget:getChildById('icon')
        widget.bar = widget:getChildById('bar')
        widget.xpBoostBtn = widget:getChildById('xpBoostBtn')

        widget.icon:setImageSource(skillTuple.icon)
        widget.icon:setTooltip(skillTuple.name)

        widget.bar.statsGrade = 4
        widget.bar.statsGradeColor = '#070707ff'
        widget.bar:reloadBorder()

        widget.bar.showText = false
        if skillTuple.key == 'experience' then
            widget.bar.statsType = 'experience'
        else
            widget.bar.statsType = 'skill'
        end

        if skillTuple.placement == 'center' or (i == #tuples and lastPlacement == 'left') then
            widget:addAnchor(AnchorLeft, 'parent', AnchorLeft)
            widget:addAnchor(AnchorRight, 'parent', AnchorRight)
            lines = lines + 1
        elseif lastPlacement == 'left' then
            widget:addAnchor(AnchorLeft, 'parent', AnchorLeft)
            widget:addAnchor(AnchorRight, 'parent', AnchorHorizontalCenter)
            lines = lines + 1
            lastPlacement = 'right'
        elseif lastPlacement == 'right' then
            widget:addAnchor(AnchorRight, 'parent', AnchorRight)
            widget:addAnchor(AnchorLeft, 'parent', AnchorHorizontalCenter)
            lastPlacement = 'left'
        end

        if skillTuple.key == 'experience' then
            widget.level:setText(player:getLevel())
            widget.bar:setValue(player:getLevelPercent(), 100)
            widget.bar:removeAnchor(AnchorRight)
            widget.bar:addAnchor(AnchorRight, 'xpBoostBtn', AnchorLeft)
            widget.bar:setMarginRight(8)
            widget.xpBoostBtn:addAnchor(AnchorRight, 'parent', AnchorRight)
            widget.xpBoostBtn:setVisible(true)
            --Activate xpBoost icon in this line only
        elseif skillTuple.key == 'magic' then
            widget.level:setText(player:getMagicLevel())
            widget.bar:setValue(player:getMagicLevelPercent(), 100)
        else
            widget.level:setText(player:getSkillLevel(skillTuple.skill))
            widget.bar:setValue(player:getSkillLevelPercent(skillTuple.skill), 100)
        end
    end

    skills:setHeight((lines * skillsLineHeight) + 5)
    parent:setHeight(40 + skills:getHeight())
    statsBar:setHeight(statsBar:getHeight() + skills:getHeight())
end

function StatsBar.getAllStatsBarWithPosition()
    -- This method will return all the stats bars based on their placement and dimension.
    -- i.e statsBarTop.largeOnTop, statsBarTop.parallelOnTop, statsBarTop.defaultOnTop, statsBarTop.compactOnTop [..]
    local statsBarsWithPosition = {}
    for _, statsBar in pairs(statsBars) do
        for _, placement in ipairs(statsBarsPlacements) do
            for dimension, _ in pairs(statsBarsDimensions) do
                local dimensionOnPlacement = tostring(dimension):lower() .. "On" .. placement
                if statsBar[dimensionOnPlacement] then
                    statsBarsWithPosition[#statsBarsWithPosition + 1] = statsBar[dimensionOnPlacement]
                end
            end
        end
    end

    return statsBarsWithPosition
end

function StatsBar.getCurrentStatsBarWithPosition()
    -- This method will return the statsbar based on its placement and dimension.
    -- i.e "largeOnTop" will return statsBarTop.largeOnTop.
    -- It's made this way so we can call the current stats bar without having to use a switch statement.
    -- And if it's necessary to add more stats bars like "largeOnLeft" it will be easier to add them
    -- Without changing this code.
    if currentStats.dimension == 'hide' or currentStats.placement == 'hide' then
        return nil
    end
    -- -- Get full position as a single string.
    -- -- i.e. largeOnTop // parallelOnBottom
    local placement = currentStats.placement:gsub("^%l", string.upper)
    local fullPosition = currentStats.dimension .. "On" .. placement
    local statsBar = StatsBar.getCurrentStatsBar()
    if not statsBar then
        return nil
    end

    if statsBar[fullPosition] then
        -- Return the stats bar based on the full position.
        -- i.e. statsBarTop.largeOnTop
        local dimension = currentStats.dimension:gsub("^%l", string.upper)
        local actualName = dimension .. "On" .. placement
        statsBar[fullPosition].actualName = actualName
        return statsBar[fullPosition], actualName
    else
        print("No stats bar with position found for:", statsBar)
    end

    return nil
end

function StatsBar.getCurrentStatsBarWithPositionName()
    if currentStats.dimension == 'hide' or currentStats.placement == 'hide' then
        return nil
    end
    local dimension = currentStats.dimension:gsub("^%l", string.upper)
    local placement = currentStats.placement:gsub("^%l", string.upper)
    return dimension .. "On" .. placement
end

function StatsBar.getCurrentStatsBar()
    -- This method will return the statsbar based on its placement.
    -- i.e statsBarTop // statsBarBottom
    if currentStats.dimension == 'hide' or currentStats.placement == 'hide' then
        return nil
    end
    -- -- Get full placement.
    -- -- i.e. Top // Bottom
    local placement = currentStats.placement:gsub("^%l", string.upper)

    -- -- Get the stats bar based on the placement.
    -- -- i.e. statsBarTop // statsBarBottom
    local statsBar = "statsBar" .. placement

    if statsBars[statsBar] then
        return statsBars[statsBar]
    else
        print("No stats bar found for:", statsBar)
    end

    return nil
end

local MANA_SHIELD_TEXT_FORMAT = '%d/%d (%d/%d)'
local MANA_SHIELD_ICON_ID = 'manashieldIcon'
local MANA_SHIELD_TAIL_ID = 'manashieldTail'
local MANA_SHIELD_ICON_SOURCE = '/images/game/states/player-state-flags'
local MANA_SHIELD_ICON_CLIP = '234 0 9 9'
local MANA_SHIELD_ICON_SIZE = 9
local MANA_SHIELD_ICON_MARGIN = 5
local MANA_TEXT_WIDTH = 400

local function getManaShieldIcon(manashieldBar)
    local icon = manashieldBar:getChildById(MANA_SHIELD_ICON_ID)
    if not icon then
        icon = g_ui.createWidget('UIWidget', manashieldBar)
        icon:setId(MANA_SHIELD_ICON_ID)
        icon:setImageSource(MANA_SHIELD_ICON_SOURCE)
        icon:setImageClip(MANA_SHIELD_ICON_CLIP)
        icon:setSize(tosize(MANA_SHIELD_ICON_SIZE .. ' ' .. MANA_SHIELD_ICON_SIZE))
        icon:setImageSize(tosize(MANA_SHIELD_ICON_SIZE .. ' ' .. MANA_SHIELD_ICON_SIZE))
        icon:setFocusable(false)
        icon:setTooltip(tr('Mana Shield'))
        icon:hide()
    end
    return icon
end

local function getManaShieldTail(manashieldBar)
    local tail = manashieldBar:getChildById(MANA_SHIELD_TAIL_ID)
    if not tail then
        tail = g_ui.createWidget('Label', manashieldBar)
        tail:setId(MANA_SHIELD_TAIL_ID)
        local font = manashieldBar.text:getFont()
        if font ~= '' then
            tail:setFont(font)
        end
        tail:setColor(manashieldBar.text:getColor())
        tail:hide()
    end
    return tail
end

local function updateManaShieldText(manashieldBar, manaText, showIcon)
    local text = manashieldBar and manashieldBar.text
    if not text then
        return
    end

    manaText = manaText or manashieldBar.manaShieldText or text:getText()
    showIcon = showIcon == nil and manashieldBar.showManaShieldIcon or showIcon
    manashieldBar.manaShieldText = manaText
    manashieldBar.showManaShieldIcon = showIcon and true or false

    local icon = getManaShieldIcon(manashieldBar)
    local tail = getManaShieldTail(manashieldBar)
    local closeIndex = manaText:find(')', 1, true)

    if not showIcon or not closeIndex then
        text:setText(manaText)
        text:setWidth(MANA_TEXT_WIDTH)
        text:setMarginLeft(0)
        icon:hide()
        tail:hide()
        return
    end

    text:setText(manaText:sub(1, closeIndex - 1))
    local textWidth = text:getTextSize().width
    tail:setText(manaText:sub(closeIndex))
    local tailWidth = tail:getTextSize().width

    text:setWidth(textWidth)
    text:setMarginLeft(-math.floor((MANA_SHIELD_ICON_MARGIN + MANA_SHIELD_ICON_SIZE + tailWidth) / 2))

    icon:addAnchor(AnchorLeft, 'text', AnchorLeft)
    icon:addAnchor(AnchorVerticalCenter, 'text', AnchorVerticalCenter)
    icon:setMarginLeft(textWidth + MANA_SHIELD_ICON_MARGIN)
    icon:raise()
    icon:show()

    tail:setWidth(tailWidth)
    tail:addAnchor(AnchorLeft, 'text', AnchorLeft)
    tail:addAnchor(AnchorVerticalCenter, 'text', AnchorVerticalCenter)
    tail:setMarginLeft(textWidth + MANA_SHIELD_ICON_SIZE + MANA_SHIELD_ICON_MARGIN)
    tail:raise()
    tail:show()
end

function StatsBar.reloadCurrentStatsBarQuickInfo()
    local player = g_game.getLocalPlayer()
    if not player then
        return
    end

    local bar = StatsBar.getCurrentStatsBarWithPosition()
    if not bar then
        return
    end

    local mana = player:getMana()
    local maxMana = player:getMaxMana()

    bar.health:setValue(player:getHealth(), player:getMaxHealth())

    local manashield = 0
    local maxManaShield = 0
    
    if player.getManaShield then
        manashield = player:getManaShield()
    end
    
    if not bar.mana.defaultHeight then
        bar.mana.defaultHeight = bar.mana:getHeight()
    end

    bar.mana:setValue(mana, maxMana)
    
    if player.getMaxManaShield then
        maxManaShield = player:getMaxManaShield()
    end

    local isWarrior = player:isKnight() or player:isPaladin() or
                      (player:isMonk() and g_game.getFeature(GameVocationMonk))
    local shouldShowManaShield = manashield > 0 and maxManaShield > 0 and not isWarrior
    local currentStatsBarName = StatsBar.getCurrentStatsBarWithPositionName()

    if isWarrior or not g_game.getFeature(GameManaShield) then
        if bar.mana.defaultHeight then
            bar.mana:setHeight(bar.mana.defaultHeight)
        end
        bar.mana.showText = true
        if bar.mana.text then
            bar.mana.text:show()
        end

        bar.manashield:setMarginTop(0)
        bar.manashield:setHeight(0)
        bar.manashield:hide()
        bar.manashield:setValue(0, 0)
        bar.manashield.bar:hide()
        bar.manashield.text:hide()
        bar.manashield.showText = false
        if bar.manashield.text then
            bar.manashield.text:hide()
            bar.manashield.text:setMarginTop(0)
            bar.manashield.text:setMarginBottom(0)
        end
        updateManaShieldText(bar.manashield, '', false)
        return
    end

    if shouldShowManaShield and (currentStatsBarName == 'LargeOnTop' or currentStatsBarName == 'LargeOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana:setHeight(manaHeight - 2)
        bar.manashield:show()
        bar.manashield:setMarginTop(4)
        bar.manashield:setHeight(shieldHeight - 2)
        bar.manashield:setValue(manashield, maxManaShield)
        bar.manashield.text:setWidth(400)
        local manaText = string.format('%d/%d', manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:show()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, false)
    elseif not shouldShowManaShield and (currentStatsBarName == 'LargeOnTop' or currentStatsBarName == 'LargeOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana:setHeight(manaHeight - 2)
        bar.manashield:show()
        bar.manashield:setMarginTop(4)
        bar.manashield:setHeight(shieldHeight - 2)
        bar.manashield:setValue(0, 0)
        bar.manashield.text:setWidth(400)
        local manaText = string.format('%d/%d', 0, 0)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        --bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:hide()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, false)
    elseif shouldShowManaShield and (currentStatsBarName == 'DefaultOnTop' or currentStatsBarName == 'DefaultOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana.showText = false
        if bar.mana.text then
            bar.mana.text:hide()
        end
        bar.mana:setHeight(manaHeight)
        bar.mana.text:hide()
        bar.manashield:show()
        bar.manashield:setHeight(shieldHeight)
        bar.manashield:setValue(manashield, maxManaShield)
        bar.manashield.text:setWidth(400)
        local textOffset = math.floor(manaHeight / 2)
        local manaText = string.format(MANA_SHIELD_TEXT_FORMAT, mana, maxMana, manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:show()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, true)
    elseif not shouldShowManaShield and (currentStatsBarName == 'DefaultOnTop' or currentStatsBarName == 'DefaultOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana.showText = false
        if bar.mana.text then
            bar.mana.text:hide()
        end

        bar.mana:setHeight(manaHeight)
        bar.mana.text:hide()
        bar.mana.showText = false
        bar.manashield:show()
        bar.manashield:setHeight(shieldHeight)
        bar.manashield:setValue(0, 0)
        bar.manashield.text:setWidth(400)
        local textOffset = math.floor(manaHeight / 2)
        local manaText = string.format(MANA_SHIELD_TEXT_FORMAT, mana, maxMana, manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:hide()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, true)
    elseif shouldShowManaShield and (currentStatsBarName == 'ParallelOnTop' or currentStatsBarName == 'ParallelOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana.showText = false
        if bar.mana.text then
            bar.mana.text:hide()
        end

        bar.mana:setHeight(manaHeight)
        bar.mana.text:hide()
        bar.manashield:show()
        bar.manashield:setHeight(shieldHeight)
        bar.manashield:setValue(manashield, maxManaShield)
        bar.manashield.text:setWidth(400)
        local textOffset = math.floor(manaHeight / 2)
        local manaText = string.format(MANA_SHIELD_TEXT_FORMAT, mana, maxMana, manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:show()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, true)
    elseif not shouldShowManaShield and (currentStatsBarName == 'ParallelOnTop' or currentStatsBarName == 'ParallelOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana.showText = false
        if bar.mana.text then
            bar.mana.text:hide()
        end

        bar.mana:setHeight(manaHeight)
        bar.mana.text:hide()
        bar.mana.showText = false
        bar.manashield:show()
        bar.manashield:setHeight(shieldHeight)
        bar.manashield:setValue(0, 0)
        bar.manashield.text:setWidth(400)
        local textOffset = math.floor(manaHeight / 2)
        local manaText = string.format(MANA_SHIELD_TEXT_FORMAT, mana, maxMana, manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:hide()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, true)
    elseif shouldShowManaShield and (currentStatsBarName == 'CompactOnTop' or currentStatsBarName == 'CompactOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana.showText = false
        if bar.mana.text then
            bar.mana.text:hide()
        end

        bar.mana:setHeight(manaHeight)
        bar.mana.text:hide()
        bar.manashield:show()
        bar.manashield:setHeight(shieldHeight)
        bar.manashield:setValue(manashield, maxManaShield)
        bar.manashield.text:setWidth(400)
        local textOffset = math.floor(manaHeight / 2)
        local manaText = string.format(MANA_SHIELD_TEXT_FORMAT, mana, maxMana, manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:show()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, true)
    elseif not shouldShowManaShield and (currentStatsBarName == 'CompactOnTop' or currentStatsBarName == 'CompactOnBottom') then
        local fullHeight = bar.mana.defaultHeight
        local manaHeight = math.floor(fullHeight / 2)
        local shieldHeight = math.max(1, fullHeight - manaHeight)

        bar.mana.showText = false
        if bar.mana.text then
            bar.mana.text:hide()
        end

        bar.mana:setHeight(manaHeight)
        bar.mana.text:hide()
        bar.mana.showText = false
        bar.manashield:show()
        bar.manashield:setHeight(shieldHeight)
        bar.manashield:setValue(0, 0)
        bar.manashield.text:setWidth(400)
        local textOffset = math.floor(manaHeight / 2)
        local manaText = string.format(MANA_SHIELD_TEXT_FORMAT, mana, maxMana, manashield, maxManaShield)
        if not bar.manashield or not bar.manashield.text then
            return
        end
        bar.manashield.text:setMarginTop(-textOffset)
        bar.manashield.text:setMarginBottom(0)
        bar.manashield.text:show()
        bar.manashield.text:raise()
        bar.manashield.bar:hide()
        bar.manashield.showText = true
        updateManaShieldText(bar.manashield, manaText, true)
    else
        bar.mana.showText = true

        if bar.mana.defaultHeight then
            bar.mana:setHeight(bar.mana.defaultHeight)
        end

        bar.manashield:setMarginTop(0)
        bar.manashield:setHeight(0)
        bar.manashield:hide()
        bar.manashield.bar:hide()
        bar.manashield.text:hide()
        bar.manashield.showText = false
        if bar.manashield.text then
            bar.manashield.text:setMarginTop(0)
            bar.manashield.text:setMarginBottom(0)
        end
        updateManaShieldText(bar.manashield, nil, false)
    end
end

local function loadIcon(bitChanged, content, topmenu)
    local icon = g_ui.createWidget('ConditionWidget', content)
    icon:setId(Icons[bitChanged].id)
    icon:setImageSource("/images/game/states/player-state-flags")
    icon:setImageClip(((Icons[bitChanged].clip - 1) * 9) .. ' 0 9 9')
    local tooltip = Icons[bitChanged].tooltipBar or Icons[bitChanged].tooltip
    if tooltip == "You are GoshnarTaint" then
        tooltip = "Goshnar's Lairs Penalties:\n" ..
            "- 10% chance of creature teleportation to you\n" ..
            "- 0.5% chance of new creature spawn when hitting another\n" ..
            "- 15% increased damage received\n" ..
            "- 10% chance of creature full heal instead of dying\n" ..
            "- Lose 10% of current HP and mana every 10 seconds"
    end
    icon:setTooltip(tooltip)
    icon:setImageSize(tosize("9 9"))
    icon:setMarginRight(-1)
    if topmenu then
        icon:setMarginTop(5)
        icon:setMarginLeft(2)
        icon:setMarginRight(-2)
    end
    return icon
end

local function getStatsBarsIconContent()
    local iconContents = {}
    local statsBars = StatsBar.getAllStatsBarWithPosition()

    for _, statsBar in ipairs(statsBars) do
        iconContents[#iconContents + 1] = { content = statsBar.icons, loadIconTransparent = true }
    end

    iconContents[#iconContents + 1] = { content = modules.game_inventory.getIconsPanelOn(), loadIconTransparent = false }
    iconContents[#iconContents + 1] = { content = modules.game_inventory.getIconsPanelOff(), loadIconTransparent = false }

    return iconContents
end

local function toggleIcon(bitChanged)
    local contents = getStatsBarsIconContent()

    local iconId = Icons[bitChanged]
    if not iconId then
        g_logger.warning(string.format("No icon ID %s (%s)  found. Check Icons array in modules/gamelib/player.lua.",
            tostring(bitChanged), tostring(math.log(bitChanged) / math.log(2))))
        return
    end
    for _, contentData in ipairs(contents) do
        local icon = contentData.content:getChildById(iconId.id)
        if icon then
            icon:destroy()
        else
            icon = loadIcon(bitChanged, contentData.content, contentData.loadIconTransparent)
            icon:setParent(contentData.content)
        end
    end
end

function processIcon(id, action, createIfMissing)
    -- game_rewardwall
    for _, contentData in ipairs(getStatsBarsIconContent()) do
        local icon = contentData.content:getChildById(id)
        if icon then
            action(icon)
        elseif createIfMissing then
            icon = loadIcon(id, contentData.content, contentData.loadIconTransparent)
            icon:setParent(contentData.content)
            action(icon)
        end
    end
end

function StatsBar.reloadCurrentStatsBarQuickInfo_state(localPlayer, now, old)
    local player = g_game.getLocalPlayer()
    if not player then
        return
    end

    if now == old then
        return
    end
    Player.iterateChangedStates(now, old, function(bitChanged)
        toggleIcon(bitChanged)
    end)
end

function StatsBar.reloadCurrentStatsBarDeepInfo()
    local player = g_game.getLocalPlayer()
    if not player then
        return
    end

    local bar = StatsBar.getCurrentStatsBarWithPosition()
    if not bar then
        return
    end

    for _, skillTuple in ipairs(skillsTuples) do
        local widget = bar:recursiveGetChildById('statsbar_skill_' .. skillTuple.key)
        if widget then
            if skillTuple.key == 'experience' then
                widget.level:setText(player:getLevel())
                widget.bar:setValue(player:getLevelPercent(), 100)
            elseif skillTuple.key == 'magic' then
                widget.level:setText(player:getMagicLevel())
                widget.bar:setValue(player:getMagicLevelPercent(), 100)
            else
                widget.level:setText(player:getSkillLevel(skillTuple.skill))
                widget.bar:setValue(player:getSkillLevelPercent(skillTuple.skill), 100)
            end
        end
    end
end

function StatsBar.onHarmonyChange(localPlayer, harmony, oldHarmony)
    modules.game_healthcircle.whenMonkHarmonyChange(localPlayer, harmony, oldHarmony)
    local statsBars = StatsBar.getAllStatsBarWithPosition()
    for _, barElement in ipairs(statsBars) do
        local harmonies = barElement:recursiveGetChildById('harmonies')
        if harmonies then
            for i = 1, 5 do
                local tooltip = string.format(
                    "%d/5 Harmony\n\n" ..
                    "Harmony is generated by specific abilities of your characters.\n" ..
                    "The more Harmony you have, the more bonuses you may gain from certain effects.",
                    harmony
                )
                local child = harmonies:getChildByIndex(i)
                if child then
                    child:setTooltip(tooltip)
                    child:setOn(i <= harmony)
                end
            end
        end
    end
end

function StatsBar.onSereneChange(localPlayer, serene, oldSerene)
    modules.game_healthcircle.whenMonkSereneChange(localPlayer, serene, oldSerene)
    local statsBars = StatsBar.getAllStatsBarWithPosition()
    for _, barElement in ipairs(statsBars) do
        local sereneIcon = barElement:recursiveGetChildById('serene')
        if sereneIcon then
            local tooltip
            if serene then
                tooltip = "You are serene.\n\n" ..
                          "You remain serene if no more than 5 monsters or characters are directly beside you,\n" ..
                          "and if no party members are within your sight."
            else
                tooltip = "You are not serene.\n\n" ..
                          "You lose serenity if more than 5 monsters or characters are directly beside you,\n" ..
                          "or if any party members are visible."
            end
            sereneIcon:setTooltip(tooltip)
            sereneIcon:setOn(serene)
        end
    end
end

function StatsBar.onVocationChange(localPlayer, vocation, oldVocation)
    isWarriorVocation = vocation == VocationsClient.Knight or vocation == VocationsClient.EliteKnight or
                        vocation == VocationsClient.Paladin or vocation == VocationsClient.RoyalPaladin or
                        vocation == VocationsClient.Monk or vocation == VocationsClient.ExaltedMonk
    modules.game_healthcircle.checkMonkVocation()
    local statsBars = StatsBar.getAllStatsBarWithPosition()
    local isMonk = localPlayer:isMonk() and g_game.getFeature(GameVocationMonk)
    for _, barElement in ipairs(statsBars) do
        local monkStats = barElement:recursiveGetChildById('monkStats')
        if monkStats then
            if isMonk then
                monkStats:enable()
            else
                monkStats:disable()
            end
        end
    end
    StatsBar.reloadCurrentStatsBarQuickInfo()
end

-- Keeps the stats bar selectors on the options panel in sync with the state
-- that is currently applied. Always called with valid values, never with nil,
-- so the combobox handlers never read an empty selection back.
local function syncStatsBarSelectors()
    if modules.game_healthcircle and modules.game_healthcircle.setStatsBarOption then
        modules.game_healthcircle.setStatsBarOption(currentStats.dimension, currentStats.placement)
    end
end

function constructStatsBar(dimension, placement)
    local dimensionString = dimension:gsub("^%u", string.lower)
    StatsBar.updateCurrentStats(dimensionString, placement)

    local dimensionOnPlacement = dimensionString:gsub("^%u", string.lower) .. "On" .. placement:gsub("^%l", string.upper)
    local statsBar = statsBars["statsBar" .. placement:gsub("^%l", string.upper)]

    if statsBar[dimensionOnPlacement] then
        statsBar:setHeight(statsBarsDimensions[dimension].height)
        statsBar[dimensionOnPlacement]:setHeight(statsBarsDimensions[dimension].height)
        statsBar[dimensionOnPlacement]:show()
        statsBar[dimensionOnPlacement]:setPhantom(false)
        statsBar[dimensionOnPlacement].health = statsBar[dimensionOnPlacement]:getChildById('health')
        statsBar[dimensionOnPlacement].mana = statsBar[dimensionOnPlacement]:getChildById('mana')
        statsBar[dimensionOnPlacement].manashield = statsBar[dimensionOnPlacement]:getChildById('manashield')
        statsBar[dimensionOnPlacement].skills = statsBar[dimensionOnPlacement]:getChildById('skills')

        statsBar[dimensionOnPlacement].manashield.onStatsTextUpdate = updateManaShieldText

        reloadSkillsTab(statsBar[dimensionOnPlacement].skills, statsBar[dimensionOnPlacement])
        StatsBar.reloadCurrentStatsBarQuickInfo()

        syncStatsBarSelectors()

        StatsBar.initProficiencyTopBar()
    else
        print("No stats bar found for:", dimensionOnPlacement .. " on constructStatsBar()")
    end
end

function StatsBar.updateCurrentStats(dimension, placement)
    if dimension then
        currentStats.dimension = dimension
    end

    if placement then
        currentStats.placement = placement
    end

    -- Persist immediately, the in-memory state is never re-read from the
    -- settings on a change request, so it can't be rolled back by a later load.
    StatsBar.saveSettings()
end

local function openDropMenu(mousePos)
    local menu = g_ui.createWidget('PopupMenu')
    menu:setGameMenu(true)

    local current = StatsBar.getCurrentStatsBarWithPosition()

    local menuOptions = getStatsBarMenuOptions(current)

    -- Add options to the menu based on the current stats bar
    for _, option in ipairs(menuOptions) do
        menu:addOption(tr(option.label), function()
            StatsBar.hideAll()
            constructStatsBar(option.dimension, option.placement)
        end)
    end

    menu:addSeparator()

    local current = StatsBar.getCurrentStatsBarWithPosition()
    if current and current.skills then
        for _, skillTuple in ipairs(skillsTuples) do
            if not g_settings.getBoolean('top_statsbar_' .. skillTuple.key) then
                menu:addOption(tr('Show') .. ' ' .. tr(skillTuple.name), function()
                    g_settings.set('top_statsbar_' .. skillTuple.key, true)
                    reloadSkillsTab(current.skills, current)
                end)
            else
                menu:addOption(tr('Hide') .. ' ' .. tr(skillTuple.name), function()
                    g_settings.set('top_statsbar_' .. skillTuple.key, false)
                    reloadSkillsTab(current.skills, current)
                end)
            end
        end
    end

    menu:addSeparator()
    menu:addOption(tr('Hide Customisable Status Bars'), function()
        StatsBar.updateStatsBarOption('hide', currentStats.placement)
    end)

    menu:display(mousePos)
end

function shouldAddStatsBarOption(current, placement, style)
    local id = current:getId()
    return string.find(id, placement) and id ~= style
end

function getStatsBarMenuOptions(current)
    local optionsMenu = {}

    -- Create options available based on statsBarsPlacements and statsBarsDimensions tables.
    for _, placement in ipairs(statsBarsPlacements) do
        for dimension, _ in pairs(statsBarsDimensions) do
            local style = tostring(dimension):gsub("^%u", string.lower) .. 'On' .. placement
            if shouldAddStatsBarOption(current, placement, style) then
                optionsMenu[#optionsMenu + 1] = {
                    label = 'Switch to ' .. tostring(dimension) .. ' Style',
                    dimension = dimension,
                    placement = placement:gsub("^%u", string.lower),
                    style = style
                }
            end
        end
    end

    -- Create options available to switch placements keeping the same style
    -- i.e. from bottom to top // from top to bottom
    for _, placement in ipairs(statsBarsPlacements) do
        if not string.find(current:getId(), placement) then
            optionsMenu[#optionsMenu + 1] = {
                label = 'Switch to ' .. placement .. ' Style',
                dimension = currentStats.dimension:gsub("^%l", string.upper),
                placement = placement:gsub("^%u", string.lower),
                construct = constructStatsBar,
                style = current:getId()
            }
        end
    end

    return optionsMenu
end

local function onStatsMousePress(tab, mousePos, mouseButton)
    if mouseButton == MouseRightButton then
        openDropMenu(mousePos)
        return true
    end
end

function StatsBar.reloadCurrentTab()
    if currentStats.dimension == "hide" or currentStats.placement == "hide" then
        return
    end

    local dimension = currentStats.dimension:gsub("^%l", string.upper)

    if statsBarsDimensions[dimension] then
        return constructStatsBar(dimension, currentStats.placement)
    else
        print("No stats bars dimensions found: ", dimension, " on reloadCurrentTab()")
        return
    end
end

-- Applies a dimension/placement request. The in-memory state is the source of
-- truth, it is persisted right away (same behaviour as client_options setOption)
-- and never re-read from the settings, so a change request can't be discarded.
function StatsBar.updateStatsBarOption(dimension, placement)
    if dimension or placement then
        StatsBar.updateCurrentStats(dimension, placement)
    end

    StatsBar.hideAll()

    if currentStats.dimension == "hide" or currentStats.placement == "hide" then
        syncStatsBarSelectors()
        return
    end

    StatsBar.reloadCurrentTab()
end

local function getSettingOrDefault(setting, default)
    local value = g_settings.getString(setting)
    return value ~= "" and value or default
end

local function setSetting(setting, value)
    g_settings.set(setting, value)
end

local function isValidDimension(dimension)
    if dimension == "hide" then
        return true
    end
    return statsBarsDimensions[dimension:gsub("^%l", string.upper)] ~= nil
end

local function isValidPlacement(placement)
    for _, knownPlacement in ipairs(statsBarsPlacements) do
        if placement == knownPlacement:lower() then
            return true
        end
    end
    return false
end

function StatsBar.loadSettings()
    local dimension = getSettingOrDefault('statsbar_dimension', DEFAULT_DIMENSION)
    local placement = getSettingOrDefault('statsbar_placement', DEFAULT_PLACEMENT)

    -- fall back to the defaults when the stored values are not known anymore
    if not isValidDimension(dimension) then
        dimension = DEFAULT_DIMENSION
    end
    if not isValidPlacement(placement) then
        placement = DEFAULT_PLACEMENT
    end

    -- OT-MMO: sin barras de vida/maná arriba ni abajo; la vida y el maná van junto a la barra de habilidades.
    currentStats = {
        dimension = "hide",
        placement = placement
    }
end

function StatsBar.saveSettings()
    setSetting('statsbar_dimension', currentStats.dimension)
    setSetting('statsbar_placement', currentStats.placement)
end

function StatsBar.OnGameEnd()
    StatsBar.saveSettings()
    StatsBar.hideAll()

    modules.game_inventory.getIconsPanelOn():destroyChildren()
    modules.game_inventory.getIconsPanelOff():destroyChildren()

    StatsBar.destroyAllIcons()
end

function StatsBar.OnGameStart()
    StatsBar.loadSettings()
    StatsBar.reloadCurrentTab()
    syncStatsBarSelectors()

    -- Initialize proficiency topbar widget
    StatsBar.initProficiencyTopBar()
end

local function applyProficiencyLayout(bar, enabled)
    local layout = proficiencyLayouts[bar:getId()]
    if not layout then
        return
    end

    for widgetId, props in pairs(enabled and layout.on or layout.off) do
        local widget = bar:getChildById(widgetId)
        if widget then
            if props.right then
                widget:addAnchor(AnchorRight, props.right, AnchorLeft)
            end
            if props.marginLeft then
                widget:setMarginLeft(props.marginLeft)
            end
            if props.marginRight then
                widget:setMarginRight(props.marginRight)
            end
            if props.width then
                widget:setWidth(props.width)
            end
        end
    end
end

-- Initialize proficiency top bar widget
function StatsBar.initProficiencyTopBar()
    local enabled = g_game.getFeature(GameProficiency)
    local currentBar = StatsBar.getCurrentStatsBarWithPosition()

    for _, bar in ipairs(StatsBar.getAllStatsBarWithPosition()) do
        local profWidget = bar:getChildById('proficiencyTopBar')
        if profWidget then
            profWidget:setVisible(enabled and bar == currentBar)
        end

        local proficiencyIcon = bar:getChildById('proficiencyIcon')
        if proficiencyIcon then
            proficiencyIcon:setVisible(enabled)
        end

        applyProficiencyLayout(bar, enabled)
    end

    if enabled and currentBar and modules.game_proficiency then
        modules.game_proficiency.updateTopBarProficiency()
    end
end

function createStatsBarWidgets(statsBar)
    -- This method will create the widgets based on the statsBar, statsBarsPlacements and statsBarsDimensions tables.
    local widget = statsBar
    for _, placement in ipairs(statsBarsPlacements) do
        for dimension, _ in pairs(statsBarsDimensions) do
            local elementName = tostring(dimension):gsub("^%u", string.lower) .. "On" .. placement
            widget[elementName] = statsBar:getChildById(elementName)
        end
    end
    widget.onMousePress = onStatsMousePress
    return widget
end

function StatsBar.init()
    statsBarTop = modules.game_interface.getGameTopStatsBar()
    statsBarBottom = modules.game_interface.getGameBottomStatsBar()

    statsBars = {
        statsBarTop = statsBarTop,
        statsBarBottom = statsBarBottom
    }

    if not statsBarTop then
        return
    end

    if not statsBarBottom then
        return
    end

    -- Create widgets based on statsBars table.
    for _, statBar in pairs(statsBars) do
        statBar = createStatsBarWidgets(statBar)
    end

    statsBarDeepInfo = {
        onExperienceChange = StatsBar.reloadCurrentStatsBarDeepInfo,
        onLevelChange = StatsBar.reloadCurrentStatsBarDeepInfo,
        onHealthChange = StatsBar.reloadCurrentStatsBarQuickInfo,
        onManaChange = StatsBar.reloadCurrentStatsBarQuickInfo,
        onManaShieldChange = StatsBar.reloadCurrentStatsBarQuickInfo,
        onMagicLevelChange = StatsBar.reloadCurrentStatsBarDeepInfo,
        onBaseMagicLevelChange = StatsBar.reloadCurrentStatsBarDeepInfo,
        onSkillChange = StatsBar.reloadCurrentStatsBarDeepInfo,
        onBaseSkillChange = StatsBar.reloadCurrentStatsBarDeepInfo,
        onStatesChange = StatsBar.reloadCurrentStatsBarQuickInfo_state,
        onHarmonyChange = StatsBar.onHarmonyChange,
        onSereneChange = StatsBar.onSereneChange,
        onVocationChange = StatsBar.onVocationChange
    }

    StatsBar.hideAll()
    connect(LocalPlayer, statsBarDeepInfo)
    connect(g_game, {
        onGameStart = StatsBar.OnGameStart,
        onGameEnd = StatsBar.OnGameEnd
    })
end

function StatsBar.hideAll()
    -- This iterates between the tables: statsBar -> statsBarsPlacements -> statsBarsDimensions
    -- And hides all the stats bars based on these tables.
    for _, bar in pairs(statsBars) do
        for _, placement in pairs(statsBarsPlacements) do
            for dimension, _ in pairs(statsBarsDimensions) do
                local key = tostring(dimension):lower() .. "On" .. placement
                if bar[key] and bar[key].skills then
                    bar[key].skills:destroyChildren()
                    bar[key].skills:setHeight(0)
                    bar[key]:setHeight(0)
                    bar[key]:hide()
                end
            end
        end
        bar:setHeight(0)
    end
end

function StatsBar.destroyAllIcons()
    -- This iterates between the tables: statsBar -> statsBarsPlacements -> statsBarsDimensions
    -- And destroy all icons based on these tables.
    for _, bar in pairs(statsBars) do
        for _, placement in pairs(statsBarsPlacements) do
            for dimension, _ in pairs(statsBarsDimensions) do
                local key = tostring(dimension):lower() .. "On" .. placement
                if bar[key] and bar[key].skills then
                    bar[key].icons:destroyChildren()
                end
            end
        end
        bar:setHeight(0)
    end
end

function StatsBar.destroyAllBars()
    -- This iterates between the tables: statsBars
    -- And destroy all bars based on these tables.
    for _, bar in pairs(statsBars) do
        bar:destroy()
    end
end

function StatsBar.terminate()
    StatsBar.saveSettings()

    disconnect(LocalPlayer, statsBarDeepInfo)
    disconnect(g_game, {
        onGameStart = StatsBar.OnGameStart,
        onGameEnd = StatsBar.OnGameEnd
    })

    StatsBar.destroyAllBars()
end

function StatsBar.onHungryChange(regenerationTime, alert)
    local contents = getStatsBarsIconContent()
    local info = Icons[PlayerStates.Hungry]
    if regenerationTime <= alert then
        for _, contentData in ipairs(contents) do
            local icon = contentData.content:getChildById(info.id)
            if not icon then
                icon = g_ui.createWidget('ConditionWidget', contentData.content)
                icon:setId(info.id)
                icon:setImageSource("/images/game/states/player-state-flags")
                icon:setImageClip(((info.clip - 1) * 9) .. ' 0 9 9')
                icon:setTooltip(info.tooltip)
                icon:setImageSize(tosize("9 9"))
                if contentData.loadIconTransparent then
                    icon:setMarginTop(5)
                end
            end
        end
    else
        for _, contentData in ipairs(contents) do
            local icon = contentData.content:getChildById(info.id)
            if icon then
                icon:destroy()
                icon = nil
            end
        end
    end
end

function StatsBar.getHeight()
    if currentStats.dimension == 'hide' or not statsBarTop then
        return 0
    end
    if statsBarTop:isVisible() then
        return statsBarTop:getHeight()
    else
        return 0
    end
end