WoWInterface/Interface/AddOns/AddOnSkins/Skins/AddOns/DBM.lua

local AS, L, S, R = unpack(AddOnSkins)

local min = min

function R:DBM(event, addon)
	local function SkinBars(s)
		for bar in s:GetBarIterator() do
			if not bar.injected then
				hooksecurefunc(bar, "Update", function()
					local sparkEnabled = DBT.Options.Spark
					if not (AS:CheckOption('DBMSkinHalf') and sparkEnabled) then return end
					local spark = _G[bar.frame:GetName().."BarSpark"]
					spark:SetSize(12, ((bar.enlarged and DBT.Options.HugeHeight or DBT.Options.Height) * 3) - 2)
					local a, b, c, d = spark:GetPoint()
					spark:SetPoint(a, b, c, d, 0)
				end)
				hooksecurefunc(bar, "ApplyStyle", function()
					local frame = bar.frame
					local tbar = _G[frame:GetName()..'Bar']
					local icon1 = _G[frame:GetName()..'BarIcon1']
					local icon2 = _G[frame:GetName()..'BarIcon2']
					local name = _G[frame:GetName()..'BarName']
					local timer = _G[frame:GetName()..'BarTimer']
					local iconSize = bar.enlarged and DBT.Options.HugeHeight or DBT.Options.Height
					if AS:CheckOption('DBMSkinHalf') then
						iconSize = min(iconSize * 2, 35)
					end
					iconSize = iconSize - 2

					S:HandleIcon(icon1, true)
					icon1:ClearAllPoints()
					icon1:SetPoint('BOTTOMRIGHT', frame, 'BOTTOMLEFT', AS:AdjustForTheme(-1), 1)
					icon1:SetSize(iconSize, iconSize)

					S:HandleIcon(icon2, true)
					icon2:ClearAllPoints()
					icon2:SetPoint('BOTTOMLEFT', frame, 'BOTTOMRIGHT', AS:AdjustForTheme(1), 1)
					icon2:SetSize(iconSize, iconSize)

					S:SetInside(tbar, frame)

					S:SetTemplate(frame)

					name:ClearAllPoints()
					name:SetJustifyH('LEFT')

					timer:ClearAllPoints()
					timer:SetJustifyH('RIGHT')

					if AS:CheckOption('DBMSkinHalf') then
						name:SetPoint('BOTTOMLEFT', frame, 'TOPLEFT', 0, 3)
						timer:SetPoint('BOTTOMRIGHT', frame, 'TOPRIGHT', -1, 1)
					else
						name:SetPoint('LEFT', frame, 'LEFT', 4, 0)
						timer:SetPoint('RIGHT', frame, 'RIGHT', -4, 0)
					end

					if DBT.Options.IconLeft then icon1.backdrop:Show() else icon1.backdrop:Hide() end
					if DBT.Options.IconRight then icon2.backdrop:Show() else icon2.backdrop:Hide() end

					bar.injected = true
				end)
				bar:ApplyStyle()
			end
		end
	end

	local function SkinRange(s, range, filter, forceshow, redCircleNumPlayers)
		if DBM.Options.DontShowRangeFrame and not forceshow then return end
		if DBMRangeCheck then
			S:SetTemplate(DBMRangeCheck)
			S:SetTemplate(DBMRangeCheckRadar)
		end
	end

	local function SkinInfo(s, maxLines, event, ...)
		if DBM.Options.DontShowInfoFrame and (event or 0) ~= "test" then return end
		if DBMInfoFrame then
			S:SetTemplate(DBMInfoFrame)
		end
	end

	hooksecurefunc(DBT, 'CreateBar', SkinBars)
	hooksecurefunc(DBM.RangeCheck, 'Show', SkinRange)
	hooksecurefunc(DBM.InfoFrame, 'Show', SkinInfo)

	if AS:CheckOption('DBMSkinHalf') then
		local halfBarskin = DBT:RegisterSkin("AddOnSkins Half-Bar")
		if DBT.Options.BarYOffset < 18 then
			halfBarskin.Options.BarYOffset = 18
		end
		if DBT.Options.HugeBarYOffset < 18 then
			halfBarskin.Options.HugeBarYOffset = 18
		end
		halfBarskin.Defaults.Height = 10
		halfBarskin.Defaults.HugeHeight = 10
		halfBarskin.Options.IconLocked = true
		DBT:SetSkin("AddOnSkins Half-Bar")
	else
		local skin = DBT:RegisterSkin("AddOnSkins")
		skin.Defaults.Height = 30
		skin.Defaults.HugeHeight = 30
		skin.Options.IconLocked = true
		DBT:SetSkin("AddOnSkins")
	end
end

AS:RegisterSkin('DBM-Core', R.DBM)