split_bar.lua

local DF = _G ["DetailsFramework"]
if (not DF or not DetailsFrameworkCanLoad) then
	return 
end

local _
local rawset = rawset --lua local
local rawget = rawget --lua local
local setmetatable = setmetatable --lua local
local _unpack = unpack --lua local
local type = type --lua local
local _math_floor = math.floor --lua local

local maxStatusBarValue = 100000000

local cleanfunction = function() end
local APISplitBarFunctions

do
	local metaPrototype = {
		WidgetType = "split_bar",
		dversion = DF.dversion,
	}

	--check if there's a metaPrototype already existing
	if (_G[DF.GlobalWidgetControlNames["split_bar"]]) then
		--get the already existing metaPrototype
		local oldMetaPrototype = _G[DF.GlobalWidgetControlNames["split_bar"]]
		--check if is older
		if ( (not oldMetaPrototype.dversion) or (oldMetaPrototype.dversion < DF.dversion) ) then
			--the version is older them the currently loading one
			--copy the new values into the old metatable
			for funcName, _ in pairs(metaPrototype) do
				oldMetaPrototype[funcName] = metaPrototype[funcName]
			end
		end
	else
		--first time loading the framework
		_G[DF.GlobalWidgetControlNames["split_bar"]] = metaPrototype
	end
end

local SplitBarMetaFunctions = _G[DF.GlobalWidgetControlNames["split_bar"]]
DF:Mixin(SplitBarMetaFunctions, DF.ScriptHookMixin)

------------------------------------------------------------------------------------------------------------
--metatables

	SplitBarMetaFunctions.__call = function(_table, value)
		if (not value) then
			return _table.statusbar:GetValue()
		else
			_table.spark:SetPoint("left", _table.statusbar, "left", value * (_table.statusbar:GetWidth()/100) - 18, 0)
			return _table.statusbar:SetValue(value)
		end
	end

	SplitBarMetaFunctions.__add = function(v1, v2) 
		if (type(v1) == "table") then
			local v = v1.statusbar:GetValue()
			v = v + v2
			v1.spark:SetPoint("left", v1.statusbar, "left", value * (v1.statusbar:GetWidth()/100) - 18, 0)
			v1.statusbar:SetValue(v)
		else
			local v = v2.statusbar:GetValue()
			v = v + v1
			v2.spark:SetPoint("left", v2.statusbar, "left", value * (v2.statusbar:GetWidth()/100) - 18, 0)
			v2.statusbar:SetValue(v)
		end
	end

	SplitBarMetaFunctions.__sub = function(v1, v2) 
		if (type(v1) == "table") then
			local v = v1.statusbar:GetValue()
			v = v - v2
			v1.spark:SetPoint("left", v1.statusbar, "left", value * (v1.statusbar:GetWidth()/100) - 18, 0)
			v1.statusbar:SetValue(v)
		else
			local v = v2.statusbar:GetValue()
			v = v - v1
			v2.spark:SetPoint("left", v2.statusbar, "left", value * (v2.statusbar:GetWidth()/100) - 18, 0)
			v2.statusbar:SetValue(v)
		end
	end

