Upload

lua/pac3/core/client/base_drawable.lua

@@ -0,0 +1,216 @@
+--[[
+| 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/
+--]]
+
+local render_OverrideAlphaWriteEnable = render.OverrideAlphaWriteEnable
+local render_OverrideColorWriteEnable = render.OverrideColorWriteEnable
+local render_OverrideBlendFunc = render.OverrideBlendFunc
+local ProtectedCall = ProtectedCall
+local cam_IgnoreZ = cam.IgnoreZ
+local pac = pac
+local ipairs = ipairs
+local table = table
+local TEXFILTER_POINT = TEXFILTER.POINT
+local render_PopFilterMag = render.PopFilterMag
+local render_PopFilterMin = render.PopFilterMin
+local render_PushFilterMin = render.PushFilterMin
+local render_PushFilterMag = render.PushFilterMag
+
+local BUILDER, PART = pac.PartTemplate("base_movable")
+
+PART.ClassName = "base_drawable"
+PART.BaseName = PART.ClassName
+
+BUILDER
+	:StartStorableVars()
+		:SetPropertyGroup("appearance")
+			:GetSet("Translucent", false)
+			:GetSet("IgnoreZ", false)
+			:GetSet("NoTextureFiltering", false)
+			:GetSet("BlendMode", "", {enums = {
+				none = "one;zero;one;zero",
+				alpha = "src_alpha;one_minus_src_alpha;one;one_minus_src_alpha",
+				multiplicative = "dst_color;zero;dst_color;zero",
+				premultiplied = "one;one_src_minus_alpha;one;one_src_minus_alpha",
+				additive = "src_alpha;one;src_alpha;one",
+			}})
+	:EndStorableVars()
+
+do
+	local blend_modes = {
+		zero = 0,
+		one = 1,
+		dst_color = 2,
+		one_minus_dst_color = 3,
+		src_alpha = 4,
+		one_minus_src_alpha = 5,
+		dst_alpha = 6,
+		one_minus_dst_alpha = 7,
+		src_alpha_saturate = 8,
+		src_color = 9,
+		one_minus_src_color = 10,
+	}
+
+	function PART:SetBlendMode(str)
+		str = str:lower():gsub("%s+", ""):gsub(",", ";"):gsub("blend_", "")
+
+		self.BlendMode = str
+
+		local tbl = str:Split(";")
+		local src_color
+		local dst_color
+
+		local src_alpha
+		local dst_alpha
+
+		if tbl[1] then src_color = blend_modes[tbl[1]] end
+		if tbl[2] then dst_color = blend_modes[tbl[2]] end
+
+		if tbl[3] then src_alpha = blend_modes[tbl[3]] end
+		if tbl[4] then dst_alpha = blend_modes[tbl[4]] end
+
+		if src_color and dst_color then
+			self.blend_override = {src_color, dst_color, src_alpha or 0, dst_alpha or 0, tbl[5]}
+		else
+			self.blend_override = nil
+		end
+	end
+
+	function PART:StartBlend()
+		if self.blend_override then
+			render_OverrideBlendFunc(true,
+				self.blend_override[1],
+				self.blend_override[2],
+				self.blend_override[3],
+				self.blend_override[4]
+			)
+
+			if self.blend_override[5] then
+				render_OverrideAlphaWriteEnable(true, self.blend_override[5] == "write_alpha")
+			end
+
+			if self.blend_override[6] then
+				render_OverrideColorWriteEnable(true, self.blend_override[6] == "write_color")
+			end
+		end
+	end
+
+	function PART:StopBlend()
+		if self.blend_override then
+			render_OverrideBlendFunc(false)
+
+			if self.blend_override[5] then
+				render_OverrideAlphaWriteEnable(false)
+			end
+
+			if self.blend_override[6] then
+				render_OverrideColorWriteEnable(false)
+			end
+		end
+	end
+end
+
+do -- modifiers
+	PART.HandleModifiersManually = false
+
+	function PART:AddModifier(part)
+		self:RemoveModifier(part)
+		table.insert(self.modifiers, part)
+	end
+
+	function PART:RemoveModifier(part)
+		for i, v in ipairs(self.modifiers) do
+			if v == part then
+				table.remove(self.modifiers, i)
+				break
+			end
+		end
+	end
+
+	function PART:ModifiersPreEvent(event)
+		if not self.modifiers[1] then return end
+
+		for _, part in ipairs(self.modifiers) do
+			if not part:IsHidden() then
+
+				if not part.pre_draw_events then part.pre_draw_events = {} end
+				if not part.pre_draw_events[event] then part.pre_draw_events[event] = "Pre" .. event end
+
+				if part[part.pre_draw_events[event]] then
+					part[part.pre_draw_events[event]](part)
+				end
+			end
+		end
+	end
+
+	function PART:ModifiersPostEvent(event)
+		if not self.modifiers[1] then return end
+
+		for _, part in ipairs(self.modifiers) do
+			if not part:IsHidden() then
+
+				if not part.post_draw_events then part.post_draw_events = {} end
+				if not part.post_draw_events[event] then part.post_draw_events[event] = "Post" .. event end
+
+				if part[part.post_draw_events[event]] then
+					part[part.post_draw_events[event]](part)
+				end
+			end
+		end
+	end
+
+end
+
+function PART:IsDrawHidden()
+	return self.draw_hidden
+end
+
+local _self
+
+local function call_draw()
+	_self:OnDraw()
+end
+
+function PART:Draw(draw_type)
+	if not self.OnDraw or not self.Enabled or self:IsHiddenCached() then return end
+
+	if
+		draw_type == "viewmodel" or draw_type == "hands" or
+		((self.Translucent == true or self.force_translucent == true) and draw_type == "translucent")  or
+		((self.Translucent == false or self.force_translucent == false) and draw_type == "opaque")
+	then
+		if not self.HandleModifiersManually then self:ModifiersPreEvent('OnDraw', draw_type) end
+
+		if self.IgnoreZ then cam_IgnoreZ(true) end
+
+		self:StartBlend()
+
+		if self.NoTextureFiltering then
+			render_PushFilterMin(TEXFILTER_POINT)
+			render_PushFilterMag(TEXFILTER_POINT)
+		end
+
+		_self = self
+
+		ProtectedCall(call_draw)
+
+		if self.NoTextureFiltering then
+			render_PopFilterMin()
+			render_PopFilterMag()
+		end
+
+		self:StopBlend()
+
+		if self.IgnoreZ then cam_IgnoreZ(false) end
+
+		if not self.HandleModifiersManually then self:ModifiersPostEvent('OnDraw', draw_type) end
+	end
+end
+
+BUILDER:Register()