-- Author      : John Rubin - "Mistra50"
-- Create Date : 8/8/2012 9:03:35 PM
-- Mistra's D3Orbs - rewrite of the previous oUF_D3Orbs_LightWeight
-- The orbs originally appeared in the RothUI by "Zork" and permissive use of all assets and code was given by the original author. 
-- The code in this addon has small chunks of the original still within, but the majority has been rewritten to be free of any external API by John Rubin, aka "Mistra"
-- Code was abandoned a long time ago in roughly 2012, RawCard helped restore it for Classic.  
-- I ported RawCard's Classic version for Retail. -Speedlock

--Copyright (C) 2012 John Rubin

--Standard DBAD License.  A mix of MIT and please get my permission before you copy this code license.

--Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:

--The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
--The above copyright holder is notified of the intent of redistribution prior to the release of said redistribution.

--THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

-- Version detection and compatibility layer
local _, _, _, tocVersion = GetBuildInfo()
SL32_TOC_VERSION = tocVersion or 0

-- Expansion detection
SL32_IS_VANILLA = SL32_TOC_VERSION < 20000
SL32_IS_TBC = SL32_TOC_VERSION >= 20000 and SL32_TOC_VERSION < 30000
SL32_IS_WRATH = SL32_TOC_VERSION >= 30000 and SL32_TOC_VERSION < 40000
SL32_IS_CATA = SL32_TOC_VERSION >= 40000 and SL32_TOC_VERSION < 50000
SL32_IS_MOP = SL32_TOC_VERSION >= 50000 and SL32_TOC_VERSION < 60000
SL32_IS_MOP_OR_LATER = SL32_TOC_VERSION >= 50000
SL32_IS_CATA_OR_LATER = SL32_TOC_VERSION >= 40000
-- WOW_PROJECT_ID is most reliable for Retail (added 8.0); TOC fallback for older addon loads
SL32_IS_RETAIL = (WOW_PROJECT_MAINLINE and WOW_PROJECT_ID == WOW_PROJECT_MAINLINE) or (SL32_TOC_VERSION >= 100000)

local function SL32CanUseValue(value)
	if issecretvalue and issecretvalue(value) then
		if canaccessvalue then
			return canaccessvalue(value)
		end
		return false
	end
	return true
end

local function SL32SafeNumber(value, fallback)
	if not SL32CanUseValue(value) then
		return fallback
	end
	if type(value) == "number" then
		return value
	end
	if type(value) == "string" then
		local num = tonumber(value)
		if num then
			return num
		end
	end
	local ok, num = pcall(tonumber, value)
	if ok and num then
		return num
	end
	return fallback
end

local function SL32CloneTable(value, seen)
	if type(value) ~= "table" then
		return value
	end
	seen = seen or {}
	if seen[value] then
		return seen[value]
	end
	local copy = {}
	seen[value] = copy
	for k, v in pairs(value) do
		copy[SL32CloneTable(k, seen)] = SL32CloneTable(v, seen)
	end
	return copy
end

local function SL32_MigrateLegacySavedVars()
	local migrated = false
	if not SL32CharacterData and type(RC32CharacterData) == "table" then
		SL32CharacterData = SL32CloneTable(RC32CharacterData)
		migrated = true
	end
	if not SL32AccountData and type(RC32AccountData) == "table" then
		SL32AccountData = SL32CloneTable(RC32AccountData)
		migrated = true
	end
	if SL32MiniMapButtonPosition == nil and RC32MiniMapButtonPosition ~= nil then
		SL32MiniMapButtonPosition = SL32CloneTable(RC32MiniMapButtonPosition)
		migrated = true
	end
	if migrated then
		if not SL32AccountData then
			SL32AccountData = {}
		end
		SL32AccountData.migratedFromRC32 = true
	end
end

-- Power type constants - MoP uses numbers, earlier versions use strings
SL32_POWER_MANA = SL32_IS_MOP_OR_LATER and 0 or "MANA"
SL32_POWER_RAGE = SL32_IS_MOP_OR_LATER and 1 or "RAGE"
SL32_POWER_FOCUS = SL32_IS_MOP_OR_LATER and 2 or "FOCUS"
SL32_POWER_ENERGY = SL32_IS_MOP_OR_LATER and 3 or "ENERGY"
SL32_POWER_RUNIC_POWER = SL32_IS_MOP_OR_LATER and 6 or "RUNIC_POWER"
SL32_POWER_SOUL_SHARDS = SL32_IS_CATA_OR_LATER and (SL32_IS_MOP_OR_LATER and 7 or "SOUL_SHARDS") or nil
SL32_POWER_HOLY_POWER = SL32_IS_CATA_OR_LATER and (SL32_IS_MOP_OR_LATER and 9 or "HOLY_POWER") or nil
SL32_POWER_CHI = SL32_IS_MOP_OR_LATER and 12 or nil
SL32_POWER_SHADOW_ORBS = SL32_IS_CATA_OR_LATER and (SL32_IS_MOP_OR_LATER and 13 or "SHADOW_ORBS") or nil
SL32_POWER_BURNING_EMBERS = SL32_IS_MOP_OR_LATER and 14 or nil
SL32_POWER_DEMONIC_FURY = SL32_IS_MOP_OR_LATER and 15 or nil
SL32_POWER_ARCANE_CHARGES = SL32_IS_MOP_OR_LATER and 16 or nil
SL32_POWER_ESSENCE = SL32_IS_RETAIL and 19 or nil   -- Evoker (Dragonflight+)
SL32_POWER_RUNES = SL32_TOC_VERSION >= 30000 and 5 or nil  -- Death Knight runes (Wrath+)

-- Safe UnitPower wrapper that handles version differences
function SL32_UnitPower(unit, powerType)
	if powerType == nil then
		return SL32SafeNumber(UnitPower(unit), 0)
	end
	-- For pre-MoP, if we got a number, don't pass it
	if not SL32_IS_MOP_OR_LATER and type(powerType) == "number" then
		return SL32SafeNumber(UnitPower(unit), 0)
	end
	return SL32SafeNumber(UnitPower(unit, powerType), 0)
end

function SL32_UnitPowerMax(unit, powerType)
	if powerType == nil then
		return SL32SafeNumber(UnitPowerMax(unit), 0)
	end
	-- For pre-MoP, if we got a number, don't pass it
	if not SL32_IS_MOP_OR_LATER and type(powerType) == "number" then
		return SL32SafeNumber(UnitPowerMax(unit), 0)
	end
	return SL32SafeNumber(UnitPowerMax(unit, powerType), 0)
end

-- Combo point wrapper for retail/classic API differences
local function SL32_GetComboPoints()
	if GetComboPoints then
		local points = GetComboPoints("player", "target")
		if points then
			return points
		end
	end
	if Enum and Enum.PowerType and Enum.PowerType.ComboPoints then
		return UnitPower("player", Enum.PowerType.ComboPoints) or 0
	end
	return 0
end

-- Safe RegisterUnitWatch wrappers (retail may not expose the global funcs)
function SL32_RegisterUnitWatch(frame)
	if RegisterUnitWatch then
		RegisterUnitWatch(frame)
	elseif frame and frame.RegisterUnitWatch then
		frame:RegisterUnitWatch()
	end
end

function SL32_UnregisterUnitWatch(frame)
	if UnregisterUnitWatch then
		UnregisterUnitWatch(frame)
	elseif frame and frame.UnregisterUnitWatch then
		frame:UnregisterUnitWatch()
	end
end

-- Re-enable pet orb and show it on next frame so UnitWatch can update (fixes orb not reappearing without reload)
function SL32_EnablePetOrb()
	if not petOrb or not petOrb.secure then return end
	SL32_RegisterUnitWatch(petOrb.secure)
	SL32CharacterData.petOrb.enabled = true
	safeShowSecure(petOrb.secure)
	if UnitExists("pet") then petOrb:Show() end
end

-- Check if a class exists in this version
function SL32_ClassExists(className)
	if className == "Monk" then
		return SL32_IS_MOP_OR_LATER
	elseif className == "Death Knight" then
		return SL32_TOC_VERSION >= 30000 -- Wrath+
	end
	return true
end

-- Check if a power type is supported
function SL32_PowerTypeSupported(powerType)
	if powerType == SL32_POWER_HOLY_POWER or powerType == SL32_POWER_SOUL_SHARDS or powerType == SL32_POWER_SHADOW_ORBS then
		return SL32_IS_CATA_OR_LATER
	elseif powerType == SL32_POWER_CHI or powerType == SL32_POWER_BURNING_EMBERS or powerType == SL32_POWER_DEMONIC_FURY then
		return SL32_IS_MOP_OR_LATER
	end
	return true
end

--register the addon message prefix
if C_ChatInfo and C_ChatInfo.RegisterAddonMessagePrefix then
	C_ChatInfo.RegisterAddonMessagePrefix("SL32")
end

--variable setup
SL32localizedDisplayName, SL32className, SL32classNumber = UnitClass("player")
local charClassNumber = 0
local playerInVehicle --bool for detecting whether or not a player is in a vehicle
local defaultOrbSize = 150
local orbFillingTexture = "MDO_orb_filling8.tga"
local fillRotationTexture = "orb_fillRotation"
local images = "Interface\\AddOns\\SLDiabloOrbs\\images\\"
local fonts = "Interface\\Addons\\SLDiabloOrbs\\fonts\\"
healthOrb = nil 
manaOrb = nil
local vehicleInUse

--smooth animation variables
local lastHealthValue, newHealthValue

