annotate CyborgMMO7.lua @ 21:c8b19bc87787

Simplified settings handling, and fixed a few minor bugs related to them.
author madcatzinc@35b17cf1-18cd-47ff-9ca3-31d6b526ef09
date Thu, 25 Apr 2013 01:30:26 +0000
parents 937be4664323
children 3b1c0b676583
rev   line source
madcatzinc@13 1 --~ Warcraft Plugin for Cyborg MMO7
madcatzinc@0 2 --~ Filename: CyborgMMO7.lua
madcatzinc@0 3 --~ Description: Plugin entry point, String tables and other generic crap that I could not think to put anywhere else.
madcatzinc@0 4 --~ Copyright (C) 2012 Mad Catz Inc.
madcatzinc@0 5 --~ Author: Christopher Hooks
madcatzinc@0 6
madcatzinc@0 7 --~ This program is free software; you can redistribute it and/or
madcatzinc@0 8 --~ modify it under the terms of the GNU General Public License
madcatzinc@0 9 --~ as published by the Free Software Foundation; either version 2
madcatzinc@0 10 --~ of the License, or (at your option) any later version.
madcatzinc@0 11
madcatzinc@0 12 --~ This program is distributed in the hope that it will be useful,
madcatzinc@0 13 --~ but WITHOUT ANY WARRANTY; without even the implied warranty of
madcatzinc@0 14 --~ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
madcatzinc@0 15 --~ GNU General Public License for more details.
madcatzinc@0 16
madcatzinc@0 17 --~ You should have received a copy of the GNU General Public License
madcatzinc@0 18 --~ along with this program; if not, write to the Free Software
madcatzinc@0 19 --~ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
madcatzinc@0 20
madcatzinc@4 21 function CyborgMMO_LoadStrings(self)
madcatzinc@15 22 -- CyborgMMO_DPrint("LoadStrings("..self:GetName()..") = "..CyborgMMO_StringTable[self:GetName()])
madcatzinc@13 23 self:SetText(CyborgMMO_StringTable[self:GetName()])
madcatzinc@0 24 end
madcatzinc@0 25
madcatzinc@20 26 local VarsLoaded = false
madcatzinc@20 27 local EnteredWorld = false
madcatzinc@20 28 local BindingsLoaded = false
madcatzinc@21 29 local SettingsLoaded = false
madcatzinc@20 30 local SaveName = GetRealmName().."_"..UnitName("player")
madcatzinc@21 31 local Settings = nil
madcatzinc@0 32
madcatzinc@0 33
madcatzinc@4 34 function CyborgMMO_MiniMapButtonReposition(pos)
madcatzinc@4 35 CyborgMMO_MiniMapFrame:SetPoint("TOPLEFT",
madcatzinc@0 36 "Minimap",
madcatzinc@0 37 "TOPLEFT",
madcatzinc@13 38 52 - (80 * cos(pos)),
madcatzinc@13 39 (80 * sin(pos)) - 52)
madcatzinc@0 40 end
madcatzinc@0 41
madcatzinc@0 42
madcatzinc@4 43 function CyborgMMO_MiniMapButtonOnUpdate()
madcatzinc@0 44
madcatzinc@0 45 local xpos,ypos = GetCursorPosition()
madcatzinc@0 46 local xmin,ymin = Minimap:GetLeft(), Minimap:GetBottom()
madcatzinc@0 47
madcatzinc@0 48 xpos = (xmin)-(xpos / UIParent:GetScale())
madcatzinc@0 49 ypos = (ypos/ UIParent:GetScale())-(ymin)
madcatzinc@0 50
madcatzinc@13 51 local degrees = math.deg(math.atan2(ypos, xpos))
madcatzinc@0 52
madcatzinc@13 53 while degrees < 0 do
madcatzinc@13 54 degrees = degrees + 360
madcatzinc@0 55 end
madcatzinc@0 56
madcatzinc@4 57 CyborgMMO_MiniMapButtonReposition(degrees)
madcatzinc@0 58 end
madcatzinc@0 59
madcatzinc@4 60 function CyborgMMO_MouseModeChange(mode)
madcatzinc@4 61 local MiniMapTexture = getglobal("CyborgMMO_MiniMapFrameButton_Icon")
madcatzinc@4 62 local MiniMapGlowTexture = getglobal("CyborgMMO_MiniMapFrameButton_IconGlow")
madcatzinc@13 63 local OpenButtonTexture = getglobal("CyborgMMO_OpenButtonPage".."OpenMainForm"):GetNormalTexture()
madcatzinc@13 64 local OpenButtonGlowTexture = getglobal("CyborgMMO_OpenButtonPage".."OpenMainForm"):GetHighlightTexture()
madcatzinc@13 65 if mode == 1 then
madcatzinc@0 66 MiniMapTexture:SetVertexColor(1,0,0,1)
madcatzinc@13 67 -- MiniMapGlowTexture:SetVertexColor(1,0.26,0.26,.75)
madcatzinc@13 68 OpenButtonTexture:SetVertexColor(1,0,0,0.75)
madcatzinc@13 69 -- OpenButtonGlowTexture:SetVertexColor(1,0.26,0.26,0.50)
madcatzinc@13 70 elseif mode == 2 then
madcatzinc@0 71 MiniMapTexture:SetVertexColor(0.07,0.22,1,1)
madcatzinc@13 72 MiniMapGlowTexture:SetVertexColor(0.13,0.56,1,.75)
madcatzinc@13 73 OpenButtonTexture:SetVertexColor(0.07,0.22,1,0.75)
madcatzinc@13 74 OpenButtonGlowTexture:SetVertexColor(0.13,0.56,1,0.5)
madcatzinc@13 75 elseif mode == 3 then
madcatzinc@0 76 MiniMapTexture:SetVertexColor(0.52,0.08,0.89,1)
madcatzinc@13 77 MiniMapGlowTexture:SetVertexColor(0.67,0.31,0.85,.75)
madcatzinc@13 78 OpenButtonTexture:SetVertexColor(0.52,0.08,0.89,0.75)
madcatzinc@13 79 OpenButtonGlowTexture:SetVertexColor(0.67,0.31,0.85,0.5)
madcatzinc@0 80 end
madcatzinc@0 81 end
madcatzinc@0 82
madcatzinc@4 83 function CyborgMMO_LoadWowCommands()
madcatzinc@13 84 if not CyborgMMO_ProfileKeyBindings then
madcatzinc@9 85 CyborgMMO_ProfileKeyBindings = CyborgMMO_DefaultWowCommands
madcatzinc@1 86 end
madcatzinc@13 87 CyborgMMO_WowCommands = CyborgMMO_ProfileKeyBindings
madcatzinc@1 88 end
madcatzinc@1 89
madcatzinc@4 90 function CyborgMMO_GetSaveData()
madcatzinc@20 91 if VarsLoaded then
madcatzinc@13 92 if not CyborgMMO7SaveData then
madcatzinc@13 93 CyborgMMO7SaveData = {}
madcatzinc@20 94 CyborgMMO7SaveData[SaveName] = {}
madcatzinc@0 95 end
madcatzinc@4 96 CyborgMMO_LoadWowCommands()
madcatzinc@20 97 return CyborgMMO7SaveData[SaveName]
madcatzinc@0 98 end
madcatzinc@13 99 return nil
madcatzinc@0 100 end
madcatzinc@0 101
madcatzinc@4 102 function CyborgMMO_SetSaveData(data, index)
madcatzinc@20 103 if VarsLoaded then
madcatzinc@4 104 CyborgMMO_GetSaveData()[index] = data
madcatzinc@5 105 CyborgMMO_ProfileKeyBindings = CyborgMMO_WowCommands
madcatzinc@0 106 end
madcatzinc@0 107 end
madcatzinc@0 108
madcatzinc@4 109 function CyborgMMO_Event(self, event, ...)
madcatzinc@13 110 if event == "VARIABLES_LOADED" then
madcatzinc@20 111 VarsLoaded = true
madcatzinc@13 112 elseif event == "PLAYER_ENTERING_WORLD" then
madcatzinc@20 113 EnteredWorld = true
madcatzinc@19 114 elseif event == "PLAYER_REGEN_DISABLED" then
madcatzinc@13 115 CyborgMMO_Close()
madcatzinc@0 116 else
madcatzinc@15 117 CyborgMMO_DPrint("Event is "..tostring(event))
madcatzinc@13 118 end
madcatzinc@0 119
madcatzinc@0 120 -- Fire Loading if and only if the player is in the world and vars are loaded
madcatzinc@20 121 if not BindingsLoaded and VarsLoaded and EnteredWorld then
madcatzinc@20 122 local data = CyborgMMO_GetSaveData()
madcatzinc@0 123
madcatzinc@20 124 CyborgMMO_RatPageModel:LoadData()
madcatzinc@20 125 BindingsLoaded = true
madcatzinc@0 126
madcatzinc@20 127 ShowMacroFrame()
madcatzinc@20 128 HideUIPanel(MacroFrame)
madcatzinc@0 129
madcatzinc@0 130
madcatzinc@20 131 CyborgMMO_SetupModeCallbacks(1)
madcatzinc@20 132 CyborgMMO_SetupModeCallbacks(2)
madcatzinc@20 133 CyborgMMO_SetupModeCallbacks(3)
madcatzinc@0 134
madcatzinc@21 135 Settings = data.Settings
madcatzinc@21 136 if not Settings then
madcatzinc@21 137 Settings = {}
madcatzinc@21 138 Settings.Cyborg = 0.75
madcatzinc@21 139 Settings.Plugin = 0.75
madcatzinc@21 140 Settings.MiniMapButton = true
madcatzinc@21 141 Settings.CyborgButton = true
madcatzinc@21 142 data.Settings = Settings
madcatzinc@21 143 end
madcatzinc@21 144 SettingsLoaded = true
madcatzinc@0 145
madcatzinc@21 146 -- Reload Slider values:
madcatzinc@21 147 CyborgMMO_SetOpenButtonSize(Settings.Cyborg)
madcatzinc@21 148 CyborgMMO_SetMainPageSize(Settings.Plugin)
madcatzinc@0 149
madcatzinc@21 150 CyborgMMO_SetMiniMapButton(Settings.MiniMapButton)
madcatzinc@21 151 CyborgMMO_SetCyborgHeadButton(Settings.CyborgButton)
madcatzinc@0 152
madcatzinc@20 153 local xmin,ymin = Minimap:GetLeft(),Minimap:GetBottom()
madcatzinc@20 154 CyborgMMO_MiniMapButtonReposition(math.deg(math.atan2(ymin, xmin)))
madcatzinc@20 155 -- Close the main window for now
madcatzinc@20 156 CyborgMMO_Close()
madcatzinc@0 157 end
madcatzinc@0 158 end
madcatzinc@0 159
madcatzinc@4 160 function CyborgMMO_SetDefaultSettings()
madcatzinc@13 161 CyborgMMO_OpenButtonPageOpenMainForm:ClearAllPoints()
madcatzinc@13 162 CyborgMMO_MainPage:ClearAllPoints()
madcatzinc@13 163 CyborgMMO_OpenButtonPageOpenMainForm:SetPoint("LEFT", UIParent, "LEFT", 0, 0)
madcatzinc@13 164 CyborgMMO_MainPage:SetPoint("LEFT", UIParent, "LEFT", 0, 0)
madcatzinc@0 165
madcatzinc@13 166 CyborgMMO_SetOpenButtonSize(0.75)
madcatzinc@13 167 CyborgMMO_SetMainPageSize(0.75)
madcatzinc@13 168 CyborgMMO_SetMiniMapButton(true)
madcatzinc@13 169 CyborgMMO_SetCyborgHeadButton(true)
madcatzinc@0 170 end
madcatzinc@0 171
madcatzinc@0 172
madcatzinc@4 173 function CyborgMMO_SetupModeCallbacks(modeNum)
madcatzinc@0 174 fn = function()
madcatzinc@13 175 CyborgMMO_MouseModeChange(modeNum)
madcatzinc@18 176 CyborgMMO_RatPageModel:SetMode(modeNum)
madcatzinc@0 177 end
madcatzinc@0 178
madcatzinc@13 179 local buttonFrame,parentFrame,name = CyborgMMO_CallbackFactory.Instance().AddCallback(fn)
madcatzinc@16 180 SetOverrideBindingClick(parentFrame, true, CyborgMMO_Mode[modeNum], name, "LeftButton")
madcatzinc@0 181 end
madcatzinc@0 182
madcatzinc@4 183 function CyborgMMO_Loaded()
madcatzinc@13 184 CyborgMMO_MainPage:RegisterEvent("VARIABLES_LOADED")
madcatzinc@13 185 CyborgMMO_MainPage:RegisterEvent("PLAYER_ENTERING_WORLD")
madcatzinc@19 186 CyborgMMO_MainPage:RegisterEvent("PLAYER_REGEN_DISABLED")
madcatzinc@0 187 end
madcatzinc@0 188
madcatzinc@4 189 function CyborgMMO_Close()
madcatzinc@13 190 CyborgMMO_MainPage:Hide()
madcatzinc@0 191 end
madcatzinc@0 192
madcatzinc@4 193 function CyborgMMO_Open()
madcatzinc@13 194 CyborgMMO_MainPage:Show()
madcatzinc@13 195 CyborgMMO_RatQuickPage:Hide()
madcatzinc@0 196 end
madcatzinc@0 197
madcatzinc@4 198 function CyborgMMO_IsOpen()
madcatzinc@13 199 if CyborgMMO_MainPage:IsVisible() == 1 then
madcatzinc@13 200 return true
madcatzinc@0 201 else
madcatzinc@13 202 return false
madcatzinc@0 203 end
madcatzinc@0 204 end
madcatzinc@0 205
madcatzinc@4 206 function CyborgMMO_Toggle()
madcatzinc@13 207 if CyborgMMO_IsOpen() then
madcatzinc@13 208 CyborgMMO_Close()
madcatzinc@0 209 else
madcatzinc@13 210 CyborgMMO_Open()
madcatzinc@0 211 end
madcatzinc@0 212 end
madcatzinc@0 213
madcatzinc@15 214 function CyborgMMO_GetDebugFrame()
madcatzinc@15 215 for i=1,NUM_CHAT_WINDOWS do
madcatzinc@15 216 local windowName = GetChatWindowInfo(i);
madcatzinc@15 217 if windowName == "Debug" then
madcatzinc@15 218 return getglobal("ChatFrame" .. i)
madcatzinc@15 219 end
madcatzinc@15 220 end
madcatzinc@15 221 end
madcatzinc@15 222
madcatzinc@15 223 local log_prefix = "|cffff6666".."CyborgMMO".."|r:"
madcatzinc@15 224
madcatzinc@15 225 function CyborgMMO_DPrint(...)
madcatzinc@15 226 local debugframe = CyborgMMO_GetDebugFrame()
madcatzinc@15 227 if debugframe then
madcatzinc@15 228 local t = {log_prefix, ...}
madcatzinc@15 229 for i=1,select('#', ...)+1 do
madcatzinc@15 230 t[i] = tostring(t[i])
madcatzinc@15 231 end
madcatzinc@15 232 debugframe:AddMessage(table.concat(t, ' '))
madcatzinc@15 233 end
madcatzinc@0 234 end
madcatzinc@0 235
madcatzinc@4 236 function CyborgMMO_SetMainPageSize(percent)
madcatzinc@21 237 CyborgMMO_MainPage:SetScale(percent)
madcatzinc@21 238 CyborgMMO_OptionPagePluginSizeSlider:SetValue(percent)
madcatzinc@21 239 if BindingsLoaded then
madcatzinc@21 240 Settings.Plugin = percent
madcatzinc@0 241 end
madcatzinc@0 242 end
madcatzinc@0 243
madcatzinc@4 244 function CyborgMMO_SetOpenButtonSize(percent)
madcatzinc@21 245 CyborgMMO_OpenButtonPage:SetScale(percent)
madcatzinc@21 246 CyborgMMO_OptionPageCyborgSizeSlider:SetValue(percent)
madcatzinc@21 247 if SettingsLoaded then
madcatzinc@21 248 Settings.Cyborg = percent
madcatzinc@0 249 end
madcatzinc@0 250 end
madcatzinc@0 251
madcatzinc@21 252 function CyborgMMO_SetCyborgHeadButton(visible)
madcatzinc@21 253 if visible then
madcatzinc@21 254 CyborgMMO_OpenButtonPage:Show()
madcatzinc@0 255 else
madcatzinc@13 256 CyborgMMO_OpenButtonPage:Hide()
madcatzinc@0 257 end
madcatzinc@21 258 CyborgMMO_OptionPageCyborgButton:SetChecked(visible)
madcatzinc@21 259 if SettingsLoaded then
madcatzinc@21 260 Settings.CyborgButton = visible
madcatzinc@21 261 end
madcatzinc@0 262 end
madcatzinc@0 263
madcatzinc@21 264 function CyborgMMO_SetMiniMapButton(visible)
madcatzinc@21 265 if visible then
madcatzinc@4 266 CyborgMMO_MiniMapFrameButton:Show()
madcatzinc@0 267 else
madcatzinc@4 268 CyborgMMO_MiniMapFrameButton:Hide()
madcatzinc@0 269 end
madcatzinc@21 270 CyborgMMO_OptionPageMiniMapButton:SetChecked(visible)
madcatzinc@21 271 if SettingsLoaded then
madcatzinc@21 272 Settings.MiniMapButton = visible
madcatzinc@21 273 end
madcatzinc@0 274 end
madcatzinc@0 275