Files
Road-block 0e42d616aa Resolve some shootyepgp staticpopup issues caused by LazyPig.
Fix a bug with tablets becoming unresponsive when using a combination of clicks and ESC to toggle with multiple tablets open.
More improvements to initial loading logic, to avoid issues with cold login in an existing raid (eg. after crash)
Improve detection of admin status for command-line options as well ensure tablets modified by chat commands update in real time (eg. clear loot, logs)
2018-05-21 15:49:19 +03:00

120 lines
3.3 KiB
Lua

local T = AceLibrary("Tablet-2.0")
local D = AceLibrary("Dewdrop-2.0")
local C = AceLibrary("Crayon-2.0")
local BC = AceLibrary("Babble-Class-2.2")
local L = AceLibrary("AceLocale-2.2"):new("shootyepgp")
sepgp_alts = sepgp:NewModule("sepgp_alts", "AceDB-2.0")
function sepgp_alts:OnEnable()
if not T:IsRegistered("sepgp_alts") then
T:Register("sepgp_alts",
"children", function()
T:SetTitle(L["shootyepgp alts"])
self:OnTooltipUpdate()
end,
"showTitleWhenDetached", true,
"showHintWhenDetached", true,
"cantAttach", true,
"menu", function()
D:AddLine(
"text", L["Refresh"],
"tooltipText", L["Refresh window"],
"func", function() sepgp_alts:Refresh() end
)
end
)
end
if not T:IsAttached("sepgp_alts") then
T:Open("sepgp_alts")
end
end
function sepgp_alts:OnDisable()
T:Close("sepgp_alts")
end
function sepgp_alts:Refresh()
T:Refresh("sepgp_alts")
end
function sepgp_alts:setHideScript()
local i = 1
local tablet = getglobal(string.format("Tablet20DetachedFrame%d",i))
while (tablet) and i<100 do
if tablet.owner ~= nil and tablet.owner == "sepgp_alts" then
sepgp:make_escable(string.format("Tablet20DetachedFrame%d",i),"add")
tablet:SetScript("OnHide",nil)
tablet:SetScript("OnHide",function()
if not T:IsAttached("sepgp_alts") then
T:Attach("sepgp_alts")
this:SetScript("OnHide",nil)
end
end)
break
end
i = i+1
tablet = getglobal(string.format("Tablet20DetachedFrame%d",i))
end
end
function sepgp_alts:Top()
if T:IsRegistered("sepgp_alts") and (T.registry.sepgp_alts.tooltip) then
T.registry.sepgp_alts.tooltip.scroll=0
end
end
function sepgp_alts:Toggle(forceShow)
self:Top()
if T:IsAttached("sepgp_alts") then
T:Detach("sepgp_alts") -- show
if (T:IsLocked("sepgp_alts")) then
T:ToggleLocked("sepgp_alts")
end
self:setHideScript()
else
if (forceShow) then
sepgp_alts:Refresh()
else
T:Attach("sepgp_alts") -- hide
end
end
end
function sepgp_alts:OnClickItem(name)
--ChatFrame_SendTell(name)
end
function sepgp_alts:BuildAltsTable()
return sepgp.alts
end
function sepgp_alts:OnTooltipUpdate()
local cat = T:AddCategory(
"columns", 2,
"text", C:Orange(L["Main"]), "child_textR", 1, "child_textG", 1, "child_textB", 1, "child_justify", "LEFT",
"text2", C:Orange(L["Alts"]), "child_text2R", 0, "child_text2G", 1, "child_text2B", 0, "child_justify2", "RIGHT"
)
local t = self:BuildAltsTable()
for main, alts in pairs(t) do
local altstring = ""
for alt,class in pairs(alts) do
local coloredalt = C:Colorize(BC:GetHexColor(class), alt)
if altstring == "" then
altstring = coloredalt
else
altstring = string.format("%s, %s",altstring,coloredalt)
end
end
cat:AddLine(
"text", main,
"text2", altstring--,
--"func", "OnClickItem", "arg1", self, "arg2", main
)
end
end
-- GLOBALS: sepgp_saychannel,sepgp_groupbyclass,sepgp_groupbyarmor,sepgp_groupbyrole,sepgp_raidonly,sepgp_decay,sepgp_minep,sepgp_reservechannel,sepgp_main,sepgp_progress,sepgp_discount,sepgp_log,sepgp_dbver,sepgp_looted
-- GLOBALS: sepgp,sepgp_prices,sepgp_standings,sepgp_bids,sepgp_loot,sepgp_reserves,sepgp_alts,sepgp_logs