------------------------------------------------------------------------------------------------------------
--members

	--tooltip
	local function gmember_tooltip (_object)
		return _object:GetTooltip()
	end
	--shown
	local gmember_shown = function(_object)
		return _object.statusbar:IsShown()
	end
	--frame width
	local gmember_width = function(_object)
		return _object.statusbar:GetWidth()
	end
	--frame height
	local gmember_height = function(_object)
		return _object.statusbar:GetHeight()
	end
	--value
	local gmember_value = function(_object)
		return _object.statusbar:GetValue()
	end
	--right text
	local gmember_rtext = function(_object)
		return _object.textright:GetText()
	end
	--left text
	local gmember_ltext = function(_object)
		return _object.textleft:GetText()
	end
	--right color
	local gmember_rcolor = function(_object)
		return _object.rightTexture.original_colors
	end
	--left color
	local gmember_lcolor = function(_object)
		return _object.texture.original_colors
	end
	--right icon
	local gmember_ricon = function(_object)
		return _object.iconright:GetTexture()
	end
	--left icon
	local gmember_licon = function(_object)
		return _object.iconleft:GetTexture()
	end
	--texture
	local gmember_texture = function(_object)
		return _object.texture:GetTexture()
	end	
	--font size
	local gmember_textsize = function(_object)
		local _, fontsize = _object.textleft:GetFont()
		return fontsize
	end
	--font face
	local gmember_textfont = function(_object)
		local fontface = _object.textleft:GetFont()
		return fontface
	end
	--font color
	local gmember_textcolor = function(_object)
		return _object.textleft:GetTextColor()
	end
	
	SplitBarMetaFunctions.GetMembers = SplitBarMetaFunctions.GetMembers or {}
	SplitBarMetaFunctions.GetMembers ["tooltip"] = gmember_tooltip
	SplitBarMetaFunctions.GetMembers ["shown"] = gmember_shown
	SplitBarMetaFunctions.GetMembers ["width"] = gmember_width
	SplitBarMetaFunctions.GetMembers ["height"] = gmember_height
	SplitBarMetaFunctions.GetMembers ["value"] = gmember_value
	SplitBarMetaFunctions.GetMembers ["righttext"] = gmember_rtext
	SplitBarMetaFunctions.GetMembers ["lefttext"] = gmember_ltext
	SplitBarMetaFunctions.GetMembers ["rightcolor"] = gmember_rcolor
	SplitBarMetaFunctions.GetMembers ["leftcolor"] = gmember_lcolor
	SplitBarMetaFunctions.GetMembers ["righticon"] = gmember_ricon
	SplitBarMetaFunctions.GetMembers ["lefticon"] = gmember_licon
	SplitBarMetaFunctions.GetMembers ["texture"] = gmember_texture
	SplitBarMetaFunctions.GetMembers ["fontsize"] = gmember_textsize
	SplitBarMetaFunctions.GetMembers ["fontface"] = gmember_textfont
	SplitBarMetaFunctions.GetMembers ["fontcolor"] = gmember_textcolor
	SplitBarMetaFunctions.GetMembers ["textsize"] = gmember_textsize --alias
	SplitBarMetaFunctions.GetMembers ["textfont"] = gmember_textfont --alias
	SplitBarMetaFunctions.GetMembers ["textcolor"] = gmember_textcolor --alias
	
	SplitBarMetaFunctions.__index = function(_table, _member_requested)

		local func = SplitBarMetaFunctions.GetMembers [_member_requested]
		if (func) then
			return func (_table, _member_requested)
		end
		
		local fromMe = rawget (_table, _member_requested)
		if (fromMe) then
			return fromMe
		end
		
		return SplitBarMetaFunctions [_member_requested]
	end

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

	--tooltip
	local smember_tooltip = function(_object, _value)
		return _object:SetTooltip (_value)
	end
	--show
	local smember_shown = function(_object, _value)
		if (_value) then
			return _object:Show()
		else
			return _object:Hide()
		end
	end
	--hide
	local smember_hide = function(_object, _value)
		if (_value) then
			return _object:Hide()
		else
			return _object:Show()
		end
	end
	--width
	local smember_width = function(_object, _value)
		return _object.statusbar:SetWidth(_value)
	end
	--height
	local smember_height = function(_object, _value)
		return _object.statusbar:SetHeight(_value)
	end
	--statusbar value
	local smember_value = function(_object, _value)
		_object.statusbar:SetValue(_value)
		return _object.spark:SetPoint("left", _object.statusbar, "left", _value * (_object.statusbar:GetWidth()/100) - 18, 0)
	end
	--right text
	local smember_rtext = function(_object, _value)
		return _object.textright:SetText(_value)
	end
	--left text
	local smember_ltext = function(_object, _value)
		return _object.textleft:SetText(_value)
	end
	--right color
	local smember_rcolor = function(_object, _value)
		local _value1, _value2, _value3, _value4 = DF:ParseColors(_value)
		_object.rightTexture.original_colors = {_value1, _value2, _value3, _value4}
		return _object.rightTexture:SetVertexColor(_value1, _value2, _value3, _value4)
	end
	--left color
	local smember_lcolor = function(_object, _value)
		local _value1, _value2, _value3, _value4 = DF:ParseColors(_value)
		
		_object.statusbar:SetStatusBarColor(_value1, _value2, _value3, _value4)
		_object.texture.original_colors = {_value1, _value2, _value3, _value4}
		return _object.texture:SetVertexColor(_value1, _value2, _value3, _value4)
	end
	--right icon
	local smember_ricon = function(_object, _value)
		if (type(_value) == "table") then
			local _value1, _value2 = _unpack(_value)
			_object.iconright:SetTexture(_value1)
			if (_value2) then
				_object.iconright:SetTexCoord(_unpack(_value2))
			end
		else
			_object.iconright:SetTexture(_value)
		end
		return
	end
	--left icon
	local smember_licon = function(_object, _value)
		if (type(_value) == "table") then
			local _value1, _value2 = _unpack(_value)
			_object.iconleft:SetTexture(_value1)
			if (_value2) then
				_object.iconleft:SetTexCoord(_unpack(_value2))
			end
		else
			_object.iconleft:SetTexture(_value)
		end
		return
	end
	--texture
	local smember_texture = function(_object, _value)
		if (type(_value) == "table") then
			local _value1, _value2 = _unpack(_value)
			_object.texture:SetTexture(_value1)
			_object.rightTexture:SetTexture(_value1)
			if (_value2) then
				_object.texture:SetTexCoord(_unpack(_value2))
				_object.rightTexture:SetTexCoord(_unpack(_value2))
			end
		else
			_object.texture:SetTexture(_value)
			_object.rightTexture:SetTexture(_value)
		end
		return
	end
	--font face
	local smember_textfont = function(_object, _value)
		DF:SetFontFace (_object.textleft, _value)
		return DF:SetFontFace (_object.textright, _value)
	end
	--font size
	local smember_textsize = function(_object, _value)
		DF:SetFontSize(_object.textleft, _value)
		return DF:SetFontSize(_object.textright, _value)
	end
	--font color
	local smember_textcolor = function(_object, _value)
		local _value1, _value2, _value3, _value4 = DF:ParseColors(_value)
		_object.textleft:SetTextColor(_value1, _value2, _value3, _value4)
		return _object.textright:SetTextColor(_value1, _value2, _value3, _value4)
	end

	SplitBarMetaFunctions.SetMembers = SplitBarMetaFunctions.SetMembers or {}
	SplitBarMetaFunctions.SetMembers ["tooltip"] = smember_tooltip
	SplitBarMetaFunctions.SetMembers ["shown"] = smember_shown
	SplitBarMetaFunctions.SetMembers ["width"] = smember_width
	SplitBarMetaFunctions.SetMembers ["height"] = smember_height
	SplitBarMetaFunctions.SetMembers ["value"] = smember_value
	SplitBarMetaFunctions.SetMembers ["righttext"] = smember_rtext
	SplitBarMetaFunctions.SetMembers ["lefttext"] = smember_ltext
	SplitBarMetaFunctions.SetMembers ["rightcolor"] = smember_rcolor
	SplitBarMetaFunctions.SetMembers ["leftcolor"] = smember_lcolor
	SplitBarMetaFunctions.SetMembers ["righticon"] = smember_ricon
	SplitBarMetaFunctions.SetMembers ["lefticon"] = smember_licon
	SplitBarMetaFunctions.SetMembers ["texture"] = smember_texture
	SplitBarMetaFunctions.SetMembers ["fontsize"] = smember_textsize
	SplitBarMetaFunctions.SetMembers ["fontface"] = smember_textfont
	SplitBarMetaFunctions.SetMembers ["fontcolor"] = smember_textcolor
	SplitBarMetaFunctions.SetMembers ["textsize"] = smember_textsize --alias
	SplitBarMetaFunctions.SetMembers ["textfont"] = smember_textfont --alias
	SplitBarMetaFunctions.SetMembers ["textcolor"] = smember_textcolor --alias
	
	SplitBarMetaFunctions.__newindex = function(_table, _key, _value)
		local func = SplitBarMetaFunctions.SetMembers [_key]
		if (func) then
			return func (_table, _value)
		else
			return rawset (_table, _key, _value)
		end
	end

