Implement absorb meter

FreshShit/WarlockAbsorbs/color.lua

@@ -0,0 +1,3 @@
+function(progress)
+	return Display.color.r, Display.color.g, Display.color.b, 1
+  end

FreshShit/WarlockAbsorbs/duration.lua

@@ -0,0 +1,4 @@
+function()
+	local current, max = ShieldManager.GetStats()
+	return current, max, 1
+end

FreshShit/WarlockAbsorbs/event.lua

@@ -0,0 +1,8 @@
+-- TICKER_500
+function()
+	for _, shield in pairs(Shields) do
+		shield:Update()
+	end
+	Display.Update()
+	return true
+end

FreshShit/WarlockAbsorbs/export

@@ -0,0 +1 @@
+!LRXctjos6)lE1uhSdYeWN1uRtDQJmJUkAzWzN5CfOH0a9AiHRtcQJ3KF77x)kP78s0A8Q7QRqdjD(E)UtOFR(96BpVVTd7p40Gfi6T)oXjCw)UTSKxF(Kjb4WV2VlSW9Il4Npoki0FEp89H9TNe5noK47vRE8jXdfFO4WiQx8Wpscw4IEO54ikf7f2iDL5O71UYFYNxeFc2deMhuSz92waNqEJN5tVWN4bS6WJ627OlHfJc97FGugV0peX4pxWmw5mFhCF79VQ35GusrZX2Huuic0V(2KXagJG199c74IMg03(8R6D6XDpsCVbJ9D9PGHbaM9xB(Xn4h3KDeehqMWupK7xW0aUa0EBqcWUtYiUJqJV1H6V4yVouGDm2ocrpmLbD2E3D3z3T2T9wBSD7T2C7n6pz9T2GX0oBzT72B2A3nTAV9o70Eh(D2mRG4GdqGbhfIz0wyY6Wu4EpSaSa2hE5rh11WL(nH1kA0L4PGOhiKdimiKJbcigiIdG)b6dYb7oG3EqWmKJ)DFv5JAPqaOuipAGdL403mUT86vWwYHJ5m6B3HqrXdpZ3ZhoIDirZnyUMDd0bgXS4eZkdXeq)TKWPwQ1tDqIqd(QljbKrUywuvIOiSEjHf81nIhpUB3JUCWLh)Pp3tz2)MwwchH)esvitEinAiH82KVJb5pji)RAOszHWyrcw3ZbUhY0XxMxO1)x4fo9Oo)NWjSzAscyTh5tDWuiDM)TuS4z3jRfWzWMjxp(PnCsi1mgYvWotzPZ)RiefhpStKRB8WFFgbs7vq4lL(nzY6wVWaMn(FNaMYcqYgivqatsZKx5qg4SzyY0zSmylrZGPu)ipNQTiwn3IHQRpI3EM4XqAbVPDKBiboHt6qKl0yn3YJDrbb5w1HmzczmSYd5UffngNFrF38lUy5IsyAWc84ClobXNoOebVDEIWSUzwmu276aafhzx9p(X(2rb49DyokSd25m09SUFHuY0Pqd50oAIfsZBfdVWd(XlbzWocSk333EWH7B3BGDV9VShRL6iyzrO1Np60l6C1Pa)8imdamXclPNJmCxmYfgAY2d63gWfyjh(iRJmt1lCejx)Xii9nDYiyIO4H7fp0Egb7cAJhcK6MFchcMQWGIMUYax4yl5iukf7ckMRy2xC0PNYDpUUh7yiJdeMePQOSmRVE8WEhF4VbzjBzzfFsrY)eFA8Wbaxd4YB8qcirlqeAqnHgeupEOJFkcQpc4F)vlCGmfDkcYE6fQjdZdMs7dPryPcZfFycUuzUV9uShMsgBpZ)UZbxqa)79b1yzsiWGzeN04HqM)vlyrzmuPob)j3kWqh56ch4x0tGapOekwzXGf5rMJub9bHikpvXrgoin5byyktWzidk989WmCNJiE5dvHaDz1y2uVqGd(EEvC(A9mJQz39b(DrUlMHeZUZp(Gy2Dgo7NI(Nsp9Y0t7akRwG7cQ)ukoiOQz8zO1K2i7ktZTYirSAIpxv2mv8oGliLyXyfviEKGzRSvvv)4WNUHghUptCCWqqt3J(cRYFWCF)WzxinbmxGzHhcFNeu(K090NFw1wwn4FsN8dK7iOV9bUKV)DefYF657dv8wi3(rap0unAzui0N58fHYr1zPQ(EtitfNlKzTEmSwvrua)JCxE1XXdpWf5DBF7V7dbij7sQNcOJzBJbktJ)JdrqppVPhGO)XvhVE6vRBZqqIhViR)4LQn9SJ1gS8ncKhU)OaF6OG0D8uTbx2ItgMco87eB)KtpG3JV9HKAOatJyS4u03J(YLZp(874BaJjf8n9WfTpk2heFbFkbkkila)5ZV84)55D7T)PClNdr3sMSxwrTgGrYVfDUc0ZI1J94carKB7pqM)DGEv01)hixckiEi3oep8r67Jh6fnFeMLMmv)Irjx8J4tyyY7GlXetfRnruPLNIa3lebJ48RjKGd6hmGCefJUDbBQNmGdGPOmRNZJPP1mSzjpLsEfGkPWeD1NhHce87bozMUQD(i15Xd)rdgdJh(jk(HxBA0qSGGkTKxjPJbvWERmzSmitRuYCGlR50QPqMIIUkDreDHBv0PLP0OBAsPY5uK30F6ubwp5CJWmE8aqfMEz1Sn)4M8JBZpUlR6p)UTSSaWKKYiaesMrZJhUeXmJY8ctiuDF4rLaT8iU)7aO7T30u44f2w47cjZCXkPBgNU1ZBruZKjYw3lJBp1DLAC0f8NmdkZLYmXpuQCmcgk)wCOssEuWCPp5rHFJfZjKJm0GpFgjX)(3KP7nn8vfnFM6dzsId4xtQdPJ(1KBaDAwrPlz)i1KRBFJszinkNM)yviiGs5GzmkzzctRxQWiOEf(Dr5(YCR8EjhMeJPySOE61Psh83nVCUGLBWSkE0wXJYiYeQOhiNi1KrdRRBcbAaZ5)o4UAeL5MZd1jLeKEly9xQV)Hudu9Qdr5QZ13EJHo6c581w2i1caa0ivvQVY(ZKTzLwIXyZkLv1cvCfl5Dhv5DdRUAx27X0vZsBiw5jwTM6LRqGa(lGdRf3jbao8TCX6xyS3C3yqWFaoCogMJIv7QM0glk)myaXZbFVUXhsx4(zTbyeBg8ayZ0zMIHcJQtDckRSyrW2Z)3W4fPMbni4zSmbqDpd(wWmosdEjuUiJVPMOGWdFNPhWGIL3KH98S4iAyGFuuAV0iEDBEXYts)5cynJNnZOX7L1gujwcl5pkbOeNWEjBWRIwszeKQs01fbEvzE73twPY(k3h3GVk5VcptXwxDW4a8LNEefJ6g7VybtknIyymSHbbFcF316wBH1qxAEANtnZvEtrHgI6cTYzYE(gSYQE9jC4zYh6LHTO8Kg1ZiZQKGl2ZJs2LsRDIMQvFLN55dsUTAd4OeSLf7aQmaTWfzsIGO7jIGecss0S1teTZW9v1ZDO4Hp(C8Elzh2ltOCMqX3wCvkOrv76LeOkItVPyBOGNVmBid3C9dlO5MrJi2JbMnJNyRiA3iZMz03LUSjLPFqs7YBDzYPY7yvrVkgjE9Br9mAoj0P9KkxXWinKfxgGdXO0U(620MG(xBdR6)K7ruAv)s2wQ4Xm9CsCmA1isGWJdR1AhGdx5rc3pIIQTM49sSwdntz96fNvyqWQRWLXKxzFgSBaELP0Q2)wZJ(Er3ZAPuQ(kLGkFzkQCk1LfKA9CAvvzHUYvYx8lor9jL6YZERIwkZKqARv)zoHuMMx57A8CBh8F1wiPe)QBLuVMUQbYOFT6L(TQwZkglY81m(QzXvsa)7Nr8yYo51KVKZ)z61mFpRRG3tw1UAVNcidAwvmWWAu0D1F6qHSWPIi6sgJx1OIxYRwo34NWyWTWBhp0xxjulwDNdtJutigBokS2AVPzRjNX6sLqU3Xjx9gLdkxusbReN5QTnWSSWAYT5KgllRcfhjSjIJeUYdUY3rs(QqnFHokExWWHCEvW6sCUeDxzOv2T4)yllAcv2nQcj4EDsEGGfjsIN3O85sQu0mDzlA6NvmgUHUw3ivhlnYMLTubXNjE8hSjOe)ioyfPuJrvaAz(1SAuSQuG1Rm(uuuPnAxwfDvGlpTuqt8RMKMfbZmb)cpq(jrVJ(ZcohPF3kqeXaK5ZPEZBwRroswL9p3Z1w7n9uReXUIP(Z(GD1sA1FpoIySpOMIm3R(86ww7UX2BFJwajFhhRz7hbrBNIXJNTw9gMiSzRcq4Ji6TXdVaeCt4BBTZM70op8FfTerjJ)7GiDgAkKzgp88frbCKbvj53qvF72nBTDZn6BVSF3wB2M9lEO)F9

FreshShit/WarlockAbsorbs/init.lua

@@ -0,0 +1,207 @@
+---@alias Color {r: number, g: number, b: number}
+---@class Colorer
+---@field colors table<number, Color>
+---@field breakpoints table<number>
+Colorer = {
+	---@type table<number, Color>
+	colors = {
+		{ r = 0.62, g = 0.62, b = 0.62 }, -- Grey
+		{ r = 1,    g = 1,    b = 1 }, -- White
+		{ r = 0.12, g = 1,    b = 0 }, -- Green
+		{ r = 0,    g = 0.44, b = 0.87 }, -- Blue
+		{ r = 0.64,  g = 0.21,    b = 0.93 }, -- Purple
+		{ r = 1,    g = 0.5,  b = 0 }, -- Orange
+		{ r = 0.9,    g = 0.8,  b = 0.5 }, -- Light Gold
+	},
+	breakpoints = { 0.0, 0.2, 0.4, 0.6, 0.8, 1.0, 1000.0 },
+
+	---@param value number
+	---@return Color, nil|string
+	Interpolate = function(value)
+		local color = { r = 0, g = 0, b = 0 }
+
+		---@type table<number, table<number, number>>
+		local bracket = { { 0, 0 }, { 1, 1 } }
+		for i = 1, #Colorer.breakpoints do
+			if value < Colorer.breakpoints[i] then
+				bracket[2] = { i, Colorer.breakpoints[i] }
+				break
+			end
+			bracket[1] = { i, Colorer.breakpoints[i] }
+		end
+
+		---@type Color
+		local startColor = Colorer.colors[bracket[1][1]]
+		---@type Color
+		local endColor = Colorer.colors[bracket[2][1]]
+
+		local fraction = (value - bracket[1][2]) / (bracket[2][2] - bracket[1][2])
+
+		for k, v in pairs(startColor) do
+			color[k] = Colorer.lerp(v, endColor[k], fraction)
+		end
+
+		return color, nil
+	end,
+
+	---@param a number
+	---@param b number
+	---@param t number
+	---@return number
+	lerp = function(a, b, t)
+		return a * (1 - t) + b * t
+	end
+}
+setmetatable(Colorer, { __index = Colorer })
+
+---@class ShieldBuffer
+---@field records table<number, number>
+---@field recordsToKeep number
+---@field pointer number
+ShieldBuffer = {
+	---@param recordsToKeep number
+	---@return ShieldBuffer
+	new = function(recordsToKeep)
+		local self = setmetatable({}, {
+			__index = ShieldBuffer
+		})
+		self.recordsToKeep = recordsToKeep
+		self.records = {}
+		self.pointer = 1
+		for i = 1, recordsToKeep do
+			self.records[i] = 0
+		end
+		return self
+	end,
+
+	---@param self ShieldBuffer
+	---@param shieldValue number
+	---@return nil
+	Append = function(self, shieldValue)
+		self.records[self.pointer] = shieldValue
+		self.pointer = (self.pointer % self.recordsToKeep) + 1
+	end,
+	---@param self ShieldBuffer
+	---@return number
+	GetMax = function(self)
+		local max = 0
+		for _, value in pairs(self.records) do
+			if value > max then
+				max = value
+			end
+		end
+		if max == nil then return 0 end
+		return max
+	end,
+	---@param self ShieldBuffer
+	---@return number
+	GetCurrent = function(self)
+		local val = self.records[(self.pointer + self.recordsToKeep - 2) % self.recordsToKeep + 1]
+		if val == nil then return 0 end
+		return val
+	end
+}
+
+---@class Shield
+---@field name string
+---@field value number
+---@field buffer ShieldBuffer
+Shield = {
+	---@param name string
+	---@return Shield
+	new = function(name)
+		local self = setmetatable({}, {
+			__index = Shield
+		})
+		self.name = name
+		self.value = 0
+		self.buffer = ShieldBuffer.new(30)
+		return self
+	end,
+
+	---@param self Shield
+	---@return nil, nil|string
+	Update = function(self)
+		local shieldValue = select(17, UnitAura("player", self.name))
+		if shieldValue then
+			self.value = shieldValue
+		else
+			self.value = 0
+		end
+		self.buffer:Append(self.value)
+	end
+}
+
+---@class ShieldManager
+ShieldManager = {
+	---@return number
+	GetMax = function()
+		local value = 0
+		for _, shield in pairs(Shields) do
+			value = value + shield.buffer:GetMax()
+		end
+		return value
+	end,
+	---@return number
+	GetCurrent = function()
+		local value = 0
+		for _, shield in pairs(Shields) do
+			value = value + shield.buffer:GetCurrent()
+		end
+		return value
+	end,
+	---@return number current
+	---@return number max
+	GetStats = function()
+		local max = 0
+		local current = 0
+		for _, shield in pairs(Shields) do
+			max = max + shield.buffer:GetMax()
+			current = current + shield.buffer:GetCurrent()
+		end
+		return current, max
+	end,
+	---@return string current
+	---@return string max
+	---@return number current (raw)
+	---@return number max (raw)
+	GetStatsNice = function()
+		local current, max = ShieldManager.GetStats()
+		if max > 1e6 or current > 1e6 then
+			return string.format("%.1fM", current / 1e6), string.format("%.1fM", max / 1e6), current, max
+		end
+		return string.format("%.0fk", current / 1000), string.format("%.0fk", max / 1000), current, max
+	end
+}
+
+---@class Display
+---@field current number
+---@field max number
+---@field currentRaw number
+---@field maxRaw number
+---@field ofHp string
+---@field ofHpRaw number
+---@field ofHpRawFraction number
+---@field color Color
+Display = {
+	Update = function()
+		local current, max, currentRaw, maxRaw = ShieldManager.GetStatsNice()
+		local hp = UnitHealthMax("player")
+		Display.current = current
+		Display.max = max
+		Display.currentRaw = currentRaw
+		Display.maxRaw = maxRaw
+		Display.ofHpRaw = currentRaw / hp * 100
+		Display.ofHpRawFraction = Display.ofHpRaw / 100
+		Display.ofHp = string.format("%.0f%%", Display.ofHpRaw)
+		Display.color = Colorer.Interpolate(Display.ofHpRawFraction)
+		return nil
+	end
+}
+
+---@type table<Shield>
+Shields = {
+	[108366] = Shield.new("Soul Leech"),
+	[108416] = Shield.new("Dark Pact"),
+	[207472] = Shield.new("Xavaric's Magnum Opus"),
+}

FreshShit/WarlockAbsorbs/scratch.lua

@@ -0,0 +1,31 @@
+---@param table table
+---@param depth number?
+function DumpTable(table, depth)
+	if depth == nil then
+		depth = 0
+	end
+	if (depth > 200) then
+		print("Error: Depth > 200 in dumpTable()")
+		return
+	end
+	for k, v in pairs(table) do
+		if (type(v) == "table") then
+			print(string.rep("  ", depth) .. k .. ":")
+			DumpTable(v, depth + 1)
+		else
+			print(string.rep("  ", depth) .. k .. ": ", v)
+		end
+	end
+end
+
+
+local colorer = Colorer.new()
+
+local value = 1.21
+local rgb = colorer:Interpolate(value)
+
+for i = 1, 150 do
+	local value = i / 100
+	local rgb = colorer:Interpolate(value)
+	print(value, rgb.r, rgb.g, rgb.b)
+end

FreshShit/WarlockAbsorbs/text.lua

@@ -0,0 +1,3 @@
+function()
+	return Display.current, Display.max, Display.ofHp
+end