madcatzinc@13: --~ Warcraft Plugin for Cyborg MMO7
madcatzinc@0: --~ Filename: CyborgMMO7.lua
madcatzinc@0: --~ Description: Plugin entry point, String tables and other generic crap that I could not think to put anywhere else.
madcatzinc@0: --~ Copyright (C) 2012 Mad Catz Inc.
madcatzinc@0: --~ Author: Christopher Hooks
madcatzinc@0: 
madcatzinc@0: --~ This program is free software; you can redistribute it and/or
madcatzinc@0: --~ modify it under the terms of the GNU General Public License
madcatzinc@0: --~ as published by the Free Software Foundation; either version 2
madcatzinc@0: --~ of the License, or (at your option) any later version.
madcatzinc@0: 
madcatzinc@0: --~ This program is distributed in the hope that it will be useful,
madcatzinc@0: --~ but WITHOUT ANY WARRANTY; without even the implied warranty of
madcatzinc@0: --~ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
madcatzinc@0: --~ GNU General Public License for more details.
madcatzinc@0: 
madcatzinc@0: --~ You should have received a copy of the GNU General Public License
madcatzinc@0: --~ along with this program; if not, write to the Free Software
madcatzinc@0: --~ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
madcatzinc@0: 
madcatzinc@36: local RAT7 = {
madcatzinc@36: 	BUTTONS = 13,
madcatzinc@36: 	MODES = 3,
madcatzinc@36: 	SHIFT = 0,
madcatzinc@36: }
madcatzinc@36: 
madcatzinc@4: function CyborgMMO_LoadStrings(self)
madcatzinc@15: --	CyborgMMO_DPrint("LoadStrings("..self:GetName()..") = "..CyborgMMO_StringTable[self:GetName()])
madcatzinc@13: 	self:SetText(CyborgMMO_StringTable[self:GetName()])
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@20: local VarsLoaded = false
madcatzinc@20: local EnteredWorld = false
madcatzinc@20: local BindingsLoaded = false
madcatzinc@21: local SettingsLoaded = false
madcatzinc@20: local SaveName = GetRealmName().."_"..UnitName("player")
madcatzinc@21: local Settings = nil
madcatzinc@0: 
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_MiniMapButtonReposition(pos)
madcatzinc@4: 	CyborgMMO_MiniMapFrame:SetPoint("TOPLEFT",
madcatzinc@0: 		"Minimap",
madcatzinc@0: 		"TOPLEFT",
madcatzinc@13: 		52 - (80 * cos(pos)),
madcatzinc@13: 		(80 * sin(pos)) - 52)
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_MiniMapButtonOnUpdate()
madcatzinc@0: 
madcatzinc@0: 	local xpos,ypos = GetCursorPosition()
madcatzinc@0: 	local xmin,ymin = Minimap:GetLeft(), Minimap:GetBottom()
madcatzinc@0: 
madcatzinc@0: 	xpos = (xmin)-(xpos / UIParent:GetScale())
madcatzinc@0: 	ypos = (ypos/ UIParent:GetScale())-(ymin)
madcatzinc@0: 
madcatzinc@13: 	local degrees = math.deg(math.atan2(ypos, xpos))
madcatzinc@0: 
madcatzinc@13: 	while degrees < 0 do
madcatzinc@13: 		degrees = degrees + 360
madcatzinc@0: 	end
madcatzinc@0: 
madcatzinc@4: 	CyborgMMO_MiniMapButtonReposition(degrees)
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_MouseModeChange(mode)
madcatzinc@4: 	local MiniMapTexture = getglobal("CyborgMMO_MiniMapFrameButton_Icon")
madcatzinc@4: 	local MiniMapGlowTexture = getglobal("CyborgMMO_MiniMapFrameButton_IconGlow")
madcatzinc@13: 	local OpenButtonTexture = getglobal("CyborgMMO_OpenButtonPage".."OpenMainForm"):GetNormalTexture()
madcatzinc@13: 	local OpenButtonGlowTexture = getglobal("CyborgMMO_OpenButtonPage".."OpenMainForm"):GetHighlightTexture()
madcatzinc@13: 	if mode == 1 then
madcatzinc@0: 		MiniMapTexture:SetVertexColor(1,0,0,1)
madcatzinc@31: 		MiniMapGlowTexture:SetVertexColor(1,0.26,0.26,.75)
madcatzinc@13: 		OpenButtonTexture:SetVertexColor(1,0,0,0.75)
madcatzinc@31: 		OpenButtonGlowTexture:SetVertexColor(1,0.26,0.26,0.50)
madcatzinc@13: 	elseif mode == 2 then
madcatzinc@0: 		MiniMapTexture:SetVertexColor(0.07,0.22,1,1)
madcatzinc@13: 		MiniMapGlowTexture:SetVertexColor(0.13,0.56,1,.75)
madcatzinc@13: 		OpenButtonTexture:SetVertexColor(0.07,0.22,1,0.75)
madcatzinc@13: 		OpenButtonGlowTexture:SetVertexColor(0.13,0.56,1,0.5)
madcatzinc@13: 	elseif mode == 3 then
madcatzinc@0: 		MiniMapTexture:SetVertexColor(0.52,0.08,0.89,1)
madcatzinc@13: 		MiniMapGlowTexture:SetVertexColor(0.67,0.31,0.85,.75)
madcatzinc@13: 		OpenButtonTexture:SetVertexColor(0.52,0.08,0.89,0.75)
madcatzinc@13: 		OpenButtonGlowTexture:SetVertexColor(0.67,0.31,0.85,0.5)
madcatzinc@0: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_GetSaveData()
madcatzinc@32: 	assert(VarsLoaded)
madcatzinc@32: 	if not CyborgMMO7SaveData then
madcatzinc@32: 		CyborgMMO7SaveData = {}
madcatzinc@0: 	end
madcatzinc@34: 	return CyborgMMO7SaveData
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@34: function CyborgMMO_SetRatSaveData(data)
madcatzinc@32: 	assert(VarsLoaded)
madcatzinc@34: 	local saveData = {}
madcatzinc@36: 	for mode=1,RAT7.MODES do
madcatzinc@34: 		saveData[mode] = {}
madcatzinc@36: 		for button=1,RAT7.BUTTONS do
madcatzinc@34: 			if data[mode][button] then
madcatzinc@34: 				saveData[mode][button] = data[mode][button]:SaveData()
madcatzinc@34: 			end
madcatzinc@34: 		end
madcatzinc@34: 	end
madcatzinc@34: 	CyborgMMO_GetSaveData().Rat = saveData
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@35: local function GetSpellID(name)
madcatzinc@35: 	local link = GetSpellLink(name)
madcatzinc@35: 	if link then
madcatzinc@35: 		local id = link:match('spell:(%d+)|')
madcatzinc@35: 		if id then
madcatzinc@35: 			return tonumber(id)
madcatzinc@35: 		end
madcatzinc@35: 	end
madcatzinc@35: end
madcatzinc@35: 
madcatzinc@35: local function ConvertOldRatData(oldData)
madcatzinc@35: 	local newData = {}
madcatzinc@35: 	for mode,modeData in ipairs(oldData) do
madcatzinc@35: 		newData[mode] = {}
madcatzinc@35: 		for button,buttonData in ipairs(modeData) do
madcatzinc@35: 			CyborgMMO_DPrint("converting mode:", mode, "button:", button)
madcatzinc@35: 			local type = buttonData.Type
madcatzinc@35: 			if type=='item' then
madcatzinc@35: 				-- not possible, the WowObject 'Type' field was overwritten by the item type
madcatzinc@35: 			elseif type=='macro' then
madcatzinc@35: 				local name = buttonData.Name
madcatzinc@35: 				newData[mode][button] = {
madcatzinc@35: 					type = type,
madcatzinc@35: 					detail = name,
madcatzinc@35: 				}
madcatzinc@35: 			elseif type=='spell' then
madcatzinc@35: 				local id = GetSpellID(buttonData.Name)
madcatzinc@35: 				CyborgMMO_DPrint("converting spell:", buttonData.Name, id)
madcatzinc@35: 				if id then
madcatzinc@35: 					newData[mode][button] = {
madcatzinc@35: 						type = type,
madcatzinc@35: 						detail = id,
madcatzinc@35: 					}
madcatzinc@35: 				end
madcatzinc@35: 			elseif type=='petaction' then
madcatzinc@35: 				-- no longer supported
madcatzinc@35: 			elseif type=='merchant' then
madcatzinc@35: 				-- no longer supported
madcatzinc@35: 			elseif type=='companion' then
madcatzinc@35: 				local id = GetSpellID(buttonData.Name)
madcatzinc@35: 				CyborgMMO_DPrint("converting companion:", buttonData.Name, id)
madcatzinc@35: 				if id then
madcatzinc@35: 					newData[mode][button] = {
madcatzinc@35: 						type = type,
madcatzinc@35: 						detail = buttonData.Subdetail,
madcatzinc@35: 						subdetail = id,
madcatzinc@35: 					}
madcatzinc@35: 				end
madcatzinc@35: 			elseif type=='equipmentset' then
madcatzinc@35: 				CyborgMMO_DPrint("converting equipment set:", buttonData.Detail)
madcatzinc@35: 				newData[mode][button] = {
madcatzinc@35: 					type = type,
madcatzinc@35: 					detail = buttonData.Detail,
madcatzinc@35: 				}
madcatzinc@35: 			elseif type=='callback' then
madcatzinc@35: 				CyborgMMO_DPrint("converting callback:", buttonData.Detail)
madcatzinc@35: 				newData[mode][button] = {
madcatzinc@35: 					type = type,
madcatzinc@35: 					detail = buttonData.Detail,
madcatzinc@35: 				}
madcatzinc@35: 			elseif type then
madcatzinc@35: 				-- maybe it's an item type
madcatzinc@35: 				local id = buttonData.Detail
madcatzinc@35: 				local class = select(6, GetItemInfo(id)) -- :NOTE: this may fail if the item is not yet in the cache
madcatzinc@35: 				if class == type then
madcatzinc@35: 					CyborgMMO_DPrint("converting item:", id, type, class)
madcatzinc@35: 					newData[mode][button] = {
madcatzinc@35: 						type = "item",
madcatzinc@35: 						detail = id,
madcatzinc@35: 					}
madcatzinc@35: 				end
madcatzinc@35: 			else
madcatzinc@35: 				CyborgMMO_DPrint("cannot convert:", type)
madcatzinc@35: 			end
madcatzinc@35: 		end
madcatzinc@35: 	end
madcatzinc@35: 	return newData
madcatzinc@35: end
madcatzinc@35: 
madcatzinc@4: function CyborgMMO_Event(self, event, ...)
madcatzinc@13: 	if event == "VARIABLES_LOADED" then
madcatzinc@20: 		VarsLoaded = true
madcatzinc@35: 		-- convert old profile
madcatzinc@35: 		if CyborgMMO7SaveData[SaveName] and not CyborgMMO7SaveData.Settings then
madcatzinc@35: 			local oldData = CyborgMMO7SaveData[SaveName]
madcatzinc@35: 			CyborgMMO7SaveData = {}
madcatzinc@35: 			CyborgMMO7SaveData.Settings = oldData.Settings
madcatzinc@35: 			CyborgMMO7SaveData.Rat = ConvertOldRatData(oldData.Rat)
madcatzinc@35: 			CyborgMMO7SaveData[SaveName] = oldData -- for now keep the data, we may have missed something in the conversion
madcatzinc@35: 		end
madcatzinc@13: 	elseif event == "PLAYER_ENTERING_WORLD" then
madcatzinc@20: 		EnteredWorld = true
madcatzinc@19: 	elseif event == "PLAYER_REGEN_DISABLED" then
madcatzinc@13: 		CyborgMMO_Close()
madcatzinc@0: 	else
madcatzinc@15: 		CyborgMMO_DPrint("Event is "..tostring(event))
madcatzinc@13: 	end
madcatzinc@0: 
madcatzinc@0: 	-- Fire Loading if and only if the player is in the world and vars are loaded
madcatzinc@20: 	if not BindingsLoaded and VarsLoaded and EnteredWorld then
madcatzinc@20: 		local data = CyborgMMO_GetSaveData()
madcatzinc@0: 
madcatzinc@20: 		CyborgMMO_RatPageModel:LoadData()
madcatzinc@20: 		BindingsLoaded = true
madcatzinc@0: 
madcatzinc@20: 		CyborgMMO_SetupModeCallbacks(1)
madcatzinc@20: 		CyborgMMO_SetupModeCallbacks(2)
madcatzinc@20: 		CyborgMMO_SetupModeCallbacks(3)
madcatzinc@0: 
madcatzinc@21: 		Settings = data.Settings
madcatzinc@21: 		if not Settings then
madcatzinc@21: 			Settings = {}
madcatzinc@21: 			Settings.Cyborg = 0.75
madcatzinc@21: 			Settings.Plugin = 0.75
madcatzinc@21: 			Settings.MiniMapButton = true
madcatzinc@21: 			Settings.CyborgButton = true
madcatzinc@21: 			data.Settings = Settings
madcatzinc@21: 		end
madcatzinc@21: 		SettingsLoaded = true
madcatzinc@0: 
madcatzinc@21: 		-- Reload Slider values:
madcatzinc@21: 		CyborgMMO_SetOpenButtonSize(Settings.Cyborg)
madcatzinc@21: 		CyborgMMO_SetMainPageSize(Settings.Plugin)
madcatzinc@0: 
madcatzinc@21: 		CyborgMMO_SetMiniMapButton(Settings.MiniMapButton)
madcatzinc@21: 		CyborgMMO_SetCyborgHeadButton(Settings.CyborgButton)
madcatzinc@0: 
madcatzinc@20: 		local xmin,ymin = Minimap:GetLeft(),Minimap:GetBottom()
madcatzinc@20: 		CyborgMMO_MiniMapButtonReposition(math.deg(math.atan2(ymin, xmin)))
madcatzinc@20: 		-- Close the main window for now
madcatzinc@20: 		CyborgMMO_Close()
madcatzinc@0: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_SetDefaultSettings()
madcatzinc@13: 	CyborgMMO_OpenButtonPageOpenMainForm:ClearAllPoints()
madcatzinc@13: 	CyborgMMO_MainPage:ClearAllPoints()
madcatzinc@13: 	CyborgMMO_OpenButtonPageOpenMainForm:SetPoint("LEFT", UIParent, "LEFT", 0, 0)
madcatzinc@13: 	CyborgMMO_MainPage:SetPoint("LEFT", UIParent, "LEFT", 0, 0)
madcatzinc@0: 
madcatzinc@13: 	CyborgMMO_SetOpenButtonSize(0.75)
madcatzinc@13: 	CyborgMMO_SetMainPageSize(0.75)
madcatzinc@13: 	CyborgMMO_SetMiniMapButton(true)
madcatzinc@13: 	CyborgMMO_SetCyborgHeadButton(true)
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_SetupModeCallbacks(modeNum)
madcatzinc@23: 	local fn = function()
madcatzinc@13: 		CyborgMMO_MouseModeChange(modeNum)
madcatzinc@18: 		CyborgMMO_RatPageModel:SetMode(modeNum)
madcatzinc@0: 	end
madcatzinc@0: 
madcatzinc@23: 	local buttonFrame,parentFrame,name = CyborgMMO_CallbackFactory:AddCallback(fn)
madcatzinc@16: 	SetOverrideBindingClick(parentFrame, true, CyborgMMO_Mode[modeNum], name, "LeftButton")
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_Loaded()
madcatzinc@13: 	CyborgMMO_MainPage:RegisterEvent("VARIABLES_LOADED")
madcatzinc@13: 	CyborgMMO_MainPage:RegisterEvent("PLAYER_ENTERING_WORLD")
madcatzinc@19: 	CyborgMMO_MainPage:RegisterEvent("PLAYER_REGEN_DISABLED")
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_Close()
madcatzinc@13: 	CyborgMMO_MainPage:Hide()
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_Open()
madcatzinc@13: 	CyborgMMO_MainPage:Show()
madcatzinc@13: 	CyborgMMO_RatQuickPage:Hide()
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_IsOpen()
madcatzinc@13: 	if CyborgMMO_MainPage:IsVisible() == 1 then
madcatzinc@13: 		return true
madcatzinc@0: 	else
madcatzinc@13: 		return false
madcatzinc@0: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_Toggle()
madcatzinc@13: 	if CyborgMMO_IsOpen() then
madcatzinc@13: 		CyborgMMO_Close()
madcatzinc@0: 	else
madcatzinc@13: 		CyborgMMO_Open()
madcatzinc@0: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@15: function CyborgMMO_GetDebugFrame()
madcatzinc@15: 	for i=1,NUM_CHAT_WINDOWS do
madcatzinc@15: 		local windowName = GetChatWindowInfo(i);
madcatzinc@15: 		if windowName == "Debug" then
madcatzinc@15: 			return getglobal("ChatFrame" .. i)
madcatzinc@15: 		end
madcatzinc@15: 	end
madcatzinc@15: end
madcatzinc@15: 
madcatzinc@15: local log_prefix = "|cffff6666".."CyborgMMO".."|r:"
madcatzinc@15: 
madcatzinc@15: function CyborgMMO_DPrint(...)
madcatzinc@15: 	local debugframe = CyborgMMO_GetDebugFrame()
madcatzinc@15: 	if debugframe then
madcatzinc@15: 		local t = {log_prefix, ...}
madcatzinc@15: 		for i=1,select('#', ...)+1 do
madcatzinc@15: 			t[i] = tostring(t[i])
madcatzinc@15: 		end
madcatzinc@15: 		debugframe:AddMessage(table.concat(t, ' '))
madcatzinc@15: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_SetMainPageSize(percent)
madcatzinc@21: 	CyborgMMO_MainPage:SetScale(percent)
madcatzinc@21: 	CyborgMMO_OptionPagePluginSizeSlider:SetValue(percent)
madcatzinc@21: 	if BindingsLoaded then
madcatzinc@21: 		Settings.Plugin = percent
madcatzinc@0: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@4: function CyborgMMO_SetOpenButtonSize(percent)
madcatzinc@21: 	CyborgMMO_OpenButtonPage:SetScale(percent)
madcatzinc@21: 	CyborgMMO_OptionPageCyborgSizeSlider:SetValue(percent)
madcatzinc@21: 	if SettingsLoaded then
madcatzinc@21: 		Settings.Cyborg = percent
madcatzinc@0: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@21: function CyborgMMO_SetCyborgHeadButton(visible)
madcatzinc@21: 	if visible then
madcatzinc@21: 		CyborgMMO_OpenButtonPage:Show()
madcatzinc@0: 	else
madcatzinc@13: 		CyborgMMO_OpenButtonPage:Hide()
madcatzinc@0: 	end
madcatzinc@21: 	CyborgMMO_OptionPageCyborgButton:SetChecked(visible)
madcatzinc@21: 	if SettingsLoaded then
madcatzinc@21: 		Settings.CyborgButton = visible
madcatzinc@21: 	end
madcatzinc@0: end
madcatzinc@0: 
madcatzinc@21: function CyborgMMO_SetMiniMapButton(visible)
madcatzinc@21: 	if visible then
madcatzinc@4: 		CyborgMMO_MiniMapFrameButton:Show()
madcatzinc@0: 	else
madcatzinc@4: 		CyborgMMO_MiniMapFrameButton:Hide()
madcatzinc@0: 	end
madcatzinc@21: 	CyborgMMO_OptionPageMiniMapButton:SetChecked(visible)
madcatzinc@21: 	if SettingsLoaded then
madcatzinc@21: 		Settings.MiniMapButton = visible
madcatzinc@21: 	end
madcatzinc@0: end
madcatzinc@0: