annotate Devian.lua @ 48:2bf7eb1844cb v2.0-raw

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