Mercurial > wow > devian

annotate Devian.lua @ 58:0a9a6740ea5d v2.1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- Discarded use of blizzard functions never meant for the wild (http://forums.wowace.com/showthread.php?t=20397) - Fixed dock buttons not highlighting properly - Fixed dock buttons not dropping after selection change - Mouse input is disabled during player movement
author Nenue
date Tue, 12 Jan 2016 04:50:37 -0500
parents 0d2967941745
children 59e047d6c5de
rev   line source
Nenue@50 1 --- Devian - Devian.lua
Nenue@32 2 -- @file-author@
Nenue@32 3 -- @project-revision@ @project-hash@
Nenue@32 4 -- @file-revision@ @file-hash@
Nenue@0 5 if not LibStub then
Nenue@0 6 print('Something has happened...')
Nenue@0 7 end
Nenue@57 8 local MAJOR, MINOR = 'Devian-2.0', 'r@project-revision@'
Nenue@0 9 Devian = LibStub("AceAddon-3.0"):NewAddon("Devian", "AceConsole-3.0", "AceEvent-3.0")
Nenue@46 10 local D = _G.Devian
Nenue@46 11 D:SetDefaultModuleState(false)
Nenue@57 12 D.L = {}
Nenue@57 13 setmetatable(D.L, {__index= function(t,k) return k end, __call = function(t,k,...) return string.format((t[k] or k) , ...) end})
Nenue@57 14 local L = D.L
Nenue@47 15 local pairs, tostring, tonumber, ipairs, type = pairs, tostring, tonumber, ipairs, type
Nenue@47 16 local max, rand, format = math.max, math.random, string.format
Nenue@47 17 local insert, wipe, concat = table.insert, table.wipe, table.concat
Nenue@47 18 local select, unpack = select, unpack
Nenue@47 19 local GetNumAddOns, GetAddOnInfo, GetAddOnEnableState, EnableAddOn = GetNumAddOns, GetAddOnInfo, GetAddOnEnableState, EnableAddOn
Nenue@47 20 local UnitName, DisableAddOn = UnitName, DisableAddOn
Nenue@32 21 local WORKSPACE_ON, WORKSPACE_OFF = 1, 2
Nenue@0 22 local PLAYER_REALM = UnitName("player") .. '-' .. GetRealmName()
Nenue@18 23 local print = _G.print
Nenue@9 24 local db
Nenue@13 25 local defaults = {
Nenue@32 26 ['global'] = {{}, {}},
Nenue@13 27 ['tags'] = {},
Nenue@55 28 ['channels'] = {[1] = {
Nenue@55 29 signature = 'Main',
Nenue@55 30 index = 1,
Nenue@55 31 x = 100, y = 800,
Nenue@55 32 height = 500, width = 600,
Nenue@55 33 enabled = true}},
Nenue@45 34 ['profiles'] = {
Nenue@45 35 {'Main', false},
Nenue@45 36 {'Devian', true},
Nenue@45 37 {'Turok', true},
Nenue@45 38 {'Bam', true}
Nenue@45 39 },
Nenue@33 40 primary_channel = 1, -- the channel to which default output is sent
Nenue@33 41 current_channel = 1, -- the front channel
Nenue@33 42 max_channel = 1, -- the highest created channel id
Nenue@55 43 enabled = true, -- allow enabled consoles to appear
Nenue@33 44 load_message = "Defaults loaded.", -- messages to be displayed after reload
Nenue@33 45 font = [[Interface\Addons\Devian\font\SourceCodePro-Regular.ttf]], -- font info
Nenue@13 46 fontsize = 13,
Nenue@13 47 fontoutline = 'NONE',
Nenue@45 48
Nenue@45 49 headergrad = {'VERTICAL', 0, 0, 0, 1,
Nenue@45 50 1, 0.1, 0.1, 1}, -- header info
Nenue@33 51 headerdrop = {1,1,1,1},
Nenue@45 52 headerblend = 'BLEND',
Nenue@33 53 headeralpha = 1,
Nenue@45 54 headerfontcolor = {1,1,1,1},
Nenue@45 55
Nenue@45 56 backdrop = {1,1,1,1}, -- background frame info
Nenue@56 57 backgrad = {'VERTICAL', 0, 0, 0, .75, 0,0,0, .65},
Nenue@55 58 backblend = 'BLEND',
Nenue@45 59 backalpha = 1,
Nenue@45 60 backborder = {.5,.5,.5,1},
Nenue@45 61 backheader = {.25,.25,.25,1},
Nenue@45 62
Nenue@45 63 frontdrop = {1,1,1,1}, -- foreground frame info
Nenue@56 64 frontgrad = {'VERTICAL', 0, 0, 0, 1, 0,0,0, 0.95},
Nenue@55 65 frontblend = 'BLEND',
Nenue@28 66 frontalpha = 1,
Nenue@45 67 frontborder = {.07,.47,1,1},
Nenue@45 68 frontheader = {1,1,1,1},
Nenue@33 69 tagcolor = {}, -- tag color repository
Nenue@36 70 workspace = 2, -- current profile
Nenue@47 71 last_workspace = 2, -- default workspace to alternate with when just "/dvn" is issued
Nenue@47 72
Nenue@47 73 dock_onshow_fade_time = 2.5,
Nenue@47 74 dock_onshow_fade_from = 1,
Nenue@47 75 dock_onshow_fade_to = 0.2,
Nenue@47 76
Nenue@47 77 dock_alpha_on = 1,
Nenue@47 78 dock_alpha_off = 0.2,
Nenue@47 79 dock_fade_in = 0.15,
Nenue@47 80 dock_fade_out = 0.45,
Nenue@47 81 dock_button_alpha_on = 1,
Nenue@47 82 dock_button_alpha_off = 0.2,
Nenue@50 83 dock_button_fade_in = 0.075,
Nenue@55 84 dock_button_fade_out = 0.075,
Nenue@47 85
Nenue@55 86 movement_fade = true,
Nenue@55 87 movement_fade_time = 0.15,
Nenue@13 88 }
Nenue@9 89
Nenue@13 90 local function ScanAddOnList(cmd, ...)
Nenue@0 91 local list_state
Nenue@0 92
Nenue@14 93 local args = {}
Nenue@14 94 local arg, n = D:GetArgs(cmd, 1)
Nenue@14 95 while arg do
Nenue@47 96 insert(args, arg)
Nenue@14 97 arg, n = D:GetArgs(cmd,1,n)
Nenue@14 98 end
Nenue@14 99 local mode, tag, dest = unpack(args)
Nenue@0 100
Nenue@13 101
Nenue@14 102 -- no args, toggle ui
Nenue@57 103 if mode == 'stack' then
Nenue@33 104 if db.workspace == 1 then
Nenue@57 105 return D:Print(L['Need devmode'])
Nenue@33 106 end
Nenue@14 107 return D:StackFrames()
Nenue@14 108 elseif mode == 'grid' then
Nenue@33 109 if db.workspace == 1 then
Nenue@57 110 return D:Print(L['Need devmode'])
Nenue@33 111 end
Nenue@14 112 return D:DistributeFrames()
Nenue@14 113 elseif mode == 'tag' then -- tagging
Nenue@33 114 if db.workspace == 1 then
Nenue@57 115 return D:Print(L['Need devmode'])
Nenue@33 116 end
Nenue@32 117
Nenue@36 118 local sig
Nenue@14 119 if tag ~= nil and dest ~= nil then
Nenue@36 120 --@debug@
Nenue@38 121 --print(tag, dest)
Nenue@36 122 --@end-debug@
Nenue@36 123
Nenue@32 124 -- convert to ID
Nenue@36 125 if tonumber(dest) == nil then
Nenue@36 126 if D.sigID[dest] then
Nenue@36 127 dest = db.channels[D.sigID[dest]].index
Nenue@36 128 else
Nenue@36 129 sig = dest
Nenue@36 130 end
Nenue@42 131 else
Nenue@42 132 dest = tonumber(dest)
Nenue@18 133 end
Nenue@38 134 --@debug@
Nenue@38 135 --print('2 tag,dest,sig', tag, dest, sig)--@end-debug@
Nenue@18 136
Nenue@32 137 -- make a new channel?
Nenue@36 138 local channel
Nenue@42 139 if not D.db.channels[dest] then
Nenue@36 140 dest = D.max_channel + 1
Nenue@57 141 D:Print(L('New channel created', sig and (dest..':'..sig) or dest ))
Nenue@36 142 channel = D:SetChannel(sig or tag,dest)
Nenue@42 143 else
Nenue@42 144
Nenue@42 145 channel = D.db.channels[dest]
Nenue@32 146 end
Nenue@38 147 --@debug@
Nenue@42 148 --print('3 tag,dest,channel.sig=',tag, dest, channel.signature)--@end-debug@
Nenue@32 149
Nenue@42 150 if not db.tags[tag] then -- no tag table?
Nenue@42 151 db.tags[tag] = {}
Nenue@42 152 end
Nenue@42 153
Nenue@42 154 if db.tags[tag][dest] then -- is tag set?
Nenue@32 155 db.tags[tag][dest] = nil
Nenue@57 156 D:Print(L('Tag removed from channel', tag, db.channels[dest].index, db.channels[dest].signature))
Nenue@32 157 else
Nenue@32 158 db.tags[tag][dest] = dest
Nenue@57 159 D:Print(L('Tag added to channel', tag, db.channels[dest].index, db.channels[dest].signature))
Nenue@32 160 end
Nenue@47 161 D:UpdateDock()
Nenue@14 162 else
Nenue@57 163 D:Print(L['Command tag help'])
Nenue@14 164 end
Nenue@14 165 return
Nenue@32 166 elseif tonumber(mode) ~= nil or mode == 'save' then
Nenue@32 167 -- iterating for something
Nenue@32 168 if mode == 'save' then
Nenue@32 169 if tonumber(tag) == nil then
Nenue@57 170 T:Print(L('Invalid ID from arg', tag))
Nenue@32 171 end
Nenue@32 172 list_state = tonumber(tag)
Nenue@32 173 else
Nenue@32 174 list_state = tonumber(mode)
Nenue@32 175 db.workspace = list_state
Nenue@33 176 if list_state ~= 1 then
Nenue@33 177 db.last_workspace = list_state
Nenue@33 178 end
Nenue@33 179
Nenue@0 180 end
Nenue@32 181 elseif mode == nil then
Nenue@33 182 list_state = (db.workspace == 1) and db.last_workspace or 1
Nenue@33 183 db.workspace = list_state
Nenue@32 184 else
Nenue@32 185 return D:PrintHelp()
Nenue@0 186 end
Nenue@32 187
Nenue@32 188 -- start the iterating
Nenue@36 189 if not db[PLAYER_REALM][list_state] then
Nenue@36 190 db[PLAYER_REALM][list_state] = {}
Nenue@36 191 end
Nenue@36 192 if not db.global[list_state] then
Nenue@36 193 db.global[list_state] = {}
Nenue@36 194 end
Nenue@36 195
Nenue@0 196 local char_list, global_list = db[PLAYER_REALM][list_state], db.global[list_state]
Nenue@0 197 local playername = UnitName("player")
Nenue@0 198
Nenue@0 199 for i = 1, GetNumAddOns() do
Nenue@0 200 local name = GetAddOnInfo(i)
Nenue@0 201 local enableState, globalState = GetAddOnEnableState(playername, i), GetAddOnEnableState(nil, i)
Nenue@0 202
Nenue@32 203 if mode == 'save' then
Nenue@0 204 char_list[name] = enableState
Nenue@0 205 global_list[name] = globalState
Nenue@0 206 else
Nenue@13 207 if char_list[name] or global_list[name] then
Nenue@32 208 if char_list[name] ~= 0 and global_list[name] ~= 0 then
Nenue@32 209 local value = false
Nenue@32 210 if char_list[name] == 2 and global_list[name] == 1 then
Nenue@32 211 value = UnitName("player")
Nenue@32 212 elseif global_list[name] == 2 then
Nenue@32 213 value = true
Nenue@32 214 end
Nenue@32 215 --print('EnableAddOn(', i, ',', value,')')
Nenue@32 216 EnableAddOn(i, value)
Nenue@32 217 else
Nenue@32 218 local value = true
Nenue@32 219 if char_list[name] == 2 and global_list[name] == 1 then
Nenue@32 220 value = UnitName("player")
Nenue@32 221 end
Nenue@32 222 --print('DisableAddOn(', i, ',', value,')')
Nenue@32 223 DisableAddOn(i,value)
Nenue@0 224 end
Nenue@33 225 elseif mode ~= 'save' then
Nenue@32 226 if type(db.unlisted) ~= 'table' then
Nenue@32 227 db.unlisted = {}
Nenue@0 228 end
Nenue@47 229 insert(db.unlisted, name)
Nenue@13 230 end
Nenue@0 231
Nenue@0 232 end
Nenue@0 233 end
Nenue@0 234
Nenue@32 235 if mode ~= 'save' then
Nenue@57 236 db.load_message = (mode == nil) and L("Toggled to profile", list_state) or L('Switched to profile number', list_state)
Nenue@0 237 ReloadUI()
Nenue@0 238 else
Nenue@57 239
Nenue@32 240 if list_state == 1 then
Nenue@57 241 D:Print(L['Profile main saved'])
Nenue@57 242 else
Nenue@32 243 db.last_workspace = list_state
Nenue@57 244 D:Print(L('Profile number saved', list_state, list_state))
Nenue@32 245 end
Nenue@0 246 end
Nenue@0 247 end
Nenue@0 248
Nenue@0 249
Nenue@13 250
Nenue@18 251 --- Creates a Devian-style output.
Nenue@18 252 -- The first argument describes the channel to output on, and the remaining arguments are concatenated in a manner similar to default print()
Nenue@18 253 -- This becomes the print handler when development mode is active. The original print() function is assigned to oldprint().
Nenue@18 254 -- @param Tag, signature, or numeric index of the channel to output on. Defaults to primary channel.
Nenue@18 255 -- @param ... Output contents.
Nenue@0 256 local function Message(prefix, ...)
Nenue@45 257 if db.workspace == 1 then
Nenue@23 258 return D.oldprint(prefix, ...)
Nenue@23 259 end
Nenue@57 260 prefix = tostring(prefix)
Nenue@57 261 if prefix == nil then
Nenue@55 262 prefix = 'nil*'
Nenue@1 263 end
Nenue@9 264
Nenue@18 265 local sendq = {}
Nenue@30 266 local tag, id, tagged
Nenue@13 267 local byName = true
Nenue@18 268 if D.tags[prefix] then
Nenue@18 269 for _, id in pairs(D.tags[prefix]) do
Nenue@18 270 if D.console[id] then
Nenue@18 271 sendq[id] = D.console[id]
Nenue@30 272 tagged = true
Nenue@18 273 end
Nenue@18 274 end
Nenue@18 275 end
Nenue@18 276
Nenue@13 277 if D.sig[prefix] then
Nenue@18 278 sendq[D.sig[prefix].index] = D.sig[prefix]
Nenue@13 279 elseif D.console[prefix] then
Nenue@18 280 sendq[D.console[prefix]] = D.console[prefix]
Nenue@30 281 elseif not tagged then
Nenue@18 282 sendq[D.primary_channel] = D.console[D.primary_channel]
Nenue@13 283 end
Nenue@18 284
Nenue@9 285 -- color me timbers
Nenue@9 286 local pcolor
Nenue@18 287 if (not db.tagcolor[prefix]) and byName then
Nenue@30 288 local c = {
Nenue@47 289 rand(64,255), rand(64,255), rand(64,255)
Nenue@30 290 }
Nenue@30 291 if c[1] > 223 and c[2] > 223 and c[3] > 223 then
Nenue@47 292 c[rand(1,3)] = rand(64,223)
Nenue@0 293 end
Nenue@30 294
Nenue@47 295 db.tagcolor[prefix] = format('%02X%02X%02X', unpack(c))
Nenue@0 296 end
Nenue@18 297 pcolor = db.tagcolor[prefix]
Nenue@0 298
Nenue@55 299 local buffer = {}
Nenue@0 300 for i = 1, select('#',...) do
Nenue@0 301 local var = select(i, ...)
Nenue@0 302
Nenue@0 303 if type(var) == 'table' then
Nenue@20 304 if type(var.GetName) == 'function' then
Nenue@46 305 var = '<table:'..tostring(var:GetName())..'>'
Nenue@20 306 else
Nenue@32 307 var = '<'..tostring(var)..'>'
Nenue@20 308 end
Nenue@20 309
Nenue@0 310 elseif type(var) == 'boolean' then
Nenue@0 311 var = var and 'true' or 'false'
Nenue@0 312 elseif type(var) == 'function' then
Nenue@0 313 var = '<funcref>'
Nenue@0 314 elseif type(var) == 'nil' then
Nenue@0 315 var = 'nil'
Nenue@0 316 end
Nenue@0 317
Nenue@47 318 insert(buffer, var)
Nenue@0 319 end
Nenue@47 320 local message = concat(buffer, ' ')
Nenue@18 321 for id, channel in pairs(sendq) do
Nenue@55 322 if channel.width < 250 then
Nenue@55 323 prefix = string.sub(prefix, 0,2)
Nenue@55 324 end
Nenue@58 325 channel.out:AddMessage('|cFF'.. pcolor..prefix ..'|r ' .. message, 0.8, 0.8, 0.8, nil, nil, prefix, GetTime())
Nenue@58 326 if not D.dock.buttons[id].newMessage then
Nenue@58 327 D.dock.buttons[id].newMessage = true
Nenue@58 328 D.UpdateBeacon(D.dock.buttons[id])
Nenue@58 329 end
Nenue@18 330 end
Nenue@47 331 wipe(buffer)
Nenue@0 332 end
Nenue@0 333
Nenue@14 334
Nenue@32 335
Nenue@14 336
Nenue@32 337 function D:PrintHelp()
Nenue@32 338 D:Print("|cFFFFFF00/dvn|r",
Nenue@32 339 "\n |cFFFFFF00<number>|r - Loads a saved addon list. List 1 is treated as a gameplay profile and consoles will be disabled by default.")
Nenue@47 340 D:Print("|cFFFFFF00/dvc|r [<key>, ...]", "- Hides and show consoles. A list of channel keys can be passed to specify which ones get toggled.")
Nenue@32 341
Nenue@32 342 D:Print("|cFFFFFF00/resetdvn|r", "- Resets all but profile data SavedVariables.")
Nenue@32 343 D:Print("|cFFFFFF00/cleandvn|r", "- Fully resets SavedVariables, profiles and all.")
Nenue@32 344 end
Nenue@32 345
Nenue@45 346
Nenue@45 347
Nenue@0 348 function D:OnEnable()
Nenue@33 349
Nenue@33 350 if db.unlisted and #db.unlisted > 0 then
Nenue@47 351 D:Print('New AddOns have been found since the last profile update: '.. concat(db.unlisted, ', '))
Nenue@47 352 wipe(db.unlisted)
Nenue@33 353 end
Nenue@33 354
Nenue@33 355 if db.workspace == 1 then
Nenue@57 356 D:Print(L('Devian loaded on standby',MAJOR, MINOR))
Nenue@33 357 else
Nenue@57 358 D:Print(L('Devian loaded in workspace', MAJOR, MINOR, db.workspace))
Nenue@56 359 -- movement fading
Nenue@56 360 if db.movement_fade then
Nenue@56 361 self:RegisterEvent('PLAYER_STARTED_MOVING', function()
Nenue@56 362 for k, v in pairs(self.console) do
Nenue@56 363 if v.enabled then
Nenue@56 364 v.preAlpha = v:GetAlpha()
Nenue@58 365 v:SetAlpha(0)
Nenue@58 366 v:EnableMouse(false)
Nenue@56 367 end
Nenue@56 368 end
Nenue@56 369 end)
Nenue@56 370 self:RegisterEvent('PLAYER_STOPPED_MOVING', function()
Nenue@56 371 for k, v in pairs(self.console) do
Nenue@56 372 if v.enabled then
Nenue@58 373 v:SetAlpha(v.preAlpha)
Nenue@58 374 v:EnableMouse(true)
Nenue@56 375 end
Nenue@56 376 end
Nenue@56 377 end)
Nenue@56 378 end
Nenue@33 379 end
Nenue@33 380
Nenue@47 381 --@debug@
Nenue@45 382 self:RegisterChatCommand("dvg", function(input)
Nenue@45 383 if not self.config then
Nenue@45 384 self.config = DevCon
Nenue@45 385 self:EnableModule("Config")
Nenue@45 386 end
Nenue@45 387 self.modules.Config:ChatCommand(input)
Nenue@45 388 end)
Nenue@47 389 --@end-debug@
Nenue@45 390
Nenue@33 391 end
Nenue@33 392
Nenue@33 393 function D:OnInitialize()
Nenue@13 394 -- commands
Nenue@33 395 self:RegisterChatCommand("cleandvn", function(args)
Nenue@33 396 DevianDB = nil
Nenue@33 397 DevianDB = {
Nenue@33 398 load_message = "All SavedVars wiped."
Nenue@33 399 }
Nenue@33 400 ReloadUI()
Nenue@33 401 end)
Nenue@36 402 local blocked = {global = true, [PLAYER_REALM] = true}
Nenue@33 403 self:RegisterChatCommand("resetdvn", function(args)
Nenue@33 404 for k,v in pairs(DevianDB) do
Nenue@36 405 if not blocked[k] then
Nenue@33 406 DevianDB[k] = nil
Nenue@33 407 end
Nenue@33 408 end
Nenue@36 409 for k,v in pairs(defaults) do
Nenue@36 410 if not blocked[k] then
Nenue@36 411 DevianDB[k] = v
Nenue@36 412 end
Nenue@36 413 end
Nenue@33 414 DevianDB.load_message = "Non-user SavedVars have been reset."
Nenue@33 415 ReloadUI()
Nenue@33 416 end)
Nenue@13 417 local cmdlist = {
Nenue@13 418 ['dvn'] = ScanAddOnList,
Nenue@13 419 ['devian'] = ScanAddOnList,
Nenue@36 420 ['dvc'] = "Console_Toggle",
Nenue@13 421 }
Nenue@13 422 for cmd, func in pairs(cmdlist) do
Nenue@13 423 self:RegisterChatCommand(cmd, func, true)
Nenue@13 424 end
Nenue@13 425
Nenue@33 426 -- pull defaults
Nenue@9 427 if not _G.DevianDB then
Nenue@13 428 _G.DevianDB = defaults
Nenue@9 429 end
Nenue@9 430 db = _G.DevianDB
Nenue@47 431 self.db = db
Nenue@32 432 self.tags = db.tags
Nenue@32 433 self.channelinfo = db.channels
Nenue@0 434
Nenue@0 435 if not db[PLAYER_REALM] then
Nenue@32 436 db[PLAYER_REALM] = {[WORKSPACE_ON] = {}, [WORKSPACE_OFF] = {}}
Nenue@0 437 end
Nenue@0 438
Nenue@32 439 if db.load_message then
Nenue@32 440 D:Print(db.load_message)
Nenue@32 441 db.load_message = nil
Nenue@0 442 end
Nenue@0 443 D.oldprint = getprinthandler()
Nenue@0 444 if not _G.oldprint then
Nenue@0 445 _G.oldprint = D.oldprint
Nenue@0 446 end
Nenue@13 447
Nenue@33 448 -- Stop here in game mode
Nenue@33 449 if db.workspace == 1 then
Nenue@33 450 return
Nenue@33 451 end
Nenue@35 452 -----------------------------------------------------------------------
Nenue@35 453 self.db = db
Nenue@35 454 self.channels = db.channels
Nenue@32 455 self.max_channel = 0
Nenue@14 456 self.num_channels = 0
Nenue@13 457 self.console = {}
Nenue@13 458 self.sig = {}
Nenue@14 459 self.sigID = {}
Nenue@14 460 self.IDsig = {}
Nenue@47 461 self.dock = DevianDock
Nenue@47 462 self.dock.buttons = {}
Nenue@14 463 for i, cinfo in pairs(db.channels) do
Nenue@14 464 i = tonumber(i)
Nenue@14 465 if not self.primary_channel then
Nenue@14 466 self.primary_channel = i
Nenue@14 467 end
Nenue@14 468 self:SetChannel(cinfo, i)
Nenue@47 469 self.max_channel = max(i, self.max_channel)
Nenue@32 470 self.num_channels = self.num_channels + 1
Nenue@32 471 end
Nenue@32 472
Nenue@18 473 if self.console[db.current_channel] then
Nenue@18 474 self.console[db.current_channel]:ToFront()
Nenue@28 475 -- bring the current channel to the front
Nenue@18 476 end
Nenue@47 477 DevianDock:Show()
Nenue@47 478 self:UpdateDock()
Nenue@33 479 setprinthandler(Message)
Nenue@33 480 print = function(...)
Nenue@33 481 _G.print('Dvn', ...)
Nenue@23 482 end
Nenue@36 483 end
Nenue@36 484
Nenue@36 485 --- Console frame toggler
Nenue@36 486 -- @paramsig [...]
Nenue@36 487 -- @param ... one or more space-seperated channel keys
Nenue@47 488 function D:Console_Toggle(input, force)
Nenue@38 489 --oldprint(input)
Nenue@47 490 local setAll
Nenue@36 491 if db.workspace == 1 then
Nenue@36 492 return self:Print(MSG_NEED_DEV_MODE)
Nenue@36 493 end
Nenue@36 494 local search = {}
Nenue@47 495 local key
Nenue@36 496 local n = 0
Nenue@47 497 while self:GetArgs(input,1,n) and n < 255 do --should end itself when it gets nil, but
Nenue@47 498 key, n = self:GetArgs(input,1,n)
Nenue@47 499
Nenue@36 500 if self.sig[key] then
Nenue@47 501 --print(key, self.sigID[key])
Nenue@47 502 insert(search, self.sigID[key])
Nenue@47 503 elseif self.console[tonumber(key)] then
Nenue@47 504 --print(key, tonumber(key))
Nenue@47 505 insert(search, tonumber(key))
Nenue@36 506 end
Nenue@47 507
Nenue@47 508 --oldprint(#search, key, n)
Nenue@47 509 end
Nenue@47 510 if #search < 1 then
Nenue@36 511 search = self.sigID
Nenue@47 512 setAll = true
Nenue@47 513 end
Nenue@47 514 if setAll then
Nenue@47 515 --oldprint('setall', setAll)
Nenue@47 516 db.enabled = (not db.enabled) and true or nil
Nenue@47 517 if force == 0 then
Nenue@47 518 db.enabled = nil
Nenue@47 519 end
Nenue@36 520 end
Nenue@36 521
Nenue@36 522 for i, id in pairs(search) do
Nenue@38 523 --oldprint(i, id)
Nenue@36 524 local c = self.console[id]
Nenue@47 525 if setAll then
Nenue@47 526 c.enabled = db.enabled and db.enabled or nil
Nenue@47 527 else
Nenue@47 528
Nenue@47 529 db.enabled = true
Nenue@47 530 c.enabled = (not c.enabled) and true or nil
Nenue@47 531 if force == 0 then
Nenue@47 532 c.enabled = nil
Nenue@47 533 end
Nenue@47 534 --oldprint(id, ' ', force, c.enabled, db.enabled)
Nenue@47 535 end
Nenue@47 536
Nenue@47 537 if c.enabled or (setAll and db.enabled) then
Nenue@36 538 c:Show()
Nenue@36 539 if db.current_channel == c.index then
Nenue@36 540 c:ToFront()
Nenue@36 541 end
Nenue@47 542 elseif not (c.enabled and db.enabled) then
Nenue@36 543 c:Hide()
Nenue@36 544 end
Nenue@47 545 c:Save()
Nenue@36 546 end
Nenue@36 547
Nenue@47 548 if setAll then
Nenue@47 549 if db.enabled then
Nenue@47 550 self:Print('toggled all consoles ON')
Nenue@47 551 else
Nenue@47 552 self:Print('toggled all consoles OFF')
Nenue@47 553 end
Nenue@36 554 else
Nenue@47 555 local result = {}
Nenue@47 556 for i, id in pairs(search) do
Nenue@47 557 result[i] = tostring(id) .. ' = ' .. (self.console[id].enabled and 'ON' or 'OFF')
Nenue@47 558 end
Nenue@47 559 self:Print('toggled: '..concat(result, ', '))
Nenue@36 560 end
Nenue@0 561 end