Files
shootyepgp/alts.lua
T
Road-block 7148a9a5fa Remove some settings from member addon menu that do not affect addon operation.
Add more groupings to standings tablet:
 - 'by armor type' and 'by role' (no spec information in vanilla so this one is messy)
2018-02-06 00:21:10 +02:00

119 lines
3.4 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")
if not (tablet:GetScript("OnHide")) then
tablet:SetScript("OnHide",function()
if not T:IsAttached("sepgp_alts") then
T:Attach("sepgp_alts")
this:SetScript("OnHide",nil)
end
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()
elseif (forceShow) then
sepgp_alts:Refresh()
else
T:Attach("sepgp_alts") -- hide
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_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