------------------------------------------------------------------------------------------------------------
--methods

--show & hide
	function SplitBarMetaFunctions:Show()
		return self.statusbar:Show()
	end
	function SplitBarMetaFunctions:Hide()
		return self.statusbar:Hide()
	end

-- set split
	function SplitBarMetaFunctions:SetSplit (value)
		if (not value) then
			value = self.statusbar:GetValue()
		elseif (value < 0 or value > 100) then
			return
		end
		self.statusbar:SetValue(value)
		self.spark:SetPoint("left", self.statusbar, "left", value * (self.statusbar:GetWidth()/100) - 18, 0)
	end
	
-- setpoint
	function SplitBarMetaFunctions:SetPoint(v1, v2, v3, v4, v5)
		v1, v2, v3, v4, v5 = DF:CheckPoints (v1, v2, v3, v4, v5, self)
		if (not v1) then
			print("Invalid parameter for SetPoint")
			return
		end
		return self.widget:SetPoint(v1, v2, v3, v4, v5)
	end
	
-- sizes
	function SplitBarMetaFunctions:SetSize(w, h)
		if (w) then
			self.statusbar:SetWidth(w)
		end
		if (h) then
			self.statusbar:SetHeight(h)
		end
	end
	
-- texture
	function SplitBarMetaFunctions:SetTexture(texture)
		self.rightTexture:SetTexture(texture)
		self.texture:SetTexture(texture)
	end

	function SplitBarMetaFunctions:SetBackgroundTexture(texture)
		self.background:SetTexture(texture)
	end
	
