Mercurial > wow > devian

annotate UI.lua @ 55:1b8c597dba44

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added movement fading todo: sort out dock mouseover hitches
author Nenue
date Wed, 06 Jan 2016 07:37:17 -0500
parents c3166f700438
children 0a9a6740ea5d
rev   line source
Nenue@50 1 --- Devian - UI.lua
Nenue@35 2 -- @file-author@
Nenue@35 3 -- @project-revision@ @project-hash@
Nenue@35 4 -- @file-revision@ @file-hash@
Nenue@35 5 -- Created: 12/27/2015 3:01 AM
Nenue@35 6 if not LibStub then
Nenue@35 7 print('Something has happened...')
Nenue@35 8 end
Nenue@35 9 local D = LibStub("AceAddon-3.0"):GetAddon("Devian")
Nenue@35 10 local DEVIAN_FRAME = 'DevianConsole'
Nenue@35 11
Nenue@35 12
Nenue@35 13 local function Console_MinMax(self)
Nenue@35 14 if self.minimized then
Nenue@35 15 self:Maximize()
Nenue@35 16 else
Nenue@35 17 self:Minimize()
Nenue@35 18 end
Nenue@35 19 end
Nenue@35 20
Nenue@35 21 local function Console_Minimize(self)
Nenue@35 22 self:SetHeight(20)
Nenue@35 23 self:SetMaxResize(GetScreenWidth(),20)
Nenue@35 24 self.minimized = true
Nenue@35 25 self.out:Hide()
Nenue@35 26 self:Save()
Nenue@35 27 end
Nenue@35 28
Nenue@35 29 local function Console_Maximize(self)
Nenue@35 30 local db = D.channels[self.index]
Nenue@35 31 self:SetHeight(db.height)
Nenue@35 32 self:SetMaxResize(GetScreenWidth(),GetScreenHeight())
Nenue@35 33 self.minimized = nil
Nenue@35 34 self.out:Show()
Nenue@35 35 self:Save()
Nenue@35 36 end
Nenue@35 37
Nenue@35 38
Nenue@35 39 local function Console_Save(self)
Nenue@35 40 local db = D.channels[self.index]
Nenue@35 41 db.x = self:GetLeft()
Nenue@35 42 db.y = (self:GetTop() - GetScreenHeight())
Nenue@35 43 db.width = self:GetWidth()
Nenue@35 44
Nenue@35 45 if not self.minimized then
Nenue@55 46 db.height = self:GetHeight()
Nenue@35 47 self:SetHeight(db.height)
Nenue@35 48 end
Nenue@35 49
Nenue@35 50 db.dockedTo = self.dockedTo
Nenue@35 51 db.docked = self.docked
Nenue@35 52
Nenue@35 53 db.minimized = self.minimized and true or nil
Nenue@35 54 db.enabled = self:IsVisible() and true or nil
Nenue@35 55 db.active = self.active and true or nil
Nenue@35 56 self:SetPoint('TOPLEFT', UIParent, 'TOPLEFT', db.x, db.y)
Nenue@35 57 self:SetWidth(db.width)
Nenue@35 58 end
Nenue@35 59
Nenue@35 60 --- Brings the console to the front.
Nenue@35 61 -- Frame method used to bring a console frame to the front of the display stack.
Nenue@35 62 local function Console_ToFront(c)
Nenue@35 63 local db = D.db
Nenue@35 64 c:Raise()
Nenue@35 65 c:SetAlpha(db.frontalpha)
Nenue@35 66 c.out.backdrop:SetTexture(unpack(db.frontdrop))
Nenue@35 67 c.out.backdrop:SetGradientAlpha(unpack(db.frontgrad))
Nenue@35 68 c.out.backdrop:SetBlendMode(db.frontblend)
Nenue@45 69 c.dropmenu.icon:SetVertexColor(unpack(db.frontheader))
Nenue@45 70 c.title:SetTextColor(unpack(db.frontborder))
Nenue@35 71 db.current_channel = c.index
Nenue@35 72
Nenue@50 73 -- update dock buttons
Nenue@50 74 local beacon = D.dock.buttons[c.index]
Nenue@50 75 beacon.selected = true
Nenue@50 76 D.UpdateBeacon(beacon)
Nenue@50 77
Nenue@35 78 for _, part in pairs(c.border) do
Nenue@35 79 part:SetTexture(unpack(db.frontborder))
Nenue@35 80 end
Nenue@35 81
Nenue@35 82 for id, bc in pairs(D.console) do
Nenue@35 83 if id ~= c.index then
Nenue@35 84 bc:SetAlpha(db.backalpha)
Nenue@35 85 bc.out.backdrop:SetTexture(unpack(db.backdrop))
Nenue@35 86 bc.out.backdrop:SetGradientAlpha(unpack(db.backgrad))
Nenue@35 87 bc.out.backdrop:SetBlendMode(db.backblend)
Nenue@45 88 bc.dropmenu.icon:SetVertexColor(unpack(db.backheader))
Nenue@36 89 bc.title:SetTextColor(unpack(db.backborder))
Nenue@35 90
Nenue@50 91 local beacon = D.dock.buttons[bc.index]
Nenue@50 92 beacon.selected = nil
Nenue@50 93 D.UpdateBeacon(beacon)
Nenue@50 94
Nenue@35 95 for _, part in pairs(bc.border) do
Nenue@35 96 part:SetTexture(unpack(db.backborder))
Nenue@35 97 end
Nenue@35 98 end
Nenue@35 99 end
Nenue@35 100 end
Nenue@35 101
Nenue@35 102 local function Console_MouseDown(self, button, up)
Nenue@35 103 if button == 'LeftButton' then
Nenue@35 104 if up then
Nenue@35 105 self:StopMovingOrSizing()
Nenue@35 106 self:ToFront()
Nenue@35 107 self:Save()
Nenue@35 108 elseif self.out.grip:IsMouseOver() then
Nenue@35 109 self:StartSizing()
Nenue@35 110 else
Nenue@35 111 self:StartMoving()
Nenue@35 112 end
Nenue@35 113 else
Nenue@35 114 if up then
Nenue@35 115 self:MinMax()
Nenue@35 116 end
Nenue@35 117 end
Nenue@35 118 end
Nenue@35 119 local function Console_MouseUp(self, button)
Nenue@35 120 return Console_MouseDown(self, button, true)
Nenue@35 121 end
Nenue@35 122
Nenue@35 123
Nenue@35 124 --- Constructs the frame object for a console channel
Nenue@35 125 -- Initializes the console channel at a specified index.
Nenue@35 126 -- Configuration data can be overridden by passing a desired settings table.
Nenue@35 127 -- @param i Numeric index of the channel as it manifests in db.channels
Nenue@35 128 -- @param vars Optional settings table to be used.
Nenue@35 129 local function CreateConsole(i, vars)
Nenue@35 130 local db = D.db
Nenue@35 131 if tonumber(i) == nil or math.floor(i) ~= i then
Nenue@35 132 error('Non-integer index value.')
Nenue@35 133 end
Nenue@35 134 if not vars then
Nenue@35 135 vars = D.channels[i] and D.channels[i] or D.channels[db.primary_channel]
Nenue@35 136 end
Nenue@35 137 local f
Nenue@47 138 f= CreateFrame('Frame', 'DevianChannelFrame' .. i, UIParent, DEVIAN_FRAME)
Nenue@47 139
Nenue@35 140 --@debug@
Nenue@35 141 --print(f:GetName())
Nenue@35 142
Nenue@35 143 --print('create(2)')
Nenue@35 144 for k,v in pairs(vars) do
Nenue@35 145 f[k] = v
Nenue@35 146 --@debug@
Nenue@36 147 --print(' f['..type(k)..' '..tostring(k)..'] = '..type(v)..' '..tostring(v))
Nenue@35 148 end
Nenue@35 149
Nenue@35 150 f:SetPoint('TOPLEFT', UIParent, 'TOPLEFT', vars.x, vars.y)
Nenue@35 151 f:SetSize(vars.width, vars.height)
Nenue@35 152 f:Lower()
Nenue@35 153 f.out:SetFont(db.font, db.fontsize, db.fontoutline)
Nenue@35 154 if (db.current_channel == i) then
Nenue@35 155 f.out.backdrop:SetTexture(unpack(db.frontdrop))
Nenue@36 156 f.dropmenu.icon:SetVertexColor(unpack(db.headerfontcolor))
Nenue@36 157 f.title:SetTextColor(unpack(db.headerfontcolor))
Nenue@45 158 f.header:SetAlpha(db.headeralpha)
Nenue@35 159 else
Nenue@35 160 f.out.backdrop:SetTexture(unpack(db.backdrop))
Nenue@35 161 end
Nenue@35 162
Nenue@35 163 f.Save = Console_Save
Nenue@35 164 f.Minimize = Console_Minimize
Nenue@35 165 f.Maximize = Console_Maximize
Nenue@35 166 f.MinMax = Console_MinMax
Nenue@35 167 f.ToFront = Console_ToFront
Nenue@35 168 f.Toggle = D.Console_Toggle
Nenue@35 169 f:SetScript('OnMouseDown', Console_MouseDown)
Nenue@35 170 f:SetScript('OnMouseUp', Console_MouseUp)
Nenue@35 171
Nenue@36 172
Nenue@36 173 UIDropDownMenu_Initialize(f.menuFrame, function()
Nenue@36 174 local info = { {
Nenue@36 175 text= "Close",
Nenue@36 176 value = "OptClose",
Nenue@36 177 func = function ()
Nenue@36 178 f.enabled = nil
Nenue@36 179 f:Hide()
Nenue@36 180 f:Save()
Nenue@38 181 end },--[[
Nenue@36 182 {
Nenue@36 183 text = "Dock",
Nenue@36 184 value = "OptDock",
Nenue@38 185 func = function() print('Dvn', 'docking shenanary') end }]]
Nenue@36 186 }
Nenue@36 187 for _, v in ipairs(info) do
Nenue@36 188 UIDropDownMenu_AddButton(v)
Nenue@36 189 end
Nenue@36 190 end, 'MENU')
Nenue@36 191
Nenue@47 192 D.dock.buttons[i] = CreateFrame('Button', 'Channel'..i..'Beacon', UIParent, 'DevianBeacon')
Nenue@47 193 D.dock.buttons[i].icon:SetVertexColor(math.random(),math.random(),math.random())
Nenue@47 194 D.dock.buttons[i].console = f
Nenue@47 195 D.dock.buttons[i].index = i
Nenue@47 196 D.dock.buttons[i].caption.name:SetText(vars.signature)
Nenue@47 197 D.dock.buttons[i]:Show()
Nenue@47 198
Nenue@35 199 if vars.minimized then
Nenue@35 200 f:Minimize()
Nenue@35 201 else
Nenue@35 202 f:Maximize()
Nenue@35 203 end
Nenue@35 204 if db.enabled and f.enabled then
Nenue@35 205 f:Show()
Nenue@35 206 end
Nenue@35 207
Nenue@35 208 return f
Nenue@35 209 end
Nenue@35 210
Nenue@35 211
Nenue@35 212 --- Updates console information and returns the handle of the channel object that was worked on.
Nenue@35 213 -- When key is nil or not a valid handle, a new channel is created using whatever signature can be found in cinfo.
Nenue@35 214 -- The signature can be passed as a string, or as a table entry under the key 'signature'
Nenue@35 215 -- If the signature of a new channel is also a tag, the channel will be added to that tag
Nenue@35 216 -- @param cinfo string signature of a new channel, or a table of config variables to be imposed on the channel
Nenue@35 217 -- @param key string signature or index number of channel to operate on
Nenue@35 218 -- @usage channel = D:SetChannel('new', nil) -- creates a new channel
Nenue@35 219 -- @usage channel = D:SetChannel({x = 200, y = 100}, 4) -- updates channel #4
Nenue@35 220 function D:SetChannel(cinfo, key)
Nenue@35 221 local db = self.db
Nenue@35 222 local t_info = {}
Nenue@35 223 local channel, isNew, id, sig, t_id
Nenue@36 224 --@debug@
Nenue@38 225 --print('setchan(0) cinfo, key', cinfo, key)--@end-debug@
Nenue@35 226 -- obtain source data
Nenue@35 227 if tonumber(key) ~= nil and db.channels[key] then
Nenue@35 228 id = tonumber(key)
Nenue@35 229 elseif D.sigID[tostring(key)] then
Nenue@35 230 id = D.sigID[tostring(key)]
Nenue@35 231 else
Nenue@35 232 id = db.primary_channel
Nenue@35 233 isNew = true
Nenue@35 234 end
Nenue@35 235 local dbvars = db.channels[id]
Nenue@35 236 t_id = id -- overridden later if new
Nenue@35 237 t_info.index = t_id --
Nenue@35 238 --@debug@
Nenue@38 239 --print('setchan(1) cinfo, key, id=', cinfo, key, id)--@end-debug@
Nenue@35 240
Nenue@35 241
Nenue@35 242 -- obtain config info
Nenue@35 243 if type(cinfo) == 'string' then
Nenue@35 244 sig = cinfo
Nenue@35 245 cinfo = {signature = sig}
Nenue@35 246 elseif type(cinfo) ~= 'table' then -- stop here if a table wans't passed
Nenue@35 247 error('Expecting table of string as arg1')
Nenue@35 248 elseif cinfo.signature then -- new sig
Nenue@35 249 sig = cinfo.signature
Nenue@35 250 elseif isNew then -- new channel sig
Nenue@35 251 sig = 'Ch'
Nenue@35 252 else -- old sig
Nenue@35 253 sig = db.channels[id].signature
Nenue@35 254 end
Nenue@35 255 t_info.signature = sig
Nenue@35 256 --@debug@
Nenue@38 257 --print('setchan(2) sig,id,isNew=', sig, id, isNew)--@end-debug@
Nenue@35 258
Nenue@35 259 for k,v in pairs(cinfo) do -- allow all cinfo to pass
Nenue@35 260 t_info[k] = v
Nenue@35 261 end
Nenue@35 262
Nenue@35 263 local blocked = { -- ignore these vars:
Nenue@35 264 ['docked'] = true, -- table
Nenue@35 265 ['dockedTo'] = true, -- table-related
Nenue@35 266 ['signature'] = true} -- already determined
Nenue@35 267 for k,v in pairs(dbvars) do
Nenue@35 268 if not t_info[k] and not blocked[k] then -- already set or blocked?
Nenue@35 269 t_info[k] = v
Nenue@35 270 end
Nenue@35 271 end
Nenue@35 272 -- new channel overrides
Nenue@35 273 if isNew then
Nenue@35 274 if D.sigID[sig]then -- find a non-clashing signature
Nenue@35 275 local result, i = sig, 1
Nenue@35 276 while D.sigID[result] do
Nenue@35 277 result = sig .. i
Nenue@35 278 i = i + 1
Nenue@35 279 end
Nenue@35 280 t_info.signature = result
Nenue@35 281 end
Nenue@36 282 t_id = self.max_channel + 1
Nenue@35 283 t_info.index = t_id
Nenue@35 284 --@debug@
Nenue@38 285 --print('setchan(3a) t_id, isNew, sig, t_info.signature=', t_id, isNew, sig, t_info.signature)--@end-debug@
Nenue@35 286 else
Nenue@35 287 --@debug@
Nenue@38 288 --print('setchan(3b) t_id, isNew, sig, t_info.signature=', t_id, isNew, sig, t_info.signature)--@end-debug@
Nenue@35 289 end
Nenue@35 290
Nenue@35 291 local channel
Nenue@35 292 if not self.console[t_id] then -- create a frame
Nenue@35 293 if isNew then -- position the channel frame
Nenue@36 294 self.max_channel = t_id
Nenue@36 295 db.max_channel = t_id
Nenue@36 296 t_info.x = t_info.x + 20
Nenue@36 297 t_info.y = t_info.y - 20
Nenue@36 298 db.channels[t_id] = t_info
Nenue@36 299 --@debug@
Nenue@38 300 --print('setchan(4a)', 't_id, x, y=', t_id, t_info.x, t_info.y)--@end-debug@
Nenue@35 301 end
Nenue@35 302 channel = CreateConsole(t_id, t_info)
Nenue@35 303 self.console[t_id] = channel
Nenue@35 304 self.sig[t_info.signature] = channel
Nenue@35 305 self.sigID[t_info.signature] = t_id
Nenue@35 306 self.IDsig[t_id] = t_info.signature
Nenue@35 307
Nenue@35 308 end
Nenue@35 309 channel = self.console[t_id]
Nenue@35 310 if channel.minimized then
Nenue@35 311 channel:Minimize()
Nenue@35 312 else
Nenue@35 313 channel:Maximize()
Nenue@35 314 end
Nenue@35 315
Nenue@55 316 if channel.enabled then -- hide or show last since Min/Max mess with visibility
Nenue@38 317 --print('setchan(5a) enable')
Nenue@55 318 channel:Show()
Nenue@45 319 channel:ToFront()
Nenue@35 320 else
Nenue@38 321 --print('setchan(5a) disable')
Nenue@35 322 channel:Hide()
Nenue@35 323 end
Nenue@35 324 --@debug@
Nenue@35 325 --print('setchan(end); c:IsVisible(), c.enabled, db.enabled=', channel:IsVisible(), channel.enabled, db.enabled)--@end-debug@
Nenue@35 326 return channel
Nenue@35 327 end