--color preset definitions per class and assignment
orbClassColors = {
	[0] = {health = {r = 0.78, g = 0.61, b = 0.43, a= 1}, mana = {r = 0.8, g = 0, b = 0, a= 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Warrior"}, --warrior preset

	[1] = {health = {r = 0.96, g = 0.55, b = 0.73, a = 1},mana = {r = 0.0, g = 0.44, b = 0.87, a = 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Paladin"}, --paladin preset

	[2] = {health = {r = 0.67, g = 0.83, b = 0.45, a = 1},mana = {r = 1.1, g = 0.5, b = 0.25, a = 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Hunter"}, --hunter preset

	[3] = {health = {r = 1.00, g = 0.96, b = 0.41, a = 1},mana = {r = 1.00, g = 0.96, b = 0.41, a = 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Rogue"}, --rogue preset

	[4] = {health = {r = 1.00, g = 1.00, b = 1.00, a = 1},mana = {r = 0.0, g = 0.44, b = 0.87, a = 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Priest"}, --priest preset

	[5] = {health = {r = 0.77, g = 0.12, b = 0.23, a = 1},mana = {r = 0.35, g = 0.9, b = 0.9, a = 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Death Knight"}, --death knight preset

	[6] = {health = {r = 0.0, g = 0.44, b = 0.87, a = 1},mana = {r = 0.0, g = 0.44, b = 0.87, a = 1}, animation = "SPELLS\\WhiteRadiationFog.m2", name = "Shaman"}, -- shaman preset

	[7] = {health = {r = 0.41, g = 0.80, b = 0.94, a = 1},mana = {r = 0.0, g = 0.44, b = 0.87, a = 1},  animation = "SPELLS\\WhiteRadiationFog.m2", name = "Mage"}, --mage preset

	[8] = {health = {r = 0.58, g = 0.51, b = 0.79, a = 1},mana = {r = 0.0, g = 0.44, b = 0.87, a = 1},  animation = "SPELLS\\WhiteRadiationFog.m2", name = "Warlock"}, --warlock preset

	[9] = {health = {r = 0.33, g = 0.54, b = 0.52, a = 1},mana = {r = 1.00, g = 1.00, b = 1.00, a = 1},  animation = "SPELLS\\GreenRadiationFog.m2", name = "Monk"}, --monk preset

	[10] = {health = {r = 1.00, g = 0.49, b = 0.04, a = 1},mana = {r = 0.0, g = 0.44, b = 0.87, a = 1},  animation = "SPELLS\\WhiteRadiationFog.m2", name = "Druid"}, --druid preset
	[11] = {health = {r = 0.64, g = 0.19, b = 0.79, a = 1},mana = {r = 0.64, g = 0.19, b = 0.79, a = 1},  animation = "SPELLS\\WhiteRadiationFog.m2", name = "Demon Hunter"},
	[12] = {health = {r = 0.33, g = 0.69, b = 0.69, a = 1},mana = {r = 0.33, g = 0.69, b = 0.69, a = 1},  animation = "SPELLS\\WhiteRadiationFog.m2", name = "Evoker"}  -- Retail classes
}

local fontChoices = {
	[0] = "Interface\\AddOns\\SLDiabloOrbs\\fonts\\Of Wildflowers and Wings.ttf",
	[1] = "FONTS\\FRIZQT__.ttf"  
}


local function getClassColor()
	if SL32classNumber then
		SL32className = SL32localizedDisplayName
		return SL32classNumber - 1
	else
		local num = table.getn(orbClassColors)
		for i=0,num,1 do
			if orbClassColors[i].name == UnitClass("player") then
				SL32className = UnitClass("player")
				return i 
			end
		end
		return 0
	end
end
charClassNumber = getClassColor()

--load preset SL32CharacterData default in the event existing data cannot be recovered
local Hr,Hg,Hb,Ha = orbClassColors[charClassNumber].health.r, orbClassColors[charClassNumber].health.g, orbClassColors[charClassNumber].health.b, orbClassColors[charClassNumber].health.a
local Mr,Mg,Mb,Ma = orbClassColors[charClassNumber].mana.r, orbClassColors[charClassNumber].mana.g, orbClassColors[charClassNumber].mana.b, orbClassColors[charClassNumber].mana.a

-- Default orb positions (UIParent, BOTTOM anchor) for per-orb Shift+drag and reset
local defaultOrbPositions = {
	healthOrb = { point = "BOTTOM", relativePoint = "BOTTOM", x = -250, y = 0 },
	manaOrb   = { point = "BOTTOM", relativePoint = "BOTTOM", x = 250, y = 0 },
	petOrb    = { point = "BOTTOM", relativePoint = "BOTTOM", x = -345, y = 145 },
}

local defaultsTable = {
	--health orb vars
	healthOrb = {scale = 1, enabled = true, position = defaultOrbPositions.healthOrb, textures = {fill = "MDO_orb_filling2.tga", rotation = "orb_rotation_bubbles"}, orbColor = {r = Hr, g = Hg, b = Hb, a= Ha}, galaxy = {r = Hr, g = Hg, b = Hb, a= Ha}, font1 = {r=1,g=1,b=1,a=1,show = true}, font2 = {r=1,g=1,b=1,a=1,show = true}, formatting = {truncated = true, commaSeparated = false}},

	--mana orb vars
	manaOrb = {scale = 1, enabled = true, position = defaultOrbPositions.manaOrb, textures = {fill = "MDO_orb_filling2.tga", rotation = "orb_rotation_bubbles"}, orbColor = {r = Mr, g = Mg, b = Mb, a = Ma},galaxy = {r = Mr, g = Mg, b = Mb, a = Ma}, font1 = {r=1,g=1,b=1,a=1,show = true}, font2 = {r=1,g=1,b=1,a=1,show = true}, formatting = {truncated = true, commaSeparated = false}},
	
	--pet orb vars
	petOrb = {scale = 1, enabled = true, position = defaultOrbPositions.petOrb, showValue = true, showPercentage = false, healthOrb = {r=Hr,g=Hg,b=Hb,a=Ha}, manaOrb={r=Mr,g=Mg,b=Mb,a=Ma}},
	
	--orb fonts
	font = fontChoices[1],
	
	values = {formatted=true},
	
	artwork = {show = true},
	
	powerFrame = {show = true, rotation = 270, maxStackSound = 12},

	combat = {enabled = true, orbColor = {r = 0.8, g = 0, b = 0, a = 1}, galaxy = {r = 0.8, g = 0, b = 0, a = 1}, font1 = {r=1,g=1,b=1,a=1}, font2 = {r=1,g=1,b=1,a=1}},

	druidColors = {
		cat = {orbColor = {r = 1.00, g = 0.96, b = 0.41, a = 1}, galaxy = {r = 1.00, g = 0.96, b = 0.41, a = 1}, font1 = {r=1,g=1,b=1,a=1}, font2 = {r=1,g=1,b=1,a=1}},
		bear = {orbColor = {r = 0.8, g = 0, b = 0, a= 1}, galaxy = {r = 0.8, g = 0, b = 0, a= 1}, font1 = {r=1,g=1,b=1,a=1}, font2 = {r=1,g=1,b=1,a=1}},
		moonkin = {orbColor = {r = 0.0, g = 0.44, b = 0.87, a = 1}, galaxy = {r = 0.0, g = 0.44, b = 0.87, a = 1}, font1 = {r=1,g=1,b=1,a=1}, font2 = {r=1,g=1,b=1,a=1}}, 
		tree = {orbColor = {r = 0.0, g = 0.44, b = 0.87, a = 1}, galaxy = {r = 0.0, g = 0.44, b = 0.87, a = 1}, font1 = {r=1,g=1,b=1,a=1}, font2 = {r=1,g=1,b=1,a=1}}
	},

	defaultPlayerFrame = {show = false}
}

-- Sound options for max stack notification
SL32_MaxStackSounds = {
	{name = "None", id = 0},
	{name = "Power Up", id = 12889},
	{name = "Level Up", id = 888},
	{name = "Ready Check", id = 8960},
	{name = "Raid Warning", id = 8959},
	{name = "PvP Flag", id = 8174},
	{name = "Quest Complete", id = 878},
	{name = "Loot Coin", id = 120},
	{name = "Horn", id = 8457},
	{name = "War Horn", id = 11466},
	{name = "Ding", id = 6674},
	{name = "Bell", id = 5274},
	{name = "Gong", id = 6595},
	{name = "Alarm", id = 8046},
	{name = "Chime", id = 3332},
	{name = "Fanfare", id = 8455},
	{name = "Auction Open", id = 5274},
	{name = "Map Ping", id = 8458},
	{name = "Tell Message", id = 3081},
	{name = "Friend Online", id = 4620},
	{name = "Achievement", id = 12891},
	{name = "Boss Emote", id = 11965},
	{name = "PvP Victory", id = 8454},
	{name = "Humm", id = 6678},
}

local defaultTextures = {
	healthOrb = {fill = "MDO_orb_filling2.tga", rotation = "orb_rotation_bubbles"},
	manaOrb = {fill = "MDO_orb_filling2.tga", rotation = "orb_rotation_bubbles"}
}

SL32FillTextureChoices = {
	[0] = images.. "MDO_orb_filling1.tga",
	[1] = images.. "MDO_orb_filling2.tga",
	[2] = images.. "MDO_orb_filling3.tga",
	[3] = images.. "MDO_orb_filling4.tga",
	[4] = images.. "MDO_orb_filling5.tga",
	[5] = images.. "MDO_orb_filling6.tga",
	[6] = images.. "MDO_orb_filling7.tga",
}

SL32FillTextureDisplayNames = {
	[0] = "Moon",
	[1] = "Mist",
	[2] = "Liquid Metal",
	[3] = "Dragon Skin",
	[4] = "Iris",
	[5] = "Fractals",
	[6] = "Warped",
}

SL32RotationTextureChoices = {
	[0] = images.. "orb_rotation_galaxy",
	[1] = images.. "orb_rotation_bubbles",
	[2] = images.. "orb_rotation_iris"
}

SL32RotationTextureDisplayNames = {
	[0] = "Galaxy",
	[1] = "Bubbles",
	[2] = "Eye Glow",
}

-- Track selected texture indices from dropdowns
SL32SelectedFillIndex = nil
SL32SelectedRotationIndex = nil

-- Texture file names (without path) for saving
SL32FillTextureNames = {
	[0] = "MDO_orb_filling1.tga",
	[1] = "MDO_orb_filling2.tga",
	[2] = "MDO_orb_filling3.tga",
	[3] = "MDO_orb_filling4.tga",
	[4] = "MDO_orb_filling5.tga",
	[5] = "MDO_orb_filling6.tga",
	[6] = "MDO_orb_filling7.tga",
}

SL32RotationTextureNames = {
	[0] = "orb_rotation_galaxy",
	[1] = "orb_rotation_bubbles",
	[2] = "orb_rotation_iris"
}

----------------------------------------------------------Main Data Table for each character -----------------------------------------------------------------
SL32CharacterData = defaultsTable
SL32Textures = defaultTextures
---------------------------------------------------------------------------------------------------------------------------------------------------------------

-- Store original PlayerFrame position for restoration
local playerFrameOriginalPoint = nil

function handlePlayerFrame(show)
	if show then
		PlayerFrame:SetAlpha(1)
		PlayerFrame:EnableMouse(true)
		-- Restore original position if we saved it
		if playerFrameOriginalPoint then
			PlayerFrame:ClearAllPoints()
			PlayerFrame:SetPoint(unpack(playerFrameOriginalPoint))
		end
	else
		-- Save original position first
		if not playerFrameOriginalPoint then
			local point, relativeTo, relativePoint, xOfs, yOfs = PlayerFrame:GetPoint(1)
			if point then
				playerFrameOriginalPoint = {point, relativeTo, relativePoint, xOfs, yOfs}
			end
		end
		PlayerFrame:SetAlpha(0)
		PlayerFrame:EnableMouse(false)
		-- Move off-screen to prevent any interaction
		PlayerFrame:ClearAllPoints()
		PlayerFrame:SetPoint("TOPLEFT", UIParent, "TOPLEFT", -9999, 9999)
	end
end

--hide the player frame by default... we have a pet orb now, so people shouldn't be asking for it anymore.... maybe
--handlePlayerFrame(SL32CharacterData.defaultPlayerFrame.show)


-- List of drag overlays for orbs; we enable mouse only when Shift is held so targeting still works
SL32_OrbDragOverlays = SL32_OrbDragOverlays or {}
local SL32_ShiftDragUpdateThrottle = 0

-- StopMovingOrSizing is protected during combat; defer until safe to avoid ADDON_ACTION_BLOCKED
local function safeStopMovingOrSizing(frame, onSuccess)
	if not frame or not frame.StopMovingOrSizing then return end
	if InCombatLockdown() then
		C_Timer.After(0.5, function() safeStopMovingOrSizing(frame, onSuccess) end)
		return
	end
	frame:StopMovingOrSizing()
	if onSuccess and type(onSuccess) == "function" then onSuccess(frame) end
end

-- Show/Hide on secure frames (e.g. pet orb targeting) are protected; defer until safe
local function safeShowSecure(frame)
	if not frame then return end
	if InCombatLockdown() then
		C_Timer.After(0.5, function() safeShowSecure(frame) end)
		return
	end
	frame:Show()
end

local function safeHideSecure(frame)
	if not frame then return end
	if InCombatLockdown() then
		C_Timer.After(0.5, function() safeHideSecure(frame) end)
		return
	end
	frame:Hide()
end

--function to make any frame object movable; orbType = "health"|"mana"|"pet" to save position on drag
-- Orbs have a secure button on top for targeting, so we add a non-secure overlay that only captures drag when Shift is held
local function makeFrameMovable(frame, button, orbType)
	local btnString = "LeftButton"
	if button then
		btnString = button
	end

	frame:SetClampedToScreen(true)
	frame:SetMovable(true)
	frame:EnableMouse(true)
	frame:RegisterForDrag(btnString)
	frame:SetScript("OnDragStart", function(self)
		if IsShiftKeyDown() and not InCombatLockdown() then
			self:StartMoving()
		end
	end)
	frame:SetScript("OnDragStop", function(self)
		safeStopMovingOrSizing(self, function(f)
			if orbType and SL32CharacterData and SL32CharacterData[orbType .. "Orb"] then
				local point, _, relativePoint, x, y = f:GetPoint(1)
				if point and x and y then
					SL32CharacterData[orbType .. "Orb"].position = { point = point, relativePoint = relativePoint or point, x = x, y = y }
				end
			end
		end)
	end)

	-- When orbType is set, the frame has a secure child on top that eats mouse; add overlay that is only active when Shift is held
	if orbType and frame.secure then
		local overlay = CreateFrame("Frame", nil, frame)
		overlay:SetAllPoints(frame)
		overlay:SetFrameLevel(frame.secure:GetFrameLevel() + 1)
		overlay:EnableMouse(false)
		overlay:RegisterForDrag(btnString)
		overlay:SetScript("OnDragStart", function(self)
			local parent = self:GetParent()
			if parent and IsShiftKeyDown() and not InCombatLockdown() then
				parent:StartMoving()
			end
		end)
		overlay:SetScript("OnDragStop", function(self)
			local parent = self:GetParent()
			if parent then
				safeStopMovingOrSizing(parent, function(f)
					if SL32CharacterData and SL32CharacterData[orbType .. "Orb"] then
						local point, _, relativePoint, x, y = f:GetPoint(1)
						if point and x and y then
							SL32CharacterData[orbType .. "Orb"].position = { point = point, relativePoint = relativePoint or point, x = x, y = y }
						end
					end
				end)
			end
		end)
		overlay.orbType = orbType
		frame.dragOverlay = overlay
		table.insert(SL32_OrbDragOverlays, overlay)
	end
end

local function commaFormatValue(val)
	if type(val) ~= "number" then
		val = tonumber(val)
	end
	if type(val) ~= "number" then
		return string.format("%s", val or "")
	end
	local negative = val < 0
	local integer = tostring(math.floor(math.abs(val)))
	local formatted = integer:reverse():gsub("(%d%d%d)", "%1,"):reverse():gsub("^,", "")
	if negative then
		formatted = "-" .. formatted
	end
	return formatted
end

local function resolveFormattingOptions(formatting)
	if formatting and (formatting.truncated ~= nil or formatting.commaSeparated ~= nil) then
		return formatting
	end
	if SL32CharacterData and SL32CharacterData.values then
		return {
			truncated = (SL32CharacterData.values.formatted == true),
			commaSeparated = (SL32CharacterData.values.commaSeparated == true),
		}
	end
	return {truncated = false, commaSeparated = false}
end

local function valueFormat(val, petOverride, formatting)
	if not SL32CanUseValue(val) and type(val) ~= "number" then
		return string.format("%s", val or "")
	end
	formatting = resolveFormattingOptions(formatting)
	local newVal = val
	if formatting.commaSeparated then
		newVal = commaFormatValue(SL32SafeNumber(val, 0))
	elseif formatting.truncated then
		if val > 1000000 then
			newVal = (floor((val/1000000)*10)/10) .."m"
		elseif val > 99999 then
			newVal = (floor((val/1000)*10)/10) .."k"
		end
	end
	if petOverride then
		if val > 10000 then
			newVal = (floor((val/1000)*10)/10).."k"
		end
	end
	return newVal
end

local function formatDisplayValue(val, formatting, petOverride)
	if SL32CanUseValue(val) then
		return valueFormat(val, petOverride, formatting)
	end
	return string.format("%s", val or "")
end

local function applyOrbValueVisibility(orb, orbData)
	if not orb or not orbData then
		return
	end
	-- Percentage disabled
	if orb.font1 then
		orb.font1:SetText("")
		orb.font1:Hide()
	end
	if orbData.font2 and orbData.font2.show == false then
		if orb.font2 then
			orb.font2:SetText("")
			orb.font2:Hide()
		end
		return
	end
	if orb.font2 then
		orb.font2:Show()
		orb.font2:SetFont(SL32CharacterData.font,25,"THINOUTLINE")
		orb.font2:SetPoint("CENTER",0,0)
	end
end

local previousHealthValue = 0
local lastSafeHealth = 1
local lastSafeMaxHealth = 1
local lastSafePower = 1
local lastSafeMaxPower = 1
local lastSafeHealthPercent = nil
local lastSafePowerPercent = nil
local SL32_GALAXY_ALPHA_MULTIPLIER = 0.5
local function monitorHealth(orb)
	local rawMaxHealth = orb.rawMaxHealth or orb.maxHealth
	local rawCurrentHealth = orb.rawCurrentHealth or orb.currentHealth
	if not SL32CanUseValue(rawCurrentHealth) or not SL32CanUseValue(rawMaxHealth) then
		if orb.fillingBar then
			orb.filling:Hide()
			orb.fillingBar:Show()
			orb.fillingBar:SetMinMaxValues(0, rawMaxHealth or 1)
			orb.fillingBar:SetValue(rawCurrentHealth or 0)
		end
		orb.galaxy1:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy2:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy3:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		local fallbackText = formatDisplayValue(rawCurrentHealth, SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.formatting, false)
		applyOrbValueVisibility(orb, SL32CharacterData.healthOrb)
		if orb.font2 and (not (SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.font2 and SL32CharacterData.healthOrb.font2.show == false)) then
			orb.font2:SetText(fallbackText)
		end
		return
	end
	local maxHealth = SL32SafeNumber(rawMaxHealth, 1)
	if maxHealth == 0 then maxHealth = 1 end
	local currentHealth = SL32SafeNumber(rawCurrentHealth, 1)
	previousHealthValue = SL32SafeNumber(previousHealthValue, currentHealth)
	local isDead = orb.isDead
	local healthPercentage = currentHealth/maxHealth
	local inverseHealthPercentage = math.abs(healthPercentage - 1)

	local step = 0
	local onePercentHealth = maxHealth / 100

	local newValue = previousHealthValue
	if previousHealthValue < currentHealth then
		step = 1
		if previousHealthValue + (onePercentHealth * step) > currentHealth then
			newValue = currentHealth
		else
			newValue = previousHealthValue + (onePercentHealth * step)
		end
	elseif previousHealthValue > currentHealth then
		step = -1
		if previousHealthValue + (onePercentHealth * step) < currentHealth then
			newValue = currentHealth
		else
			newValue = previousHealthValue + (onePercentHealth * step)
		end
	end
	previousHealthValue = newValue

	local targetTexHeight = (previousHealthValue/maxHealth * orb.filling:GetWidth())
	if targetTexHeight < 1 then targetTexHeight = 1 end
	local newDisplayPercentage = previousHealthValue/maxHealth
	if newDisplayPercentage > 1 then
		newDisplayPercentage = 1
		targetTexHeight = orb.filling:GetWidth()
	end
	local string = formatDisplayValue(currentHealth, SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.formatting, false)
	applyOrbValueVisibility(orb, SL32CharacterData.healthOrb)
	if orb.font2 and (not (SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.font2 and SL32CharacterData.healthOrb.font2.show == false)) then
		orb.font2:SetText(string)
	end

	if isDead then
		orb.font2:SetText("DEAD :'(")
	end

	if orb.fillingBar then orb.fillingBar:Hide() end
	orb.filling:Show()
	orb.filling:SetHeight(targetTexHeight)
	orb.filling:SetTexCoord(0,1,math.abs(newDisplayPercentage - 1),1)
	orb.galaxy1:SetAlpha(newDisplayPercentage * SL32_GALAXY_ALPHA_MULTIPLIER)
	orb.galaxy2:SetAlpha(newDisplayPercentage * SL32_GALAXY_ALPHA_MULTIPLIER)
	orb.galaxy3:SetAlpha(newDisplayPercentage * SL32_GALAXY_ALPHA_MULTIPLIER)

	applyOrbValueVisibility(orb, SL32CharacterData.healthOrb)
end

local previousPowerValue = 0
local function monitorPower(orb)
	local rawMaxPower = orb.rawMaxPower or orb.maxPower
	local rawCurrentPower = orb.rawCurrentPower or orb.currentPower
	if not SL32CanUseValue(rawCurrentPower) or not SL32CanUseValue(rawMaxPower) then
		if orb.fillingBar then
			orb.filling:Hide()
			orb.fillingBar:Show()
			orb.fillingBar:SetMinMaxValues(0, rawMaxPower or 1)
			orb.fillingBar:SetValue(rawCurrentPower or 0)
		end
		orb.galaxy1:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy2:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy3:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		local fallbackText = formatDisplayValue(rawCurrentPower, SL32CharacterData.manaOrb and SL32CharacterData.manaOrb.formatting, false)
		applyOrbValueVisibility(orb, SL32CharacterData.manaOrb)
		if orb.font2 and (not (SL32CharacterData.manaOrb and SL32CharacterData.manaOrb.font2 and SL32CharacterData.manaOrb.font2.show == false)) then
			orb.font2:SetText(fallbackText)
		end
		return
	end
	local maxPower = SL32SafeNumber(rawMaxPower, 1)
	if maxPower == 0 then maxPower = 1 end
	local currentPower = SL32SafeNumber(rawCurrentPower, 1)
	previousPowerValue = SL32SafeNumber(previousPowerValue, currentPower)
	local isDead = orb.isDead
	local powerPercentage = currentPower/maxPower
	local inversePowerPercentage = math.abs(powerPercentage - 1)

	local step = 0
	local fillPercentage = 100
	local onePercentPower = maxPower / fillPercentage

	local newValue = previousPowerValue
	if previousPowerValue < currentPower then
		step = 1
		if previousPowerValue + (onePercentPower * step) > currentPower then
			newValue = currentPower
		else
			newValue = previousPowerValue + (onePercentPower * step)
		end
	elseif previousPowerValue > currentPower then
		step = -1
		if previousPowerValue + (onePercentPower * step) < currentPower then
			newValue = currentPower
		else
			newValue = previousPowerValue + (onePercentPower * step)
		end
	end
	previousPowerValue = newValue

	local targetTexHeight = (previousPowerValue/maxPower * orb.filling:GetWidth())
	if targetTexHeight < 1 then targetTexHeight = 1 end
	local newDisplayPercentage = previousPowerValue / maxPower
	if newDisplayPercentage > 1 then
		newDisplayPercentage = 1
		targetTexHeight = orb.filling:GetWidth()
	end
	local string = formatDisplayValue(currentPower, SL32CharacterData.manaOrb and SL32CharacterData.manaOrb.formatting, false)
	applyOrbValueVisibility(orb, SL32CharacterData.manaOrb)
	if orb.font2 and (not (SL32CharacterData.manaOrb and SL32CharacterData.manaOrb.font2 and SL32CharacterData.manaOrb.font2.show == false)) then
		orb.font2:SetText(string)
	end

	if isDead then
		orb.font2:SetText("DEAD :'(")
	end

	if orb.fillingBar then orb.fillingBar:Hide() end
	orb.filling:Show()
	orb.filling:SetHeight(targetTexHeight)
	orb.filling:SetTexCoord(0,1,math.abs(newDisplayPercentage-1),1)
	orb.galaxy1:SetAlpha(newDisplayPercentage * SL32_GALAXY_ALPHA_MULTIPLIER)
	orb.galaxy2:SetAlpha(newDisplayPercentage * SL32_GALAXY_ALPHA_MULTIPLIER)
	orb.galaxy3:SetAlpha(newDisplayPercentage * SL32_GALAXY_ALPHA_MULTIPLIER)

	applyOrbValueVisibility(orb, SL32CharacterData.manaOrb)
end

local previousPetHealth = 0
local lastSafePetHealth = 0
local lastSafePetMaxHealth = 1
local lastSafePetPower = 0
local lastSafePetMaxPower = 1
local lastSafePetHealthPercent = nil
local lastSafePetPowerPercent = nil
local function PetHealthUpdate(orb)
	local rawMaxHealth = orb.rawPetMaxHealth or orb.petMaxHealth
	local rawCurrentHealth = orb.rawPetCurrentHealth or orb.petCurrentHealth
	if not SL32CanUseValue(rawCurrentHealth) or not SL32CanUseValue(rawMaxHealth) then
		if orb.filling1Bar then
			orb.filling1:Hide()
			orb.filling1Bar:Show()
			orb.filling1Bar:SetMinMaxValues(0, rawMaxHealth or 1)
			orb.filling1Bar:SetValue(rawCurrentHealth or 0)
		end
		orb.galaxy1:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy2:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy3:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.font1:SetText(string.format("%s", rawCurrentHealth or ""))
		orb.font3:SetText("")
		return
	end
	local maxHealth = SL32SafeNumber(rawMaxHealth, 1)
	if maxHealth == 0 then maxHealth = 1 end
	local currentHealth = SL32SafeNumber(rawCurrentHealth, 0)
	previousPetHealth = SL32SafeNumber(previousPetHealth, currentHealth)
	local healthPercentage = currentHealth/maxHealth
	local inverseHealthPercentage = math.abs(healthPercentage - 1)

	local step = 0
	local onePercentHealth = maxHealth / 100

	local newValue = previousPetHealth
	if previousPetHealth < currentHealth then
		step = 1
		if previousPetHealth + (onePercentHealth * step) > currentHealth then
			newValue = currentHealth
		else
			newValue = previousPetHealth + (onePercentHealth * step)
		end
	elseif previousPetHealth > currentHealth then
		step = -1
		if previousPetHealth + (onePercentHealth * step) < currentHealth then
			newValue = currentHealth
		else
			newValue = previousPetHealth + (onePercentHealth * step)
		end
	end
	previousPetHealth = newValue

	local targetTexHeight = (previousPetHealth/maxHealth * (85 * orb:GetScale()))
	if targetTexHeight < 1 then targetTexHeight = 1 end
	local newDisplayPercentage = previousPetHealth/maxHealth
	if newDisplayPercentage > 1 then
		newDisplayPercentage = 0
		targetTexHeight = 1
	end
	-- Pet orb: show value in the big (font1) field only; percentages disabled
	local valueStr = valueFormat(currentHealth, true, SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.formatting)
	orb.font1:SetText(valueStr)
	orb.font3:SetText("")

	if orb.filling1Bar then orb.filling1Bar:Hide() end
	orb.filling1:Show()
	orb.filling1:SetHeight(targetTexHeight)
	orb.filling1:SetTexCoord(0,1,math.abs(newDisplayPercentage - 1),1)
	orb.galaxy1:SetAlpha(newDisplayPercentage * 0.2)
	orb.galaxy2:SetAlpha(newDisplayPercentage * 0.2)
	orb.galaxy3:SetAlpha(newDisplayPercentage * 0.2)
end

local previousPetPower = 0
local function PetPowerUpdate(orb)
	local rawMaxPower = orb.rawPetMaxPower or orb.petMaxPower
	local rawCurrentPower = orb.rawPetCurrentPower or orb.petCurrentPower
	if not SL32CanUseValue(rawCurrentPower) or not SL32CanUseValue(rawMaxPower) then
		if orb.filling2Bar then
			orb.filling2:Hide()
			orb.filling2Bar:Show()
			orb.filling2Bar:SetMinMaxValues(0, rawMaxPower or 1)
			orb.filling2Bar:SetValue(rawCurrentPower or 0)
		end
		orb.galaxy1:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy2:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.galaxy3:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
		orb.font2:SetText(string.format("%s", rawCurrentPower or ""))
		orb.font4:SetText("")
		return
	end
	local maxPower = SL32SafeNumber(rawMaxPower, 1)
	if maxPower == 0 then maxPower = 1 end
	local currentPower = SL32SafeNumber(rawCurrentPower, 0)
	previousPetPower = SL32SafeNumber(previousPetPower, currentPower)
	local powerPercentage = currentPower/maxPower
	local inversePowerPercentage = math.abs(powerPercentage - 1)

	local step = 0
	local fillPercentage = 100
	local onePercentPower = maxPower / fillPercentage

	local newValue = previousPetPower
	if previousPetPower < currentPower then
		step = 1
		if previousPetPower + (onePercentPower * step) > currentPower then
			newValue = currentPower
		else
			newValue = previousPetPower + (onePercentPower * step)
		end
	elseif previousPetPower > currentPower then
		step = -1
		if previousPetPower + (onePercentPower * step) < currentPower then
			newValue = currentPower
		else
			newValue = previousPetPower + (onePercentPower * step)
		end
	end
	previousPetPower = newValue

	local targetTexHeight = (previousPetPower/maxPower * (85 * orb:GetScale()))
	if targetTexHeight < 1 then targetTexHeight = 1 end
	local newDisplayPercentage = previousPetPower / maxPower
	if newDisplayPercentage > 1 then
		newDisplayPercentage = 0
		targetTexHeight = 1
	end
	-- Pet orb: show value in the big (font2) field only; percentages disabled
	local valueStr = valueFormat(currentPower, true, SL32CharacterData.manaOrb and SL32CharacterData.manaOrb.formatting)
	orb.font2:SetText(valueStr)
	orb.font4:SetText("")	

	if orb.filling2Bar then orb.filling2Bar:Hide() end
	orb.filling2:Show()
	orb.filling2:SetHeight(targetTexHeight)
	orb.filling2:SetTexCoord(0,1,math.abs(newDisplayPercentage-1),1)
end

local function updatePetValues(orb)
	PetHealthUpdate(orb)
	PetPowerUpdate(orb)
end

local function CreateGalaxy(orb, file, duration,size,x,y)
	local galaxy = CreateFrame("Frame",nil,orb)
	galaxy:SetHeight(size)
	galaxy:SetWidth(size)
	galaxy:SetPoint("Center",x,y)
	galaxy:SetFrameLevel(4)

	local galTex = galaxy:CreateTexture()
	galTex:SetAllPoints(galaxy)
	galTex:SetTexture(file)
	galTex:SetBlendMode("ADD")
	galTex:SetAlpha(SL32_GALAXY_ALPHA_MULTIPLIER)
	galaxy.texture = galTex
	
	local animGroup = galaxy:CreateAnimationGroup()
	galaxy.animGroup = animGroup

	local anim1 = galaxy.animGroup:CreateAnimation("Rotation")
	anim1:SetDegrees(360)
	anim1:SetDuration(duration)
	galaxy.animGroup.anim1 = anim1

	animGroup:Play()
	animGroup:SetLooping("REPEAT")
	
	return galaxy
end 

local function CreateGlow(orb)
	local glow = CreateFrame("PlayerModel",nil, orb)
	glow:SetFrameStrata("BACKGROUND")
	glow:SetFrameLevel(5)
	glow:SetAllPoints(orb)
	local function safeSetModel(modelPath)
		if not modelPath or modelPath == "" then
			return false
		end
		if C_ModelInfo and C_ModelInfo.GetModelFileIDFromPath then
			local fileId = C_ModelInfo.GetModelFileIDFromPath(modelPath)
			if not fileId or fileId == 0 then
				return false
			end
		end
		return pcall(glow.SetModel, glow, modelPath)
	end

	if not safeSetModel(orbClassColors[charClassNumber].animation) then
		glow:Hide()
	end
	glow:SetAlpha(1)
	glow:SetScript("OnShow",function()
		if not safeSetModel(orbClassColors[charClassNumber].animation) then
			glow:Hide()
			return
		end
		glow:SetModelScale(1)
		glow:SetPosition(0,0,0)
	end)
	orb.glow = glow
end

local function menu()
	ToggleDropDownMenu(1, nil,"PlayerFrameDropDown", "cursor", 0, 0)
end

--orb creation experiment
local function CreateOrb(parent,name,size,fillTexture,galaxyTexture,offsetX,offsetY,relativePoint,monitorFunc)
	local orb
	orb = CreateFrame("Frame",name,UIParent)
	orb:SetHeight(size)
	orb:SetWidth(size)
	orb:SetFrameStrata("LOW")
	orb.bg = orb:CreateTexture(nil,"OVERLAY")
	orb.bg:SetTexture(images .. "orb_gloss3.tga")
	orb.bg:SetAllPoints(orb)
	orb.filling = orb:CreateTexture(nil,"BACKGROUND")
	orb.filling:SetTexture(images..fillTexture)
	orb.filling:SetPoint("BOTTOMLEFT",3,3)
	orb.filling:SetWidth(defaultOrbSize - 6)
	orb.filling:SetHeight(defaultOrbSize - 6)
	orb.filling:SetAlpha(1)
	orb.fillingBar = CreateFrame("StatusBar", nil, orb)
	orb.fillingBar:SetPoint("BOTTOMLEFT",3,3)
	orb.fillingBar:SetSize(defaultOrbSize - 6, defaultOrbSize - 6)
	orb.fillingBar:SetOrientation("VERTICAL")
	orb.fillingBar:SetStatusBarTexture(images..fillTexture)
	orb.fillingBar:SetMinMaxValues(0, 1)
	orb.fillingBar:SetValue(1)
	orb.fillingBar:Hide()
	orb.fillingBarText = orb.fillingBar:CreateFontString(nil, "OVERLAY")
	orb.fillingBarText:SetFont(SL32CharacterData.font,28,"THINOUTLINE")
	orb.fillingBarText:SetPoint("CENTER",0,15)
	local orbGlossHolder = CreateFrame("Frame",nil,orb)
	orbGlossHolder:SetAllPoints(orb)
	orbGlossHolder:SetFrameStrata("BACKGROUND")
	local orbGlossOverlay = orbGlossHolder:CreateTexture(nil,"BACKGROUND")
	orbGlossOverlay:SetTexture(images .. "orb_gloss3.tga")
	orbGlossOverlay:SetAllPoints(orbGlossHolder)
	local newRand = math.random(20,50)
	orb.galaxy1 = CreateGalaxy(orb, images..galaxyTexture.."1.tga",newRand,defaultOrbSize-5,0,0)
	newRand = math.random(30,70)
	orb.galaxy2 = CreateGalaxy(orb,images..galaxyTexture.."2.tga", newRand,defaultOrbSize-5,0,0)
	newRand = math.random(18,27)
	orb.galaxy3 = CreateGalaxy(orb,images..galaxyTexture.."3.tga", newRand,defaultOrbSize-5,0,0)
	orb.updateFrame = CreateFrame("Frame", nil, UIParent)
	orb.updateFrame:SetScript("OnUpdate", function()
		if monitorFunc then
			monitorFunc(orb)
		end
	end)
	orb.fontHolder = CreateFrame("FRAME",nil,orb)
	orb.fontHolder:SetFrameStrata("MEDIUM")
	orb.fontHolder:SetAllPoints(orb)
	orb.font1 = orb.fontHolder:CreateFontString(nil, "OVERLAY")
	orb.font1:SetFont(SL32CharacterData.font,28,"THINOUTLINE")
	orb.font1:SetPoint("CENTER",0,15)
	orb.font2 = orb.fontHolder:CreateFontString(nil,"OVERLAY")
	orb.font2:SetFont(SL32CharacterData.font,16,"THINOUTLINE")
	orb.font2:SetPoint("CENTER",0,-5)
	
	--position defaults
	orb:ClearAllPoints()
	orb:SetPoint(relativePoint,nil,relativePoint,offsetX,offsetY)
	
	--show the orb
	orb:Show()

	--fill the orb with colors! WOO!
	orb.filling:SetVertexColor(1,1,1,1)
	orb.currentHealth = 1
	orb.maxHealth = 1
	orb.currentPower = 1
	orb.maxPower = 1
	orb.isDead = false

	--secure click overlay for targeting/menu
	orb.secure = CreateFrame("Button", name.."Secure", orb, "SecureActionButtonTemplate")
	orb.secure:SetAllPoints(orb)
	orb.secure:RegisterForClicks("AnyUp")
	orb.secure:SetAttribute("type1","target")
	orb.secure:SetAttribute("type2","togglemenu")
	orb.secure:SetAttribute("unit","player")
	orb.secure.menu = function(self) ToggleDropDownMenu(1, 1, PlayerFrameDropDown, "cursor", 0 ,0) end
	orb.tooltip = CreateFrame("GameTooltip","PlayerTooltip",nil,"GameToolTipTemplate")
	orb.secure:SetScript("OnEnter", function()
		GameTooltip_SetDefaultAnchor(GameTooltip,UIParent)
		GameTooltip:SetUnit("player")
		GameTooltip:Show()
	end)
	orb.secure:SetScript("OnLeave",function()
		GameTooltip:Hide()
	end)


	--place setup the appropriate character events on the health orb
	return orb
end

local function CreatePetOrb(parent,name,size,offsetX,offsetY,monitorFunc)
	local orb
	orb = CreateFrame("Frame",name,parent)
	orb:SetHeight(size)
	orb:SetWidth(size)
	orb:SetFrameStrata("BACKGROUND")
	orb.bg = orb:CreateTexture(nil,"OVERLAY")
	orb.bg:SetTexture(images .. "orb_gloss3.tga")
	orb.bg:SetAllPoints(orb)
	orb.filling1 = orb:CreateTexture(nil,"BACKGROUND")
	orb.filling1:SetTexture(images.."petFilling_health.tga")
	orb.filling1:SetPoint("BOTTOMLEFT",3,0)
	orb.filling1:SetWidth(size / 2 - 3)
	orb.filling1:SetHeight(size - 6)
	orb.filling1:SetAlpha(1)
	orb.filling1Bar = CreateFrame("StatusBar", nil, orb)
	orb.filling1Bar:SetPoint("BOTTOMLEFT",3,0)
	orb.filling1Bar:SetSize(size / 2 - 3, size - 6)
	orb.filling1Bar:SetOrientation("VERTICAL")
	orb.filling1Bar:SetStatusBarTexture(images.."petFilling_health.tga")
	orb.filling1Bar:SetMinMaxValues(0, 1)
	orb.filling1Bar:SetValue(1)
	orb.filling1Bar:Hide()
	orb.filling1BarText = orb.filling1Bar:CreateFontString(nil, "OVERLAY")
	orb.filling1BarText:SetFont(SL32CharacterData.font,14,"THINOUTLINE")
	orb.filling1BarText:SetPoint("CENTER",-20,5)
	orb.filling2 = orb:CreateTexture(nil,"BACKGROUND")
	orb.filling2:SetTexture(images.."petFilling_power.tga")
	orb.filling2:SetPoint("BOTTOMRIGHT",-3,0)
	orb.filling2:SetWidth(size / 2 - 3)
	orb.filling2:SetHeight(size - 6)
	orb.filling2:SetAlpha(1)
	orb.filling2Bar = CreateFrame("StatusBar", nil, orb)
	orb.filling2Bar:SetPoint("BOTTOMRIGHT",-3,0)
	orb.filling2Bar:SetSize(size / 2 - 3, size - 6)
	orb.filling2Bar:SetOrientation("VERTICAL")
	orb.filling2Bar:SetStatusBarTexture(images.."petFilling_power.tga")
	orb.filling2Bar:SetMinMaxValues(0, 1)
	orb.filling2Bar:SetValue(1)
	orb.filling2Bar:Hide()
	orb.filling2BarText = orb.filling2Bar:CreateFontString(nil, "OVERLAY")
	orb.filling2BarText:SetFont(SL32CharacterData.font,14,"THINOUTLINE")
	orb.filling2BarText:SetPoint("CENTER",20,5)
	local orbGlossHolder = CreateFrame("Frame",nil,orb)
	orbGlossHolder:SetAllPoints(orb)
	orbGlossHolder:SetFrameStrata("LOW")
	local orbGlossOverlay = orbGlossHolder:CreateTexture(nil,"BACKGROUND")
	orbGlossOverlay:SetTexture(images .. "orb_gloss3.tga")
	orbGlossOverlay:SetAllPoints(orbGlossHolder)
	
	orb.divider = CreateFrame("Frame",nil,orb)
	orb.divider.texture = orb.divider:CreateTexture(nil,"OVERLAY")
	orb.divider.texture:SetTexture(images.."middleBar.tga")
	orb.divider:SetAllPoints(true)
	orb.divider.texture:SetAllPoints(true)
	orb.galaxy1 = CreateGalaxy(orb, SL32RotationTextureChoices[1].."1.tga",36,size-8,0,0)
	orb.galaxy2 = CreateGalaxy(orb, SL32RotationTextureChoices[1].."2.tga", 22,size-8,0,0)
	orb.galaxy3 = CreateGalaxy(orb, SL32RotationTextureChoices[1].."3.tga", 29,size-8,0,0)
	orb.galaxy1:SetAlpha(0.3)
	orb.galaxy2:SetAlpha(0.3)
	orb.galaxy3:SetAlpha(0.3)
	-- Don't create glow for pet orb - the PlayerModel can cause white box issues
	-- CreateGlow(orb)
	
	orb.fontHolder = CreateFrame("FRAME",nil,orb)
	orb.fontHolder:SetFrameStrata("MEDIUM")
	orb.fontHolder:SetAllPoints(orb)
	orb.font1 = orb.fontHolder:CreateFontString(nil, "OVERLAY")
	orb.font1:SetFont(SL32CharacterData.font,14,"THINOUTLINE")
	orb.font1:SetPoint("CENTER",-20,5)
	orb.font1:SetText("100")
	orb.font2 = orb.fontHolder:CreateFontString(nil,"OVERLAY")
	orb.font2:SetFont(SL32CharacterData.font,14,"THINOUTLINE")
	orb.font2:SetPoint("CENTER",20,5)
	orb.font2:SetText("100")
	orb.font3 = orb.fontHolder:CreateFontString(nil, "OVERLAY")
	orb.font3:SetFont(SL32CharacterData.font,9,"THINOUTLINE")
	orb.font3:SetPoint("CENTER",-20,-8)
	orb.font3:SetText("100")
	orb.font4 = orb.fontHolder:CreateFontString(nil,"OVERLAY")
	orb.font4:SetFont(SL32CharacterData.font,9,"THINOUTLINE")
	orb.font4:SetPoint("CENTER",20,-8)
	orb.font4:SetText("100")
	
	orb.updateFrame = CreateFrame("Frame", nil, UIParent)
	orb.updateFrame:SetScript("OnUpdate", function()
		updatePetValues(orb)
	end)
	
	--position defaults (UIParent = per-orb positioning; else anchored to parent e.g. healthOrb)
	orb:ClearAllPoints()
	if parent == UIParent then
		orb:SetPoint("BOTTOM", parent, "BOTTOM", offsetX, offsetY)
	else
		orb:SetPoint("CENTER", parent, "CENTER", offsetX, offsetY)
	end

	--show the orb
	orb:Show()

	--fill the orb with colors! WOO!
	local r, g, b, a = healthOrb.filling:GetVertexColor()
	orb.filling1:SetVertexColor(r or 1, g or 1, b or 1, a or 1)
	r, g, b, a = manaOrb.filling:GetVertexColor()
	orb.filling2:SetVertexColor(r or 1, g or 1, b or 1, a or 1)
	orb.petCurrentHealth = 0
	orb.petMaxHealth = 1
	orb.petCurrentPower = 0
	orb.petMaxPower = 1
	
	orb.secure = CreateFrame("Button", name.."Secure", orb, "SecureActionButtonTemplate")
	orb.secure:SetAllPoints(orb)
	orb.secure:RegisterForClicks("AnyUp")
	orb.secure:SetAttribute("type1","target")
	orb.secure:SetAttribute("type2","menu")
	orb.secure:SetAttribute("unit","pet")
	orb.secure.menu = function(self) ToggleDropDownMenu(1, 1, PetFrameDropDown, "cursor", 0 ,0) end
	orb.tooltip = CreateFrame("GameTooltip","PetToolTip",nil,"GameToolTipTemplate")
	orb.secure:SetScript("OnEnter", function()
		GameTooltip_SetDefaultAnchor(GameTooltip,UIParent)
		GameTooltip:SetUnit("pet")
		GameTooltip:Show()
	end)
	orb.secure:SetScript("OnLeave",function()
		GameTooltip:Hide()
	end)

	SL32_RegisterUnitWatch(orb.secure)
	orb.secure:SetScript("OnShow", function() orb:Show() end)
	orb.secure:SetScript("OnHide", function() orb:Hide() end)

	--place setup the appropriate character events on the health orb
	return orb
end

local function CreateXMLOrb(parent,name,size,fillTexture,galaxyTexture)
	local orb
	orb = CreateFrame("Button",name,parent,nil)
	orb:SetHeight(size)
	orb:SetWidth(size)
	orb:SetFrameStrata("HIGH")
	orb.bg = orb:CreateTexture(nil,"OVERLAY")
	orb.bg:SetTexture(images .. "orb_gloss3.tga")
	orb.bg:SetAllPoints(orb)
	orb.filling = orb:CreateTexture(nil,"BACKGROUND")
	orb.filling:SetTexture(images..fillTexture)
	orb.filling:SetPoint("BOTTOMLEFT",3,3)
	orb.filling:SetWidth(size - 6)
	orb.filling:SetHeight(size-6)
	orb.filling:SetAlpha(1)
	local orbGlossHolder = CreateFrame("Frame",nil,orb)
	orbGlossHolder:SetAllPoints(orb)
	orbGlossHolder:SetFrameStrata("LOW")
	local orbGlossOverlay = orbGlossHolder:CreateTexture(nil,"BACKGROUND")
	orbGlossOverlay:SetTexture(images .. "orb_gloss3.tga")
	orbGlossOverlay:SetAllPoints(orbGlossHolder)
	local newRand = math.random(20,50)
	orb.galaxy1 = CreateGalaxy(orb, images..galaxyTexture.."1.tga",newRand,size-3,0,0)
	newRand = math.random(30,70)
	orb.galaxy2 = CreateGalaxy(orb,images..galaxyTexture.."2.tga", newRand,size-3,0,0)
	newRand = math.random(18,27)
	orb.galaxy3 = CreateGalaxy(orb,images..galaxyTexture.."3.tga", newRand,size-3,0,0)
	
	CreateGlow(orb)
	orb.fontHolder = CreateFrame("FRAME",nil,orb)
	orb.fontHolder:SetFrameStrata("HIGH")
	orb.fontHolder:SetAllPoints(orb)
	orb.font1 = orb.fontHolder:CreateFontString(nil, "OVERLAY")
	orb.font1:SetFont(SL32CharacterData.font,28,"THINOUTLINE")
	orb.font1:SetText("100")
	orb.font1:SetPoint("CENTER",0,15)
	orb.font2 = orb.fontHolder:CreateFontString(nil,"OVERLAY")
	orb.font2:SetFont(SL32CharacterData.font,16,"THINOUTLINE")
	orb.font2:SetText("100000")
	orb.font2:SetPoint("CENTER",0,-5)
	
	--position defaults
	orb:ClearAllPoints()
	orb:SetAllPoints(xmlOrbDisplayFrame2)
	
	--show the orb
	orb:Show()

	--fill the orb with colors! WOO!
	orb.filling:SetVertexColor(1,1,1,1)
	return orb
end

local function addArtwork(file,orb,name,offsetX,offsetY,height,width)
	local art = CreateFrame("Frame","SL32"..name,orb)
	art:SetPoint("CENTER",offsetX,offsetY)
	art:SetHeight(height)
	art:SetWidth(width)
	art:SetFrameStrata("MEDIUM")
	art.texture = art:CreateTexture(nil,"OVERLAY")
	art.texture:SetTexture(file)
	art.texture:SetAllPoints(art)
	return art
end

function SL32SetGlobalScale(val)
	val = val/100
	healthOrb:SetScale(val)
	SL32CharacterData.healthOrb.scale = val
	manaOrb:SetScale(val)
	SL32CharacterData.manaOrb.scale = val
end

function SL32SetOrbScale(orbType, val)
	val = val/100
	if orbType == "health" then
		healthOrb:SetScale(val)
		SL32CharacterData.healthOrb.scale = val
	elseif orbType == "mana" then
		manaOrb:SetScale(val)
		SL32CharacterData.manaOrb.scale = val
	elseif orbType == "pet" then
		petOrb:SetScale(val)
		SL32CharacterData.petOrb.scale = val
	end
end

function SL32SetPowerTrackerRotation(degrees)
	if segmentedPowerTracker then
		segmentedPowerTracker:SetRotation(degrees)
		-- Save to account-wide data so all characters share the same position
		if not SL32AccountData then SL32AccountData = {} end
		SL32AccountData.powerTrackerRotation = degrees
	end
end

function SL32SetPowerTrackerScale(val)
	if segmentedPowerTracker then
		segmentedPowerTracker:SetScale(val / 100)
		-- Save to account-wide data so all characters share the same scale
		if not SL32AccountData then SL32AccountData = {} end
		SL32AccountData.powerTrackerScale = val
	end
end

-- Initialize the max stack sound dropdown
function SL32_InitMaxStackSoundDropdown()
	local dropdown = SL32MaxStackSoundDropdown
	if not dropdown then return end
	
	UIDropDownMenu_SetWidth(dropdown, 100)
	UIDropDownMenu_SetButtonWidth(dropdown, 124)
	
	local selectedIndex = SL32CharacterData.powerFrame.maxStackSound or 1
	UIDropDownMenu_SetText(dropdown, SL32_MaxStackSounds[selectedIndex].name)
	
	UIDropDownMenu_Initialize(dropdown, function(self, level)
		for i, sound in ipairs(SL32_MaxStackSounds) do
			local info = UIDropDownMenu_CreateInfo()
			info.text = sound.name
			info.value = i
			info.func = function(self)
				SL32CharacterData.powerFrame.maxStackSound = self.value
				UIDropDownMenu_SetText(dropdown, SL32_MaxStackSounds[self.value].name)
				-- Play preview sound on Master channel for louder volume
				if SL32_MaxStackSounds[self.value].id > 0 then
					PlaySound(SL32_MaxStackSounds[self.value].id, "Master")
				end
			end
			info.checked = (i == (SL32CharacterData.powerFrame.maxStackSound or 1))
			UIDropDownMenu_AddButton(info, level)
		end
	end)
end

-- Menu Background options
SL32_MenuBackgrounds = {
	[1] = {name = "Chicken", file = "CHICKEN_backdrop.tga"},
	[2] = {name = "Sindragosa", file = "Sindragosa.tga"},
	[3] = {name = "Lich King", file = "Lich_King.tga"},
	[4] = {name = "Lich King 2", file = "Lich_King_2.tga"},
	[5] = {name = "Illidan", file = "Illidan.tga"},
	[6] = {name = "Deathwing", file = "Deathwing.tga"},
	[7] = {name = "Alliance", file = "Alliance.tga"},
	[8] = {name = "Horde", file = "Horde.tga"},
}

function SL32_InitMenuBackgroundDropdown()
	local dropdown = SL32MenuBackgroundDropdown
	if not dropdown then return end
	
	UIDropDownMenu_SetWidth(dropdown, 120)
	UIDropDownMenu_SetButtonWidth(dropdown, 144)
	
	local selectedIndex = SL32AccountData and SL32AccountData.menuBackground or 1
	UIDropDownMenu_SetText(dropdown, SL32_MenuBackgrounds[selectedIndex].name)
	
	UIDropDownMenu_Initialize(dropdown, function(self, level)
		for i, bg in ipairs(SL32_MenuBackgrounds) do
			local info = UIDropDownMenu_CreateInfo()
			info.text = bg.name
			info.value = i
			info.func = function(self)
				if not SL32AccountData then SL32AccountData = {} end
				SL32AccountData.menuBackground = self.value
				UIDropDownMenu_SetText(dropdown, SL32_MenuBackgrounds[self.value].name)
				SL32_SetMenuBackground(self.value)
			end
			info.checked = (i == (SL32AccountData and SL32AccountData.menuBackground or 1))
			UIDropDownMenu_AddButton(info, level)
		end
	end)
end

function SL32_SetMenuBackground(index)
	local bg = SL32_MenuBackgrounds[index]
	if bg and SL32GUIBackground then
		SL32GUIBackground:SetTexture("Interface\\AddOns\\SLDiabloOrbs\\images\\"..bg.file)
	end
	if bg and SL32ConfigBackground then
		SL32ConfigBackground:SetTexture("Interface\\AddOns\\SLDiabloOrbs\\images\\"..bg.file)
	end
	if bg and SL32PreviewBackground then
		SL32PreviewBackground:SetTexture("Interface\\AddOns\\SLDiabloOrbs\\images\\"..bg.file)
	end
	-- Set border color based on background
	-- Chicken = white, Sindragosa/Lich King/Lich King 2 = purple, Illidan = yellow, Deathwing = red, Alliance = blue, Horde = red
	local borderColors = {
		[1] = {r = 1, g = 1, b = 1},           -- Chicken = white
		[2] = {r = 0.8, g = 0.3, b = 1},       -- Sindragosa = purple
		[3] = {r = 0.8, g = 0.3, b = 1},       -- Lich King = purple
		[4] = {r = 0.8, g = 0.3, b = 1},       -- Lich King 2 = purple
		[5] = {r = 1, g = 1, b = 0.3},         -- Illidan = yellow
		[6] = {r = 1, g = 0.3, b = 0.3},       -- Deathwing = red
		[7] = {r = 0.3, g = 0.5, b = 1},       -- Alliance = blue
		[8] = {r = 1, g = 0.3, b = 0.3},       -- Horde = red
	}
	local color = borderColors[index] or {r = 1, g = 1, b = 1}
	SL32_SetBorderColor(color.r, color.g, color.b)
end

function SL32MonitorPowers(frame)
	if not powerFrame or not powerFrame.text then return end
	local powerType
	powerFrame.text:SetPoint("CENTER",-1,0)
	if SL32className == "Warlock" then
		if not SL32_IS_CATA_OR_LATER then
			-- Pre-Cata warlocks don't have these resource types
			frame.backDrop:Hide()
			frame.text:Hide()
			return
		end
		local maxResource = 0
		if SL32_IS_RETAIL then
			-- Retail: all specs use Soul Shards (max 5)
			powerType = SL32_POWER_SOUL_SHARDS
			maxResource = 5
		else
			local usable, nomana = IsUsableSpell("Metamorphosis")
			if usable or (not usable and nomana) then
				powerType = SL32_IS_MOP_OR_LATER and 15 or nil
				maxResource = 1000
			end
			usable, nomana = IsUsableSpell("Chaos Bolt")
			if usable or (not usable and nomana) then
				powerType = SL32_IS_MOP_OR_LATER and 14 or nil
				maxResource = 3
			end
			usable, nomana = IsUsableSpell("Soulburn")
			if usable or (not usable and nomana) then
				powerType = SL32_POWER_SOUL_SHARDS
				maxResource = 3
			end
		end
		if not powerType then
			frame.backDrop:Hide()
			frame.text:Hide()
			return
		end
		local numShards = SL32_UnitPower("player",powerType)
		if SL32_IS_MOP_OR_LATER and powerType == 14 then
			numShards = (SL32_UnitPower("player",powerType,true)/10)
		end
		if numShards > 0 then
			if not frame.backDrop:IsVisible() then
				frame.backDrop:Show()
				frame.text:Show()
			end
		else
			if frame.backDrop:IsVisible() then
				frame.backDrop:Hide()
				frame.text:Hide()
			end
		end
		if numShards > 999 then
			powerFrame.text:SetFont(SL32CharacterData.font,15,"THINOUTLINE")
		elseif numShards > 99 then
			powerFrame.text:SetFont(SL32CharacterData.font,18,"THINOUTLINE")
		elseif numShards > 9 then
			powerFrame.text:SetFont(SL32CharacterData.font,24,"THINOUTLINE")
		else
			powerFrame.text:SetFont(SL32CharacterData.font,26,"THINOUTLINE")
		end
		frame.text:SetText(numShards)
		if numShards > 1 then
			powerFrame.text:SetPoint("CENTER",1,0)
		else
			powerFrame.text:SetPoint("CENTER",0,0)
		end
		if numShards >= maxResource then
			powerFrame.fontHolder.animGroup:Play()
		else
			powerFrame.fontHolder.animGroup:Stop()
		end
	elseif SL32className == "Paladin" then
		if not SL32_IS_CATA_OR_LATER or not SL32_POWER_HOLY_POWER then
			frame.backDrop:Hide()
			frame.text:Hide()
			return
		end
		powerType = SL32_POWER_HOLY_POWER
		local numHolyPower = SL32_UnitPower("player",powerType)
		if numHolyPower > 0 then
			if not frame.backDrop:IsVisible() then
				frame.backDrop:Show()
				frame.text:Show()
			end
		else
			if frame.backDrop:IsVisible() then
				frame.backDrop:Hide()
				frame.text:Hide()
			end
		end
		frame.text:SetText(numHolyPower)
		if numHolyPower > 1 then
			powerFrame.text:SetPoint("CENTER",1,0)
		end
		local maxHolyPower = SL32_UnitPowerMax("player", powerType) or 3
		if numHolyPower >= maxHolyPower then
			powerFrame.fontHolder.animGroup:Play()
		else
			powerFrame.fontHolder.animGroup:Stop()
		end
	elseif SL32className == "Monk" then
		if not SL32_IS_MOP_OR_LATER or not SL32_POWER_CHI then
			frame.backDrop:Hide()
			frame.text:Hide()
			return
		end
		powerType = SL32_POWER_CHI
		local numHolyPower = SL32_UnitPower("player",powerType)
		if numHolyPower > 0 then
			if not frame.backDrop:IsVisible() then
				frame.backDrop:Show()
				frame.text:Show()
			end
		else
			if frame.backDrop:IsVisible() then
				frame.backDrop:Hide()
				frame.text:Hide()
			end
		end
		frame.text:SetText(numHolyPower)
		if numHolyPower > 1 then
			powerFrame.text:SetPoint("CENTER",1,0)
		end
		local maxChi = SL32_UnitPowerMax("player", powerType) or 4
		if numHolyPower >= maxChi then
			powerFrame.fontHolder.animGroup:Play()
		else
			powerFrame.fontHolder.animGroup:Stop()
		end
	elseif SL32className == "Priest" then
		if not SL32_IS_CATA_OR_LATER or not SL32_POWER_SHADOW_ORBS then
			frame.backDrop:Hide()
			frame.text:Hide()
			return
		end
		powerType = SL32_POWER_SHADOW_ORBS
		local numHolyPower = SL32_UnitPower("player",powerType)
		if numHolyPower > 0 then
			if not frame.backDrop:IsVisible() then
				frame.backDrop:Show()
				frame.text:Show()
			end
		else
			if frame.backDrop:IsVisible() then
				frame.backDrop:Hide()
				frame.text:Hide()
			end
		end
		frame.text:SetText(numHolyPower)
		if numHolyPower > 1 then
			powerFrame.text:SetPoint("CENTER",1,0)
		end
		if numHolyPower >=3 then
			powerFrame.fontHolder.animGroup:Play()
		else
			powerFrame.fontHolder.animGroup:Stop()
		end
	elseif SL32className == "Rogue" or SL32className == "Druid" then
		local comboPoints = SL32_GetComboPoints()
		if comboPoints > 0 then
			if not frame.backDrop:IsVisible() then
				frame.backDrop:Show()
				frame.text:Show()
			end
		else
			if frame.backDrop:IsVisible() then
				frame.backDrop:Hide()
				frame.text:Hide()
			end
		end
		frame.text:SetText(comboPoints)
		if comboPoints > 1 then
			powerFrame.text:SetPoint("CENTER",1,0)
		end
		local maxCombo = SL32_UnitPowerMax("player", 4) or 5  -- 4 = ComboPoints
		if comboPoints >= maxCombo then
			powerFrame.fontHolder.animGroup:Play()
		else
			powerFrame.fontHolder.animGroup:Stop()
		end
	elseif SL32className == "Mage" then
		--turns out there is no way to track the ice shards for Mage.  Stubbed for now.
	end

end

-- Segmented Power Tracker using curved arc segments
segmentedPowerTracker = nil  -- Global so XML can access it
local function CreateSegmentedPowerTracker(parentOrb, numSegments, orbSize)
	-- Create container frame, same size as the ring overlay
	local trackerSize = orbSize + 40
	local tracker = CreateFrame("Frame", "SL32SegmentedPowerTracker", parentOrb)
	tracker:SetSize(trackerSize, trackerSize)
	tracker:SetPoint("CENTER", parentOrb, "CENTER", 0, 0)
	tracker:SetFrameLevel(parentOrb:GetFrameLevel() + 1)
	
	tracker.segments = {}
	tracker.backdropSegments = {}
	tracker.numSegments = numSegments
	tracker.baseRotation = 0
	
	-- Get colors with fallback defaults
	local r, g, b = 1, 1, 1
	if SL32CharacterData and SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.orbColor then
		r = SL32CharacterData.healthOrb.orbColor.r or 1
		g = SL32CharacterData.healthOrb.orbColor.g or 1
		b = SL32CharacterData.healthOrb.orbColor.b or 1
	end
	
	-- Textures 1-4 base; 5 for Warlock; 6 for Rogue/Druid/Death Knight
	-- Need ember_segment_5.tga and ember_segment_6.tga (copy+rotate with white bg in Photoshop)
	local function getTexIndex(segmentNum)
		if segmentNum <= 6 then
			return segmentNum  -- Use 1-6
		end
		return ((segmentNum - 1) % 4) + 1  -- Fallback: cycle 1-4
	end
	
	-- Create backdrop segments (grey, always visible)
	for i = 1, numSegments do
		local backdrop = tracker:CreateTexture(nil, "BACKGROUND")
		backdrop:SetSize(trackerSize, trackerSize)
		backdrop:SetPoint("CENTER", tracker, "CENTER", 0, 0)
		local texIndex = getTexIndex(i)
		backdrop:SetTexture("Interface\\AddOns\\SLDiabloOrbs\\images\\ember_segment_"..texIndex..".tga")
		-- Same grey for all unfilled segments so 4 and 5 match
		local bgR, bgG, bgB = 0.3, 0.3, 0.3
		backdrop:SetVertexColor(bgR, bgG, bgB, 0.6)
		backdrop:Show()  -- Always visible
		tracker.backdropSegments[i] = backdrop
	end
	
	-- Create arc-shaped segments (all centered, same rotation = spin together in 2D)
	for i = 1, numSegments do
		local segment = tracker:CreateTexture(nil, "ARTWORK")
		segment:SetSize(trackerSize, trackerSize)
		segment:SetPoint("CENTER", tracker, "CENTER", 0, 0)
		local texIndex = getTexIndex(i)
		segment:SetTexture("Interface\\AddOns\\SLDiabloOrbs\\images\\ember_segment_"..texIndex..".tga")
		segment:SetVertexColor(r, g, b, 1)
		segment:Hide()  -- Start hidden
		tracker.segments[i] = segment
	end
	
	-- Track previous power for sound trigger
	tracker.previousPower = 0
	
	-- Update function - Fill segments based on power
	tracker.UpdateSegments = function(self, currentPower)
		for i = 1, self.numSegments do
			if i <= currentPower then
				self.segments[i]:Show()
			else
				self.segments[i]:Hide()
			end
		end
		
		-- Play sound when reaching max stacks (and wasn't already at max)
		if currentPower >= self.numSegments and self.previousPower < self.numSegments then
			local soundIndex = SL32CharacterData.powerFrame.maxStackSound or 1
			local soundId = SL32_MaxStackSounds[soundIndex] and SL32_MaxStackSounds[soundIndex].id or 0
			if soundId > 0 then
				PlaySound(soundId, "Master")
			end
		end
		self.previousPower = currentPower
	end
	
	-- Update colors function (accepts optional r,g,b or uses class color)
	tracker.UpdateColors = function(self, r, g, b)
		local cr, cg, cb = r, g, b
		if not r then
			-- Use class color
			local currentClassNumber = getClassColor()
			local classColor = orbClassColors[currentClassNumber].health
			cr = classColor.r or 1
			cg = classColor.g or 1
			cb = classColor.b or 1
		end
		for i = 1, self.numSegments do
			self.segments[i]:SetVertexColor(cr, cg, cb, 1)
		end
	end
	
	-- Set rotation (in degrees, clockwise) - per-segment offsets to close gaps
	tracker.SetRotation = function(self, degrees)
		self.baseRotation = degrees
		local radians = -math.rad(degrees)
		local stepInner = 2.5 -- degrees for segments 2-4 (closes gap in 1-4)
		local offset5 = 10   -- segment 5 offset (closes gap with segment 4)
		local step5to6 = 3   -- delta 5→6 (keeping this since 5-6 gap is perfect)
		for i = 1, self.numSegments do
			local offset
			if i >= 6 then
				offset = math.rad(offset5 + step5to6)
			elseif i >= 5 then
				offset = math.rad(offset5)
			elseif i >= 2 then
				offset = math.rad((i - 1) * stepInner)
			else
				offset = 0
			end
			local r = radians + offset
			self.segments[i]:SetRotation(r)
			self.backdropSegments[i]:SetRotation(r)
		end
	end
	
	tracker:Show()
	return tracker
end

-- Segmented power tracker monitor function
function SL32MonitorSegmentedPowers(frame)
	if not SL32CharacterData.powerFrame or not SL32CharacterData.powerFrame.show then
		return
	end
	
	local powerType
	local numPower = 0
	
	if SL32className == "Warlock" then
		if SL32_IS_CATA_OR_LATER then
			if SL32_IS_RETAIL then
				-- Retail: all specs use Soul Shards (Burning Embers/Demonic Fury removed in Legion)
				powerType = SL32_POWER_SOUL_SHARDS
				numPower = SL32_UnitPower("player", powerType)
			else
				-- Pre-Retail: check for Metamorphosis/Demo Fury, Chaos Bolt/Burning Embers, or Soul Shards
				powerType = UnitPowerType("player")
				if powerType == 0 then
					if SL32_IS_MOP_OR_LATER and SL32_UnitPowerMax("player", 14) > 0 then
						powerType = 14  -- Burning Embers
					elseif SL32_IS_MOP_OR_LATER and SL32_UnitPowerMax("player", 11) > 0 then
						powerType = 11  -- Demonic Fury
					else
						powerType = SL32_POWER_SOUL_SHARDS
					end
				end
				numPower = SL32_UnitPower("player", powerType)
			end
		end
	elseif SL32className == "Paladin" then
		if SL32_IS_CATA_OR_LATER and SL32_POWER_HOLY_POWER then
			powerType = SL32_POWER_HOLY_POWER
			numPower = SL32_UnitPower("player", powerType)
		end
	elseif SL32className == "Monk" then
		if SL32_IS_MOP_OR_LATER and SL32_POWER_CHI then
			powerType = SL32_POWER_CHI
			numPower = SL32_UnitPower("player", powerType)
		end
	elseif SL32className == "Rogue" or SL32className == "Druid" then
		numPower = SL32_GetComboPoints()
		segmentedPowerTracker:UpdateSegments(numPower)
		return
	elseif SL32className == "Priest" then
		if SL32_IS_CATA_OR_LATER and not SL32_IS_RETAIL and SL32_POWER_SHADOW_ORBS then
			-- Shadow Orbs removed in Legion; Shadow uses Insanity (bar) in Retail
			powerType = SL32_POWER_SHADOW_ORBS
			numPower = SL32_UnitPower("player", powerType)
		end
	elseif SL32className == "Shaman" then
		if SL32_IS_MOP_OR_LATER and not SL32_IS_RETAIL then
			powerType = 11  -- Maelstrom (bar in Retail; segmented only in MoP)
			numPower = SL32_UnitPower("player", powerType)
		end
	elseif SL32className == "Death Knight" then
		if SL32_POWER_RUNES then
			powerType = SL32_POWER_RUNES
			numPower = SL32_UnitPower("player", powerType)
		end
	elseif SL32className == "Mage" then
		if SL32_IS_RETAIL and SL32_POWER_ARCANE_CHARGES and SL32_UnitPowerMax("player", SL32_POWER_ARCANE_CHARGES) > 0 then
			powerType = SL32_POWER_ARCANE_CHARGES
			numPower = SL32_UnitPower("player", powerType)
		end
	elseif SL32className == "Evoker" then
		if SL32_IS_RETAIL and SL32_POWER_ESSENCE and SL32_UnitPowerMax("player", SL32_POWER_ESSENCE) > 0 then
			powerType = SL32_POWER_ESSENCE
			numPower = SL32_UnitPower("player", powerType)
		end
	end
	
	segmentedPowerTracker:UpdateSegments(numPower)
end

local function createPowerFrame(file,orb,name,offsetX,offsetY,height,width)
	local powerFrame = CreateFrame("Frame","SL32"..name,orb)
	powerFrame:SetFrameStrata("BACKGROUND")
	powerFrame:SetPoint("CENTER",offsetX,offsetY)
	powerFrame:SetHeight(height)
	powerFrame:SetWidth(width)
	
	--gradient backdrop
	powerFrame.backDrop = CreateFrame("Frame","SL32"..name.."Backdrop",powerFrame)
	powerFrame.backDrop:SetAllPoints(true)
	powerFrame.backDrop.backTexture = powerFrame.backDrop:CreateTexture(nil,"BACKGROUND")
	powerFrame.backDrop.backTexture:SetTexture(images.."d32_powerFrame_backdrop.tga")
	powerFrame.backDrop.backTexture:SetAllPoints(powerFrame)
	
	--shadowed frame, colorizable
	powerFrame.texture = powerFrame.backDrop:CreateTexture(nil,"OVERLAY")
	powerFrame.texture:SetTexture(file)
	local orbColor = SL32CharacterData and SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.orbColor
	if orbColor then
		powerFrame.texture:SetVertexColor(orbColor.r or 1, orbColor.g or 1, orbColor.b or 1, orbColor.a or 1)
	else
		powerFrame.texture:SetVertexColor(1, 1, 1, 1)
	end
	powerFrame.texture:SetAllPoints(true)
	
	--fontholder frame for animations
	powerFrame.fontHolder = CreateFrame("Frame",nil,powerFrame)
	powerFrame.fontHolder:SetFrameStrata("LOW")
	powerFrame.fontHolder:SetAllPoints(true)
	
	--text
	powerFrame.text = powerFrame.fontHolder:CreateFontString(nil,"OVERLAY")
	local fontPath = (SL32CharacterData and SL32CharacterData.font) or "Fonts\\FRIZQT__.TTF"
	powerFrame.text:SetFont(fontPath,29,"THINOUTLINE")
	powerFrame.text:SetPoint("CENTER",0,1)
	if orbColor then
		powerFrame.text:SetTextColor(orbColor.r or 1, orbColor.g or 1, orbColor.b or 1, orbColor.a or 1)
	else
		powerFrame.text:SetTextColor(1, 1, 1, 1)
	end
	powerFrame.text:SetText("1")
	
	local animGroup = powerFrame.fontHolder:CreateAnimationGroup()
	powerFrame.fontHolder.animGroup = animGroup
	
	local anim1 = powerFrame.fontHolder.animGroup:CreateAnimation("Alpha")
	anim1:SetFromAlpha(1)
	anim1:SetToAlpha(0)
	anim1:SetOrder(1)
	anim1:SetDuration(.7)
	powerFrame.fontHolder.anim1 = anim1
	
	local anim2 = powerFrame.fontHolder.animGroup:CreateAnimation("Alpha")
	anim2:SetFromAlpha(0)
	anim2:SetToAlpha(1)
	anim2:SetOrder(2)
	anim2:SetDuration(.7)
	powerFrame.fontHolder.anim2 = anim2
	
	animGroup:SetLooping("REPEAT")
	
	
	--updates and wh
	powerFrame:SetScript("OnUpdate",SL32MonitorPowers)
	powerFrame:Show()
	
	return powerFrame
end


function checkPetFontPlacement()
	-- Pet orb: values only in the big (center) field; percentage option disabled; showValue toggles visibility
	petOrb.font1:SetPoint("CENTER", -20, 0)
	petOrb.font2:SetPoint("CENTER", 20, 0)
	petOrb.font1:SetFont(SL32CharacterData.font, 11 * petOrb:GetScale(), "THINOUTLINE")
	petOrb.font2:SetFont(SL32CharacterData.font, 11 * petOrb:GetScale(), "THINOUTLINE")
	petOrb.font3:Hide()
	petOrb.font4:Hide()
	if SL32CharacterData.petOrb.showValue then
		petOrb.font1:Show()
		petOrb.font2:Show()
	else
		petOrb.font1:Hide()
		petOrb.font2:Hide()
	end
end

function setOrbFontPlacement(orb,orbData)
	-- Only show raw value (font2). Percentage (font1) is disabled.
	orbData.font1.show = false
	orb.font1:SetText("")
	orb.font1:Hide()
	if orbData.font2.show then
		orb.font2:Show()
		orb.font2:SetFont(SL32CharacterData.font,25,"THINOUTLINE")
		orb.font2:SetPoint("CENTER",0,0)
	else
		orb.font2:Hide()
	end
end

local function forcePercentageOff()
	if SL32CharacterData and SL32CharacterData.healthOrb and SL32CharacterData.healthOrb.font1 then
		SL32CharacterData.healthOrb.font1.show = false
	end
	if SL32CharacterData and SL32CharacterData.manaOrb and SL32CharacterData.manaOrb.font1 then
		SL32CharacterData.manaOrb.font1.show = false
	end
end

function checkXMLOrbFontPlacement()
	-- Preview only shows raw value (font2). Percentage (font1) disabled.
	xmlOrbDisplayFrame2.orb.font1:SetText("")
	xmlOrbDisplayFrame2.orb.font1:Hide()
	if SL32OrbValueCheckBox:GetChecked() then
		xmlOrbDisplayFrame2.orb.font2:Show()
		xmlOrbDisplayFrame2.orb.font2:SetFont(SL32CharacterData.font,32,"THINOUTLINE")
		xmlOrbDisplayFrame2.orb.font2:SetPoint("CENTER",0,0)
	else
		xmlOrbDisplayFrame2.orb.font2:Hide()
	end
end

function resetXMLTextBoxes()
	SL32OrbPercentageCheckBox:SetChecked(CommitButton.orbData.font1.show)
	SL32OrbValueCheckBox:SetChecked(CommitButton.orbData.font2.show)
end

local function checkDefaultsFromMemory()
	if not SL32CharacterData.healthOrb then SL32CharacterData.healthOrb = defaultsTable.healthOrb end
	if not SL32CharacterData.healthOrb.position then SL32CharacterData.healthOrb.position = defaultOrbPositions.healthOrb end
	if not SL32CharacterData.healthOrb.textures then SL32CharacterData.healthOrb.textures = defaultTextures.healthOrb end
	if not SL32CharacterData.healthOrb.textures.fill then SL32CharacterData.healthOrb.textures.fill = defaultTextures.healthOrb.fill end
	if not SL32CharacterData.healthOrb.textures.rotation then SL32CharacterData.healthOrb.textures.rotation = defaultTextures.healthOrb.rotation end
	if SL32CharacterData.healthOrb.enabled == nil then SL32CharacterData.healthOrb.enabled = true end
	if SL32CharacterData.healthOrb.font1.show == nil then SL32CharacterData.healthOrb.font1.show = defaultsTable.healthOrb.font1.show end
	if SL32CharacterData.healthOrb.font2.show == nil then SL32CharacterData.healthOrb.font2.show = defaultsTable.healthOrb.font2.show end
	if not SL32CharacterData.healthOrb.formatting then SL32CharacterData.healthOrb.formatting = defaultsTable.healthOrb.formatting end
	if not SL32CharacterData.manaOrb then SL32CharacterData.manaOrb = defaultsTable.manaOrb end
	if not SL32CharacterData.manaOrb.position then SL32CharacterData.manaOrb.position = defaultOrbPositions.manaOrb end
	if not SL32CharacterData.manaOrb.textures then SL32CharacterData.manaOrb.textures = defaultTextures.manaOrb end
	if not SL32CharacterData.manaOrb.textures.fill then SL32CharacterData.manaOrb.textures.fill = defaultTextures.manaOrb.fill end
	if not SL32CharacterData.manaOrb.textures.rotation then SL32CharacterData.manaOrb.textures.rotation = defaultTextures.manaOrb.rotation end
	if SL32CharacterData.manaOrb.enabled == nil then SL32CharacterData.manaOrb.enabled = true end
	if SL32CharacterData.manaOrb.font1.show == nil then SL32CharacterData.manaOrb.font1.show = defaultsTable.manaOrb.font1.show end
	if SL32CharacterData.manaOrb.font2.show == nil then SL32CharacterData.manaOrb.font2.show = defaultsTable.manaOrb.font2.show end
	forcePercentageOff()
	if not SL32CharacterData.manaOrb.formatting then SL32CharacterData.manaOrb.formatting = defaultsTable.manaOrb.formatting end
	if not SL32CharacterData.druidColors then SL32CharacterData.druidColors = defaultsTable.druidColors end
	if not SL32CharacterData.combat then SL32CharacterData.combat = defaultsTable.combat end
	if not SL32CharacterData.combat.galaxy then SL32CharacterData.combat.galaxy = defaultsTable.combat.galaxy end
	if not SL32CharacterData.values then SL32CharacterData.values = defaultsTable.values  end
	if not SL32CharacterData.artwork then SL32CharacterData.artwork = defaultsTable.artwork end
	if not SL32CharacterData.font then SL32CharacterData.font = defaultsTable.font end
	if not SL32CharacterData.petOrb then SL32CharacterData.petOrb = defaultsTable.petOrb end
	if not SL32CharacterData.petOrb.position then SL32CharacterData.petOrb.position = defaultOrbPositions.petOrb end
	if not SL32CharacterData.petOrb.scale then SL32CharacterData.petOrb.scale = defaultsTable.petOrb.scale end
	if not SL32CharacterData.powerFrame then SL32CharacterData.powerFrame = defaultsTable.powerFrame end
	if SL32CharacterData.powerFrame.maxStackSound == nil then SL32CharacterData.powerFrame.maxStackSound = defaultsTable.powerFrame.maxStackSound end
	if not SL32CharacterData.defaultPlayerFrame then SL32CharacterData.defaultPlayerFrame = defaultsTable.defaultPlayerFrame end
	
	-- Validate/repair color tables (fix any missing r, g, b, a components)
	local function validateColorTable(colorTable, defaultColor)
		if not colorTable then return defaultColor end
		colorTable.r = colorTable.r or (defaultColor and defaultColor.r) or 1
		colorTable.g = colorTable.g or (defaultColor and defaultColor.g) or 1
		colorTable.b = colorTable.b or (defaultColor and defaultColor.b) or 1
		colorTable.a = colorTable.a or (defaultColor and defaultColor.a) or 1
		return colorTable
	end
	
	-- Repair health orb colors
	SL32CharacterData.healthOrb.orbColor = validateColorTable(SL32CharacterData.healthOrb.orbColor, defaultsTable.healthOrb.orbColor)
	SL32CharacterData.healthOrb.galaxy = validateColorTable(SL32CharacterData.healthOrb.galaxy, defaultsTable.healthOrb.galaxy)
	SL32CharacterData.healthOrb.font1 = validateColorTable(SL32CharacterData.healthOrb.font1, defaultsTable.healthOrb.font1)
	SL32CharacterData.healthOrb.font2 = validateColorTable(SL32CharacterData.healthOrb.font2, defaultsTable.healthOrb.font2)
	
	-- Repair mana orb colors
	SL32CharacterData.manaOrb.orbColor = validateColorTable(SL32CharacterData.manaOrb.orbColor, defaultsTable.manaOrb.orbColor)
	SL32CharacterData.manaOrb.galaxy = validateColorTable(SL32CharacterData.manaOrb.galaxy, defaultsTable.manaOrb.galaxy)
	SL32CharacterData.manaOrb.font1 = validateColorTable(SL32CharacterData.manaOrb.font1, defaultsTable.manaOrb.font1)
	SL32CharacterData.manaOrb.font2 = validateColorTable(SL32CharacterData.manaOrb.font2, defaultsTable.manaOrb.font2)
	
	-- Repair combat colors
	if SL32CharacterData.combat then
		SL32CharacterData.combat.orbColor = validateColorTable(SL32CharacterData.combat.orbColor, defaultsTable.combat.orbColor)
		SL32CharacterData.combat.galaxy = validateColorTable(SL32CharacterData.combat.galaxy, defaultsTable.combat.galaxy)
		SL32CharacterData.combat.font1 = validateColorTable(SL32CharacterData.combat.font1, defaultsTable.combat.font1)
		SL32CharacterData.combat.font2 = validateColorTable(SL32CharacterData.combat.font2, defaultsTable.combat.font2)
	end
	
	-- Initialize account-wide data for power tracker rotation
	if not SL32AccountData then SL32AccountData = {} end
	if SL32AccountData.powerTrackerRotation == nil then SL32AccountData.powerTrackerRotation = 270 end
	if SL32AccountData.powerTrackerScale == nil then SL32AccountData.powerTrackerScale = 100 end
	
	
	if TruncatedValuesCheckButton then TruncatedValuesCheckButton:SetChecked(SL32CharacterData.values.formatted) end
	if ShowArtworkCheckButton then ShowArtworkCheckButton:SetChecked(SL32CharacterData.artwork.show) end
	if UsePetOrbCheckButton then UsePetOrbCheckButton:SetChecked(SL32CharacterData.petOrb.enabled) end
	if TrackCombatCheckButton then TrackCombatCheckButton:SetChecked(SL32CharacterData.combat.enabled) end
	if ShowPetOrbPercentagesCheckButton then ShowPetOrbPercentagesCheckButton:SetChecked(SL32CharacterData.petOrb.showPercentage) end
	if ShowPetOrbValuesCheckButton then ShowPetOrbValuesCheckButton:SetChecked(SL32CharacterData.petOrb.showValue) end
	if UsePowerTrackerCheckButton then UsePowerTrackerCheckButton:SetChecked(SL32CharacterData.powerFrame.show) end
	if ShowBlizzPlayerFrameCheckButton then ShowBlizzPlayerFrameCheckButton:SetChecked(SL32CharacterData.defaultPlayerFrame.show) end
		
	-- Pet orb: always values in big field; checkPetFontPlacement shows font1/font2, hides font3/font4
	checkPetFontPlacement()
	
	-- Apply saved orb positions (per-orb Shift+drag)
	if SL32_ApplyOrbPositions then SL32_ApplyOrbPositions() end

	if not SL32CharacterData.petOrb.enabled then
		if petOrb.secure then
			SL32_UnregisterUnitWatch(petOrb.secure)
			safeHideSecure(petOrb.secure)
		end
		petOrb:Hide()
	end
	if not SL32CharacterData.healthOrb.enabled then
		healthOrb:Hide()
	end
	if not SL32CharacterData.manaOrb.enabled then
		manaOrb:Hide()
	end
	if not SL32CharacterData.artwork.show then
		angelFrame:Hide()
		demonFrame:Hide()
	end
	
	-- Handle segmented power tracker visibility
	if segmentedPowerTracker then
		if not SL32CharacterData.powerFrame.show then
			segmentedPowerTracker:SetScript("OnUpdate", nil)
			segmentedPowerTracker:Hide()
		else
			segmentedPowerTracker:SetScript("OnUpdate", SL32MonitorSegmentedPowers)
			segmentedPowerTracker:Show()
		end
	end
	
	-- Legacy powerFrame handling (if still exists)
	if powerFrame then
		if not SL32CharacterData.powerFrame.show then
			powerFrame:SetScript("OnUpdate",nil)
			powerFrame:Hide()
		end
	end
end

-- Helper function to safely get color values with fallbacks
local function safeColor(colorTable, defaultR, defaultG, defaultB, defaultA)
	if not colorTable then return defaultR or 1, defaultG or 1, defaultB or 1, defaultA or 1 end
	return colorTable.r or defaultR or 1, colorTable.g or defaultG or 1, colorTable.b or defaultB or 1, colorTable.a or defaultA or 1
end

local function setStatusBarColor(bar, r, g, b, a)
	if not bar or not bar.SetStatusBarColor then
		return
	end
	bar:SetStatusBarColor(r or 1, g or 1, b or 1, a or 1)
end

local function updateColorsFromMemory()
	--health orb fill, galaxy and font colors - USE SAVED COLORS
	local r,g,b,a = safeColor(SL32CharacterData.healthOrb.orbColor)
	healthOrb.filling:SetVertexColor(r,g,b,a)
	setStatusBarColor(healthOrb.fillingBar, r, g, b, a)
	r,g,b,a = safeColor(SL32CharacterData.healthOrb.galaxy)
	healthOrb.galaxy1.texture:SetVertexColor(r,g,b,a)
	healthOrb.galaxy2.texture:SetVertexColor(r,g,b,a)
	healthOrb.galaxy3.texture:SetVertexColor(r,g,b,a)
	r,g,b,a = safeColor(SL32CharacterData.healthOrb.font1)
	healthOrb.font1:SetTextColor(r,g,b,a)
	r,g,b,a = safeColor(SL32CharacterData.healthOrb.font2)
	healthOrb.font2:SetTextColor(r,g,b,a)
	healthOrb:SetScale(SL32CharacterData.healthOrb.scale or 1)

	--mana orb fill, galaxy and font colors
	r,g,b,a = safeColor(SL32CharacterData.manaOrb.orbColor)
	manaOrb.filling:SetVertexColor(r,g,b,a)
	setStatusBarColor(manaOrb.fillingBar, r, g, b, a)
	r,g,b,a = safeColor(SL32CharacterData.manaOrb.galaxy)
	manaOrb.galaxy1.texture:SetVertexColor(r,g,b,a)
	manaOrb.galaxy2.texture:SetVertexColor(r,g,b,a)
	manaOrb.galaxy3.texture:SetVertexColor(r,g,b,a)
	r,g,b,a = safeColor(SL32CharacterData.manaOrb.font1)
	manaOrb.font1:SetTextColor(r,g,b,a)
	r,g,b,a = safeColor(SL32CharacterData.manaOrb.font2)
	manaOrb.font2:SetTextColor(r,g,b,a)
	manaOrb:SetScale(SL32CharacterData.manaOrb.scale or 1)
	
	local pr, pg, pb, pa = healthOrb.filling:GetVertexColor()
	petOrb.filling1:SetVertexColor(pr or 1, pg or 1, pb or 1, pa or 1)
	setStatusBarColor(petOrb.filling1Bar, pr or 1, pg or 1, pb or 1, pa or 1)
	pr, pg, pb, pa = manaOrb.filling:GetVertexColor()
	petOrb.filling2:SetVertexColor(pr or 1, pg or 1, pb or 1, pa or 1)
	setStatusBarColor(petOrb.filling2Bar, pr or 1, pg or 1, pb or 1, pa or 1)
	petOrb.font1:SetTextColor(healthOrb.font1:GetTextColor())
	petOrb.font2:SetTextColor(manaOrb.font1:GetTextColor())
	petOrb.font3:SetTextColor(healthOrb.font2:GetTextColor())
	petOrb.font4:SetTextColor(manaOrb.font2:GetTextColor())
	petOrb:SetScale(SL32CharacterData.petOrb.scale)
	
	-- Update power tracker to class color and apply saved settings
	if segmentedPowerTracker then
		segmentedPowerTracker:UpdateColors()
		-- Apply saved rotation from account-wide data
		local savedRotation = SL32AccountData and SL32AccountData.powerTrackerRotation or 270
		segmentedPowerTracker:SetRotation(savedRotation)
		-- Apply saved scale from account-wide data
		local savedScale = SL32AccountData and SL32AccountData.powerTrackerScale or 75
		segmentedPowerTracker:SetScale(savedScale / 100)
	end
	
	-- Initialize scale sliders with saved values (inverted for vertical sliders)
	if SL32HealthScaleSlider then
		SL32HealthScaleSlider:SetValue(225 - (SL32CharacterData.healthOrb.scale) * 100)
		if SL32HealthScaleValue then
			SL32HealthScaleValue:SetText(math.floor((SL32CharacterData.healthOrb.scale) * 100) .. "%")
		end
	end
	if SL32ManaScaleSlider then
		SL32ManaScaleSlider:SetValue(225 - (SL32CharacterData.manaOrb.scale) * 100)
		if SL32ManaScaleValue then
			SL32ManaScaleValue:SetText(math.floor((SL32CharacterData.manaOrb.scale) * 100) .. "%")
		end
	end
	if SL32PetScaleSlider then
		SL32PetScaleSlider:SetValue(225 - (SL32CharacterData.petOrb.scale) * 100)
		if SL32PetScaleValue then
			SL32PetScaleValue:SetText(math.floor((SL32CharacterData.petOrb.scale) * 100) .. "%")
		end
	end
	-- Initialize power tracker rotation slider (convert from actual rotation to slider value)
	if SL32PowerTrackerRotationSlider then
		local savedRotation = SL32AccountData and SL32AccountData.powerTrackerRotation or 270
		-- Convert rotation back to slider value: slider = rotation - 270 (wrapped)
		local sliderVal = savedRotation - 270
		if sliderVal < 0 then sliderVal = sliderVal + 360 end
		SL32PowerTrackerRotationSlider:SetValue(sliderVal)
		if SL32RotateValue then
			SL32RotateValue:SetText(sliderVal .. "°")
		end
	end
	-- Initialize power tracker scale slider
	if SL32PowerTrackerScaleSlider then
		local savedScale = SL32AccountData and SL32AccountData.powerTrackerScale or 100
		SL32PowerTrackerScaleSlider:SetValue(225 - savedScale)
		if SL32PowerTrackerScaleValue then
			SL32PowerTrackerScaleValue:SetText(savedScale .. "%")
		end
	end

	setOrbFontPlacement(healthOrb,SL32CharacterData.healthOrb)
	setOrbFontPlacement(manaOrb,SL32CharacterData.manaOrb)
end

function SL32UpdateOrbColor(orb,orbColor,galaxyColor,font1Color,font2Color)
	local r, g, b, a = safeColor(orbColor)
	orb.filling:SetVertexColor(r, g, b, a)
	setStatusBarColor(orb.fillingBar, r, g, b, a)
	r, g, b, a = safeColor(galaxyColor)
	orb.galaxy1.texture:SetVertexColor(r, g, b, a)
	orb.galaxy2.texture:SetVertexColor(r, g, b, a)
	orb.galaxy3.texture:SetVertexColor(r, g, b, a)
	r, g, b, a = safeColor(font1Color)
	orb.font1:SetTextColor(r, g, b, a)
	r, g, b, a = safeColor(font2Color)
	orb.font2:SetTextColor(r, g, b, a)
end 

local function TryNewColors(restore)
	local r, g, b = ColorPickerFrame:GetColorRGB()
	local a
	if OpacitySliderFrame and OpacitySliderFrame.GetValue then
		a = OpacitySliderFrame:GetValue()
	elseif ColorPickerFrame.GetColorAlpha then
		a = ColorPickerFrame:GetColorAlpha()
	else
		a = ColorPickerFrame.opacity
	end
	if a == nil then
		a = 1
	end

	if restore then
		r,g,b,a = unpack(restore)
	end

	if ColorPickerFrame.elementToChange == "Filling" then
		xmlOrbDisplayFrame2.orb.filling:SetVertexColor(r,g,b,a)
	elseif ColorPickerFrame.elementToChange == "Swirl" then
		xmlOrbDisplayFrame2.orb.galaxy1.texture:SetVertexColor(r,g,b,a)
		xmlOrbDisplayFrame2.orb.galaxy2.texture:SetVertexColor(r,g,b,a)
		xmlOrbDisplayFrame2.orb.galaxy3.texture:SetVertexColor(r,g,b,a)
	elseif ColorPickerFrame.elementToChange == "Font1" then
		xmlOrbDisplayFrame2.orb.font1:SetTextColor(r,g,b,a)
	elseif ColorPickerFrame.elementToChange == "Font2" then
		xmlOrbDisplayFrame2.orb.font2:SetTextColor(r,g,b,a) 
	end
end

function SL32HideColorPicker()
	if ColorPickerFrame and ColorPickerFrame.Hide then
		ColorPickerFrame:Hide()
	end
end

function TryNewTextures(fillTexture,swirlTexture)
	if fillTexture then
		xmlOrbDisplayFrame2.orb.filling:SetTexture(fillTexture)
	end
	if swirlTexture then
		xmlOrbDisplayFrame2.orb.galaxy1.texture:SetTexture(swirlTexture.."1.tga")
		xmlOrbDisplayFrame2.orb.galaxy2.texture:SetTexture(swirlTexture.."2.tga")
		xmlOrbDisplayFrame2.orb.galaxy3.texture:SetTexture(swirlTexture.."3.tga")
	end
end

local function checkShapeShiftInfo()
		local form = GetShapeshiftForm()
		local druidFormTable = SL32CharacterData.manaOrb
		local changeOcurred = true
		if form == 1 then
			druidFormTable = SL32CharacterData.druidColors.bear
			previousPowerValue = SL32_UnitPower("player", SL32_POWER_RAGE)
		elseif form == 3 then
			druidFormTable = SL32CharacterData.druidColors.cat
			previousPowerValue = SL32_UnitPower("player", SL32_POWER_ENERGY)
		elseif form == 5 then
			changeOcurred = false
		elseif form == 0 then
			druidFormTable = SL32CharacterData.manaOrb
			previousPowerValue = SL32_UnitPower("player", SL32_POWER_MANA)
		end
		SL32UpdateOrbColor(manaOrb,druidFormTable.orbColor,druidFormTable.galaxy,druidFormTable.font1,druidFormTable.font2)
end

-- Border Color Functions
function SL32_SetBorderColor(r, g, b)
	-- Try multiple ways to access the border texture
	local border = _G["SL32GUIBorder"]
	if border and border.SetVertexColor then
		border:SetVertexColor(r, g, b)
	end
end

local function UpdateOrbTextures()
	-- Ensure textures exist with fallback defaults
	local healthFill = (SL32CharacterData.healthOrb.textures and SL32CharacterData.healthOrb.textures.fill) or defaultTextures.healthOrb.fill
	local healthRotation = (SL32CharacterData.healthOrb.textures and SL32CharacterData.healthOrb.textures.rotation) or defaultTextures.healthOrb.rotation
	local manaFill = (SL32CharacterData.manaOrb.textures and SL32CharacterData.manaOrb.textures.fill) or defaultTextures.manaOrb.fill
	local manaRotation = (SL32CharacterData.manaOrb.textures and SL32CharacterData.manaOrb.textures.rotation) or defaultTextures.manaOrb.rotation
	
	local healthFillPath = (type(healthFill) == "string" and healthFill:find("\\"))
		and healthFill
		or (images .. healthFill)
	local healthRotationBase = (type(healthRotation) == "string" and healthRotation:find("\\"))
		and healthRotation:gsub("(%d+)%.tga$", "")
		or (images .. healthRotation)
	healthOrb.filling:SetTexture(healthFillPath)
	if healthOrb.fillingBar and healthOrb.fillingBar.SetStatusBarTexture then
		healthOrb.fillingBar:SetStatusBarTexture(healthFillPath)
	end
	healthOrb.galaxy1.texture:SetTexture(healthRotationBase.."1.tga")
	healthOrb.galaxy2.texture:SetTexture(healthRotationBase.."2.tga")
	healthOrb.galaxy3.texture:SetTexture(healthRotationBase.."3.tga")
	
	local manaFillPath = (type(manaFill) == "string" and manaFill:find("\\"))
		and manaFill
		or (images .. manaFill)
	local manaRotationBase = (type(manaRotation) == "string" and manaRotation:find("\\"))
		and manaRotation:gsub("(%d+)%.tga$", "")
		or (images .. manaRotation)
	manaOrb.filling:SetTexture(manaFillPath)
	if manaOrb.fillingBar and manaOrb.fillingBar.SetStatusBarTexture then
		manaOrb.fillingBar:SetStatusBarTexture(manaFillPath)
	end
	manaOrb.galaxy1.texture:SetTexture(manaRotationBase.."1.tga")
	manaOrb.galaxy2.texture:SetTexture(manaRotationBase.."2.tga")
	manaOrb.galaxy3.texture:SetTexture(manaRotationBase.."3.tga")
end

function shouldEnabledCheckboxBeChecked()
	if CommitButton and SL32OrbEnabledCheckbox then
		SL32OrbEnabledCheckbox:SetChecked(CommitButton.orbData.enabled ~= false)
	end
end

function SL32ApplyChanges()
	local activeElement = CommitButton.activeElement
	local r,g,b,a = xmlOrbDisplayFrame2.orb.filling:GetVertexColor()
	local fillColors = {r=0,g=0,b=0,a=0}
	fillColors.r, fillColors.g, fillColors.b, fillColors.a = r,g,b,a
	activeElement.orbColor.r, activeElement.orbColor.g, activeElement.orbColor.b, activeElement.orbColor.a = r,g,b,a

	local galaxyColors = {r=0,g=0,b=0,a=0}
	r,g,b,a = xmlOrbDisplayFrame2.orb.galaxy1.texture:GetVertexColor()
	galaxyColors.r, galaxyColors.g, galaxyColors.b, galaxyColors.a = r,g,b,a
	activeElement.galaxy.r, activeElement.galaxy.g, activeElement.galaxy.b, activeElement.galaxy.a = r,g,b,a
	
	local font1Color = {r=0,g=0,b=0,a=0}
	r,g,b,a = xmlOrbDisplayFrame2.orb.font1:GetTextColor()
	font1Color.r,font1Color.g,font1Color.b,font1Color.a = r,g,b,a
	activeElement.font1.r, activeElement.font1.g, activeElement.font1.b, activeElement.font1.a = r,g,b,a
	
	local font2Color = {r=0,g=0,b=0,a=0}
	r,g,b,a = xmlOrbDisplayFrame2.orb.font2:GetTextColor()
	font2Color.r,font2Color.g,font2Color.b,font2Color.a = r,g,b,a
	activeElement.font2.r, activeElement.font2.g, activeElement.font2.b, activeElement.font2.a = r,g,b,a
	
	-- Update the actual orb being edited with its saved colors
	SL32UpdateOrbColor(CommitButton.orb, activeElement.orbColor, activeElement.galaxy, activeElement.font1, activeElement.font2)
	
	-- Persist text formatting selection from dropdown
	if CommitButton.orbData and CommitButton.orbData.formatting and TextFormattingDropdown then
		local selectedId = UIDropDownMenu_GetSelectedID(TextFormattingDropdown)
		if selectedId == 1 then
			CommitButton.orbData.formatting.truncated = true
			CommitButton.orbData.formatting.commaSeparated = false
		elseif selectedId == 2 then
			CommitButton.orbData.formatting.truncated = false
			CommitButton.orbData.formatting.commaSeparated = true
		elseif selectedId == 3 then
			CommitButton.orbData.formatting.truncated = false
			CommitButton.orbData.formatting.commaSeparated = false
		end
	end

	-- Persist enabled state if available
	if CommitButton.orbData then
		CommitButton.orbData.enabled = (SL32OrbEnabledCheckbox and SL32OrbEnabledCheckbox:GetChecked()) and true or false
	end
	forcePercentageOff()

	-- Use stored texture indices from dropdown selections, or fall back to preview textures
	if not CommitButton.textureElement and CommitButton.orbData and CommitButton.orbData.textures then
		CommitButton.textureElement = CommitButton.orbData.textures
	end
	if CommitButton.textureElement then
		local selectedFill = (SL32SelectedFillIndex ~= nil) and SL32FillTextureNames[SL32SelectedFillIndex] or nil
		if selectedFill then
			CommitButton.textureElement.fill = selectedFill
		else
			local previewFill = (xmlOrbDisplayFrame2 and xmlOrbDisplayFrame2.orb and xmlOrbDisplayFrame2.orb.filling and xmlOrbDisplayFrame2.orb.filling:GetTexture()) or nil
			if type(previewFill) == "string" then
				local name = previewFill:match("([^\\/:]+%.tga)") or previewFill:match("([^\\/:]+)$")
				if name then
					CommitButton.textureElement.fill = name
				end
			end
		end

		local selectedRotation = (SL32SelectedRotationIndex ~= nil) and SL32RotationTextureNames[SL32SelectedRotationIndex] or nil
		if selectedRotation then
			CommitButton.textureElement.rotation = selectedRotation
		else
			local previewRotation = (xmlOrbDisplayFrame2 and xmlOrbDisplayFrame2.orb and xmlOrbDisplayFrame2.orb.galaxy1 and xmlOrbDisplayFrame2.orb.galaxy1.texture and xmlOrbDisplayFrame2.orb.galaxy1.texture:GetTexture()) or nil
			if type(previewRotation) == "string" then
				local base = previewRotation:match("([^\\/:]+)%.tga") or previewRotation:match("([^\\/:]+)$")
				if base then
					base = base:gsub("%d+$", "")
					if base ~= "" then
						CommitButton.textureElement.rotation = base
					end
				end
			end
		end
	end
	UpdateOrbTextures()

	if SL32OrbValueCheckBox:GetChecked() then
		CommitButton.orbData.font2.show = true
	else
		CommitButton.orbData.font2.show = false
	end

	setOrbFontPlacement(CommitButton.orb,CommitButton.orbData)
	applyOrbValueVisibility(CommitButton.orb, CommitButton.orbData)
	
	--set pet fill colors to that of the fill colors of the health/mana orbs
	local pr, pg, pb, pa = healthOrb.filling:GetVertexColor()
	petOrb.filling1:SetVertexColor(pr or 1, pg or 1, pb or 1, pa or 1)
	setStatusBarColor(petOrb.filling1Bar, pr or 1, pg or 1, pb or 1, pa or 1)
	pr, pg, pb, pa = manaOrb.filling:GetVertexColor()
	petOrb.filling2:SetVertexColor(pr or 1, pg or 1, pb or 1, pa or 1)
	setStatusBarColor(petOrb.filling2Bar, pr or 1, pg or 1, pb or 1, pa or 1)
	petOrb.font1:SetTextColor(healthOrb.font1:GetTextColor())
	petOrb.font2:SetTextColor(manaOrb.font1:GetTextColor())
	petOrb.font3:SetTextColor(healthOrb.font2:GetTextColor())
	petOrb.font4:SetTextColor(manaOrb.font2:GetTextColor())

	if CommitButton.orb == healthOrb and CommitButton.orbData then
		if CommitButton.orbData.enabled then
			healthOrb:Show()
		else
			healthOrb:Hide()
		end
	elseif CommitButton.orb == manaOrb and CommitButton.orbData then
		if CommitButton.orbData.enabled then
			manaOrb:Show()
		else
			manaOrb:Hide()
		end
	end

	if SL32_UpdatePlayerVitals then
		SL32_UpdatePlayerVitals()
	end
	if SL32_UpdatePetVitals then
		SL32_UpdatePetVitals()
	end
end

function SL32ColorPicker(xmlElement)
	local r,g,b,a
	if xmlElement == "Filling" then
		r,g,b,a = xmlOrbDisplayFrame2.orb.filling:GetVertexColor()
	elseif xmlElement == "Swirl" then
		r,g,b,a = xmlOrbDisplayFrame2.orb.galaxy1.texture:GetVertexColor()
	elseif xmlElement == "Font1" then
		r,g,b,a = xmlOrbDisplayFrame2.orb.font1:GetTextColor()
	elseif xmlElement == "Font2" then
		r,g,b,a = xmlOrbDisplayFrame2.orb.font2:GetTextColor()
	end
	
	ColorPickerFrame.elementToChange = xmlElement
	ColorPickerFrame.func = TryNewColors
	ColorPickerFrame.swatchFunc = TryNewColors
	ColorPickerFrame.opacityFunc = TryNewColors
	ColorPickerFrame.cancelFunc = TryNewColors
	if ColorPickerFrame.SetColorRGB then
		ColorPickerFrame:SetColorRGB(r, g, b)
	elseif ColorPickerFrame.Content and ColorPickerFrame.Content.ColorSwatch and ColorPickerFrame.Content.ColorSwatch.SetColorRGB then
		ColorPickerFrame.Content.ColorSwatch:SetColorRGB(r, g, b)
	elseif ColorPickerFrame.ColorSwatch and ColorPickerFrame.ColorSwatch.SetColorRGB then
		ColorPickerFrame.ColorSwatch:SetColorRGB(r, g, b)
	end
	ColorPickerFrame.hasOpacity, ColorPickerFrame.opacity = (a ~= nil), a
	ColorPickerFrame.previousValues = {r,g,b,a}
	makeFrameMovable(ColorPickerFrame,"RightButton")
	ColorPickerFrame:EnableKeyboard(false)
	ColorPickerFrame:Show()
end

function SL32ResetToClassColors()
	-- Get the class colors based on which orb is being edited
	local classColor
	local isHealthOrb = (CommitButton.orb == healthOrb)
	
	if isHealthOrb then
		classColor = orbClassColors[charClassNumber].health
	else
		classColor = orbClassColors[charClassNumber].mana
	end
	
	-- Update the preview orb with class colors
	xmlOrbDisplayFrame2.orb.filling:SetVertexColor(classColor.r, classColor.g, classColor.b, classColor.a)
	xmlOrbDisplayFrame2.orb.galaxy1.texture:SetVertexColor(classColor.r, classColor.g, classColor.b, classColor.a)
	xmlOrbDisplayFrame2.orb.galaxy2.texture:SetVertexColor(classColor.r, classColor.g, classColor.b, classColor.a)
	xmlOrbDisplayFrame2.orb.galaxy3.texture:SetVertexColor(classColor.r, classColor.g, classColor.b, classColor.a)
	xmlOrbDisplayFrame2.orb.font1:SetTextColor(1, 1, 1, 1)
	xmlOrbDisplayFrame2.orb.font2:SetTextColor(1, 1, 1, 1)
end

function UpdateXMLTextures(orb)
	xmlOrbDisplayFrame2.orb.filling:SetTexture(orb.filling:GetTexture())
	xmlOrbDisplayFrame2.orb.galaxy1.texture:SetTexture(orb.galaxy1.texture:GetTexture())
	xmlOrbDisplayFrame2.orb.galaxy2.texture:SetTexture(orb.galaxy2.texture:GetTexture())
	xmlOrbDisplayFrame2.orb.galaxy3.texture:SetTexture(orb.galaxy3.texture:GetTexture())
	
	-- Reset selected texture indices when opening config
	SL32SelectedFillIndex = nil
	SL32SelectedRotationIndex = nil

	local fillName = CommitButton and CommitButton.orbData and CommitButton.orbData.textures and CommitButton.orbData.textures.fill or nil
	local rotationName = CommitButton and CommitButton.orbData and CommitButton.orbData.textures and CommitButton.orbData.textures.rotation or nil
	if type(fillName) == "string" then
		fillName = fillName:match("([^\\/:]+%.tga)") or fillName:match("([^\\/:]+)$")
	end
	if type(rotationName) == "string" then
		rotationName = rotationName:match("([^\\/:]+)") or rotationName
	end

	local selectedFill = nil
	for index, name in pairs(SL32FillTextureNames) do
		if name == fillName then
			selectedFill = index
			break
		end
	end
	local selectedRotation = nil
	for index, name in pairs(SL32RotationTextureNames) do
		if name == rotationName then
			selectedRotation = index
			break
		end
	end

	if selectedFill ~= nil then
		UIDropDownMenu_SetSelectedID(FillTexturesDropDown, selectedFill + 1)
		if SL32FillTextureDisplayNames and SL32FillTextureDisplayNames[selectedFill] then
			UIDropDownMenu_SetText(FillTexturesDropDown, SL32FillTextureDisplayNames[selectedFill])
		end
	else
		UIDropDownMenu_SetText(FillTexturesDropDown,"Choose one...")
	end
	if selectedRotation ~= nil then
		UIDropDownMenu_SetSelectedID(RotationTexturesDropDown, selectedRotation + 1)
		if SL32RotationTextureDisplayNames and SL32RotationTextureDisplayNames[selectedRotation] then
			UIDropDownMenu_SetText(RotationTexturesDropDown, SL32RotationTextureDisplayNames[selectedRotation])
		end
	else
		UIDropDownMenu_SetText(RotationTexturesDropDown,"Choose one...")
	end
end

function UpdateXMLColors(orbColor,galaxyColor,font1,font2)
	xmlOrbDisplayFrame2.orb.filling:SetVertexColor(orbColor.r,orbColor.g,orbColor.b,orbColor.a)
	xmlOrbDisplayFrame2.orb.galaxy1.texture:SetVertexColor(galaxyColor.r,galaxyColor.g,galaxyColor.b,galaxyColor.a)
	xmlOrbDisplayFrame2.orb.galaxy2.texture:SetVertexColor(galaxyColor.r,galaxyColor.g,galaxyColor.b,galaxyColor.a)
	xmlOrbDisplayFrame2.orb.galaxy3.texture:SetVertexColor(galaxyColor.r,galaxyColor.g,galaxyColor.b,galaxyColor.a)
	xmlOrbDisplayFrame2.orb.font1:SetTextColor(font1.r,font1.g,font1.b,font1.a)
	xmlOrbDisplayFrame2.orb.font2:SetTextColor(font2.r,font2.g,font2.b,font2.a)
end

function UpdateXMLText(orb)
	xmlOrbDisplayFrame2.orb.font1:SetText(orb.font1:GetText())
	xmlOrbDisplayFrame2.orb.font2:SetText(orb.font2:GetText())
end

function FillXMLTemplate(frame)
	frame.orb = CreateXMLOrb(xmlOrbDisplayFrame2,"SL32_XMLOrb",150,defaultTextures.healthOrb.fill,defaultTextures.healthOrb.rotation)
	frame.orb.galaxy1.texture:SetAlpha(0.5)
	frame.orb.galaxy2.texture:SetAlpha(0.5)
	frame.orb.galaxy3.texture:SetAlpha(0.5)
	frame:SetScale(1.5)
end

------Health Orb Options Dropdown Stuff------
function CheckHealthOrbOptionValuesAgainstUIState()
	local selectedId = UIDropDownMenu_GetSelectedID(HealthOrbOptionsDropDown);
	if selectedId == 2 then
		CommitButton.activeElement = SL32CharacterData.combat
	elseif selectedId == 1 then
		CommitButton.activeElement = SL32CharacterData.healthOrb
		CommitButton.newActiveElement = SL32CharacterData.healthOrb
	end

	UpdateXMLColors(
		CommitButton.activeElement.orbColor,
		CommitButton.activeElement.galaxy,
		CommitButton.activeElement.font1,
		CommitButton.activeElement.font2)
end

function InitializeHealthOrbOptionsDropDown()
	CommitButton.activeElement = SL32CharacterData.healthOrb
	local fillOptions = {
	"Default",
	"Combat"
	}

	function HealthOrbOptionsDropDown:OnClick(value)
		UIDropDownMenu_SetSelectedID(HealthOrbOptionsDropDown,self:GetID())
		CheckHealthOrbOptionValuesAgainstUIState();
	end

	local function initMen(self, level)
		local stuff = UIDropDownMenu_CreateInfo()
		for k,v in pairs(fillOptions) do
		stuff = {}
		stuff.text = v
		stuff.value = v
		stuff.func = HealthOrbOptionsDropDown.OnClick
		UIDropDownMenu_AddButton(stuff, level)
		end
	end
	UIDropDownMenu_Initialize(HealthOrbOptionsDropDown, initMen)
	UIDropDownMenu_SetSelectedID(HealthOrbOptionsDropDown, 1)
	UIDropDownMenu_JustifyText(HealthOrbOptionsDropDown, "LEFT")
end

-------Mana Orb Options Dropdown Stuff-------
function CheckManaOrbOptionValuesAgainstUIState()
	local selectedId = UIDropDownMenu_GetSelectedID(ManaOrbOptionsDropDown);
	if selectedId == 3 then
		CommitButton.activeElement = SL32CharacterData.druidColors.cat
	elseif selectedId == 2 then
		CommitButton.activeElement = SL32CharacterData.druidColors.bear
	elseif selectedId == 1 then
		CommitButton.activeElement = SL32CharacterData.manaOrb
	end
	UpdateXMLColors(
		CommitButton.activeElement.orbColor,
		CommitButton.activeElement.galaxy,
		CommitButton.activeElement.font1,
		CommitButton.activeElement.font2)
end

function InitializeManaOrbOptionsDropDown()
	CommitButton.activeElement = SL32CharacterData.manaOrb
	local fillOptions2 = {
		"Default"
	}

	if SL32className == "Druid" then
		fillOptions2 = {
			"Default",
			"Bear",
			"Cat"
		}
	end

	function ManaOrbOptionsDropDown:OnClick(value)
		UIDropDownMenu_SetSelectedID(ManaOrbOptionsDropDown,self:GetID())
		CheckManaOrbOptionValuesAgainstUIState();
	end

	local function initMen(self, level)
	local stuff = UIDropDownMenu_CreateInfo()
	for k,v in pairs(fillOptions2) do
			stuff = {}
			stuff.text = v
			stuff.value = v
			stuff.func = ManaOrbOptionsDropDown.OnClick
			UIDropDownMenu_AddButton(stuff, level)
		end
	end
	UIDropDownMenu_Initialize(ManaOrbOptionsDropDown, initMen)
	UIDropDownMenu_SetSelectedID(ManaOrbOptionsDropDown, 1)
	UIDropDownMenu_JustifyText(ManaOrbOptionsDropDown, "LEFT")
end

--alloc the orbs and assign them to the health/mana orb variables, make them both movable from the get-go for testing
healthOrb = CreateOrb(nil,"SL32_HealthOrb",defaultOrbSize,defaultTextures.healthOrb.fill,defaultTextures.healthOrb.rotation,-250,0,"BOTTOM",monitorHealth)
manaOrb = CreateOrb(nil,"SL32_ManaOrb",defaultOrbSize,defaultTextures.manaOrb.fill,defaultTextures.manaOrb.rotation,250,0,"BOTTOM",monitorPower)
petOrb = CreatePetOrb(UIParent,"SL32_PetOrb",87,-345,145,nil)
healthOrbSecure = healthOrb.secure
manaOrbSecure = manaOrb.secure
petOrbSecure = petOrb.secure
powerFrame = nil

-- Apply saved (or default) positions to orbs; used on load and after reset
function SL32_ApplyOrbPositions()
	if not healthOrb or not manaOrb or not petOrb then return end
	local function applyOne(orb, dataKey, defaultPos)
		local pos = (SL32CharacterData[dataKey] and SL32CharacterData[dataKey].position) or defaultPos
		if not pos then return end
		orb:SetParent(UIParent)
		orb:ClearAllPoints()
		orb:SetPoint(pos.point or "BOTTOM", UIParent, pos.relativePoint or "BOTTOM", pos.x or 0, pos.y or 0)
	end
	applyOne(healthOrb, "healthOrb", defaultOrbPositions.healthOrb)
	applyOne(manaOrb, "manaOrb", defaultOrbPositions.manaOrb)
	applyOne(petOrb, "petOrb", defaultOrbPositions.petOrb)
end

-- Reset all orb positions to defaults and apply (called from config menu)
function SL32_ResetOrbPositions()
	if not SL32CharacterData then return end
	SL32CharacterData.healthOrb.position = { point = "BOTTOM", relativePoint = "BOTTOM", x = -250, y = 0 }
	SL32CharacterData.manaOrb.position   = { point = "BOTTOM", relativePoint = "BOTTOM", x = 250, y = 0 }
	SL32CharacterData.petOrb.position    = { point = "BOTTOM", relativePoint = "BOTTOM", x = -345, y = 145 }
	SL32_ApplyOrbPositions()
end

-- Define segment counts per class
-- Retail (TWW/Dragonflight) values; Classic/MoP use legacy values below
local classPowerSegments = {
	["Rogue"] = 5,      -- Combo Points (max 5 base, 6 with Deeper Stratagem)
	["Druid"] = 5,      -- Combo Points in cat form (max 5 base, 6 with talent)
}

-- Retail: updated max values and new classes
if SL32_IS_RETAIL then
	classPowerSegments["Rogue"] = 6      -- Combo Points (up to 6 with Deeper Stratagem)
	classPowerSegments["Druid"] = 6      -- Combo Points (up to 6 with talent)
	classPowerSegments["Paladin"] = 5    -- Holy Power (Ret has 5; Holy/Prot use 3)
	classPowerSegments["Warlock"] = 5    -- Soul Shards (max 5)
	classPowerSegments["Monk"] = 5       -- Chi (max 5)
	classPowerSegments["Death Knight"] = 6  -- Runes (6)
	classPowerSegments["Mage"] = 5       -- Arcane Charges (Arcane spec)
	classPowerSegments["Evoker"] = 5     -- Essence
	-- Priest: Shadow Orbs removed in Legion, now uses Insanity (bar) - not segmented
	-- Shaman: Maelstrom is a bar resource (0-100/150) - not segmented
elseif SL32_IS_CATA_OR_LATER then
	classPowerSegments["Paladin"] = 3    -- Holy Power (max 3)
	classPowerSegments["Warlock"] = 4    -- Soul Shards (max 4)
	classPowerSegments["Priest"] = 3     -- Shadow Orbs (max 3)
end

if SL32_IS_MOP_OR_LATER and not SL32_IS_RETAIL then
	classPowerSegments["Monk"] = 4       -- Chi (max 4, can be 5 with talent)
	classPowerSegments["Shaman"] = 5     -- Maelstrom Weapon stacks (max 5)
end

-- Create segmented power tracker for supported classes
local numSegments = classPowerSegments[SL32className]
if numSegments then
	segmentedPowerTracker = CreateSegmentedPowerTracker(healthOrb, numSegments, defaultOrbSize)
	segmentedPowerTracker:SetRotation(SL32AccountData and SL32AccountData.powerTrackerRotation or 270)
	segmentedPowerTracker:SetScript("OnUpdate", SL32MonitorSegmentedPowers)
	-- Show the checkbox and rotation slider for classes that have power tracker
	if UsePowerTrackerCheckButton then
		UsePowerTrackerCheckButton:Show()
	end
	if SL32PowerTrackerRotationSlider then
		SL32PowerTrackerRotationSlider:Show()
	end
	if SL32PowerTrackerRotationSliderBackdrop then
		SL32PowerTrackerRotationSliderBackdrop:Show()
	end
	if SL32PowerTrackerResetButton then
		SL32PowerTrackerResetButton:Show()
	end
	if SL32PowerTrackerScaleSlider then
		SL32PowerTrackerScaleSlider:Show()
	end
	if SL32PowerTrackerScaleSliderBackdrop then
		SL32PowerTrackerScaleSliderBackdrop:Show()
	end
	if SL32PowerTrackerScaleResetButton then
		SL32PowerTrackerScaleResetButton:Show()
	end
	if SL32MaxStackSoundDropdown then
		SL32MaxStackSoundDropdown:Show()
	end
	if SL32MaxStackSoundLabelFrame then
		SL32MaxStackSoundLabelFrame:Show()
	end
else
	-- Hide the checkbox and rotation slider for classes that don't have power tracker
	if UsePowerTrackerCheckButton then
		UsePowerTrackerCheckButton:Hide()
	end
	if SL32PowerTrackerRotationSlider then
		SL32PowerTrackerRotationSlider:Hide()
	end
	if SL32PowerTrackerRotationSliderBackdrop then
		SL32PowerTrackerRotationSliderBackdrop:Hide()
	end
	if SL32PowerTrackerResetButton then
		SL32PowerTrackerResetButton:Hide()
	end
	if SL32PowerTrackerScaleSlider then
		SL32PowerTrackerScaleSlider:Hide()
	end
	if SL32PowerTrackerScaleSliderBackdrop then
		SL32PowerTrackerScaleSliderBackdrop:Hide()
	end
	if SL32PowerTrackerScaleResetButton then
		SL32PowerTrackerScaleResetButton:Hide()
	end
	if SL32MaxStackSoundDropdown then
		SL32MaxStackSoundDropdown:Hide()
	end
	if SL32MaxStackSoundLabelFrame then
		SL32MaxStackSoundLabelFrame:Hide()
	end
end
angelFrame = addArtwork(images.."d3_angel2test.tga",manaOrb,"AngelFrame",70,5,160,160)
demonFrame = addArtwork(images.."d3_demon2test.tga",healthOrb,"DemonFrame",-90,5,160,160)
makeFrameMovable(healthOrb, nil, "health")
makeFrameMovable(manaOrb, nil, "mana")
makeFrameMovable(petOrb, nil, "pet")

-- Enable drag overlays only when Shift is held and not in combat (StartMoving/StopMovingOrSizing are protected)
do
	local shiftWatcher = CreateFrame("Frame")
	local lastShift, lastCombat = nil, nil
	shiftWatcher:SetScript("OnUpdate", function(self)
		local shift = IsShiftKeyDown()
		local combat = InCombatLockdown()
		if shift == lastShift and combat == lastCombat then return end
		lastShift = shift
		lastCombat = combat
		local enableOverlay = shift and not combat
		for _, overlay in ipairs(SL32_OrbDragOverlays) do
			if overlay and overlay.EnableMouse then
				overlay:EnableMouse(enableOverlay)
				-- If Shift released or entered combat mid-drag, stop the orb and save position
				if not enableOverlay then
					local parent = overlay:GetParent()
					if parent then
						local ot = overlay.orbType
						safeStopMovingOrSizing(parent, function(f)
							if ot and SL32CharacterData and SL32CharacterData[ot .. "Orb"] then
								local point, _, relativePoint, x, y = f:GetPoint(1)
								if point and x and y then
									SL32CharacterData[ot .. "Orb"].position = { point = point, relativePoint = relativePoint or point, x = x, y = y }
								end
							end
						end)
					end
				end
			end
		end
	end)
end

-- Protect SL32GUI (config/minimap button) drag from ADDON_ACTION_BLOCKED during combat
if SL32GUI and SL32GUI.SetScript then
	SL32GUI:SetScript("OnDragStart", function(self)
		if not InCombatLockdown() then self:StartMoving() end
	end)
	SL32GUI:SetScript("OnDragStop", function(self)
		safeStopMovingOrSizing(self)
	end)
end

local function SL32_UpdatePlayerVitals()
	local unit = (vehicleInUse == 1) and "vehicle" or "player"
	local rawHealth = UnitHealth(unit)
	local rawMaxHealth = UnitHealthMax(unit)
	local rawPower = UnitPower(unit)
	local rawMaxPower = UnitPowerMax(unit)
	healthOrb.rawCurrentHealth = rawHealth
	healthOrb.rawMaxHealth = rawMaxHealth
	manaOrb.rawCurrentPower = rawPower
	manaOrb.rawMaxPower = rawMaxPower

	local prevHealth = lastSafeHealth
	local prevMaxHealth = lastSafeMaxHealth
	local prevPower = lastSafePower
	local prevMaxPower = lastSafeMaxPower

	local safeHealth = SL32SafeNumber(rawHealth, prevHealth)
	local safeMaxHealth = SL32SafeNumber(rawMaxHealth, prevMaxHealth)
	local safePower = SL32SafeNumber(rawPower, prevPower)
	local safeMaxPower = SL32SafeNumber(rawMaxPower, prevMaxPower)

	if SL32CanUseValue(rawHealth) then lastSafeHealth = safeHealth end
	if SL32CanUseValue(rawMaxHealth) then lastSafeMaxHealth = safeMaxHealth end
	if SL32CanUseValue(rawPower) then lastSafePower = safePower end
	if SL32CanUseValue(rawMaxPower) then lastSafeMaxPower = safeMaxPower end
	if SL32CanUseValue(rawHealth) and SL32CanUseValue(rawMaxHealth) and safeMaxHealth > 0 then
		lastSafeHealthPercent = math.floor((safeHealth / safeMaxHealth) * 100)
	end
	if SL32CanUseValue(rawPower) and SL32CanUseValue(rawMaxPower) and safeMaxPower > 0 then
		lastSafePowerPercent = math.floor((safePower / safeMaxPower) * 100)
	end

	healthOrb.currentHealth = safeHealth
	healthOrb.maxHealth = safeMaxHealth
	manaOrb.currentPower = safePower
	manaOrb.maxPower = safeMaxPower
	healthOrb.isDead = UnitIsDeadOrGhost(unit) or false
	manaOrb.isDead = healthOrb.isDead
	if not previousHealthValue or SL32SafeNumber(previousHealthValue, 0) == 0 then
		previousHealthValue = healthOrb.currentHealth
	end
	if not previousPowerValue or SL32SafeNumber(previousPowerValue, 0) == 0 then
		previousPowerValue = manaOrb.currentPower
	end
end

local function SL32_UpdatePetVitals()
	local unit = "pet"
	local rawHealth = UnitHealth(unit)
	local rawMaxHealth = UnitHealthMax(unit)
	local rawPower = UnitPower(unit)
	local rawMaxPower = UnitPowerMax(unit)
	petOrb.rawPetCurrentHealth = rawHealth
	petOrb.rawPetMaxHealth = rawMaxHealth
	petOrb.rawPetCurrentPower = rawPower
	petOrb.rawPetMaxPower = rawMaxPower

	local prevHealth = lastSafePetHealth
	local prevMaxHealth = lastSafePetMaxHealth
	local prevPower = lastSafePetPower
	local prevMaxPower = lastSafePetMaxPower

	local safeHealth = SL32SafeNumber(rawHealth, prevHealth)
	local safeMaxHealth = SL32SafeNumber(rawMaxHealth, prevMaxHealth)
	local safePower = SL32SafeNumber(rawPower, prevPower)
	local safeMaxPower = SL32SafeNumber(rawMaxPower, prevMaxPower)

	if SL32CanUseValue(rawHealth) then lastSafePetHealth = safeHealth end
	if SL32CanUseValue(rawMaxHealth) then lastSafePetMaxHealth = safeMaxHealth end
	if SL32CanUseValue(rawPower) then lastSafePetPower = safePower end
	if SL32CanUseValue(rawMaxPower) then lastSafePetMaxPower = safeMaxPower end
	if SL32CanUseValue(rawHealth) and SL32CanUseValue(rawMaxHealth) and safeMaxHealth > 0 then
		lastSafePetHealthPercent = math.floor((safeHealth / safeMaxHealth) * 100)
	end
	if SL32CanUseValue(rawPower) and SL32CanUseValue(rawMaxPower) and safeMaxPower > 0 then
		lastSafePetPowerPercent = math.floor((safePower / safeMaxPower) * 100)
	end

	petOrb.petCurrentHealth = safeHealth
	petOrb.petMaxHealth = safeMaxHealth
	petOrb.petCurrentPower = safePower
	petOrb.petMaxPower = safeMaxPower
	if not previousPetHealth or SL32SafeNumber(previousPetHealth, 0) == 0 then
		previousPetHealth = petOrb.petCurrentHealth
	end
	if not previousPetPower or SL32SafeNumber(previousPetPower, 0) == 0 then
		previousPetPower = petOrb.petCurrentPower
	end
end

local statusFrame = CreateFrame("Frame")
statusFrame:RegisterEvent("PLAYER_ENTERING_WORLD")
statusFrame:RegisterEvent("UNIT_HEALTH")
statusFrame:RegisterEvent("UNIT_MAXHEALTH")
statusFrame:RegisterEvent("UNIT_POWER_UPDATE")
statusFrame:RegisterEvent("UNIT_MAXPOWER")
statusFrame:RegisterEvent("UNIT_DISPLAYPOWER")
statusFrame:RegisterEvent("UNIT_FLAGS")
statusFrame:RegisterEvent("UNIT_PET")
statusFrame:SetScript("OnEvent", function(self, event, unit)
	if event == "UNIT_PET" or unit == "pet" then
		SL32_UpdatePetVitals()
		return
	end
	if event == "PLAYER_ENTERING_WORLD" or unit == "player" or unit == "vehicle" then
		SL32_UpdatePlayerVitals()
	end
end)

local eventFrame = CreateFrame("Frame")
eventFrame:RegisterEvent("ADDON_LOADED")
eventFrame:RegisterEvent("VARIABLES_LOADED")
eventFrame:RegisterEvent("UNIT_ENTERED_VEHICLE")
eventFrame:RegisterEvent("UNIT_EXITED_VEHICLE")
eventFrame:RegisterEvent("PLAYER_REGEN_DISABLED")
eventFrame:RegisterEvent("PLAYER_REGEN_ENABLED")
eventFrame:RegisterEvent("UNIT_PET")
if SL32className == "Druid" then
	eventFrame:RegisterEvent("UPDATE_SHAPESHIFT_FORM")
end

local flagHide_PetFrame = false
function eventFrame:OnEvent(event,arg1)
	if event == "ADDON_LOADED" then
		SL32_MigrateLegacySavedVars()
		checkDefaultsFromMemory()
		handlePlayerFrame(SL32CharacterData.defaultPlayerFrame.show)
		updateColorsFromMemory()
		UpdateOrbTextures()
		SL32_UpdatePlayerVitals()
		SL32_UpdatePetVitals()
		-- Health orb color is already set by updateColorsFromMemory() using class color
		local colorTable
		if SL32className == "Druid" then
			checkShapeShiftInfo()
		else
			SL32UpdateOrbColor(manaOrb,SL32CharacterData.manaOrb.orbColor,SL32CharacterData.manaOrb.galaxy,SL32CharacterData.manaOrb.font1,SL32CharacterData.manaOrb.font2)
		end
		-- Load saved menu background (also sets border color)
		if SL32AccountData and SL32AccountData.menuBackground then
			SL32_SetMenuBackground(SL32AccountData.menuBackground)
		else
			SL32_SetMenuBackground(1) -- Default to Chicken with white border
		end
		SL32GUI:Hide()
	elseif event == "VARIABLES_LOADED" then
		SL32MiniMapButtonPosition_LoadFromDefaults()
	elseif event == "UNIT_ENTERED_VEHICLE" then
		if arg1 == "player" then
			vehicleInUse = 1
			previousPowerValue = 0
			previousHealthValue = 0
			SL32_UpdatePlayerVitals()
		end
	elseif event == "UNIT_EXITED_VEHICLE" then
		if arg1 == "player" then
			vehicleInUse = 0
			previousHealthValue = 0
			previousPowerValue = 0
			SL32_UpdatePlayerVitals()
		end
	elseif event == "PLAYER_REGEN_DISABLED" then
		if SL32CharacterData.combat.enabled then
			SL32UpdateOrbColor(healthOrb,SL32CharacterData.combat.orbColor,SL32CharacterData.combat.galaxy,SL32CharacterData.combat.font1,SL32CharacterData.combat.font2)
			local cr, cg, cb, ca = safeColor(SL32CharacterData.combat.orbColor)
			petOrb.filling1:SetVertexColor(cr, cg, cb, ca)
			-- Power tracker stays class color (no change)
		end
	elseif event == "PLAYER_REGEN_ENABLED" then
		if SL32CharacterData.combat.enabled then
			-- Use saved color for health orb when out of combat
			SL32UpdateOrbColor(healthOrb, SL32CharacterData.healthOrb.orbColor, SL32CharacterData.healthOrb.galaxy, SL32CharacterData.healthOrb.font1, SL32CharacterData.healthOrb.font2)
			local hr, hg, hb, ha = safeColor(SL32CharacterData.healthOrb.orbColor)
			petOrb.filling1:SetVertexColor(hr, hg, hb, ha)
			-- Power tracker stays class color (no change needed)
		end
	elseif event == "UPDATE_SHAPESHIFT_FORM" then
		checkShapeShiftInfo()
	elseif event == "UNIT_PET" then
		local name,realm = UnitName("pet")
		if not name then
			if petOrb.updateFrame then
				petOrb.updateFrame:SetScript("OnUpdate", nil)
			end
			if petOrb.secure then
				safeHideSecure(petOrb.secure)
			end
		else
			if petOrb.updateFrame then
				petOrb.updateFrame:SetScript("OnUpdate", function()
					updatePetValues(petOrb)
				end)
			end
			-- Defer secure frame Show to next frame; dismount can leave us in brief protected state
			C_Timer.After(0, function()
				if petOrb.secure then
					safeShowSecure(petOrb.secure)
				end
				if UnitExists("pet") then
					petOrb:Show()
				end
			end)
			previousPetHealth = 0
			previousPetPower = 0
			SL32_UpdatePetVitals()
		end
	end
end

eventFrame:SetScript("OnEvent",eventFrame.OnEvent)

--slash command method	
local function CommandFunc(cmd)
	if cmd == "disable" then
		if healthOrb.updateFrame then healthOrb.updateFrame:SetScript("OnUpdate", nil) end
		if manaOrb.updateFrame then manaOrb.updateFrame:SetScript("OnUpdate", nil) end
		healthOrb:Hide()
		manaOrb:Hide()
	elseif cmd == "enable" then
		if healthOrb.updateFrame then
			healthOrb.updateFrame:SetScript("OnUpdate", function() monitorHealth(healthOrb) end)
		end
		if manaOrb.updateFrame then
			manaOrb.updateFrame:SetScript("OnUpdate", function() monitorPower(manaOrb) end)
		end
		healthOrb:Show()
		manaOrb:Show()
	elseif cmd == "help" then
		
	else
		Handle_SL32GUI()
	end
end

--setup the slash command stuff, hide the GUI
SlashCmdList["SLM"] = CommandFunc;
SLASH_SLM1 = "/SLm";