-- texts
	function SplitBarMetaFunctions:SetLeftText (text)
		self.textleft:SetText(text)
	end
	function SplitBarMetaFunctions:SetRightText (text)
		self.textright:SetText(text)
	end
	
-- colors
	function SplitBarMetaFunctions:SetLeftColor (r, g, b, a)
		r, g, b, a = DF:ParseColors(r, g, b, a)
		self.texture:SetVertexColor(r, g, b, a)
		self.texture.original_colors = {r, g, b, a}
	end
	function SplitBarMetaFunctions:SetRightColor (r, g, b, a)
		r, g, b, a = DF:ParseColors(r, g, b, a)
		self.rightTexture:SetVertexColor(r, g, b, a)
		self.rightTexture.original_colors = {r, g, b, a}
	end

	function SplitBarMetaFunctions:SetBackgroundColor (r, g, b, a)
		r, g, b, a = DF:ParseColors(r, g, b, a)
		self.background:SetVertexColor(r, g, b, a)
		self.background.original_colors = {r, g, b, a}
	end

	function SplitBarMetaFunctions:GetLeftColor()
		return self.texture:GetVertexColor()
	end

	function SplitBarMetaFunctions:GetRightColor()
		return self.rightTexture:GetVertexColor()
	end
	
-- icons
	function SplitBarMetaFunctions:SetLeftIcon (texture, ...)
		self.iconleft:SetTexture(texture)
		if (...) then
			local L, R, U, D = unpack(...)
			self.iconleft:SetTexCoord(L, R, U, D)
		end
	end
	function SplitBarMetaFunctions:SetRightIcon (texture, ...)
		self.iconright:SetTexture(texture)
		if (...) then
			local L, R, U, D = unpack(...)
			self.iconright:SetTexCoord(L, R, U, D)
		end
	end

-- tooltip
	function SplitBarMetaFunctions:SetTooltip (tooltip)
		if (tooltip) then
			return rawset (self, "have_tooltip", tooltip)
		else
			return rawset (self, "have_tooltip", nil)
		end
	end
	function SplitBarMetaFunctions:GetTooltip()
		return rawget (self, "have_tooltip")
	end
	
-- frame levels
	function SplitBarMetaFunctions:GetFrameLevel()
		return self.statusbar:GetFrameLevel()
	end
	function SplitBarMetaFunctions:SetFrameLevel(level, frame)
		if (not frame) then
			return self.statusbar:SetFrameLevel(level)
		else
			local framelevel = frame:GetFrameLevel (frame) + level
			return self.statusbar:SetFrameLevel(framelevel)
		end
	end

-- frame stratas
	function SplitBarMetaFunctions:SetFrameStrata(strata)
		if (type(strata) == "table") then
			self.statusbar:SetFrameStrata(strata:GetFrameStrata())
		else
			self.statusbar:SetFrameStrata(strata)
		end
	end

