From 5dd930cbd6992707deb4a1fd6e98a8d71a08afae Mon Sep 17 00:00:00 2001
From: Michael Tindal <mj.tindal@icloud.com>
Date: Mon, 24 Feb 2014 03:55:01 -0800
Subject: [PATCH] Vehicle bar.

---
 ElvUI_SLE/config/sle_private.lua           |    4 ++
 ElvUI_SLE/modules/load_modules.xml         |    1 +
 ElvUI_SLE/modules/vehicle/load_vehicle.xml |    4 ++
 ElvUI_SLE/modules/vehicle/options.lua      |   21 ++++++
 ElvUI_SLE/modules/vehicle/vehicle.lua      |  106 ++++++++++++++++++++++++++++
 5 files changed, 136 insertions(+)
 create mode 100755 ElvUI_SLE/modules/vehicle/load_vehicle.xml
 create mode 100755 ElvUI_SLE/modules/vehicle/options.lua
 create mode 100755 ElvUI_SLE/modules/vehicle/vehicle.lua

diff --git a/ElvUI_SLE/config/sle_private.lua b/ElvUI_SLE/config/sle_private.lua
index 0964e6c..cf326b3 100755
--- a/ElvUI_SLE/config/sle_private.lua
+++ b/ElvUI_SLE/config/sle_private.lua
@@ -55,4 +55,8 @@ V['sle'] = {
 	['loot'] = {
 		['enable'] = false,
 	},
+
+	['vehicle'] = {
+		['enable'] = false,
+	},
 }
diff --git a/ElvUI_SLE/modules/load_modules.xml b/ElvUI_SLE/modules/load_modules.xml
index d8898da..73f5972 100755
--- a/ElvUI_SLE/modules/load_modules.xml
+++ b/ElvUI_SLE/modules/load_modules.xml
@@ -19,4 +19,5 @@
 	<Include file='tooltip\load_tooltip.xml'/>
 	<Include file='uibuttons\load_uibuttons.xml'/>
 	<Include file='unitframes\load_unitframes.xml'/>
+	<Include file='vehicle\load_vehicle.xml'/>
 </Ui>
