Upload

gamemodes/helix/plugins/willardinterface/derma/cl_bar.lua

@@ -0,0 +1,196 @@
+--[[
+| This file was obtained through the combined efforts
+| of Madbluntz & Plymouth Antiquarian Society.
+|
+| Credits: lifestorm, Gregory Wayne Rossel JR.,
+| 	Maloy, DrPepper10 @ RIP, Atle!
+|
+| Visit for more: https://plymouth.thetwilightzone.ru/
+--]]
+
+
+-- bar manager
+-- this manages positions for bar panels
+local PANEL = {}
+
+AccessorFunc(PANEL, "padding", "Padding", FORCE_NUMBER)
+
+function PANEL:Init()
+	self:SetSize(ScrW() * 0.35, ScrH())
+	self:SetPos(4, 4)
+	self:ParentToHUD()
+
+	self.bars = {}
+	self.padding = 2
+
+	-- add bars that were registered before manager creation
+	for _, v in ipairs(ix.bar.list) do
+		v.panel = self:AddBar(v.index, v.color, v.priority)
+	end
+end
+
+function PANEL:GetAll()
+	return self.bars
+end
+
+function PANEL:Clear()
+	for k, v in ipairs(self.bars) do
+		v:Remove()
+
+		table.remove(self.bars, k)
+	end
+end
+
+function PANEL:AddBar(index, color, priority)
+	local panel = self:Add("ixInfoBar")
+	panel:SetSize(self:GetWide(), BAR_HEIGHT)
+	panel:SetVisible(false)
+	panel:SetID(index)
+	panel:SetColor(color)
+	panel:SetPriority(priority)
+
+	self.bars[#self.bars + 1] = panel
+	self:Sort()
+
+	return panel
+end
+
+function PANEL:RemoveBar(panel)
+	local toRemove
+
+	for k, v in ipairs(self.bars) do
+		if (v == panel) then
+			toRemove = k
+			break
+		end
+	end
+
+	if (toRemove) then
+		table.remove(self.bars, toRemove)
+	end
+
+	panel:Remove()
+	self:Sort()
+end
+
+-- sort bars by priority
+function PANEL:Sort()
+	table.sort(self.bars, function(a, b)
+		return a:GetPriority() < b:GetPriority()
+	end)
+end
+
+-- update target Y positions
+function PANEL:Organize()
+	local currentY = 0
+
+	for _, v in ipairs(self.bars) do
+		if (!v:IsVisible()) then
+			continue
+		end
+
+		v:SetPos(0, currentY)
+
+		currentY = currentY + self.padding + v:GetTall()
+	end
+
+	self:SetSize(self:GetWide(), currentY)
+end
+
+function PANEL:Think()
+	local menu = (IsValid(ix.gui.characterMenu) and !ix.gui.characterMenu:IsClosing()) and ix.gui.characterMenu
+		or IsValid(ix.gui.menu) and ix.gui.menu
+	local fraction = menu and 1 - menu.currentAlpha / 255 or 1
+
+	self:SetAlpha(255 * fraction)
+
+	-- don't update bars when not visible
+	if (fraction == 0) then
+		return
+	end
+
+	local curTime = CurTime()
+	local bShouldHide = hook.Run("ShouldHideBars")
+	local bAlwaysShow = ix.option.Get("alwaysShowBars", false)
+
+	for _, v in ipairs(self.bars) do
+		v:SetVisible(false)
+	end
+
+	self:Organize()
+end
+
+function PANEL:OnRemove()
+	self:Clear()
+end
+
+vgui.Register("ixInfoBarManager", PANEL, "Panel")
+
+PANEL = {}
+
+AccessorFunc(PANEL, "index", "ID", FORCE_NUMBER)
+AccessorFunc(PANEL, "color", "Color")
+AccessorFunc(PANEL, "priority", "Priority", FORCE_NUMBER)
+AccessorFunc(PANEL, "value", "Value", FORCE_NUMBER)
+AccessorFunc(PANEL, "delta", "Delta", FORCE_NUMBER)
+AccessorFunc(PANEL, "lifetime", "Lifetime", FORCE_NUMBER)
+
+function PANEL:Init()
+	self.value = 0
+	self.delta = 0
+	self.lifetime = 0
+
+	self.bar = self:Add("DPanel")
+	self.bar:SetPaintedManually(true)
+	self.bar:Dock(FILL)
+	self.bar:DockMargin(2, 2, 2, 2)
+	self.bar.Paint = function(this, width, height)
+		width = width * math.min(self.delta, 1)
+
+		derma.SkinFunc("PaintInfoBar", self, width, height, self.color)
+	end
+
+	self.label = self:Add("DLabel")
+	self.label:SetFont("ixSmallFont")
+	self.label:SetContentAlignment(5)
+	self.label:SetText("")
+	self.label:SetTextColor(Color(240, 240, 240))
+	self.label:SetExpensiveShadow(2, Color(20, 20, 20))
+	self.label:SetPaintedManually(true)
+	self.label:SizeToContents()
+	self.label:Dock(FILL)
+end
+
+function PANEL:SetText(text)
+	self.label:SetText(text)
+	self.label:SizeToContents()
+end
+
+function PANEL:Think()
+	local value = math.Approach(self.delta, self.value, FrameTime())
+	-- fix for smooth bar changes (increase of 0.01 every 0.1sec for example)
+	if (value == self.value and self.delta != self.value and self.value != 0 and self.value != 1) then
+		value = self.delta
+	end
+
+	self.delta = value
+end
+
+function PANEL:Paint(width, height)
+	surface.SetDrawColor(230, 230, 230, 15)
+	surface.DrawRect(0, 0, width, height)
+	surface.DrawOutlinedRect(0, 0, width, height)
+
+	self.bar:PaintManual()
+
+	DisableClipping(true)
+		self.label:PaintManual()
+	DisableClipping(false)
+end
+
+vgui.Register("ixInfoBar", PANEL, "Panel")
+
+if (IsValid(ix.gui.bars)) then
+	ix.gui.bars:Remove()
+	ix.gui.bars = vgui.Create("ixInfoBarManager")
+end