-- animation
	--animation with acceleration ~animation ~healthbaranimation
	local animateLeftWithAccel = function(self, deltaTime)
		local currentPercent = DetailsFramework:GetRangePercent(self.targetValue, self.startValue, self.currentValue)
		currentPercent = abs(currentPercent - 1)
		currentPercent = min(0.9, currentPercent)
		currentPercent = max(0.5, currentPercent)

		local animationMultiplier = math.sin(currentPercent * math.pi)
		local valueChange = self.step * (deltaTime * animationMultiplier)
		self.currentValue = self.currentValue - valueChange

		local barWidth = self:GetWidth()
		self.currentValue = Clamp(self.currentValue, 0, maxStatusBarValue)
		self.statusbar:SetValue(self.currentValue)
		self.rightTexture:SetWidth(barWidth - barWidth*self.currentValue)

		if (self.currentValue - 0.001 <= self.targetValue) then
			self.targetValue = Clamp(self.targetValue, 0, maxStatusBarValue)
			self:SetValue(self.targetValue)
			self.currentValue = self.targetValue
			if (not self.SparkAlwaysShow) then
				self.spark:Hide()
			end
			self.widget:SetScript("OnUpdate", nil)
			return
		end

		self.spark:SetPoint("center", self.widget, "left", self.currentValue * barWidth, 0)
		self.spark:Show()
	end

	local animateRightWithAccel = function(self, deltaTime)
		--get the animation elapsed percent
		local currentPercent = DetailsFramework:GetRangePercent(self.startValue, self.targetValue, self.currentValue)
		currentPercent = min(0.9, currentPercent) --slow down the animation but avoid very slow
		currentPercent = max(0.5, currentPercent) --default: 0.1, using 0.5 makes the animation start fast and go slow

		--get the sine value and scale time with it
		local animationMultiplier = math.sin(currentPercent * math.pi)
		local valueChange = self.step * (deltaTime * animationMultiplier)
		self.currentValue = self.currentValue + valueChange

		local barWidth = self:GetWidth()
		self.currentValue = Clamp(self.currentValue, 0, maxStatusBarValue)
		self.statusbar:SetValue(self.currentValue)
		local rightTextureSize = barWidth - barWidth*self.currentValue
		self.rightTexture:SetWidth(rightTextureSize)

		if (self.currentValue + 0.001 >= self.targetValue) then
			self.targetValue = Clamp(self.targetValue, 0, maxStatusBarValue)
			self:SetValue(self.targetValue)
			self.currentValue = self.targetValue
			if (not self.SparkAlwaysShow) then
				self.spark:Hide()
			end
			self.widget:SetScript("OnUpdate", nil)
			return
		end

		self.spark:SetPoint("center", self.widget, "left", self.currentValue * barWidth, 0)
		self.spark:Show()
	end

	local onUpdate = function(self, deltaTime)
		self = self.MyObject
		--select the animation function
			--target is always equal to current
		if (self.targetValue > self.currentValue) then
			animateRightWithAccel(self, deltaTime)
		else
			animateLeftWithAccel(self, deltaTime)
		end
	end

	function SplitBarMetaFunctions:EnableAnimations()
		return
	end

	function SplitBarMetaFunctions:DisableAnimations()
		self.widget:SetScript("OnUpdate", nil)
	end

	function SplitBarMetaFunctions:SetValueWithAnimation(value)
		if (self.widget:GetScript("OnUpdate") == nil) then
			self.widget:SetScript("OnUpdate", onUpdate)
			self.widget:SetMinMaxValues(0, 1)
			self.spark:ClearAllPoints()
			self.spark:SetHeight(self:GetHeight() * 2.6)
			self.spark:SetAlpha(0.4)
		end
		self.startValue = self.currentValue
		self.step = abs(value - self.currentValue)
		self.targetValue = value
		self.rightTexture:Show()
	end