diff --git a/ElvUI_SLE/modules/vehicle/load_vehicle.xml b/ElvUI_SLE/modules/vehicle/load_vehicle.xml
new file mode 100755
index 0000000..2a9d267
--- /dev/null
+++ b/ElvUI_SLE/modules/vehicle/load_vehicle.xml
@@ -0,0 +1,4 @@
+<Ui xmlns="http://www.blizzard.com/wow/ui/">	
+	<Script file='vehicle.lua'/>
+	<Script file='options.lua'/>
+</Ui>
\ No newline at end of file
diff --git a/ElvUI_SLE/modules/vehicle/options.lua b/ElvUI_SLE/modules/vehicle/options.lua
new file mode 100755
index 0000000..79ec9ba
--- /dev/null
+++ b/ElvUI_SLE/modules/vehicle/options.lua
@@ -0,0 +1,21 @@
+local E, L, V, P, G, _ = unpack(ElvUI); --Inport: Engine, Locales, PrivateDB, ProfileDB, GlobalDB, Localize Underscore
+
+local function configTable()
+	E.Options.args.sle.args.vehicle = {
+		type = "group",
+		name = L["Enhanced Vehicle Bar"],
+		desc = L["Use the enhanced vehicle bar based on work by Azilroka"],
+		order = 84,
+		args = {
+			enable = {
+				order = 1,
+				type = "toggle",
+				name = L["Enable"],
+				get = function(info) return E.private.sle.vehicle.enable end,
+				set = function(info, value) E.private.sle.vehicle.enable = value; E:StaticPopup_Show("PRIVATE_RL") end,
+			},
+		},
+	}
+end
+
+table.insert(E.SLEConfigs, configTable)
\ No newline at end of file
diff --git a/ElvUI_SLE/modules/vehicle/vehicle.lua b/ElvUI_SLE/modules/vehicle/vehicle.lua
new file mode 100755
index 0000000..34dadaa
--- /dev/null
+++ b/ElvUI_SLE/modules/vehicle/vehicle.lua
@@ -0,0 +1,106 @@
+local E, L, V, P, G = unpack(ElvUI);
+local EVB = E:NewModule("EnhancedVehicleBar");
+local AB = E:GetModule("ActionBars");
+
+-- Regular Button for these bars are 52. 52 * .71 = ~37.. I just rounded it up to 40 and called it good.
+function EVB:Animate(bar, x, y, duration)
+	bar.anim = bar:CreateAnimationGroup('Move_In')
+	bar.anim.in1 = bar.anim:CreateAnimation('Translation')
+	bar.anim.in1:SetDuration(0)
+	bar.anim.in1:SetOrder(1)
+	bar.anim.in2 = bar.anim:CreateAnimation('Translation')
+	bar.anim.in2:SetDuration(duration)
+	bar.anim.in2:SetOrder(2)
+	bar.anim.in2:SetSmoothing('OUT')
+	bar.anim.out1 = bar:CreateAnimationGroup('Move_Out')
+	bar.anim.out2 = bar.anim.out1:CreateAnimation('Translation')
+	bar.anim.out2:SetDuration(duration)
+	bar.anim.out2:SetOrder(1)
+	bar.anim.out2:SetSmoothing('IN')
+	bar.anim.in1:SetOffset(x, y)
+	bar.anim.in2:SetOffset(-x, -y)
+	bar.anim.out2:SetOffset(x, y)
+	bar.anim.out1:SetScript('OnFinished', function() bar:Hide() end)
+end
+
+function EVB:AnimSlideIn(bar)
+	if not bar.anim then
+		Animate(bar)
+	end
+
+	bar.anim.out1:Stop()
+	bar:Show()
+	bar.anim:Play()
+end
+
+function EVB:AnimSlideOut(bar)
+	if bar.anim then
+		bar.anim:Finish()
+	end
+
+	bar.anim:Stop()
+	bar.anim.out1:Play()
+end
+
+function EVB:CreateExtraButtonSet(type, page, visibility)
+	local barFrame = self.barFrame
+	barFrame[type] = {}
+	for i = 1, 6 do
+		barFrame[type]['Button'..i] = CreateFrame('CheckButton', 'ElvUISLEEnhancedVehicleBar_'..type..i, barFrame, 'ActionBarButtonTemplate')
+		barFrame[type]['Button'..i]:Size(self.size)
+		barFrame[type]['Button'..i]:SetID(i)
+		barFrame[type]['Button'..i]:SetAttribute('actionpage', page)
+		barFrame[type]['Button'..i]:SetAttribute('action', i)
+		AB:StyleButton(barFrame[type]['Button'..i]);
+		RegisterStateDriver(barFrame[type]['Button'..i], 'visibility', '[petbattle] hide; '..visibility)
+
+		if (i == 1) then
+			barFrame[type]['Button'..i]:SetPoint('BOTTOMLEFT', self.spacing, self.spacing)
+		else
+			local prev = barFrame[type]['Button'..i-1]
+			barFrame[type]['Button'..i]:SetPoint('LEFT', prev, 'RIGHT', self.spacing, 0)
+		end
+	end
+end
+
+function EVB:Initialize()
+	if (not E.private.sle.vehicle.enable) then return end;
+
+	local visibility = "[petbattle] hide; [vehicleui][overridebar][shapeshift][possessbar] hide; show"
+
+	hooksecurefunc(AB, "PositionAndSizeBar", function(self, barName)
+		local bar = self["handledBars"][barName]
+		if (self.db[barName].enabled) then
+			UnregisterStateDriver(bar, 'visibility');
+			RegisterStateDriver(bar, 'visibility', visibility);
+		end
+	end);
+
+	local size = 40;
+	local spacing = E:Scale(AB.db["bar1"].buttonspacing);
+	local barFrame = CreateFrame("Frame", "ElvUISLEEnhancedVehicleBar", UIParent, "SecureHandlerStateTemplate");
+
+	self.size = size;
+	self.spacing = spacing;
+
+	barFrame:SetWidth((size * 6) + (spacing * 7));
+	barFrame:SetHeight(size + (spacing * 2));
+	barFrame:SetTemplate("Transparent");
+	barFrame:CreateShadow();
+	if (E:GetModule("EnhancedShadows", true)) then
+		E:GetModule("EnhancedShadows"):RegisterShadow(barFrame.shadow);
+	end
+
+	barFrame:SetPoint("BOTTOM", 0, 34);
+	barFrame:HookScript("OnShow", function(frame) self:AnimSlideIn(frame) end);
+	RegisterStateDriver(barFrame, 'visibility', '[petbattle] hide; [vehicleui][overridebar][shapeshift][possessbar] show; hide');
+	self:Animate(barFrame, 0, -(barFrame:GetHeight()), 1);
+
+	self.barFrame = barFrame;
+
+	self:CreateExtraButtonSet('vehicle', 12, '[vehicleui][possessbar] show; hide')
+	self:CreateExtraButtonSet('shapeshit', 13, '[shapeshift] show; hide')
+	self:CreateExtraButtonSet('override', 14, '[overridebar] show; hide')
+end
+
+E:RegisterModule(EVB:GetName())
\ No newline at end of file
-- 
1.7.9.5