---------------------
-- Panel --
---------------------
local frame = CreateFrame("Frame", nil, InterfaceOptionsFramePanelContainer)
frame.name = "GreedBeacon"
frame:Hide()
frame:SetScript("OnShow", function(frame)
local title, subtitle = LibStub("tekKonfig-Heading").new(frame, "GreedBeacon", "This panel allows you to control which chat frame GreedBeacon outputs to.")
local chatframedropdown, chatframedropdowntext, chatframedropdowncontainer = LibStub("tekKonfig-Dropdown").new(frame, "Output to", "TOPLEFT", subtitle, "BOTTOMLEFT", -2, -8)
chatframedropdowntext:SetText(GreedBeaconDB.frame)
chatframedropdown.tiptext = "Select which chat frame to output to."
local function OnClick(self)
UIDropDownMenu_SetSelectedValue(chatframedropdown, self.value)
chatframedropdowntext:SetText(self.value)
GreedBeaconDB.frame = self.value
end
UIDropDownMenu_Initialize(chatframedropdown, function()
local selected, info = UIDropDownMenu_GetSelectedValue(chatframedropdown) or GreedBeaconDB.frame, UIDropDownMenu_CreateInfo()
for i=1,7 do
info.text = "ChatFrame"..i
info.value = "ChatFrame"..i
info.func = OnClick
info.checked = ("ChatFrame"..i) == selected
UIDropDownMenu_AddButton(info)
end
end)
local ident = LibStub("tekKonfig-Button").new_small(frame, "TOP", chatframedropdown, "TOP")
ident:SetPoint("RIGHT", -16, 0)
ident:SetText("Identify")
ident.tiptext = "Identify each chat frame"
ident:SetScript("OnClick", function(self) for i=1,7 do _G["ChatFrame"..i]:AddMessage("|cFF33FF99GreedBeacon|r: This is ChatFrame"..i) end end)
frame:SetScript("OnShow", nil)
end)
InterfaceOptions_AddCategory(frame)
LibStub("tekKonfig-AboutPanel").new("GreedBeacon", "GreedBeacon")
