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.

1149 lines
46 KiB

local config, COMPAT, ADDON, T = {}, select(4,GetBuildInfo()), ...
local MODERN, CF_WRATH, CI_ERA = COMPAT >= 10e4, COMPAT < 10e4 and COMPAT >= 3e4, COMPAT < 2e4
local L, EV, TS, XU, PC, frame = T.L, T.Evie, T.TenSettings, T.exUI, T.OPieCore, nil
local GameTooltip = T.NotGameTooltip or GameTooltip
T.config = config
do -- /opie
local slashExtensions = {}
local function addSuffix(func, word, ...)
if word then
slashExtensions[word:lower()] = func
addSuffix(func, ...)
end
end
addSuffix(function()
local sx, m, ok, m2 = ""
if not PC then
m = "Restart World of Warcraft. If this message continues to appear, delete and re-install OPie."
ok, m2 = pcall(L, m)
sx = "\n |cffe82020" .. (ok and m2 or m)
end
print("|cff0080ffOPie|r |cffffffff" .. (C_AddOns.GetAddOnMetadata(ADDON, "Version") or "??") .. "|r" .. sx)
end, "version", "v")
T.AddSlashSuffix = addSuffix
SLASH_OPIE1, SLASH_OPIE2 = "/opie", "/op"
SlashCmdList["OPIE"] = function(args, ...)
local ext = slashExtensions[(args:match("%S+") or ""):lower()]
if ext then
ext(args, ...)
else
frame:OpenPanel()
end
end
end
if TS and TS.Localize then
TS:Localize({
REVERT=L"Revert...",
REVERT_OPTION_LABEL=L"%d |4minute:minutes; ago (%s)",
RESET_QUESTION=L"Do you want to reset all %s settings to their defaults, or only the settings in the %s category?",
REVERT_CANCEL_HINT=L"You can cancel or revert to previous settings later.",
DEFAULTS_ALL=L("All Settings", ALL_SETTINGS),
DEFAULTS_VISIBLE=L("These Settings", CURRENT_SETTINGS),
})
end
local KR = T.ActionBook:compatible("Kindred",1,0)
do -- config.ui
config.ui = {}
function config.ui.HideTooltip(self)
if GameTooltip:IsOwned(self) then
GameTooltip:Hide()
end
end
function config.ui.ShowControlTooltip(self)
local title, text = self.tooltipTitle, self.tooltipText
if not (title or text) then return end
GameTooltip:SetOwner(self, self.tooltipOwnerPoint or "ANCHOR_BOTTOMRIGHT")
GameTooltip:AddLine(title or "", nil, nil, nil)
GameTooltip:AddLine(text or "", nil, nil, nil, true)
GameTooltip:Show()
end
end
do -- config.bind
local activeCaptureButton
local alternateFrame = CreateFrame("Frame", nil, UIParent) do
alternateFrame:Hide()
XU:Create("Backdrop", alternateFrame, { bgFile="Interface/ChatFrame/ChatFrameBackground", edgeFile="Interface/DialogFrame/UI-DialogBox-Border", tile=true, tileSize=32, edgeSize=32, insets={left=11, right=11, top=11, bottom=10}, bgColor=0xd8000000})
alternateFrame:SetSize(380, 115)
alternateFrame:EnableMouse(1)
alternateFrame:SetScript("OnHide", alternateFrame.Hide)
local extReminder = CreateFrame("Button", nil, alternateFrame)
extReminder:SetHeight(16) extReminder:SetPoint("TOPLEFT", 12, -10) extReminder:SetPoint("TOPRIGHT", -12, -10)
extReminder:SetNormalTexture("Interface/Buttons/UI-OptionsButton")
extReminder:SetPushedTextOffset(0,0)
extReminder:SetText(" ") extReminder:SetNormalFontObject(GameFontHighlightSmall) do
local fs, tex = extReminder:GetFontString(), extReminder:GetNormalTexture()
fs:ClearAllPoints() tex:ClearAllPoints()
fs:SetPoint("LEFT", 18, -1) tex:SetSize(14,14) tex:SetPoint("LEFT")
end
alternateFrame.caption = extReminder
extReminder:SetScript("OnEnter", function(self)
GameTooltip:SetOwner(self, "ANCHOR_NONE")
GameTooltip:SetPoint("TOP", self, "BOTTOM")
GameTooltip:AddLine(L"Conditional Bindings", NORMAL_FONT_COLOR.r, NORMAL_FONT_COLOR.g, NORMAL_FONT_COLOR.b)
GameTooltip:AddLine(L"The binding will update to reflect the value of this macro conditional.", HIGHLIGHT_FONT_COLOR.r, HIGHLIGHT_FONT_COLOR.g, HIGHLIGHT_FONT_COLOR.b, 1)
GameTooltip:AddLine((L"You may use extended macro conditionals; see %s for details."):format("|cff33DDFFhttps://townlong-yak.com/addons/opie/extended-conditionals|r"), HIGHLIGHT_FONT_COLOR.r, HIGHLIGHT_FONT_COLOR.g, HIGHLIGHT_FONT_COLOR.b, 1)
GameTooltip:AddLine((L"Example: %s."):format(GREEN_FONT_COLOR_CODE .. "[combat] ALT-C; [nomounted] CTRL-F|r"), NORMAL_FONT_COLOR.r, NORMAL_FONT_COLOR.g, NORMAL_FONT_COLOR.b)
GameTooltip:Show()
end)
extReminder:SetScript("OnLeave", config.ui.HideTooltip)
extReminder:SetScript("OnHide", extReminder:GetScript("OnLeave"))
local textarea = XU:Create("TextArea", "OPC_AlternateBindInput", alternateFrame)
textarea:SetPoint("TOPLEFT", 12, -28)
textarea:SetPoint("BOTTOMRIGHT", -10, 10)
alternateFrame.input = textarea
textarea:SetMaxBytes(1023)
textarea:SetScript("OnEscapePressed", function() alternateFrame:Hide() end)
textarea:SetScript("OnChar", function(self, c)
if c == "\n" then
local bind = strtrim((self:GetText():gsub("[\r\n]", "")))
if bind ~= "" then
alternateFrame.apiFrame.SetBinding(alternateFrame.owner, bind)
end
alternateFrame:Hide()
end
end)
end
local captureFrame = CreateFrame("Button") do
captureFrame:Hide()
captureFrame:RegisterForClicks("AnyUp")
captureFrame:SetScript("OnClick", function(_, ...)
if activeCaptureButton then
activeCaptureButton:Click(...)
end
end)
end
local function MapMouseButton(button)
if button == "MiddleButton" then
return "BUTTON3"
elseif type(button) == "string" and (tonumber(button:match("^Button(%d+)")) or 1) > 3 then
return button:upper()
end
end
local function Deactivate(self)
self:UnlockHighlight()
self:EnableKeyboard(false)
self:EnableMouseWheel(false)
self:EnableGamePadButton(false)
self:SetScript("OnKeyDown", nil)
self:SetScript("OnGamePadButtonDown", nil)
self:SetScript("OnHide", nil)
captureFrame:Hide()
activeCaptureButton = activeCaptureButton ~= self and activeCaptureButton or nil
return self
end
local unbindableKeys = {
UNKNOWN=1, ESCAPE=1, ALT=1, SHIFT=1, META=1,
LALT=1, LCTRL=1, LSHIFT=1, LMETA=1,
RALT=1, RCTRL=1, RSHIFT=1, RMETA=1,
PADRSTICKUP=1, PADRSTICKDOWN=1, PADRSTICKLEFT=1, PADRSTICKRIGHT=1,
PADLSTICKUP=1, PADLSTICKDOWN=1, PADLSTICKLEFT=1, PADLSTICKRIGHT=1,
}
local function SetBind(self, bind)
if bind == "ESCAPE" then
return Deactivate(self)
elseif unbindableKeys[bind] then
return
elseif bind and bind:match("PAD") and (
bind == GetCVar("GamePadEmulateAlt") or
bind == GetCVar("GamePadEmulateCtrl") or
bind == GetCVar("GamePadEmulateShift")
) then
return
end
Deactivate(self)
local bind, p = bind and ((IsAltKeyDown() and "ALT-" or "") .. (IsControlKeyDown() and "CTRL-" or "") .. (IsShiftKeyDown() and "SHIFT-" or "") .. (IsMetaKeyDown() and "META-" or "") .. bind), self:GetParent()
if p and type(p.SetBinding) == "function" then
p.SetBinding(self, bind)
end
end
local function OnClick(self, button)
local parent = self:GetParent()
PlaySound(SOUNDKIT.U_CHAT_SCROLL_BUTTON)
if activeCaptureButton then
local deactivated, mappedButton = Deactivate(activeCaptureButton), MapMouseButton(button)
if deactivated == self and (mappedButton or button == "RightButton") then
SetBind(self, mappedButton)
end
if deactivated == self then return end
elseif parent and parent.OnBindingAltClick and IsAltKeyDown() then
config.ui.HideTooltip(self)
return parent.OnBindingAltClick(self, button)
elseif parent and parent.OnBindingShiftClick and IsShiftKeyDown() then
config.ui.HideTooltip(self)
return parent.OnBindingShiftClick(self, button)
elseif button == "RightButton" then
PlaySound(SOUNDKIT.U_CHAT_SCROLL_BUTTON)
if parent and type(parent.SetBinding) == "function" then
SetBind(self, false)
end
return
end
activeCaptureButton = self
self:LockHighlight()
self:EnableKeyboard(true)
self:EnableGamePadButton(true)
self:EnableMouseWheel(true)
self:SetScript("OnKeyDown", SetBind)
self:SetScript("OnGamePadButtonDown", SetBind)
self:SetScript("OnHide", Deactivate)
config.ui.HideTooltip(self)
if parent then
captureFrame:SetParent(parent.bindingContainerFrame or parent)
captureFrame:SetAllPoints()
captureFrame:Show()
captureFrame:SetFrameLevel(self:GetFrameLevel()-1)
end
end
local function OnWheel(self, delta)
local aw = self:GetParent().AllowWheelBinding
if activeCaptureButton == self and aw and (type(aw) ~= "function" or aw(self)) then
SetBind(self, delta > 0 and "MOUSEWHEELUP" or "MOUSEWHEELDOWN")
end
end
local function IsCapturingBinding(self)
return activeCaptureButton == self
end
local function Binding_OnEnter(self)
local hc, header = HIGHLIGHT_FONT_COLOR, self.bindingName
if not header or IsCapturingBinding(self) or alternateFrame:IsVisible() then
return
end
local parent = self:GetParent()
GameTooltip:SetOwner(self, self.tooltipOwnerPoint or "ANCHOR_BOTTOMRIGHT")
GameTooltip:AddLine(header)
if parent.OnBindingAltClick then
GameTooltip:AddLine(L"Alt click to set conditional binding", hc.r, hc.g, hc.b)
end
if parent.OnBindingShiftClick then
GameTooltip:AddLine(L"Shift click to view ring macro command", hc.r, hc.g, hc.b)
end
if self.hasSetBinding then
GameTooltip:AddLine(L"Right click to unbind", hc.r, hc.g, hc.b)
end
local title, text = self.tooltipTitle, self.tooltipText
if title and text then
GameTooltip:AddLine(" ")
GameTooltip:AddLine(title)
GameTooltip:AddLine(text, hc.r, hc.g, hc.b, true)
end
GameTooltip:Show()
end
local specialSymbolMap = {OPEN="[", CLOSE="]", SEMICOLON=";"}
local function SetBindingText(self, bind, pre, post, hasBinding)
if type(bind) == "string" and bind:match("%[.*%]") then
bind, post, hasBinding = KR:EvaluateCmdOptions(bind), post or " |cff20ff20[+]|r", true
end
local pre2
pre2, bind = (bind or ""):match('^%s*(!*)%s*(%S.*)$')
bind = bind and KR:UnescapeCmdOptionsValue(bind):gsub("[^%-]+$", specialSymbolMap)
local bindText = bind and bind ~= "" and GetBindingText(bind)
if CI_ERA and bindText and bind:match("PAD") then
for ai in bindText:gmatch("|A:([^:]+)") do
if not C_Texture.GetAtlasInfo(ai) then -- BUG[1.14.4/2310]
bindText = bind
break
end
end
end
self.hasSetBinding = not not (hasBinding or bindText)
return self:SetText((pre or "") .. (pre2 or "") .. (bindText or L"Not bound") .. (post or ""))
end
local function ToggleAlternateEditor(self, bind)
if alternateFrame:IsShown() and alternateFrame.owner == self then
alternateFrame:Hide()
else
alternateFrame.apiFrame, alternateFrame.owner = self:GetParent(), self
alternateFrame.caption:SetFormattedText(L"Press %s to save.", NORMAL_FONT_COLOR_CODE .. GetBindingText("ENTER") .. "|r")
alternateFrame.input:SetText(bind or "")
alternateFrame:SetParent(self)
alternateFrame:SetFrameLevel(self:GetFrameLevel()+10)
alternateFrame:ClearAllPoints()
local yOfs, clipParent = 4, self:GetParent()
clipParent = clipParent.clipContainer or clipParent.bindingContainerFrame or clipParent
alternateFrame:SetPoint("TOP", self, "BOTTOM", 0, yOfs)
if alternateFrame:GetBottom() < clipParent:GetBottom() then
yOfs = -yOfs
alternateFrame:ClearAllPoints()
alternateFrame:SetPoint("BOTTOM", self, "TOP", 0, yOfs)
end
local point, relpoint, xOfs
if alternateFrame:GetLeft() < clipParent:GetLeft() then
point, relpoint, xOfs = "TOPLEFT", "BOTTOMLEFT", -8
elseif alternateFrame:GetRight() > clipParent:GetRight() then
point, relpoint, xOfs = "TOPRIGHT", "BOTTOMRIGHT", 8
end
if point then
if yOfs < 0 then
point, relpoint = relpoint, point
end
alternateFrame:ClearAllPoints()
alternateFrame:SetPoint(point, self, relpoint, xOfs, yOfs)
end
alternateFrame:Show()
alternateFrame.input:SetFocus()
end
end
function config.createBindingButton(parent, w)
local btn = CreateFrame("Button", nil, parent, "UIPanelButtonTemplate")
btn:SetSize(w or 120, 22)
btn:RegisterForClicks("AnyUp")
btn:SetScript("OnClick", OnClick)
btn:SetScript("OnMouseWheel", OnWheel)
btn:EnableMouseWheel(false)
btn:SetText(" ")
btn:SetNormalFontObject(GameFontNormalSmall)
btn:SetHighlightFontObject(GameFontHighlightSmall)
btn:SetScript("OnEnter", Binding_OnEnter)
btn:SetScript("OnLeave", config.ui.HideTooltip)
local fs = btn:GetFontString()
fs:SetMaxLines(1)
fs:ClearAllPoints()
fs:SetPoint("LEFT", 5, 0)
fs:SetPoint("RIGHT", 5, 0)
fs:SetJustifyH("CENTER")
btn.IsCapturingBinding, btn.SetBindingText, btn.ToggleAlternateEditor =
IsCapturingBinding, SetBindingText, ToggleAlternateEditor
return btn
end
end
do -- config.pulseDropdown
local function cloneTex(tex)
local l, sl = tex:GetDrawLayer()
local r = tex:GetParent():CreateTexture(nil, l, nil, sl+1)
r:SetAllPoints(tex)
r:SetTexture(tex:GetTexture())
r:SetTexCoord(tex:GetTexCoord())
r:SetVertexColor(0, 0.5, 0.75)
r:SetBlendMode("ADD")
return r
end
function config.pulseDropdown(drop)
if not drop.LeftA then
drop.LeftA, drop.MiddleA, drop.RightA = cloneTex(drop.Left), cloneTex(drop.Middle), cloneTex(drop.Right)
end
local endTime = GetTime()+2
local function pulse()
if drop.pulseFunc ~= pulse then
return
end
local t = GetTime()
if t >= endTime or not drop:IsVisible() then
drop.MiddleA:SetAlpha(0)
drop.LeftA:SetAlpha(0)
drop.RightA:SetAlpha(0)
drop.pulseFunc = nil
return
end
local p = 1-(endTime-t)/2
local s = 0.5+sin(p*360*3-90)/2
drop.LeftA:SetAlpha(s)
drop.MiddleA:SetAlpha(s)
drop.RightA:SetAlpha(s)
EV.After(0, pulse)
end
drop.pulseFunc = pulse
pulse()
end
end
config.undo = TS:CreateUndoHandle()
local function CallSwitchProfile(msg, ...)
if msg == "archive-unwind" then
config.undo:saveActiveProfile()
end
return PC:SwitchProfile(...)
end
local function CallSetSpecProfiles(msg, ...)
if msg == "archive-unwind" then
config.undo:saveSpecProfiles()
end
return PC:SetSpecProfiles(...)
end
local function CallDeleteProfile(msg, ...)
if msg == "archive-unwind" then
config.undo:saveSpecProfiles()
end
return PC:DeleteProfile(...)
end
function config.undo:saveSpecProfiles()
if not self:search("profile-specs-init") then
self:sink("profile-specs-init", CallSetSpecProfiles, PC:GetSpecProfiles())
end
end
function config.undo:saveActiveProfile()
self:saveSpecProfiles()
local name = PC:GetCurrentProfile()
if not self:search("OPieProfile#" .. name) then
self:push("OPieProfile#" .. name, CallSwitchProfile, name, (PC:ExportProfile(name)))
end
end
function config.checkSVState(frame)
if not PC:GetSVState() then
TS:ShowAlertOverlay(frame, L"Changes will not be saved", L"World of Warcraft could not load OPie's saved variables due to a lack of memory. Try disabling other addons.\n\nAny changes you make now will not be saved.", L"Understood; edit anyway")
end
end
local REQ_POINTER, DISABLED_TEXT = {1, 1}, "|cffa0a0a0" .. L"Disabled"
local OPC_Options = {
{ "section", caption=L"Interaction" },
{"radio", "InteractionMode", {L"Quick", L"Relaxed", L"Mouse-less"}},
{"twof", tag="OnPrimaryPress", caption=L"On ring binding press:", menuOption="RingAtMouse"},
{"twof", tag="OnPrimaryRelease", caption=L"On ring binding release:", menuOption="QuickActionOnRelease", depOn="InteractionMode", depValue=2},
{"twof", tag="OnLeft", caption=L"On left click:", menuOption="NoClose", depOn="InteractionMode", depValue=2, otherwise=DISABLED_TEXT},
{"twof", tag="OnRight", caption=L"On right click:"},
{"twof", "QuickAction", caption=L"Quick action repeat trigger:", depOn="InteractionMode", depValueSet=REQ_POINTER, otherwise=DISABLED_TEXT},
{"twof", "PadSupportMode", caption=L"Controller directional input:", reqFeature="GamePad", depOn="InteractionMode", depValueSet=REQ_POINTER, otherwise=DISABLED_TEXT, menu={"freelook", "freelook1", "cursor", "none", freelook=L"Camera analog stick", freelook1=L"Movement analog stick", cursor=L"Virtual mouse cursor", none=L"None"}},
{"twof", "SliceBinding", caption="Per-slice bindings:", depOn="InteractionMode"},
{"bool", "ClickPriority", caption=L"Prevent other UI interactions", captionTop=L"While a ring is open:", depOn="InteractionMode", depValueSet=REQ_POINTER, otherwise=false},
{ "section", caption=L"Behavior" },
{"bool", "UseDefaultBindings", caption=L"Use default ring bindings"},
{"bool", "HideStanceBar", caption=L"Hide stance bar", globalOnly=true},
{"range", "RingScale", 0.1, 2, caption=L"Ring scale", valueFormat="%0.1f"},
{ "section", tag="_Appearance", caption=L"Appearance" },
{"bool", "GhostMIRings", caption=L"Nested rings"},
{"bool", "ShowKeys", caption=L"Per-slice bindings", depOn="SliceBinding", depValue=true, otherwise=false},
{"bool", "ShowCooldowns", caption=L"Show cooldown numbers", depIndicatorFeature="CooldownNumbers"},
{"bool", "ShowRecharge", caption=L"Show recharge numbers", depIndicatorFeature="CooldownNumbers"},
{"bool", "ShowShortLabels", caption=L"Show slice labels", depIndicatorFeature="ShortLabels"},
{"bool", "UseGameTooltip", caption=L"Show tooltips"},
{ "section", caption=L"Animation"},
{"bool", "XTAnimation", caption=L"Animate transitions"},
{"bool", "MISpinOnHide", caption=L"Outward spiral on hide", depOn="XTAnimation", depValue=true, otherwise=false},
{"bool", "XTPointerSnap", caption=L"Snap pointer to mouse cursor"},
{"bool", "MIScale", caption=L"Enlarge selected slice"},
}
frame = TS:CreateOptionsPanel("OPie", nil, {forceRootVersion=true})
frame.version:SetFormattedText("%s", PC:GetVersion() or "")
frame.desc:SetText(L"Customize OPie's appearance and behavior. Right clicking a checkbox restores it to its default state."
.. (MODERN and "\n" .. L"Profiles activate automatically when you switch character specializations." or ""))
local OPC_Profile = CreateFrame("Frame", "OPC_Profile", frame, "UIDropDownMenuTemplate")
OPC_Profile:SetPoint("TOPLEFT", frame, 0, -80)
UIDropDownMenu_SetWidth(OPC_Profile, 200)
local OPC_OptionDomain = CreateFrame("Frame", "OPC_OptionDomain", frame, "UIDropDownMenuTemplate")
OPC_OptionDomain:SetPoint("LEFT", OPC_Profile, "RIGHT", 44, 0)
UIDropDownMenu_SetWidth(OPC_OptionDomain, 250)
local OPC_AlterOption, OPC_AlterOptionW, OPC_BlockInput
local OPC_UpdateControlReqs, OPC_UpdateViewport, OPC_IsViewDirty, OR_CurrentOptionsDomain
local widgetControl, optionControl = {}, {} do -- Widget construction
local controlViewport = CreateFrame("Frame", nil, frame)
controlViewport:SetPoint("TOPLEFT", 0, -115)
controlViewport:SetPoint("BOTTOMRIGHT", -30, 8)
controlViewport:SetClipsChildren(true)
local optionsScrollBar = XU:Create("ScrollBar", nil, frame)
optionsScrollBar:SetPoint("TOPLEFT", controlViewport, "TOPRIGHT", 2, 8)
optionsScrollBar:SetPoint("BOTTOMLEFT", controlViewport, "BOTTOMRIGHT", 2, -8)
optionsScrollBar:SetWheelScrollTarget(controlViewport, 0, -2, -8, -8)
optionsScrollBar:SetCoverTarget(controlViewport)
optionsScrollBar:SetValueStep(30)
local controlContainer = CreateFrame("Frame", nil, controlViewport)
optionsScrollBar:SetScript("OnValueChanged", function(_, nv)
controlContainer:SetPoint("TOPLEFT", 0, nv)
end)
local sharedDrop = CreateFrame("Frame", "OPC_SharedDropDown", frame, "UIDropDownMenuTemplate")
sharedDrop:Hide()
local function onCheckboxClick(self, btn)
local v = nil
if btn ~= "RightButton" then
v = not not self:GetChecked()
end
return OPC_AlterOptionW(self, v)
end
local function onValueChanged(self, nv)
return OPC_AlterOptionW(self, nv)
end
local function onEnabledChange(self)
local a = self:IsEnabled() and 1 or 0.6
widgetControl[self].text:SetVertexColor(a,a,a)
end
local function onDropDownSelect(_, nv, drop)
return OPC_AlterOptionW(drop, nv)
end
local function twofMenuInitializer(self)
local c = widgetControl[self.owner]
local menu, info, cv = c.menu, {func=onDropDownSelect, arg2=self.owner, minWidth=240}, c.cv
for i=1, #menu do
local ak = menu[i]
info.text, info.arg1, info.checked = menu[ak], ak, ak == cv
UIDropDownMenu_AddButton(info)
end
end
local function onTwofClick(self, _button)
local c = widgetControl[self]
local menuInit = c.menuInitializer or c.menu and twofMenuInitializer
if menuInit then
sharedDrop.initialize, sharedDrop.owner = menuInit, self
ToggleDropDownMenu(1, nil, sharedDrop, self, -6, 6)
end
end
local function onTwofRefresh(c, v)
if c.menu and c.menu[v] then
c.cv = v
c.text:SetText(not c.widget:IsEnabled() and c.otherwise or c.menu[v])
end
end
local function onTwofTextSet(fs)
local p = fs:GetParent()
local ws = math.max(fs:GetStringWidth()+5, widgetControl[p].label:GetStringWidth()-20, 50)
p:SetHitRectInsets(2, -ws, 2, 2)
end
local function handlesLeftClicks(self, button, _ev)
return self:IsEnabled() and button == "LeftButton" and UIDROPDOWNMENU_OPEN_MENU == sharedDrop and sharedDrop.owner == self
end
local boolSetEnabledHook, twofTextSetTextHook
local build = {}
function build.bool(v, ofsY, halfpoint, rowHeight, rframe)
local b, exY = TS:CreateOptionsCheckButton(nil, controlContainer), 0
b:RegisterForClicks("LeftButtonUp", "RightButtonUp")
b:SetScript("OnEnter", config.ui.ShowControlTooltip)
b:SetScript("OnLeave", config.ui.HideTooltip)
b:SetMotionScriptsWhileDisabled(true)
if v.captionTop then
local fs = b:CreateFontString(nil, "OVERLAY", "GameFontNormal")
fs:SetText(v.captionTop)
fs:SetPoint("BOTTOMLEFT", b, "TOPLEFT", 3.5, -0.75)
exY, v.textTop = 16, fs
end
b.Text:SetPoint("LEFT", b, "RIGHT", 2, 0)
v.text = b.Text
b:SetPoint("TOPLEFT", rframe, "TOPLEFT", halfpoint and 315 or 15, ofsY+2-exY)
b:SetScript("OnClick", onCheckboxClick)
if boolSetEnabledHook == nil then
hooksecurefunc(b, "SetEnabled", onEnabledChange)
boolSetEnabledHook = b.SetEnabled
end
b.SetEnabled = boolSetEnabledHook
return b, ofsY - (halfpoint and math.max(rowHeight, 20+exY) or 0), not halfpoint, halfpoint and 0 or (20 + exY)
end
function build.range(v, ofsY, halfpoint, rowHeight, rframe)
if halfpoint then
ofsY = ofsY - rowHeight
end
local s, leftMargin, centerLine = TS:CreateOptionsSlider(controlContainer, nil, 242)
s:SetPoint("TOPLEFT", rframe, "TOPLEFT", 319-leftMargin, ofsY-3)
s.text:SetPoint("LEFT", rframe, "TOPLEFT", 42, ofsY-3-centerLine)
s.text:SetJustifyH("LEFT")
s.text:Show()
s:SetValueStep(v[5] or 0.1)
s:SetMinMaxValues(v[3] < v[4] and v[3] or -v[3], v[4] > v[3] and v[4] or -v[4])
s:SetObeyStepOnDrag(true)
s:SetScript("OnValueChanged", onValueChanged)
s.lo:SetFormattedText(v.valueFormat or "%s", v[3])
s.hi:SetFormattedText(v.valueFormat or "%s", v[4])
v.text = s.text
return s, ofsY - 20, false, 0
end
function build.radio(v, ofsY, halfpoint, rowHeight, rframe)
local radio, opts = XU:Create("OPie:RadioSet", nil, controlContainer), v[3]
radio:SetPoint("TOPLEFT", rframe, "TOPLEFT", 18, halfpoint and ofsY - rowHeight or ofsY)
for i=1,#opts do
radio:SetOptionText(i, opts[i])
end
radio:Reflow(400)
radio:SetScript("OnValueChanged", onValueChanged)
return radio, ofsY-34, false, 0
end
function build.section(v, ofsY, halfpoint, rowHeight, rframe)
local fs = controlContainer:CreateFontString(nil, "OVERLAY", "GameFontNormalLarge")
ofsY = (halfpoint or ofsY ~= 0 or rframe ~= controlContainer) and ofsY-10-rowHeight or ofsY
fs:SetPoint("TOPLEFT", rframe, "TOPLEFT", 16, ofsY)
fs:SetText(v.caption)
return fs, ofsY-20, false, 0
end
function build.twof(v, ofsY, halfpoint, rowHeight, rframe)
local tb = CreateFrame("Button", nil, controlContainer)
tb:SetSize(24,24)
tb:SetNormalTexture([[Interface\ChatFrame\UI-ChatIcon-ScrollDown-Up]])
tb:SetPushedTexture([[Interface\ChatFrame\UI-ChatIcon-ScrollDown-Down]])
tb:SetDisabledTexture([[Interface\ChatFrame\UI-ChatIcon-ScrollDown-Disabled]])
tb:SetHighlightTexture([[Interface\Buttons\UI-Common-MouseHilight]])
tb:GetHighlightTexture():SetBlendMode("ADD")
tb:SetPoint("TOPLEFT", rframe, "TOPLEFT", halfpoint and 316 or 16, ofsY-13.5)
tb:SetScript("OnClick", onTwofClick)
local label = tb:CreateFontString(nil, "OVERLAY", "GameFontNormal")
label:SetPoint("BOTTOMLEFT", tb, "TOPLEFT", 2.5, -1.5)
label:SetText(v.caption)
label:SetJustifyH("LEFT")
local text = tb:CreateFontString(nil, "OVERLAY", "GameFontHighlight")
text:SetPoint("TOPLEFT", label, "BOTTOMLEFT", 23, -5)
text:SetWidth(240)
text:SetJustifyH("LEFT")
text:SetWordWrap(false)
if not twofTextSetTextHook then
hooksecurefunc(text, "SetText", onTwofTextSet)
twofTextSetTextHook = text.SetText
end
v.label, v.text, v.refresh, text.SetText = label, text, onTwofRefresh, twofTextSetTextHook
tb.HandlesGlobalMouseEvent = handlesLeftClicks
return tb, halfpoint and ofsY - math.max(rowHeight, 38) or ofsY, not halfpoint, halfpoint and 0 or 38
end
controlContainer:SetPoint("TOPLEFT")
controlContainer:SetSize(600, 10)
local cY, halfpoint, rframe, rowHeight, wj = 0, false, controlContainer
for _, vj in ipairs(OPC_Options) do
wj, cY, halfpoint, rowHeight = build[vj[1]](vj, cY, halfpoint, rowHeight, rframe)
widgetControl[wj], optionControl[vj[2] or 0], optionControl[vj.tag or 0] = vj, vj, vj
vj.widget = wj
end
optionControl[0] = nil
local beam = CreateFrame("Frame", nil, controlContainer)
beam:SetPoint("TOPLEFT")
beam:SetPoint("BOTTOMRIGHT", wj, 0, -1)
function OPC_UpdateViewport()
local ch, vh = beam:GetHeight(), controlViewport:GetHeight()
if not (vh and ch and vh > 0 and ch > 0) then return end
optionsScrollBar:SetShown(vh < ch)
optionsScrollBar:SetMinMaxValues(0, ch - vh)
optionsScrollBar:SetWindowRange(vh)
optionsScrollBar:SetStepsPerPage(math.max(vh/4/30, 50))
OPC_IsViewDirty = false
end
beam:SetScript("OnSizeChanged", OPC_UpdateViewport)
beam:SetScript("OnShow", OPC_UpdateViewport)
end
do -- customized widgets
local offsetPanel, offsetControl = CreateFrame("Frame", nil, frame, "UIDropDownCustomMenuEntryTemplate"), {"panel", "IndicationOffset"} do
offsetPanel:Hide()
offsetPanel:SetSize(0, 78)
local function onOffsetValueChanged(self, nv)
return OPC_AlterOption(offsetControl, self:GetID() == 1 and "IndicationOffsetX" or "IndicationOffsetY", nv)
end
for i=1, 2 do
local s, leftMargin, _centerLine = TS:CreateOptionsSlider(offsetPanel, nil, 0)
s:SetID(i)
s:SetPoint("TOPLEFT", -leftMargin, 27-42*i)
s:SetPoint("TOPRIGHT", -5, 27-42*i)
s.text:SetFontObject(GameFontHighlightSmall)
s.text:SetJustifyH("LEFT")
s.text:SetPoint("BOTTOMLEFT", s, "TOPLEFT", leftMargin, 3)
s.text:SetText(i == 1 and L"Move rings right" or L"Move rings down")
s.text:Show()
s:SetValueStep(50)
s:SetMinMaxValues(-500, 500)
s:SetObeyStepOnDrag(true)
s:SetScript("OnValueChanged", onOffsetValueChanged)
s.lo:SetText("")
s.hi:SetText("")
offsetControl[2+i], offsetControl[4+i] = s, s.text
end
function offsetPanel:OnSetOwningButton()
getmetatable(self).__index.ClearAllPoints(self)
self:SetPoint("TOPRIGHT", self.owningButton)
end
function offsetPanel:ClearAllPoints()
-- called by UIDropDownMenu_CheckAddCustomFrame after OnSetOwningButton runs; keep our TOPRIGHT to size panel with button/dropdown
end
function offsetControl:refresh()
local ox = PC:GetOption("IndicationOffsetX", OR_CurrentOptionsDomain)
local oy = PC:GetOption("IndicationOffsetY", OR_CurrentOptionsDomain)
OPC_BlockInput = OPC_BlockInput or "IndicationOffset"
self[3]:SetValue(ox)
self[4]:SetValue(oy)
OPC_BlockInput = OPC_BlockInput ~= "IndicationOffset" and OPC_BlockInput or nil
self[5]:SetFormattedText("%s |cffffd500(%+d)|r", L"Move rings right", ox)
self[6]:SetFormattedText("%s |cffffd500(%+d)|r", L"Move rings down", oy)
end
if UIDropDownMenu_StopCounting then
local waitForLeave
local function waitForEnter(self)
if self:IsMouseOver() then
UIDropDownMenu_StopCounting(self:GetOwningDropdown())
self:SetScript("OnUpdate", waitForLeave)
end
end
function waitForLeave(self)
if not self:IsMouseOver() then
if DropDownList1:IsMouseOver() then
-- it's Someone Else's Problem now
self:SetScript("OnUpdate", nil)
else
UIDropDownMenu_StartCounting(self:GetOwningDropdown())
self:SetScript("OnUpdate", waitForEnter)
end
end
end
offsetPanel:SetScript("OnLeave", function(self) self:SetScript("OnUpdate", waitForLeave) end)
offsetPanel:SetScript("OnHide", function(self) self:SetScript("OnUpdate", nil) end)
offsetPanel:SetScript("OnEnter", function(self)
UIDropDownMenu_StopCounting(self:GetOwningDropdown())
self:SetScript("OnUpdate", nil)
end)
end
offsetControl.widget, optionControl[offsetControl[2]], widgetControl[offsetPanel] = offsetPanel, offsetControl, offsetControl
end
local function onMenuOptionToggle(_, option, owner, checked)
-- checked comes pre-toggled iff keepShownOnClick
OPC_AlterOption(widgetControl[owner], option, (not checked) == (not DropDownList1:IsShown()))
end
local function onMenuOptionSetClick(_, pref, owner)
local c = widgetControl[owner]
OPC_AlterOption(c, c.menuOption, pref)
end
function optionControl.InteractionMode:refresh(newval)
local widget = self.widget
widget:SetValue(newval)
local doNothingText = "|cffa0a0a0" .. L"Do nothing"
optionControl.OnRight.widget:Disable()
optionControl.OnRight.text:SetText(newval ~= 3 and L"Close ring" or doNothingText)
optionControl.OnPrimaryRelease.otherwise = newval == 1 and L"Use slice and close ring" or doNothingText
optionControl.ClickPriority.widget:SetShown(newval ~= 3)
optionControl.SliceBinding.forced = newval == 3
OPC_IsViewDirty = true
end
local function onPrimaryPressReopenClick(_, pref, owner)
pref = pref == "Refresh" and 0 or pref == "Rehome" and 1 or pref == "Close" and 2 or nil
if pref then
OPC_AlterOption(widgetControl[owner], "ReOpenAction", pref)
end
end
function optionControl.OnPrimaryPress.menuInitializer()
local c = optionControl.OnPrimaryPress
local info = {func=onMenuOptionSetClick, arg2=c.widget, minWidth=240}
local atMouse = PC:GetOption("RingAtMouse", OR_CurrentOptionsDomain)
local reOpen = PC:GetOption("ReOpenAction", OR_CurrentOptionsDomain)
info.text, info.arg1, info.checked = L"Open ring at screen center", false, not atMouse
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Open ring at mouse", true, atMouse
UIDropDownMenu_AddButton(info)
UIDropDownMenu_AddSeparator()
info.text, info.isTitle, info.func, info.checked = L"If the ring is already open:", true, onPrimaryPressReopenClick
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked, info.isTitle, info.disabled = L"Reopen ring", "Refresh", reOpen == 0, nil
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Close ring", "Close", reOpen == 2
UIDropDownMenu_AddButton(info)
UIDropDownMenu_AddSeparator()
info.customFrame, info.func, info.text, info.arg1 = offsetPanel
UIDropDownMenu_AddButton(info)
offsetControl:refresh()
end
function optionControl.OnPrimaryPress:refresh()
local atMouse = PC:GetOption("RingAtMouse", OR_CurrentOptionsDomain)
self.text:SetText(atMouse and L"Open ring at mouse" or L"Open ring at screen center")
end
local function currentDomainHasQA()
return PC:GetOption("CenterAction", OR_CurrentOptionsDomain) or PC:GetOption("MotionAction", OR_CurrentOptionsDomain)
end
function optionControl.OnPrimaryRelease:refresh()
self.text:SetText(not self.widget:IsEnabled() and self.otherwise
or PC:GetOption("QuickActionOnRelease", OR_CurrentOptionsDomain) and currentDomainHasQA() and L"Close after quick action"
or L"Do nothing")
end
function optionControl.OnPrimaryRelease.menuInitializer()
local c = optionControl.OnPrimaryRelease
local info = {func=onMenuOptionSetClick, arg2=c.widget, minWidth=240, tooltipWhileDisabled=true, tooltipOnButton=true}
local qaOnRelease = PC:GetOption("QuickActionOnRelease", OR_CurrentOptionsDomain)
local hasQA = currentDomainHasQA()
info.text, info.arg1, info.checked = L"Close after quick action", true, hasQA and qaOnRelease
if not hasQA then
local opt = "|cffffffff" .. (L"Quick action repeat trigger:"):gsub("%s*:%s*$", "") .. "|r"
info.disabled, info.tooltipTitle, info.tooltipText = true, info.text, (L"Select a %s interaction to enable this option."):format(opt)
end
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Do nothing", false, not qaOnRelease
info.disabled, info.tooltipTitle, info.tooltipText = nil
UIDropDownMenu_AddButton(info)
end
function optionControl.QuickAction.menuInitializer()
local c = optionControl.QuickAction
local info = {func=onMenuOptionToggle, arg2=c.widget, minWidth=240, isNotRadio=true, keepShownOnClick=true}
info.text, info.arg1, info.checked = L"Quick action at ring center", "CenterAction", PC:GetOption("CenterAction", OR_CurrentOptionsDomain)
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Quick action if mouse remains still", "MotionAction", PC:GetOption("MotionAction", OR_CurrentOptionsDomain)
UIDropDownMenu_AddButton(info)
end
function optionControl.QuickAction:refresh()
local enabled = self.widget:IsEnabled()
local center = enabled and PC:GetOption("CenterAction", OR_CurrentOptionsDomain)
local motion = enabled and PC:GetOption("MotionAction", OR_CurrentOptionsDomain)
self.text:SetText(
center and motion and L"Unmoved cursor, or at ring center" or
center and L"At ring center" or
motion and L"Unmoved cursor" or
((enabled and "" or "|cffa0a0a0") .. L"Disabled")
)
optionControl.OnPrimaryRelease:refresh()
end
function optionControl.OnLeft.menuInitializer()
local c = optionControl.OnLeft
local info = {func=onMenuOptionSetClick, arg2=c.widget, minWidth=240}
local doClose = not PC:GetOption("NoClose", OR_CurrentOptionsDomain)
info.text, info.arg1, info.checked = L"Use slice and close ring", false, doClose
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Use slice", true, not doClose
UIDropDownMenu_AddButton(info)
end
function optionControl.OnLeft:refresh()
local enabled = self.widget:IsEnabled()
local noClose = PC:GetOption("NoClose", OR_CurrentOptionsDomain)
self.text:SetText(
enabled and noClose and L"Use slice" or
enabled and L"Use slice and close ring" or
("|cffa0a0a0" .. L"Do nothing")
)
end
local function onSliceBindingOptionClick(_, pref, owner, checked)
if pref == "ToggleNoClose" then
pref = not checked and "UseNoClose" -- toggle original checked state
else
OPC_AlterOption(widgetControl[owner], "SliceBinding", pref ~= "None")
end
OPC_AlterOption(widgetControl[owner], "NoCloseOnSlice", pref == "UseNoClose")
end
function optionControl.SliceBinding.menuInitializer()
local c = optionControl.SliceBinding
local info = {func=onSliceBindingOptionClick, arg2=c.widget, minWidth=240}
local noClose = PC:GetOption("NoCloseOnSlice", OR_CurrentOptionsDomain)
if c.forced then
info.text, info.arg1, info.checked, info.isNotRadio = L"Leave open after use", "ToggleNoClose", noClose, true
UIDropDownMenu_AddButton(info)
return
end
local doBind = c.forced or PC:GetOption("SliceBinding", OR_CurrentOptionsDomain)
info.text, info.arg1, info.checked = L"Use slice and close ring", "UseClose", doBind and not noClose
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Use slice", "UseNoClose", doBind and noClose
UIDropDownMenu_AddButton(info)
info.text, info.arg1, info.checked = L"Do nothing", "None", not doBind
UIDropDownMenu_AddButton(info)
end
function optionControl.SliceBinding:refresh()
local doBind = self.forced or PC:GetOption("SliceBinding", OR_CurrentOptionsDomain)
local noClose = PC:GetOption("NoCloseOnSlice", OR_CurrentOptionsDomain)
self.text:SetText(
doBind and noClose and L"Use slice" or
doBind and L"Use slice and close ring" or
L"Do nothing"
)
end
function EV:CVAR_UPDATE(cvar)
if cvar == "GamePadEnable" and frame:IsVisible() then
OPC_UpdateControlReqs(optionControl.PadSupportMode)
end
end
end
local OPC_AppearanceFactory = CreateFrame("Frame", "OPC_AppearanceDropdown", frame, "UIDropDownMenuTemplate")
OPC_AppearanceFactory:SetPoint("LEFT", optionControl._Appearance.widget, "LEFT", 284, -1)
UIDropDownMenu_SetWidth(OPC_AppearanceFactory, 200)
T.OPC_RingScopePrefixes = {
[30] = "|cff25bdff",
[20] = "|c" .. RAID_CLASS_COLORS[select(2,UnitClass("player"))].colorStr,
[10] = "|cffabffd5",
}
function OPC_UpdateControlReqs(v)
local enabled, disabledHint = true, nil
if v.depOn then
local dv = PC:GetOption(v.depOn, OR_CurrentOptionsDomain)
enabled = v.depValueSet and v.depValueSet[dv] or (v.depValueSet or v.depValue) == nil or dv == v.depValue
elseif v.depIndicatorFeature then
enabled = T.OPieUI:DoesIndicatorConstructorSupport(PC:GetOption("IndicatorFactory", OR_CurrentOptionsDomain), v.depIndicatorFeature)
disabledHint = L"Not supported by selected appearance."
end
if enabled and v.reqFeature == "GamePad" and not C_GamePad.IsEnabled() then
enabled, disabledHint = false, nil
end
v.widget:SetEnabled(enabled)
if v.refresh then
v:refresh(v[2] and PC:GetOption(v[2], OR_CurrentOptionsDomain))
elseif v[1] ~= "bool" then
elseif enabled then
v.widget:SetChecked(PC:GetOption(v[2], OR_CurrentOptionsDomain) or nil)
v.widget.tooltipText = nil
else
v.widget:SetChecked(v.otherwise or nil)
v.widget.tooltipText = disabledHint
end
end
function OPC_AlterOptionW(widget, newval, ...)
if OPC_BlockInput then return end
local control = widgetControl[widget]
local option = control[2]
if control.setValueTransform then
option, newval = control:setValueTransform(newval, ...)
elseif control[1] == "range" and control[3] > control[4] and type(newval) == "number" then
newval = -newval
end
if option then
return OPC_AlterOption(control, option, newval)
end
end
function OPC_AlterOption(control, option, newval)
if OPC_BlockInput then return end
config.undo:saveActiveProfile()
PC:SetOption(option, newval, OR_CurrentOptionsDomain)
local ctype, setval = control[1], PC:GetOption(option, OR_CurrentOptionsDomain)
if control.refresh then
control:refresh(setval)
elseif ctype == "range" then
local text, vf = control.caption, control.valueFormat
if vf then
text = text .. " |cffffd500(" .. vf:format(setval) .. ")|r"
end
control.text:SetText(text)
OPC_BlockInput = true
control.widget:SetValue(setval * (control[3] > control[4] and -1 or 1))
OPC_BlockInput = false
elseif ctype == "radio" then
control.widget:SetValue(setval)
elseif setval ~= newval then
control.widget:SetChecked(setval and 1 or nil)
end
for _,v in ipairs(OPC_Options) do
if v.depOn == option then
OPC_UpdateControlReqs(v)
end
end
if OPC_IsViewDirty then
OPC_UpdateViewport()
end
end
local function OPC_OptionDomain_click(_, ringName)
OR_CurrentOptionsDomain, frame.resetOnHide = ringName or nil, nil
frame.refresh()
end
local function OPC_OptionDomain_Format(key, list)
return list[key], OR_CurrentOptionsDomain == (key or nil)
end
function OPC_OptionDomain:initialize()
local list = {false, [false]=L"Defaults for all rings"}
local ct = T.OPC_RingScopePrefixes
for key, name, scope in PC:IterateRings(IsAltKeyDown()) do
local color = ct and ct[scope] or "|cffacd7e6"
list[#list+1], list[key] = key, (L"Ring: %s"):format(color .. (name or key) .. "|r")
end
XU:Create("ScrollableDropDownList", 1, list, OPC_OptionDomain_Format, OPC_OptionDomain_click)
end
function OPC_OptionDomain:text()
local label = L"Defaults for all rings"
if OR_CurrentOptionsDomain then
local name, key = PC:GetRingInfo(OR_CurrentOptionsDomain)
label = (L"Ring: %s"):format("|cffaaffff" .. (name or key) .."|r")
end
UIDropDownMenu_SetText(self, label)
end
local function OPC_Profile_FormatName(ident)
return ident == "default" and L"default" or ident
end
do -- OPC_Profile:initialize
local curProfile
local function dup(n, v)
if n > 0 then
return v, dup(n-1, v)
end
end
local function prependCount(...)
return select("#", ...), ...
end
local function OPC_Profile_format(ident, list)
return list[ident], curProfile == ident, ident
end
local function OPC_Profile_switch(_, ident)
config.undo:saveSpecProfiles()
PC:SwitchProfile(ident)
end
local function OPC_Profile_new_callback(self, text, apply, _frame)
local name = text:match("^%s*(.-)%s*$")
if name == "" or PC:ProfileExists(name) then
if apply then self:SetText("") end
return false
elseif apply then
config.undo:saveSpecProfiles()
PC:SwitchProfile(name, true)
if not config.undo:search("OPieProfile#" .. name) then
config.undo:push("OPieProfile#" .. name, CallDeleteProfile, name)
end
end
return true
end
local function OPC_Profile_new(_, _, frame)
TS:ShowPromptOverlay(frame, L"Create a New Profile", L"New profile name:", L"Profiles save options and ring bindings.", L"Create Profile", OPC_Profile_new_callback)
end
local function OPC_Profile_delete()
config.undo:saveActiveProfile()
PC:DeleteProfile(PC:GetCurrentProfile())
end
local function OPC_Profile_assignAllSpecs(_, curProfile)
config.undo:saveSpecProfiles()
PC:SetSpecProfiles(dup(select("#", PC:GetSpecProfiles()), curProfile))
end
function OPC_Profile:initialize()
local hasPartialSpecProfiles, ns, p1, p2, p3, p4, plist = false, prependCount(PC:GetSpecProfiles())
curProfile, plist, ns = PC:GetCurrentProfile(), PC:GetAllProfiles(), ns > 1 and ns or 0
for k=1, #plist do
local ident = plist[k]
local name, suf, ni = OPC_Profile_FormatName(ident), "", 0
for i=1, ns do
if ident == select(i, p1, p2, p3, p4) then
if MODERN then
local _, _, _, ico = GetSpecializationInfo(i)
ni, suf = ni + 1, (ni > 0 and suf .. "|T" or " |T") .. (ico or "Interface/Icons/INV_Misc_QuestionMark") .. ":16:16:4:0:64:64:4:60:4:60|t"
elseif CF_WRATH then
ni, suf = ni + 1, suf .. " |cffff99ff[" .. i .."]|r"
end
end
end
if ni > 0 and ni < ns then
name, hasPartialSpecProfiles = name .. suf, true
end
plist[ident] = name
end
XU:Create("ScrollableDropDownList", 1, plist, OPC_Profile_format, OPC_Profile_switch, true)
UIDropDownMenu_AddSeparator()
local info = {arg2=self:GetParent(), notCheckable=true, justifyH="CENTER"}
info.text, info.disabled, info.func, info.arg1 = L"Assign to all specializations", not hasPartialSpecProfiles, OPC_Profile_assignAllSpecs, curProfile
if ns > 1 then
UIDropDownMenu_AddButton(info)
end
info.text, info.minWidth, info.func, info.arg1, info.disabled = L"Create a new profile", self:GetWidth()-40, OPC_Profile_new, nil, nil
UIDropDownMenu_AddButton(info)
info.text, info.func = curProfile ~= "default" and L"Delete current profile" or L"Restore default settings", OPC_Profile_delete
UIDropDownMenu_AddButton(info)
end
end
function OPC_Profile:text()
UIDropDownMenu_SetText(self, L"Profile" .. ": " .. OPC_Profile_FormatName(PC:GetCurrentProfile()))
end
function OPC_AppearanceFactory:formatText(key, outOfDate, name, disabled)
name = name or T.OPieUI:GetIndicatorConstructorName(key)
if not name then
name = "|cffa0a0a0*[" .. T.OPieUI:GetIndicatorConstructorName() .. "]|r"
end
if disabled then
name = "|cff909090" .. name .. "|r"
elseif outOfDate then
name = "|cffef2020" .. name .. "|r"
end
if key == "mirage" then
name = "|cff00e800" .. name .. "|r"
elseif key == "_" then
name = L"Not customized" .. " (|cffb0b0b0" .. name .. "|r)"
end
return name
end
function OPC_AppearanceFactory:text()
local key, own, text = PC:GetOption("IndicatorFactory", OR_CurrentOptionsDomain)
if OR_CurrentOptionsDomain and own == nil then
text = L"Use global setting"
else
local name, avail = T.OPieUI:GetIndicatorConstructorName(key)
key, name = avail and key or nil, avail and name or nil
text = self:formatText(key, nil, name) .. (avail and "" or "|cff909090*")
end
UIDropDownMenu_SetText(self, text)
end
local function OPC_AppearanceFactory_set(_, key)
PC:SetOption("IndicatorFactory", key, OR_CurrentOptionsDomain)
OPC_AppearanceFactory:text()
for _,v in ipairs(OPC_Options) do
if v.depIndicatorFeature then
OPC_UpdateControlReqs(v)
end
end
end
function OPC_AppearanceFactory:initialize()
local info = {func=OPC_AppearanceFactory_set, minWidth=UIDROPDOWNMENU_OPEN_MENU:GetWidth()-40, tooltipOnButton=true, tooltipWhileDisabled=true}
local current, own = PC:GetOption("IndicatorFactory", OR_CurrentOptionsDomain)
for k, name, outOfDate, err in T.OPieUI:EnumerateRegisteredIndicatorConstructors() do
if k == "_" then
UIDropDownMenu_AddSeparator()
end
name = self:formatText(k, outOfDate, name, err ~= nil)
if err then
info.tooltipTitle, info.tooltipText = "|cffff2020" .. L"Update required", L"Install an updated version of this appearance to select it." .. "\n\n|cff909090" .. err
elseif outOfDate then
info.tooltipTitle, info.tooltipText = "|cffff2020" .. L"Update required", L"This appearance may not support all OPie features."
else
info.tooltipTitle, info.tooltipText = nil
end
info.arg1, info.text, info.checked, info.disabled = k, name, k == own or (own == nil and not OR_CurrentOptionsDomain and current == k), err ~= nil
UIDropDownMenu_AddButton(info)
end
if OR_CurrentOptionsDomain then
info.text, info.arg1, info.checked = L"Use global setting", nil, own == nil
info.tooltipTitle, info.tooltipText = nil
UIDropDownMenu_AddButton(info)
end
end
function frame.refresh()
OPC_BlockInput = true
if OR_CurrentOptionsDomain and not PC:GetRingInfo(OR_CurrentOptionsDomain) then
OR_CurrentOptionsDomain = nil
end
OPC_OptionDomain:text()
OPC_Profile:text()
OPC_AppearanceFactory:text()
OPC_AppearanceFactory:SetShown(T.OPieUI:HasMultipleIndicatorConstructors())
local isViewOfGlobalDomain = OR_CurrentOptionsDomain == nil
for _, control in ipairs(OPC_Options) do
local widget, ctype, option = control.widget, control[1], control[2]
if control.refresh then
control:refresh(option and PC:GetOption(option, OR_CurrentOptionsDomain) or nil, option)
elseif ctype == "range" then
widget:SetValue(PC:GetOption(option, OR_CurrentOptionsDomain) * (control[3] < control[4] and 1 or -1))
local text = control.caption
if control.valueFormat then
local vf = control.valueFormat:format(widget:GetValue())
text = text .. " |cffffd500(" .. vf .. ")|r"
end
control.text:SetText(text)
elseif ctype == "bool" then
widget:SetChecked(PC:GetOption(option, OR_CurrentOptionsDomain) or nil)
control.text:SetText(control.caption)
end
if control.depOn or control.depIndicatorFeature or control.reqFeature then
OPC_UpdateControlReqs(control)
end
if control.globalOnly then
widget:SetShown(isViewOfGlobalDomain)
end
end
OPC_BlockInput = false
config.checkSVState(frame)
end
local function resetView()
OR_CurrentOptionsDomain = nil
end
frame.cancel, frame.okay = resetView, resetView
function frame.default()
config.undo:saveActiveProfile()
PC:ResetOptions(true)
frame.refresh()
end
frame:SetScript("OnShow", frame.refresh)
frame:SetScript("OnHide", function()
if frame.resetOnHide then
OR_CurrentOptionsDomain, frame.resetOnHide = nil
end
end)
function EV:OPIE_PROFILE_SWITCHED(_new, _old)
if frame:IsVisible() then
frame.refresh()
end
end
function T.ShowOPieOptionsPanel(ringKey)
frame:OpenPanel()
OPC_OptionDomain_click(nil, ringKey)
frame.resetOnHide = true
config.pulseDropdown(OPC_OptionDomain)
end
function OPie_OpenSettings()
frame:OpenPanel()
end