annotate UI.lua @ 60:59e047d6c5de v2.1.60

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