init

2022-11-05 21:19:42 -07:00
parent b79f4bd588
commit f3e579cb57
386 changed files with 93729 additions and 2 deletions
@@ -0,0 +1,181 @@
+-- ------------------------------------------------------------------------------ --
+--                                TradeSkillMaster                                --
+--                http://www.curse.com/addons/wow/tradeskill-master               --
+--                                                                                --
+--             A TradeSkillMaster Addon (http://tradeskillmaster.com)             --
+--    All Rights Reserved* - Detailed license information included with addon.    --
+-- ------------------------------------------------------------------------------ --
+
+-- Much of this code is copied from .../AceGUI-3.0/widgets/AceGUIWidget-CheckBox.lua
+-- This CheckBox widget is modified to fit TSM's theme / needs
+local TSM = select(2, ...)
+local Type, Version = "TSMCheckBox", 2
+local AceGUI = LibStub and LibStub("AceGUI-3.0", true)
+if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end
+
+-- Lua APIs
+local select, pairs = select, pairs
+
+-- WoW APIs
+local PlaySound = PlaySound
+local CreateFrame, UIParent = CreateFrame, UIParent
+
+--[[-----------------------------------------------------------------------------
+Scripts
+-------------------------------------------------------------------------------]]
+local function Control_OnEnter(frame)
+	frame.obj:Fire("OnEnter")
+end
+
+local function Control_OnLeave(frame)
+	frame.obj:Fire("OnLeave")
+end
+
+local function CheckBox_OnMouseDown(frame)
+	local self = frame.obj
+	if not self.disabled then
+		self.text:SetPoint("LEFT", self.btn, "RIGHT", 1, -1)
+	end
+	AceGUI:ClearFocus()
+end
+
+local function CheckBox_OnMouseUp(frame, button)
+	local self = frame.obj
+	if not self.disabled then
+		self.text:SetPoint("LEFT", self.btn, "RIGHT", 0, 0)
+		self:ToggleChecked()
+
+		if self.checked then
+			PlaySound("igMainMenuOptionCheckBoxOn")
+		else
+			PlaySound("igMainMenuOptionCheckBoxOff")
+		end
+
+		self:Fire("OnValueChanged", self.checked)
+	end
+end
+
+--[[-----------------------------------------------------------------------------
+Methods
+-------------------------------------------------------------------------------]]
+local methods = {
+	["OnAcquire"] = function(self)
+		self:SetType()
+		self:SetValue()
+		self:SetWidth(200)
+		self:SetDisabled()
+			self:SetHeight(24)
+	end,
+
+	["SetDisabled"] = function(self, disabled)
+		self.disabled = disabled
+		TSMAPI.Design:SetWidgetLabelColor(self.text, disabled)
+		if disabled then
+			self.frame:Disable()
+			local r, g, b = self.btn:GetBackdropColor()
+			self.btn:SetBackdropColor(r, g, b, .5)
+			SetDesaturation(self.check, true)
+		else
+			self.frame:Enable()
+			local r, g, b = self.btn:GetBackdropColor()
+			self.btn:SetBackdropColor(r, g, b, 1)
+			SetDesaturation(self.check, false)
+		end
+	end,
+
+	["SetValue"] = function(self,value)
+		local check = self.check
+		self.checked = value
+		SetDesaturation(self.check, false)
+		if value then
+			self.check:Show()
+		else
+			self.check:Hide()
+		end
+		self:SetDisabled(self.disabled)
+	end,
+
+	["GetValue"] = function(self)
+		return self.checked
+	end,
+
+	["SetType"] = function(self, type)
+		local check = self.check
+
+		if type == "radio" then
+			self.btn:SetWidth(10)
+			self.btn:SetHeight(10)
+			self.btn:SetPoint("TOPLEFT", 7, -7)
+			self.check:SetPoint("TOPLEFT", -1, 5)
+		else
+			self.btn:SetWidth(16)
+			self.btn:SetHeight(16)
+			self.btn:SetPoint("TOPLEFT", 4, -4)
+			self.check:SetPoint("TOPLEFT")
+		end
+	end,
+
+	["ToggleChecked"] = function(self)
+		self:SetValue(not self:GetValue())
+	end,
+
+	["SetLabel"] = function(self, label)
+		self.text:SetText(label)
+	end,
+}
+
+
+--[[-----------------------------------------------------------------------------
+Constructor
+-------------------------------------------------------------------------------]]
+
+local function Constructor()
+	local frame = CreateFrame("Button", nil, UIParent)
+	frame:Hide()
+	frame:EnableMouse(true)
+	frame:SetScript("OnEnter", Control_OnEnter)
+	frame:SetScript("OnLeave", Control_OnLeave)
+	frame:SetScript("OnMouseDown", CheckBox_OnMouseDown)
+	frame:SetScript("OnMouseUp", CheckBox_OnMouseUp)
+
+	local btn = CreateFrame("Button", nil, frame)
+	btn:EnableMouse(false)
+	btn:SetWidth(16)
+	btn:SetHeight(16)
+	btn:SetPoint("TOPLEFT", 4, -4)
+	TSMAPI.Design:SetContentColor(btn)
+	local highlight = btn:CreateTexture(nil, "HIGHLIGHT")
+	highlight:SetAllPoints()
+	highlight:SetTexture(1, 1, 1, .2)
+	highlight:SetBlendMode("BLEND")
+
+	local check = btn:CreateTexture(nil, "OVERLAY")
+	check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check")
+	check:SetTexCoord(.12, .88, .12, .88)
+	check:SetBlendMode("BLEND")
+	check:SetPoint("BOTTOMRIGHT")
+
+	local text = frame:CreateFontString(nil, "OVERLAY")
+	text:SetJustifyH("LEFT")
+	text:SetHeight(18)
+	text:SetPoint("LEFT", btn, "RIGHT")
+	text:SetPoint("RIGHT")
+	text:SetFont(TSMAPI.Design:GetContentFont("normal"))
+
+	local widget = {
+		btn		 = btn,
+		check     = check,
+		text      = text,
+		highlight = highlight,
+		frame     = frame,
+		type      = Type
+	}
+	for method, func in pairs(methods) do
+		widget[method] = func
+	end
+	frame.obj = widget
+
+	return AceGUI:RegisterAsWidget(widget)
+end
+
+AceGUI:RegisterWidgetType(Type, Constructor, Version)