------------------------------------------------------------------------------------------------------------
--scripts

	local OnEnter = function(frame)
		local capsule = frame.MyObject
		local kill = capsule:RunHooksForWidget("OnEnter", frame, capsule)
		if (kill) then
			return
		end
		
		if (frame.MyObject.have_tooltip) then
			GameCooltip2:Reset()
			GameCooltip2:AddLine(frame.MyObject.have_tooltip)
			GameCooltip2:ShowCooltip(frame, "tooltip")
		end
	end
	
	local OnLeave = function(frame)
		local capsule = frame.MyObject
		local kill = capsule:RunHooksForWidget("OnLeave", frame, capsule)
		if (kill) then
			return
		end

		if (frame.MyObject.have_tooltip) then 
			DF.popup:ShowMe(false)
		end
	end
	
	local OnHide = function(frame)
		local capsule = frame.MyObject
		local kill = capsule:RunHooksForWidget("OnHide", frame, capsule)
		if (kill) then
			return
		end
	end
	
	local OnShow = function(frame)
		local capsule = frame.MyObject
		local kill = capsule:RunHooksForWidget("OnShow", frame, capsule)
		if (kill) then
			return
		end
	end
	
	local OnMouseDown = function(frame, button)
		local capsule = frame.MyObject
		local kill = capsule:RunHooksForWidget("OnMouseDown", frame, button, capsule)
		if (kill) then
			return
		end
		
		if (not frame.MyObject.container.isLocked and frame.MyObject.container:IsMovable()) then
			if (not frame.isLocked and frame:IsMovable()) then
				frame.MyObject.container.isMoving = true
				frame.MyObject.container:StartMoving()
			end
		end
	end
	
	local OnMouseUp = function(frame, button)
		local capsule = frame.MyObject
		local kill = capsule:RunHooksForWidget("OnMouseUp", frame, button, capsule)
		if (kill) then
			return
		end
		
		if (frame.MyObject.container.isMoving) then
			frame.MyObject.container:StopMovingOrSizing()
			frame.MyObject.container.isMoving = false
		end
	end
	
	local OnSizeChanged = function(statusbar)
		statusbar.MyObject.spark:SetPoint("left", statusbar, "left", statusbar:GetValue() * (statusbar:GetWidth()/100) - 18, 0)
		statusbar.MyObject.rightTexture:SetWidth(statusbar:GetWidth() - statusbar.MyObject.texture:GetWidth())
	end

------------------------------------------------------------------------------------------------------------
--object constructor

function DetailsFrameworkSplitlBar_OnCreate (self)
	self.texture.original_colors = {1, 1, 1, 1}
	self.rightTexture.original_colors = {.5, .5, .5, 1}
	self.spark:SetPoint("left", self, "left", self:GetValue() * (self:GetWidth()/100) - 18, 0)
	return true
end

function DF:CreateSplitBar(parent, width, height, member, name)
	return DF:NewSplitBar(parent, nil, name, member, width, height)
end

local build_statusbar = function(self)

	self:SetSize(300, 14)
	
	self.background = self:CreateTexture("$parent_StatusBarBackground", "BACKGROUND")
	self.background:SetPoint("topright", self, "topright")
	self.background:SetPoint("bottomright", self, "bottomright")
	self.background:SetPoint("topleft", self, "topleft")
	self.background:SetPoint("bottomleft", self, "bottomleft")
	self.background:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-Skills-Bar]])
	self.background:SetVertexColor(.3, .3, .3, 1)
	
	--this is the left texture and it grows to the right, it is embed within the bar by SetStatusBarTexture
	self.texture = self:CreateTexture("$parent_StatusBarTexture", "ARTWORK", nil, 1)
	self.texture:Hide()
	self.texture:SetSize(300, 14)
	self.texture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-Skills-Bar]])

	--this is the right texture and its size is the bar:GetWidth() - self.texture:GetWidth()
	self.rightTexture = self:CreateTexture("$parent_StatusBarTextureRight", "ARTWORK", nil, 2)
	self.rightTexture:Hide()
	self.rightTexture:SetSize(300, 14)
	self.rightTexture:SetTexture([[Interface\PaperDollInfoFrame\UI-Character-Skills-Bar]])
	self.rightTexture:SetPoint("topright", self, "topright")
	self.rightTexture:SetPoint("bottomright", self, "bottomright")
	self.rightTexture:SetVertexColor(1, 0, 0)
	
	self.lefticon = self:CreateTexture("$parent_IconLeft", "OVERLAY")
	self.lefticon:SetSize(14, 14)
	self.lefticon:SetPoint("LEFT", self, "LEFT")
	
	self.righticon = self:CreateTexture("$parent_IconRight", "OVERLAY")
	self.righticon:SetSize(14, 14)
	self.righticon:SetPoint("RIGHT", self, "RIGHT")
	
	self.spark = self:CreateTexture("$parent_Spark", "OVERLAY")
	self.spark:SetTexture([[Interface\CastingBar\UI-CastingBar-Spark]])
	self.spark:SetBlendMode("ADD")
	self.spark:SetSize(32, 32)
	self.spark:SetPoint("LEFT", self, "RIGHT", -17, -1)
	
	self.lefttext = self:CreateFontString("$parent_TextLeft", "OVERLAY", "GameFontHighlight")
	DF:SetFontSize(self.lefttext, 10)
	self.lefttext:SetJustifyH("left")
	self.lefttext:SetPoint("LEFT", self.lefticon, "RIGHT", 3, 0)
	
	self.righttext = self:CreateFontString("$parent_TextRight", "OVERLAY", "GameFontHighlight")
	DF:SetFontSize(self.righttext, 10)
	self.righttext:SetJustifyH("right")
	self.righttext:SetPoint("RIGHT", self.righticon, "LEFT", -3, 0)

	self:SetStatusBarTexture(self.texture)
	self:SetMinMaxValues(1, 100)
	self:SetValue(50)
	DetailsFrameworkSplitlBar_OnCreate (self)
