Add files via upload
This commit is contained in:
Dusk-92
+399
@@ -0,0 +1,399 @@
|
||||
local _G = ShaguTweaks.GetGlobalEnv()
|
||||
local T = ShaguTweaks.T
|
||||
local GetExpansion = ShaguTweaks.GetExpansion
|
||||
local mod = math.mod or mod
|
||||
|
||||
local current_config = {}
|
||||
local max_width = 500
|
||||
local max_height = 680
|
||||
|
||||
local settings = CreateFrame("Frame", "AdvancedSettingsGUI", UIParent)
|
||||
settings:Hide()
|
||||
|
||||
table.insert(UISpecialFrames, "AdvancedSettingsGUI")
|
||||
settings:SetScript("OnHide", function()
|
||||
ShowUIPanel(GameMenuFrame)
|
||||
UpdateMicroButtons()
|
||||
end)
|
||||
|
||||
settings:SetPoint("CENTER", UIParent, "CENTER", 0, 32)
|
||||
settings:SetWidth(max_width)
|
||||
settings:SetMovable(true)
|
||||
settings:EnableMouse(true)
|
||||
settings:RegisterForDrag("LeftButton")
|
||||
settings:SetScript("OnDragStart", function() this:StartMoving() end)
|
||||
settings:SetScript("OnDragStop", function() this:StopMovingOrSizing() end)
|
||||
settings:SetFrameStrata("DIALOG")
|
||||
|
||||
settings:SetBackdrop({
|
||||
bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background",
|
||||
edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border",
|
||||
tile = true, tileSize = 32, edgeSize = 32,
|
||||
insets = { left = 11, right = 12, top = 12, bottom = 11 }
|
||||
})
|
||||
|
||||
settings.scrollframe = CreateFrame('ScrollFrame', 'AdvancedSettingsGUIScrollframe', settings, 'UIPanelScrollFrameTemplate')
|
||||
settings.scrollframe:SetWidth(max_width - 50)
|
||||
settings.scrollframe:SetPoint('CENTER', settings, -16, 15)
|
||||
settings.scrollframe:Hide()
|
||||
|
||||
settings.container = CreateFrame("Frame", "AdvancedSettingsGUIContainer", settings)
|
||||
|
||||
settings.title = CreateFrame("Frame", "AdvancedSettingsGUITtitle", settings)
|
||||
settings.title:SetPoint("TOP", settings, "TOP", 0, 12)
|
||||
settings.title:SetWidth(256)
|
||||
settings.title:SetHeight(64)
|
||||
|
||||
settings.title.tex = settings.title:CreateTexture(nil, "MEDIUM")
|
||||
settings.title.tex:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header")
|
||||
settings.title.tex:SetAllPoints()
|
||||
|
||||
settings.title.text = settings.title:CreateFontString(nil, "HIGH", "GameFontNormal")
|
||||
settings.title.text:SetText(T["Advanced Options"])
|
||||
settings.title.text:SetPoint("TOP", 0, -14)
|
||||
|
||||
settings.cancel = CreateFrame("Button", "AdvancedSettingsGUICancel", settings, "GameMenuButtonTemplate")
|
||||
settings.cancel:SetWidth(90)
|
||||
settings.cancel:SetPoint("BOTTOMRIGHT", settings, "BOTTOMRIGHT", -17, 17)
|
||||
settings.cancel:SetText(CANCEL)
|
||||
settings.cancel:SetScript("OnClick", function()
|
||||
current_config = {}
|
||||
settings:Hide()
|
||||
end)
|
||||
|
||||
settings.okay = CreateFrame("Button", "AdvancedSettingsGUIOkay", settings, "GameMenuButtonTemplate")
|
||||
settings.okay:SetWidth(90)
|
||||
settings.okay:SetPoint("RIGHT", settings.cancel, "LEFT", 0, 0)
|
||||
settings.okay:SetText(OKAY)
|
||||
settings.okay:SetScript("OnClick", function()
|
||||
local reload
|
||||
|
||||
-- save temporary config to real config
|
||||
for k, v in pairs(current_config) do
|
||||
if k ~= "overwrites" then
|
||||
-- check if reload is required
|
||||
if current_config[k] ~= ShaguTweaks_config[k] then
|
||||
reload = true
|
||||
end
|
||||
|
||||
-- set new config
|
||||
ShaguTweaks_config[k] = v
|
||||
end
|
||||
end
|
||||
|
||||
-- save slider overwrite values
|
||||
if current_config.overwrites then
|
||||
ShaguTweaks_config.overwrites = ShaguTweaks_config.overwrites or {}
|
||||
for k, v in pairs(current_config.overwrites) do
|
||||
if ShaguTweaks_config.overwrites[k] ~= v then
|
||||
reload = true
|
||||
end
|
||||
ShaguTweaks_config.overwrites[k] = v
|
||||
end
|
||||
end
|
||||
|
||||
-- reload the UI if required
|
||||
if reload then
|
||||
Minimap:SetMaskTexture("Textures\\MinimapMask")
|
||||
ReloadUI()
|
||||
end
|
||||
|
||||
settings:Hide()
|
||||
end)
|
||||
|
||||
settings.defaults = CreateFrame("Button", "AdvancedSettingsGUICancel", settings, "GameMenuButtonTemplate")
|
||||
settings.defaults:SetWidth(90)
|
||||
settings.defaults:SetPoint("BOTTOMLEFT", settings, "BOTTOMLEFT", 17, 17)
|
||||
settings.defaults:SetText(DEFAULTS)
|
||||
settings.defaults:SetScript("OnClick", function()
|
||||
settings:defaults()
|
||||
end)
|
||||
|
||||
settings.load = function(self)
|
||||
-- never use more than 3/4 of the screen size
|
||||
max_height = math.min(UIParent:GetHeight()/UIParent:GetScale()*0.75, 680)
|
||||
|
||||
-- update window sizing according to screen
|
||||
settings:SetHeight(max_height)
|
||||
settings.scrollframe:SetHeight(max_height - 80)
|
||||
settings.container:SetHeight(max_height - 30)
|
||||
|
||||
settings.entries = settings.entries or {}
|
||||
local expansion = ShaguTweaks:GetExpansion()
|
||||
|
||||
-- sort all configs into categories
|
||||
local gui = {}
|
||||
for title, module in pairs(ShaguTweaks.mods) do
|
||||
if module.expansions[expansion] then
|
||||
local category = module.category or T["General"]
|
||||
gui[category] = gui[category] or {}
|
||||
gui[category][title] = module
|
||||
end
|
||||
end
|
||||
|
||||
local topspace = 10
|
||||
local required_height = topspace
|
||||
local entrysize = 22
|
||||
local previous = nil
|
||||
|
||||
local sortGeneralFirst = function(a, b)
|
||||
if a == T["General"] then return true end
|
||||
if b == T["General"] then return false end
|
||||
return a < b
|
||||
end
|
||||
|
||||
for category, entries in ShaguTweaks.spairs(gui, sortGeneralFirst) do
|
||||
local entry, spacing = 1, 22
|
||||
local height = 0
|
||||
|
||||
-- add category background
|
||||
settings.category = settings.category or {}
|
||||
settings.category[category] = settings.category[category] or CreateFrame("Frame", nil, settings.container)
|
||||
|
||||
if not previous then
|
||||
settings.category[category]:SetPoint("TOPLEFT", settings.container, "TOPLEFT", spacing, -spacing - topspace)
|
||||
settings.category[category]:SetPoint("TOPRIGHT", settings.container, "TOPRIGHT", -spacing, -spacing - topspace)
|
||||
else
|
||||
settings.category[category]:SetPoint("TOPLEFT", previous, "BOTTOMLEFT", 0, -spacing)
|
||||
settings.category[category]:SetPoint("TOPRIGHT", previous, "BOTTOMRIGHT", 0, -spacing)
|
||||
end
|
||||
|
||||
previous = settings.category[category]
|
||||
|
||||
-- create category title collapse button
|
||||
local collapse = function(frame, expand)
|
||||
local parent = frame or this.parent
|
||||
|
||||
if expand then
|
||||
local height = parent.collapse or parent:GetHeight()
|
||||
parent.collapse = height
|
||||
end
|
||||
|
||||
if not parent.collapse then
|
||||
local height = parent:GetHeight()
|
||||
parent.collapse = height
|
||||
parent:SetHeight(1)
|
||||
|
||||
for button in pairs(parent.buttons) do button:Hide() end
|
||||
parent.button:SetNormalTexture("Interface\\Buttons\\UI-SpellbookIcon-NextPage-Up")
|
||||
parent.button:SetPushedTexture("Interface\\Buttons\\UI-SpellbookIcon-NextPage-Down")
|
||||
parent.button:SetDisabledTexture("Interface\\Buttons\\UI-SpellbookIcon-NextPage-Disabled")
|
||||
parent.button:SetHighlightTexture("Interface\\Buttons\\UI-Common-MouseHilight")
|
||||
parent:SetAlpha(0)
|
||||
else
|
||||
local height = parent.collapse
|
||||
parent.collapse = nil
|
||||
parent:SetHeight(height)
|
||||
|
||||
for button in pairs(parent.buttons) do button:Show() end
|
||||
parent.button:SetNormalTexture("Interface\\ChatFrame\\UI-ChatIcon-ScrollDown-Up")
|
||||
parent.button:SetPushedTexture("Interface\\ChatFrame\\UI-ChatIcon-ScrollDown-Down")
|
||||
parent.button:SetDisabledTexture("Interface\\ChatFrame\\UI-ChatIcon-ScrollDown-Disabled")
|
||||
parent.button:SetHighlightTexture("Interface\\Buttons\\UI-Common-MouseHilight")
|
||||
parent:SetAlpha(1)
|
||||
end
|
||||
end
|
||||
|
||||
settings.category[category].button = settings.category[category].button or CreateFrame("Button", nil, settings.container)
|
||||
settings.category[category].button:SetPoint("TOPLEFT", settings.category[category], "TOPLEFT", 0, entrysize-4)
|
||||
settings.category[category].button:SetWidth(22)
|
||||
settings.category[category].button:SetHeight(22)
|
||||
settings.category[category].button.parent = settings.category[category]
|
||||
settings.category[category].button:SetScript("OnClick", collapse)
|
||||
|
||||
settings.category[category].title = settings.category[category].title or CreateFrame("Button", nil, settings.container)
|
||||
settings.category[category].title:SetPoint("TOPLEFT", settings.category[category], "TOPLEFT", 22, entrysize-4)
|
||||
settings.category[category].title:SetWidth(200)
|
||||
settings.category[category].title:SetHeight(entrysize)
|
||||
settings.category[category].title.parent = settings.category[category]
|
||||
settings.category[category].title:SetScript("OnClick", collapse)
|
||||
|
||||
settings.category[category]:SetBackdrop({
|
||||
bgFile = "Interface\\Tooltips\\UI-Tooltip-Background",
|
||||
edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
|
||||
tile = true, tileSize = 8, edgeSize = 16,
|
||||
insets = { left = 3, right = 3, top = 3, bottom = 3 }
|
||||
})
|
||||
|
||||
if ShaguTweaks.DarkMode then
|
||||
settings.category[category]:SetBackdropColor(.1,.1,.1,1)
|
||||
settings.category[category]:SetBackdropBorderColor(.2,.2,.2,1)
|
||||
else
|
||||
settings.category[category]:SetBackdropColor(.2,.2,.2,1)
|
||||
settings.category[category]:SetBackdropBorderColor(.5,.5,.5,1)
|
||||
end
|
||||
|
||||
-- add category title
|
||||
settings.category[category].text = settings.category[category].text or settings.category[category].title:CreateFontString(nil, "HIGH", "GameFontHighlightSmall")
|
||||
settings.category[category].text:SetJustifyH("LEFT")
|
||||
settings.category[category].text:SetAllPoints()
|
||||
settings.category[category].text:SetText(category)
|
||||
|
||||
for title, module in ShaguTweaks.spairs(entries) do
|
||||
if not settings.entries[title] then
|
||||
settings.entries[title] = CreateFrame("CheckButton", "AdvancedSettingsGUI" .. title, settings.category[category], "OptionsCheckButtonTemplate")
|
||||
settings.entries[title]:SetHeight(24)
|
||||
settings.entries[title]:SetWidth(24)
|
||||
end
|
||||
|
||||
local button = _G["AdvancedSettingsGUI" .. title]
|
||||
local text = _G["AdvancedSettingsGUI" .. title .. "Text"]
|
||||
|
||||
settings.category[category].buttons = settings.category[category].buttons or {}
|
||||
settings.category[category].buttons[button] = true
|
||||
|
||||
button.title = title
|
||||
button:SetChecked(current_config[title] == 1 and true or nil)
|
||||
button:SetPoint("TOPLEFT", settings.category[category], "TOPLEFT", mod(entry, 2) == 1 and 17 or 17+200, math.ceil(entry/2-1)*-entrysize-spacing/2)
|
||||
|
||||
-- add another row to height
|
||||
if mod(entry, 2) == 1 then height = height + entrysize end
|
||||
|
||||
local title = module.title
|
||||
local description = module.description
|
||||
button:SetScript("OnEnter", function()
|
||||
GameTooltip:SetOwner(this, "ANCHOR_TOPLEFT");
|
||||
GameTooltip:SetText(title, nil, nil, nil, nil, 1)
|
||||
GameTooltip:AddLine(description, 1, 1, 1, 1, 1)
|
||||
GameTooltip:Show()
|
||||
end)
|
||||
|
||||
button:SetScript("OnHide", function()
|
||||
GameTooltip:Hide()
|
||||
end)
|
||||
|
||||
button:SetScript("OnClick", function()
|
||||
if this:GetChecked() then
|
||||
current_config[this.title] = 1
|
||||
else
|
||||
current_config[this.title] = 0
|
||||
end
|
||||
end)
|
||||
text:SetText(title)
|
||||
entry = entry + 1
|
||||
end
|
||||
|
||||
-- render sliders declared by modules in this category
|
||||
local sliderHeight = 36
|
||||
for title, smod in ShaguTweaks.spairs(entries) do
|
||||
if smod.sliders then
|
||||
for sidx, sdef in ipairs(smod.sliders) do
|
||||
local sliderKey = "slider:" .. sdef.key
|
||||
local safeName = "AdvancedSettingsGUISlider" .. string.gsub(sdef.key, "[^%w]", "_")
|
||||
|
||||
if not settings.entries[sliderKey] then
|
||||
settings.entries[sliderKey] = CreateFrame("Slider", safeName, settings.category[category], "OptionsSliderTemplate")
|
||||
end
|
||||
|
||||
local slider = settings.entries[sliderKey]
|
||||
settings.category[category].buttons[slider] = true
|
||||
|
||||
local yOffset = -(height + spacing / 2 + 16 + (sidx - 1) * sliderHeight)
|
||||
slider:SetWidth(max_width - 90)
|
||||
slider:SetPoint("TOPLEFT", settings.category[category], "TOPLEFT", 17, yOffset)
|
||||
slider:SetMinMaxValues(sdef.min, sdef.max)
|
||||
slider:SetValueStep(sdef.step or 1)
|
||||
|
||||
local curVal = (current_config.overwrites and current_config.overwrites[sdef.key])
|
||||
or (ShaguTweaks_config.overwrites and ShaguTweaks_config.overwrites[sdef.key])
|
||||
or sdef.default or sdef.min
|
||||
|
||||
local labelText = sdef.label or sdef.key
|
||||
local titleLabel = _G[safeName .. "Text"]
|
||||
local lowLabel = _G[safeName .. "Low"]
|
||||
local highLabel = _G[safeName .. "High"]
|
||||
if lowLabel then lowLabel:SetText(sdef.min) end
|
||||
if highLabel then highLabel:SetText(sdef.max) end
|
||||
if titleLabel then titleLabel:SetText(labelText .. ": " .. curVal) end
|
||||
|
||||
local key = sdef.key
|
||||
slider:SetScript("OnValueChanged", function()
|
||||
local val = math.floor(this:GetValue() + 0.5)
|
||||
if titleLabel then titleLabel:SetText(labelText .. ": " .. val) end
|
||||
current_config.overwrites = current_config.overwrites or {}
|
||||
current_config.overwrites[key] = val
|
||||
end)
|
||||
slider:SetValue(curVal)
|
||||
|
||||
height = height + sliderHeight
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
collapse(settings.category[category], true)
|
||||
|
||||
height = height + spacing
|
||||
settings.category[category]:SetHeight(height)
|
||||
|
||||
required_height = required_height + height + spacing
|
||||
end
|
||||
|
||||
-- set container size to required height
|
||||
settings.container:SetHeight(required_height)
|
||||
|
||||
if required_height < max_height then
|
||||
-- reduce base frame if possible
|
||||
settings:SetHeight(required_height + 60)
|
||||
settings.container:SetParent(settings)
|
||||
settings.container:ClearAllPoints()
|
||||
settings.container:SetPoint("CENTER", settings, 0, 20)
|
||||
settings.container:SetWidth(max_width - 20)
|
||||
|
||||
settings.scrollframe:Hide()
|
||||
elseif required_height > max_height then
|
||||
-- set up scrollframe when needed
|
||||
settings.container:SetParent(settings.scrollframe)
|
||||
settings.container:SetHeight(settings.scrollframe:GetHeight())
|
||||
settings.container:SetWidth(settings.scrollframe:GetWidth() + 20)
|
||||
|
||||
settings.scrollframe:SetScrollChild(settings.container)
|
||||
settings.scrollframe:Show()
|
||||
end
|
||||
end
|
||||
|
||||
settings.defaults = function()
|
||||
-- read default settings from modules
|
||||
for title, mod in pairs(ShaguTweaks.mods) do
|
||||
current_config[title] = mod.enabled and 1 or 0
|
||||
end
|
||||
|
||||
-- reset slider overwrite values to module defaults
|
||||
current_config.overwrites = {}
|
||||
for title, mod in pairs(ShaguTweaks.mods) do
|
||||
if mod.config then
|
||||
for k, v in pairs(mod.config) do
|
||||
current_config.overwrites[k] = v
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
settings:load()
|
||||
end
|
||||
|
||||
settings:SetScript("OnShow", function()
|
||||
-- read current config to temporary config
|
||||
for k, v in pairs(ShaguTweaks_config) do
|
||||
current_config[k] = v
|
||||
end
|
||||
-- copy overwrites into a separate table so Cancel discards slider changes
|
||||
current_config.overwrites = {}
|
||||
for k, v in pairs(ShaguTweaks_config.overwrites or {}) do
|
||||
current_config.overwrites[k] = v
|
||||
end
|
||||
|
||||
settings:load()
|
||||
end)
|
||||
|
||||
-- Add "Advanced Settings" Button to the Game Menu
|
||||
GameMenuFrame:SetWidth(GameMenuFrame:GetWidth() - 10)
|
||||
GameMenuFrame:SetHeight(GameMenuFrame:GetHeight() + 10)
|
||||
local advanced = CreateFrame("Button", "GameMenuButtonAdvancedOptions", GameMenuFrame, "GameMenuButtonTemplate")
|
||||
advanced:SetPoint("TOP", GameMenuButtonUIOptions, "BOTTOM", 0, -1)
|
||||
advanced:SetText(T["Advanced Options"] .. "|cffffff00*")
|
||||
advanced:SetScript("OnClick", function()
|
||||
HideUIPanel(GameMenuFrame)
|
||||
settings:Show()
|
||||
end)
|
||||
|
||||
GameMenuButtonKeybindings:ClearAllPoints()
|
||||
GameMenuButtonKeybindings:SetPoint("TOP", advanced, "BOTTOM", 0, -1)
|
||||
Reference in New Issue
Block a user