Actionbars_New

local Core = LibStub("AceAddon-3.0"):GetAddon("BasicUI")
local Module = Core:NewModule("Actionbars", "AceEvent-3.0")

---------------
-- Actionbars --
---------------

------------------------------------------------------------------------
-- Local functions

local function EnableHotKeys()

	local db = Core.db.profile

	if db.actionbars.showHotKeys ~= false then return end

	for i=1, 12 do
		_G["ActionButton"..i.."HotKey"]:SetAlpha(0) -- main bar
		_G["MultiBarBottomRightButton"..i.."HotKey"]:SetAlpha(0) -- bottom right bar
		_G["MultiBarBottomLeftButton"..i.."HotKey"]:SetAlpha(0) -- bottom left bar
		_G["MultiBarRightButton"..i.."HotKey"]:SetAlpha(0) -- right bar
		_G["MultiBarLeftButton"..i.."HotKey"]:SetAlpha(0) -- left bar
	end
end

local function EnableMacroNames()

	local db = Core.db.profile

	if db.actionbars.showMacronames ~= false then return end

	for i=1, 12 do
		_G["ActionButton"..i.."Name"]:SetAlpha(0) -- main bar
		_G["MultiBarBottomRightButton"..i.."Name"]:SetAlpha(0) -- bottom right bar
		_G["MultiBarBottomLeftButton"..i.."Name"]:SetAlpha(0) -- bottom left bar
		_G["MultiBarRightButton"..i.."Name"]:SetAlpha(0) -- right bar
		_G["MultiBarLeftButton"..i.."Name"]:SetAlpha(0) -- left bar
	end
end

------------------------------------------------------------------------
-- Module functions