end


function DF:NewSplitBar (parent, container, name, member, w, h)
	
	if (not name) then
		name = "DetailsFrameworkSplitbar" .. DF.SplitBarCounter
		DF.SplitBarCounter = DF.SplitBarCounter + 1
	end
	if (not parent) then
		return error("Details! FrameWork: parent not found.", 2)
	end
	if (not container) then
		container = parent
	end
	
	if (name:find("$parent")) then
		local parentName = DF:GetParentName(parent)
		name = name:gsub("$parent", parentName)
	end
	
	local SplitBarObject = {type = "barsplit", dframework = true}

	if (member) then
		parent [member] = SplitBarObject
	end
	
	if (parent.dframework) then
		parent = parent.widget
	end
	if (container.dframework) then
		container = container.widget
	end

	--default members:
		--misc
		SplitBarObject.locked = false
		SplitBarObject.container = container
		SplitBarObject.currentValue = 0.5
	
	--create widgets
		SplitBarObject.statusbar = CreateFrame("statusbar", name, parent, "BackdropTemplate")
		build_statusbar (SplitBarObject.statusbar)
		SplitBarObject.spark = SplitBarObject.statusbar.spark
		SplitBarObject.widget = SplitBarObject.statusbar
		
		if (not APISplitBarFunctions) then
			APISplitBarFunctions = true
			local idx = getmetatable(SplitBarObject.statusbar).__index
			for funcName, funcAddress in pairs(idx) do 
				if (not SplitBarMetaFunctions [funcName]) then
					SplitBarMetaFunctions [funcName] = function(object, ...)
						local x = loadstring ( "return _G['"..object.statusbar:GetName().."']:"..funcName.."(...)")
						return x (...)
					end
				end
			end
		end
		
		SplitBarObject.statusbar:SetHeight(h or 200)
		SplitBarObject.statusbar:SetWidth(w or 14)
		SplitBarObject.statusbar:SetValue(0.5)
		
		SplitBarObject.statusbar.MyObject = SplitBarObject
		
		SplitBarObject.textleft = _G [name .. "_TextLeft"]
		SplitBarObject.textright = _G [name .. "_TextRight"]
		
		SplitBarObject.iconleft = _G [name .. "_IconLeft"]
		SplitBarObject.iconright = _G [name .. "_IconRight"]
		
		SplitBarObject.background = _G [name .. "_StatusBarBackground"]
		SplitBarObject.texture = _G [name .. "_StatusBarTexture"]
		SplitBarObject.rightTexture = _G [name .. "_StatusBarTextureRight"]
	
	--hooks
	SplitBarObject.HookList = {
		OnEnter = {},
		OnLeave = {},
		OnHide = {},
		OnShow = {},
		OnMouseDown = {},
		OnMouseUp = {},
		OnSizeChanged = {},
	}
	
	SplitBarObject.statusbar:SetScript("OnEnter", OnEnter)
	SplitBarObject.statusbar:SetScript("OnLeave", OnLeave)
	SplitBarObject.statusbar:SetScript("OnHide", OnHide)
	SplitBarObject.statusbar:SetScript("OnShow", OnShow)
	SplitBarObject.statusbar:SetScript("OnMouseDown", OnMouseDown)
	SplitBarObject.statusbar:SetScript("OnMouseUp", OnMouseUp)
	SplitBarObject.statusbar:SetScript("OnSizeChanged", OnSizeChanged)
		
	setmetatable(SplitBarObject, SplitBarMetaFunctions)
	
	return SplitBarObject
end