You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
293 lines
11 KiB
293 lines
11 KiB
local L = DBM_GUI_L
|
|
local CL = DBM_CORE_L
|
|
|
|
local DBM = DBM
|
|
local CreateFrame = CreateFrame
|
|
|
|
local frame = _G["DBM_GUI_OptionsFrame"]
|
|
table.insert(_G["UISpecialFrames"], frame:GetName())
|
|
frame:SetFrameStrata("DIALOG")
|
|
if DBM.Options.GUIPoint then
|
|
frame:SetPoint(DBM.Options.GUIPoint, UIParent, DBM.Options.GUIPoint, DBM.Options.GUIX, DBM.Options.GUIY)
|
|
else
|
|
frame:SetPoint("CENTER")
|
|
end
|
|
if DBM.Options.GUIWidth then
|
|
frame:SetSize(DBM.Options.GUIWidth, DBM.Options.GUIHeight)
|
|
else
|
|
frame:SetSize(800, 600)
|
|
end
|
|
frame:EnableMouse(true)
|
|
frame:SetMovable(true)
|
|
frame:SetResizable(true)
|
|
frame:SetClampedToScreen(true)
|
|
frame:SetUserPlaced(true)
|
|
frame:RegisterForDrag("LeftButton")
|
|
frame:SetFrameLevel(frame:GetFrameLevel() + 4)
|
|
if DBM:GetTOC() < 100000 then -- Is live
|
|
frame:SetMinResize(800, 400)
|
|
frame:SetMaxResize(UIParent:GetWidth(), UIParent:GetHeight())
|
|
else -- Is DragonFlight
|
|
frame:SetResizeBounds(800, 400, UIParent:GetWidth(), UIParent:GetHeight())
|
|
end
|
|
frame:Hide()
|
|
frame.backdropInfo = {
|
|
bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background-Dark", -- 131071
|
|
edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border", -- 131072
|
|
tile = true,
|
|
tileSize = 32,
|
|
edgeSize = 32,
|
|
insets = { left = 11, right = 12, top = 12, bottom = 11 }
|
|
}
|
|
|
|
frame:ApplyBackdrop()
|
|
frame:SetBackdropColor(1, 1, 1, .85)
|
|
frame.firstshow = true
|
|
frame:SetScript("OnShow", function(self)
|
|
if self.firstshow then
|
|
self.firstshow = false
|
|
self:ShowTab(1)
|
|
end
|
|
end)
|
|
frame:SetScript("OnHide", function()
|
|
_G["DBM_GUI_DropDown"]:Hide()
|
|
end)
|
|
frame:SetScript("OnDragStart", frame.StartMoving)
|
|
frame:SetScript("OnDragStop", function(self)
|
|
self:StopMovingOrSizing()
|
|
local point, _, _, x, y = self:GetPoint(1)
|
|
DBM.Options.GUIPoint = point
|
|
DBM.Options.GUIX = x
|
|
DBM.Options.GUIY = y
|
|
end)
|
|
frame:SetScript("OnSizeChanged", function(self)
|
|
self:UpdateMenuFrame()
|
|
if DBM_GUI.currentViewing then
|
|
self:DisplayFrame(DBM_GUI.currentViewing)
|
|
end
|
|
end)
|
|
frame:SetScript("OnMouseUp", function(self)
|
|
self:StopMovingOrSizing()
|
|
end)
|
|
frame.tabs = {}
|
|
|
|
local frameResize = CreateFrame("Frame", nil, frame)
|
|
frameResize:SetSize(10, 10)
|
|
frameResize:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT")
|
|
frameResize:EnableMouse(true)
|
|
frameResize:SetScript("OnMouseDown", function()
|
|
frame:StartSizing("BOTTOMRIGHT")
|
|
end)
|
|
frameResize:SetScript("OnMouseUp", function()
|
|
frame:StopMovingOrSizing()
|
|
DBM.Options.GUIWidth = frame:GetWidth()
|
|
DBM.Options.GUIHeight = frame:GetHeight()
|
|
end)
|
|
|
|
local frameHeader = frame:CreateTexture("$parentHeader", "ARTWORK")
|
|
frameHeader:SetPoint("TOP", 0, 12)
|
|
frameHeader:SetTexture(131080) -- "Interface\\DialogFrame\\UI-DialogBox-Header"
|
|
frameHeader:SetSize(300, 68)
|
|
|
|
local frameHeaderText = frame:CreateFontString("$parentHeaderText", "ARTWORK", "GameFontNormal")
|
|
frameHeaderText:SetPoint("TOP", frameHeader, 0, -14)
|
|
frameHeaderText:SetText(L.MainFrame)
|
|
|
|
local frameRevision = frame:CreateFontString("$parentRevision", "ARTWORK", "GameFontDisableSmall")
|
|
frameRevision:SetPoint("BOTTOMLEFT", frame, "BOTTOMLEFT", 20, 18)
|
|
if DBM.NewerVersion then
|
|
frameRevision:SetText(CL.DEADLY_BOSS_MODS.. " " .. DBM.DisplayVersion.. " (" .. DBM:ShowRealDate(DBM.Revision) .. "). |cffff0000Version " .. DBM.NewerVersion .. " is available.|r")
|
|
else
|
|
frameRevision:SetText(CL.DEADLY_BOSS_MODS.. " " .. DBM.DisplayVersion.. " (" .. DBM:ShowRealDate(DBM.Revision) .. ")")
|
|
end
|
|
|
|
do
|
|
local count = 0
|
|
|
|
local frameHeaderButton = CreateFrame("Frame", nil, frame)
|
|
frameHeaderButton:SetPoint("BOTTOMLEFT", frame, "BOTTOMLEFT", 20, 18)
|
|
frameHeaderButton:SetSize(frameRevision:GetSize())
|
|
frameHeaderButton:EnableMouse(true)
|
|
frameHeaderButton:SetScript("OnMouseUp", function()
|
|
count = count + 1
|
|
if count == 3 then
|
|
count = 0
|
|
DBM:PlaySound("1304911", true)
|
|
end
|
|
end)
|
|
end
|
|
|
|
local frameTranslation = frame:CreateFontString("$parentTranslation", "ARTWORK", "GameFontDisableSmall")
|
|
frameTranslation:SetPoint("LEFT", frameRevision, "RIGHT", 20, 0)
|
|
if L.TranslationBy then
|
|
frameTranslation:SetText(L.TranslationByPrefix .. L.TranslationBy)
|
|
end
|
|
|
|
local frameOkay = CreateFrame("Button", "$parentOkay", frame, "UIPanelButtonTemplate")
|
|
frameOkay:SetSize(96, 22)
|
|
frameOkay:SetPoint("BOTTOMRIGHT", -16, 14)
|
|
frameOkay:SetText(CLOSE)
|
|
frameOkay:SetScript("OnClick", function()
|
|
frame:Hide()
|
|
if DBM.Options.tempMusicSetting then
|
|
SetCVar("Sound_EnableMusic", DBM.Options.tempMusicSetting)
|
|
DBM.Options.tempMusicSetting = nil
|
|
end
|
|
if DBM.Options.musicPlaying then
|
|
StopMusic()
|
|
DBM.Options.musicPlaying = nil
|
|
end
|
|
end)
|
|
|
|
local frameWebsite = frame:CreateFontString("$parentWebsite", "ARTWORK", "GameFontNormal")
|
|
frameWebsite:SetPoint("BOTTOMLEFT", frameRevision, "TOPLEFT", 0, 15)
|
|
frameWebsite:SetPoint("RIGHT", frameOkay, "RIGHT")
|
|
frameWebsite:SetText(L.Website)
|
|
|
|
local frameWebsiteButtonA = CreateFrame("Frame", nil, frame)
|
|
frameWebsiteButtonA:SetAllPoints(frameWebsite)
|
|
frameWebsiteButtonA:SetScript("OnMouseUp", function()
|
|
DBM:ShowUpdateReminder(nil, nil, CL.COPY_URL_DIALOG, "https://discord.gg/deadlybossmods")
|
|
end)
|
|
|
|
local frameWebsiteButton = CreateFrame("Button", "$parentWebsiteButton", frame, "UIPanelButtonTemplate")
|
|
frameWebsiteButton:SetSize(96, 22)
|
|
frameWebsiteButton:SetPoint("BOTTOMRIGHT", frameOkay, "BOTTOMLEFT", -20, 0)
|
|
frameWebsiteButton:SetText(L.WebsiteButton)
|
|
frameWebsiteButton:SetScript("OnClick", function()
|
|
DBM:ShowUpdateReminder(nil, nil, CL.COPY_URL_DIALOG)
|
|
end)
|
|
|
|
local bossMods = CreateFrame("Frame", "$parentBossMods", frame)
|
|
bossMods.name = L.OTabBosses
|
|
frame:CreateTab(bossMods)
|
|
|
|
local DBMOptions = CreateFrame("Frame", "$parentDBMOptions", frame)
|
|
DBMOptions.name = L.OTabOptions
|
|
frame:CreateTab(DBMOptions)
|
|
|
|
local hack = OptionsList_OnLoad
|
|
function OptionsList_OnLoad(self, ...)
|
|
if self:GetName() ~= frame:GetName() .. "List" then
|
|
hack(self, ...)
|
|
end
|
|
end
|
|
local frameList = CreateFrame("Frame", "$parentList", frame, "TooltipBorderBackdropTemplate")
|
|
frameList:SetWidth(205)
|
|
frameList:SetPoint("TOPLEFT", 22, -40)
|
|
frameList:SetPoint("BOTTOMLEFT", frameWebsite, "TOPLEFT", 0, 5)
|
|
frameList:SetScript("OnShow", function()
|
|
frame:UpdateMenuFrame()
|
|
end)
|
|
frameList.offset = 0
|
|
frameList:SetBackdropBorderColor(0.6, 0.6, 0.6, 1)
|
|
frameList.buttons = {}
|
|
for i = 1, math.floor(UIParent:GetHeight() / 18) do
|
|
local button = CreateFrame("Button", "$parentButton" .. i, frameList)
|
|
button:SetHeight(18)
|
|
button.text = button:CreateFontString("$parentText", "ARTWORK", "GameFontNormalSmall")
|
|
button:RegisterForClicks("LeftButtonUp")
|
|
button:SetScript("OnClick", function(self)
|
|
frame:ClearSelection()
|
|
frame.tabs[frame.tab].selection = self.element
|
|
self:LockHighlight()
|
|
frame:DisplayFrame(self.element)
|
|
end)
|
|
if i == 1 then
|
|
button:SetPoint("TOPLEFT", frameList, 0, -8)
|
|
else
|
|
button:SetPoint("TOPLEFT", frameList.buttons[i - 1], "BOTTOMLEFT")
|
|
end
|
|
local buttonHighlight = button:CreateTexture("$parentHighlight")
|
|
buttonHighlight:SetTexture(136809) -- "Interface\\QuestFrame\\UI-QuestLogTitleHighlight"
|
|
buttonHighlight:SetBlendMode("ADD")
|
|
buttonHighlight:SetPoint("TOPLEFT", 0, 1)
|
|
buttonHighlight:SetPoint("BOTTOMRIGHT", 0, 1)
|
|
buttonHighlight:SetVertexColor(0.196, 0.388, 0.8)
|
|
button:SetHighlightTexture(buttonHighlight)
|
|
frameList.buttons[i] = button
|
|
local buttonToggle = CreateFrame("Button", "$parentToggle", button, "UIPanelButtonTemplate")
|
|
button.toggle = buttonToggle
|
|
buttonToggle:SetSize(14, 14)
|
|
buttonToggle:SetPoint("TOPLEFT", button, "TOPLEFT", 5, -1)
|
|
buttonToggle:RegisterForClicks("LeftButtonUp", "RightButtonUp")
|
|
buttonToggle:SetScript("OnClick", function()
|
|
button.element.showSub = not button.element.showSub
|
|
frame:UpdateMenuFrame()
|
|
end)
|
|
end
|
|
local frameListList = CreateFrame("ScrollFrame", "$parentList", frameList, "UIPanelScrollFrameTemplate")
|
|
frameListList.backdropInfo = {
|
|
edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", -- 137057
|
|
tile = true,
|
|
tileSize = 16,
|
|
edgeSize = 12,
|
|
insets = { left = 0, right = 0, top = 5, bottom = 5 }
|
|
}
|
|
Mixin(frameListList, BackdropTemplateMixin)
|
|
frameListList:ApplyBackdrop()
|
|
frameListList:SetBackdropBorderColor(0.6, 0.6, 0.6, 0.6)
|
|
frameListList:SetScript("OnVerticalScroll", function(self, offset)
|
|
local scrollbar = _G[self:GetName() .. "ScrollBar"]
|
|
local _, max = scrollbar:GetMinMaxValues()
|
|
scrollbar:SetValue(offset)
|
|
_G[self:GetName() .. "ScrollBarScrollUpButton"]:SetEnabled(offset ~= 0)
|
|
_G[self:GetName() .. "ScrollBarScrollDownButton"]:SetEnabled(scrollbar:GetValue() - max ~= 0)
|
|
frameList.offset = math.floor((offset / 18) + 0.5)
|
|
frame:UpdateMenuFrame()
|
|
end)
|
|
local frameListScrollBar = _G[frameListList:GetName() .. "ScrollBar"]
|
|
frameListScrollBar:SetMinMaxValues(0, 11)
|
|
frameListScrollBar:SetValueStep(18)
|
|
frameListScrollBar:SetValue(0)
|
|
frameList:SetScript("OnMouseWheel", function(_, delta)
|
|
frameListScrollBar:SetValue(frameListScrollBar:GetValue() - (delta * 18))
|
|
end)
|
|
local scrollUpButton = _G[frameListScrollBar:GetName() .. "ScrollUpButton"]
|
|
scrollUpButton:Disable()
|
|
scrollUpButton:SetScript("OnClick", function(self)
|
|
self:GetParent():SetValue(self:GetParent():GetValue() - 18)
|
|
end)
|
|
local scrollDownButton = _G[frameListScrollBar:GetName() .. "ScrollDownButton"]
|
|
scrollDownButton:Enable()
|
|
scrollDownButton:SetScript("OnClick", function(self)
|
|
self:GetParent():SetValue(self:GetParent():GetValue() + 18)
|
|
end)
|
|
|
|
local frameContainer = CreateFrame("ScrollFrame", "$parentPanelContainer", frame, "BackdropTemplate")
|
|
frameContainer:SetPoint("TOPLEFT", frameList, "TOPRIGHT", 16, 0)
|
|
frameContainer:SetPoint("BOTTOMLEFT", frameList, "BOTTOMRIGHT", 16, 0)
|
|
frameContainer:SetPoint("RIGHT", -22, 0)
|
|
frameContainer.backdropInfo = {
|
|
edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", -- 137057
|
|
edgeSize = 16,
|
|
tileEdge = true
|
|
}
|
|
frameContainer:ApplyBackdrop()
|
|
frameContainer:SetBackdropBorderColor(0.6, 0.6, 0.6, 1)
|
|
|
|
local frameContainerFOV = CreateFrame("ScrollFrame", "$parentFOV", frameContainer, "FauxScrollFrameTemplate")
|
|
frameContainerFOV:Hide()
|
|
frameContainerFOV:SetPoint("TOPLEFT", frameContainer, "TOPLEFT", 0, -5)
|
|
frameContainerFOV:SetPoint("BOTTOMRIGHT", frameContainer, "BOTTOMRIGHT", 0, 5)
|
|
|
|
_G[frameContainerFOV:GetName() .. "ScrollBarScrollUpButton"]:Disable()
|
|
_G[frameContainerFOV:GetName() .. "ScrollBarScrollDownButton"]:Enable()
|
|
|
|
local frameContainerScrollBar = _G[frameContainerFOV:GetName() .. "ScrollBar"]
|
|
frameContainerScrollBar:ClearAllPoints()
|
|
frameContainerScrollBar:SetPoint("TOPRIGHT", -4, -15)
|
|
frameContainerScrollBar:SetPoint("BOTTOMRIGHT", 0, 15)
|
|
|
|
local frameContainerScrollBarBackdrop = CreateFrame("Frame", nil, frameContainerScrollBar, "BackdropTemplate")
|
|
frameContainerScrollBarBackdrop:SetPoint("TOPLEFT", -4, 20)
|
|
frameContainerScrollBarBackdrop:SetPoint("BOTTOMRIGHT", 4, -20)
|
|
frameContainerScrollBarBackdrop.backdropInfo = {
|
|
edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", -- 137057
|
|
tile = true,
|
|
tileSize = 16,
|
|
edgeSize = 16,
|
|
insets = { left = 0, right = 0, top = 5, bottom = 5 }
|
|
}
|
|
frameContainerScrollBarBackdrop:ApplyBackdrop()
|
|
frameContainerScrollBarBackdrop:SetBackdropBorderColor(0.6, 0.6, 0.6, 0.6)
|
|
|