function Module:OnEnable()
	if InCombatLockdown() then
		return self:RegisterEvent("PLAYER_REGEN_ENABLED", "OnEnable")
	end
	self:UnregisterEvent("PLAYER_REGEN_ENABLED")

	local db = Core.db.profile

	if enabled or not db.actionbars.enable then return end
	enabled = true -- since most of this stuff is non-undoable (eg. hooksecurefunc)

	EnableHotKeys()
	EnableMacroNames()

	local ccolor = RAID_CLASS_COLORS[select(2, UnitClass("player"))]


	hooksecurefunc('ActionButton_UpdateUsable', function(self)
		if (IsAddOnLoaded('RedRange') or IsAddOnLoaded('GreenRange') or IsAddOnLoaded('tullaRange') or IsAddOnLoaded('RangeColors')) then
			return
		end

		local isUsable, notEnoughMana = IsUsableAction(self.action)
		if (isUsable) then
			_G[self:GetName()..'Icon']:SetVertexColor(1, 1, 1)
		elseif (notEnoughMana) then
			_G[self:GetName()..'Icon']:SetVertexColor(db.actionbars.color.OutOfMana.r, db.actionbars.color.OutOfMana.g, db.actionbars.color.OutOfMana.b)
		else
			_G[self:GetName()..'Icon']:SetVertexColor(db.actionbars.color.NotUsable.r, db.actionbars.color.NotUsable.g, db.actionbars.color.NotUsable.b)
		end
	end)

	-- BetterBlizzardButtonBorder v1.1.1
	-- By Aprikot - http://aprikot.wowinterface.com
	-- Based upon functions within nMainbar by Neal, and thek: Buttonskin by thek

	-- Functions
	hooksecurefunc("ActionButton_Update", function(self)
	if self:GetName():match("ExtraActionButton") then return end
		local bu = _G[self:GetName()]
		local ic = _G[self:GetName().."Icon"]
		local bo = _G[self:GetName().."NormalTexture"]
		bu:SetNormalTexture("Interface\\BUTTONS\\UI-Quickslot2")
		ic:SetTexCoord(.05, .95, .05, .95);
		ic:SetPoint("TOPLEFT", bu, 0, 0);
		ic:SetPoint("BOTTOMRIGHT", bu, 0, 0);
		bo:ClearAllPoints()
		bo:SetPoint("TOPLEFT", bu, -14, 14)
		bo:SetPoint("BOTTOMRIGHT", bu, 14, -14)
		if db.misc.classcolor ~= true then
			bo:SetVertexColor(db.actionbars.color.r, db.actionbars.color.g, db.actionbars.color.b)
		else
			bo:SetVertexColor((ccolor.r * 1.2), (ccolor.g * 1.2), (ccolor.b * 1.2))
		end
	end);

	hooksecurefunc("ActionButton_UpdateUsable", function(self)
	if self:GetName():match("ExtraActionButton") then return end
		if db.misc.classcolor ~= true then
			(_G[self:GetName().."NormalTexture"]):SetVertexColor(db.actionbars.color.r, db.actionbars.color.g, db.actionbars.color.b)
		else
			(_G[self:GetName().."NormalTexture"]):SetVertexColor((ccolor.r * 1.2), (ccolor.g * 1.2), (ccolor.b * 1.2))
		end
	end);

	hooksecurefunc("ActionButton_ShowGrid", function(self)
	if self:GetName():match("ExtraActionButton") then return end
		if db.misc.classcolor ~= true then
			(_G[self:GetName().."NormalTexture"]):SetVertexColor(db.actionbars.color.r, db.actionbars.color.g, db.actionbars.color.b)
		else
			(_G[self:GetName().."NormalTexture"]):SetVertexColor((ccolor.r * 1.2), (ccolor.g * 1.2), (ccolor.b * 1.2))
		end
	end);

	hooksecurefunc("PetActionBar_Update",  function()
		for i, v in pairs({"PetActionButton", "ShapeshiftButton", "PossessButton"}) do
			for i = 1, 12 do
				local bu = _G[v..i]
				if bu then
					bu:SetNormalTexture("Interface\\BUTTONS\\UI-Quickslot2")
					local ic = _G[v..i.."Icon"];
					ic:SetTexCoord(.05, .95, .05, .95);
					ic:SetPoint("TOPLEFT", bu, -1, 1);
					ic:SetPoint("BOTTOMRIGHT", bu, 1, -1);
					local bo = _G[v..i.."NormalTexture2"] or _G[v..i.."NormalTexture"]
					bo:ClearAllPoints()
					bo:SetPoint("TOPLEFT", bu, -15, 15)
					bo:SetPoint("BOTTOMRIGHT", bu, 15, -15)
					if db.misc.classcolor ~= true then
						bo:SetVertexColor(db.actionbars.color.r, db.actionbars.color.g, db.actionbars.color.b)
					else
						bo:SetVertexColor((ccolor.r * 1.2), (ccolor.g * 1.2), (ccolor.b * 1.2))
					end
				end
			end
		end
	end);

	hooksecurefunc("AuraButton_Update", function(self, index)
		if db.actionbars.auraborder then
			local bu = _G[self..index]
			local ic = _G[self..index.."Icon"]
			local bo = _G[self..index.."Border"]
			if ic then
				ic:SetTexCoord(.07, .93, .07, .93);
			end
			if bo then
				bo:SetTexture("Interface\\BUTTONS\\UI-Quickslot2")
				bo:ClearAllPoints()
				bo:SetPoint("TOPLEFT", bu, -12, 12)
				bo:SetPoint("BOTTOMRIGHT", bu, 12, -12)
				bo:SetTexCoord(0, 1, 0, 1)
				if db.misc.classcolor ~= true then
					bo:SetVertexColor(db.actionbars.color.r, db.actionbars.color.g, db.actionbars.color.b)
				else
					bo:SetVertexColor((ccolor.r * 1.2), (ccolor.g * 1.2), (ccolor.b * 1.2))
				end
			end
			if bu and not bo then
				nbo = bu:CreateTexture("$parentOverlay", "ARTWORK")
				nbo:SetParent(bu)
				nbo:SetTexture("Interface\\BUTTONS\\UI-Quickslot2")
				nbo:SetPoint("TOPLEFT", bu, -12, 12)
				nbo:SetPoint("BOTTOMRIGHT", bu, 12, -12)
				if db.misc.classcolor ~= true then
					nbo:SetVertexColor(db.actionbars.color.r, db.actionbars.color.g, db.actionbars.color.b)
				else
					nbo:SetVertexColor((ccolor.r * 1.2), (ccolor.g * 1.2), (ccolor.b * 1.2))
				end
			end
		end
	end);

	function ActionButton_OnUpdate(self, elapsed)
		if (IsAddOnLoaded('RedRange') or IsAddOnLoaded('GreenRange') or IsAddOnLoaded('tullaRange') or IsAddOnLoaded('RangeColors')) then
			return
		end

		if (ActionButton_IsFlashing(self)) then
			local flashtime = self.flashtime
			flashtime = flashtime - elapsed

			if (flashtime <= 0) then
				local overtime = - flashtime
				if (overtime >= ATTACK_BUTTON_FLASH_TIME) then
					overtime = 0
				end

				flashtime = ATTACK_BUTTON_FLASH_TIME - overtime

				local flashTexture = _G[self:GetName()..'Flash']
				if (flashTexture:IsShown()) then
					flashTexture:Hide()
				else
					flashTexture:Show()
				end
			end

			self.flashtime = flashtime
		end

		local rangeTimer = self.rangeTimer
		if (rangeTimer) then
			rangeTimer = rangeTimer - elapsed
			if (rangeTimer <= 0.1) then
				local isInRange = false
				if (ActionHasRange(self.action) and IsActionInRange(self.action) == 0) then
					_G[self:GetName()..'Icon']:SetVertexColor(db.actionbars.color.OutOfRange.r, db.actionbars.color.OutOfRange.g, db.actionbars.color.OutOfRange.b)
					isInRange = true
				end

				if (self.isInRange ~= isInRange) then
					self.isInRange = isInRange
					ActionButton_UpdateUsable(self)
				end

				rangeTimer = TOOLTIP_UPDATE_TIME
			end

			self.rangeTimer = rangeTimer
		end
	end

end