this.Setup = function()
getglobal(this:GetName().."_Texture"):SetVertexColor(XPerlConfig.OptionsColour.r, XPerlConfig.OptionsColour.g, XPerlConfig.OptionsColour.b,1)
getglobal(this:GetName().."_Text"):SetTextColor(1,1,1,1)
getglobal(this:GetName().."_Text"):SetText(XPerl_Version)
end
this:Setup()
this.Setup = function()
this:SetBackdropBorderColor(XPerlConfig.OptionsColour.r, XPerlConfig.OptionsColour.g, XPerlConfig.OptionsColour.b, 1)
this:SetBackdropColor(XPerlConfig.OptionsColour.r, XPerlConfig.OptionsColour.g, XPerlConfig.OptionsColour.b, 1)
end
this:Setup()
if (arg1 == "LeftButton") then
this:StartMoving()
end
this:StopMovingOrSizing()
XPerl_Options_OnUpdate()
if ( this.tooltipText ) then
GameTooltip:SetOwner(this, "ANCHOR_RIGHT");
GameTooltip:SetText(this.tooltipText, nil, nil, nil, nil, 1);
end
GameTooltip:Hide();
this:ClearFocus()
if (this.flashFrame) then
local array
if (table.getn(this.flashFrame) == 0) then
array = {this.flashFrame}
else
array = this.flashFrame
end
for i,f in pairs(array) do
if (f and f.GetName) then
if (f:IsShown()) then
UIFrameFlash(f, 0.5, 0.5, 60, 1, 0, 1)
end
end
end
end
if (this.tooltipText) then
GameTooltip:SetOwner(this, "ANCHOR_RIGHT")
GameTooltip:SetText(this.tooltipText, nil, nil, nil, nil, 1)
end
if (this.flashFrame) then
local array
if (table.getn(this.flashFrame) == 0) then
array = {this.flashFrame}
else
array = this.flashFrame
end
for i,f in pairs(array) do
if (f and UIFrameIsFlashing(f)) then
UIFrameFlashStop(f)
UIFrameFlashUpdate(1)
local show = 1
if (this.flashShow) then
show = XPerlConfig[this.flashShow]
end
if (show == 1) then
f:Show()
else
f:Hide()
end
end
end
if (this.flashEnd) then
this.flashEnd()
end
end
GameTooltip:Hide()
if (this.configVar) then
XPerlConfig[this.configVar] = XPerl_GetCheck(this)
elseif (this.XconfigVar) then
if (this.XconfigVars) then
local sets = getglobal(this.XconfigVars)
if (sets) then
sets[this.XconfigVar] = XPerl_GetCheck(this)
end
else
XPerlConfigHelper[this.XconfigVar] = XPerl_GetCheck(this)
end
elseif (this.configSelection) then
local new = XPerl_GetCheck(this)
for i,var in pairs(this.configSelection) do
XPerlConfig[var] = new
end
end
local tex = this:GetCheckedTexture()
tex:SetVertexColor(1, 1, 1)
if (this.configClick) then
this.configClick()
end
if (this.Validate) then
this.Validate()
end
if (this.configVar) then
this:SetChecked(XPerlConfig[this.configVar])
elseif (this.XconfigVar) then
if (this.XconfigVars) then
local sets = getglobal(this.XconfigVars)
if (sets) then
this:SetChecked(sets[this.XconfigVar])
end
else
this:SetChecked(XPerlConfigHelper[this.XconfigVar])
end
elseif (this.configSelection) then
local vars, ticked = 0, 0
for i,var in pairs(this.configSelection) do
vars = vars + 1
if (XPerlConfig[var] == 1) then
ticked = ticked + 1
end
end
local tex = this:GetCheckedTexture()
tex:SetVertexColor(1, 1, 1)
if (ticked == 0) then
this:SetChecked(nil)
elseif (ticked == vars) then
this:SetChecked(true)
else
this:SetChecked(true)
tex:SetVertexColor(0.6, 0.6, 0.4)
end
end
if (this.Validate) then
this.Validate()
end
if (this.tooltipText) then
GameTooltip:SetOwner(this, "ANCHOR_RIGHT")
GameTooltip:SetText(this.tooltipText, nil, nil, nil, nil, 1)
end
GameTooltip:Hide()
this.ok = nil
this:Setup()
local var = XPerl_ColourPicker.var
if (type(XPerlConfig[var]) == "table") then
this:SetColorRGB(XPerlConfig[var].r, XPerlConfig[var].g, XPerlConfig[var].b)
if (XPerl_ColourPicker.alpha) then
XPerl_ColourPicker_Alpha:SetMinMaxValues(0, 1)
XPerl_ColourPicker_Alpha:SetValue(XPerlConfig[var].a)
XPerl_ColourPicker_Alpha:Show()
XPerl_ColourPicker:SetHeight(230)
else
XPerl_ColourPicker_Alpha:Hide()
XPerl_ColourPicker:SetHeight(200)
end
end
getglobal(this:GetParent():GetName().."_ColorSelect_Swatch"):SetTexture(arg1, arg2, arg3)
if (arg1 == "ESCAPE") then
XPerl_ColourPicker:Hide()
if (XPerl_ColourPicker.ParentFrame) then
XPerl_ColourPicker.ParentFrame:Show()
XPerl_ColourPicker.ParentFrame = nil
end
XPerlLocked = 0
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALPHA")
getglobal(this:GetName().."Low"):SetText("0%")
getglobal(this:GetName().."High"):SetText("100%")
XPerl_ColourPicker.alphaValue = this:GetValue()
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerl_ColourPicker.alphaValue + 0.5).."%")
XPerl_LockFrames()
local tabs = {XPerl_Options_Tab1}
if (XPerl_Player or XPerl_Player_Pet) then
table.insert(tabs, XPerl_Options_Tab2)
end
if (XPerl_Target) then
table.insert(tabs, XPerl_Options_Tab3)
end
if (XPerl_party1 or XPerl_partypet1) then
table.insert(tabs, XPerl_Options_Tab4)
end
if (XPerl_Raid_Frame) then
table.insert(tabs, XPerl_Options_Tab5)
end
if (XPerl_Player or XPerl_Player_Pet or XPerl_Target or XPerl_party1 or enabled) then
table.insert(tabs, XPerl_Options_Tab6)
end
table.insert(tabs, XPerl_Options_Tab7)
if (XPerl_Frame) then
table.insert(tabs, XPerl_Options_Tab8)
end
table.insert(tabs, XPerl_Options_Tab9)
local lastTab = nil
for i,tab in pairs(tabs) do
if (i > 1) then
tab:ClearAllPoints()
tab:SetPoint("BOTTOMLEFT", lastTab, "BOTTOMRIGHT", -1, 0)
tab:Show()
end
lastTab = tab
end
if (GetLocale() == "deDE") then
this:SetWidth(690)
end
this:Setup()
XPerl_OptionActions()
-- Player and Target Frame Options
this.editing = true
this.editing = nil
if (XPerl_Player_GetGap) then
this:SetText(XPerl_Player_GetGap())
end
if (this.editing) then
if (XPerl_Player_GetGap) then
XPerl_Player_SetGap(tonumber(this:GetText()))
end
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_SCALE")
XPerl_Options_RegisterScalingSlider(this)
if (not XPerl_TargetTarget) then
this:Hide()
end
this:SetValue(math.floor(100 * XPerlConfig.Scale_TargetTargetFrame + 0.5))
if (math.floor(100 * XPerlConfig.Scale_TargetTargetFrame + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_TargetTargetFrame = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_TargetTargetFrame + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_SCALE")
XPerl_Options_RegisterScalingSlider(this)
if (not XPerl_Target) then
this:Hide()
end
this:SetValue(math.floor(100 * XPerlConfig.Scale_TargetFrame + 0.5))
if (math.floor(100 * XPerlConfig.Scale_TargetFrame + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_TargetFrame = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_TargetFrame + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_SCALE")
XPerl_Options_RegisterScalingSlider(this)
if (not XPerl_Player) then
this:Hide()
end
this:SetValue(math.floor(100 * XPerlConfig.Scale_PlayerFrame + 0.5))
if (math.floor(100 * XPerlConfig.Scale_PlayerFrame + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_PlayerFrame = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_PlayerFrame + 0.5).."%")
-- Party Frame Options
this.editing = true
this.editing = nil
if (XPerl_Party_GetGap) then
this:SetText(XPerl_Party_GetGap())
end
if (this.editing) then
if (XPerl_Party_GetGap) then
XPerl_Party_SetGap(tonumber(this:GetText()))
end
end
if (not XPerl_partypet1) then
this:Hide()
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTYPET_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerlConfig.Scale_PartyPets + 0.5))
if (math.floor(100 * XPerlConfig.Scale_PartyPets + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_PartyPets = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_PartyPets + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerlConfig.Scale_PartyFrame + 0.5))
if (math.floor(100 * XPerlConfig.Scale_PartyFrame + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_PartyFrame = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_PartyFrame + 0.5).."%")
-- Raid Frame Options
this.editing = true
this.editing = nil
if (XPerl_Raid_GetGap) then
this:SetText(XPerl_Raid_GetGap())
end
if (this.editing and XPerl_Raid_SetGap) then
XPerl_Raid_SetGap(tonumber(this:GetText()))
end
XPerl_Options.raidAlign = "all"
this:SetChecked(true)
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALIGN_RAID_ALL")
XPerl_Options.raidAlign = "all"
XPerl_Options_CheckRadio({"All", "Odds", "Evens", "First4", "Last4"})
this:SetChecked(false)
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALIGN_RAID_ODD")
XPerl_Options.raidAlign = "odd"
XPerl_Options_CheckRadio({"All", "Odds", "Evens", "First4", "Last4"})
this:SetChecked(false)
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALIGN_RAID_EVEN")
XPerl_Options.raidAlign = "even"
XPerl_Options_CheckRadio({"All", "Odds", "Evens", "First4", "Last4"})
this:SetChecked(false)
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALIGN_RAID_FIRST4")
XPerl_Options.raidAlign = "first4"
XPerl_Options_CheckRadio({"All", "Odds", "Evens", "First4", "Last4"})
this:SetChecked(false)
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALIGN_RAID_LAST4")
XPerl_Options.raidAlign = "last4"
XPerl_Options_CheckRadio({"All", "Odds", "Evens", "First4", "Last4"})
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerlConfig.Scale_Raid + 0.5))
if (math.floor(100 * XPerlConfig.Scale_Raid + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_Raid = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_Raid + 0.5).."%")
-- Global Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_FRAME_TRANSPARENCY")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0,100)
this:SetValueStep(1)
this:SetValue(math.floor(100 * XPerlConfig.Transparency + 0.5))
if (this:GetValue() ~= math.floor(100 * XPerlConfig.Transparency + 0.5)) then
XPerlConfig.Transparency = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Transparency + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TEXT_TRANSPARENCY")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0,100)
this:SetValueStep(1)
this:SetValue(math.floor(100 * XPerlConfig.TextTransparency + 0.5))
if (this:GetValue() ~= math.floor(100 * XPerlConfig.TextTransparency + 0.5)) then
XPerlConfig.TextTransparency = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.TextTransparency + 0.5).."%")
-- Options Tabs
this.frameNames = {"_Global_Options",
"_Player_Options",
"_Target_Options",
"_Party_Options",
"_Raid_Options",
"_All_Options",
"_Colour_Options",
"_Helper_Options",
"_Admin_Options"}
this.SelectTab = function(this, id)
for i=1,table.getn(this.frameNames) do
local frame = getglobal(this:GetParent():GetName()..this.frameNames[i])
local tab = getglobal(this:GetName()..i)
if (i == id) then
--tab:EnableTab(tab)
XPerl_Options_EnableTab(tab, true)
if (frame) then
frame:Show()
end
else
if (tab and tab:IsShown()) then
XPerl_Options_EnableTab(tab, false)
--tab:DisableTab(tab)
end
if (frame) then
frame:Hide()
end
end
end
end
this:SelectTab(1)
-- Main Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_BAR_TEXTURES_BACKGROUND")
this.configVar = "BackgroundTextures"
this.configClick = XPerl_SetBarTextures
XPerl_OptionsSetMyText(this, "XPERL_CONF_HEALER_MODE")
this.configVar = "HealerMode"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("DeficitOnly")
XPerl_Options_EnableSibling("DeficitMax")
end
this:SetChecked(XPerlConfig.HealerModeType == 0)
XPerl_OptionsSetMyText(this, "XPERL_CONF_HEALERMODE_DEFICIT")
XPerlConfig.HealerModeType = 0
XPerl_Options_CheckRadio({"DeficitOnly", "DeficitMax"})
XPerl_OptionActions()
this:SetChecked(XPerlConfig.HealerModeType == 1)
XPerl_OptionsSetMyText(this, "XPERL_CONF_HEALERMODE_DEFICITMAX")
XPerlConfig.HealerModeType = 1
XPerl_Options_CheckRadio({"DeficitOnly", "DeficitMax"})
XPerl_OptionActions()
XPerl_OptionsSetMyText(this, "XPERL_CONF_INVERSEBARS")
this.configVar = "InverseBars"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_FATHEALTHBARS")
this.configVar = "FatHealthBars"
this.configClick = XPerl_Setup_StatsFrames
XPerl_OptionsSetMyText(this, "XPERL_CONF_COMBAT_FLASH")
this.configVar = "XPerlCombatFlash"
XPerl_OptionsSetMyText(this, "XPERL_CONF_FADING_FRAMES")
this.configVar = "PerlFadeFrames"
XPerl_OptionsSetMyText(this, "XPERL_CONF_ARCANE_BAR")
this.Validate = function()
XPerl_Options_EnableSibling("CastTime")
end
this.configVar = "ArcaneBar"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_CAST_TIME")
this.configVar = "CastTime"
XPerl_OptionsSetMyText(this, "XPERL_CONF_ORIGINAL_CASTBAR")
this.configVar = "OldCastBar"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_SELECTION_HIGHLIGHT")
this.configVar = "HighlightSelection"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_HIGHLIGHTDEBUFFS")
this.configVar = "HighlightDebuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_HIGHLIGHTDEBUFFSBORDER")
this.configVar = "HighlightDebuffsBorder"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_FADINGTOOLTIP")
this.configVar = "FadingTooltip"
XPerl_OptionsSetMyText(this, "XPERL_CONF_XPERL_TOOLTIP_INFO")
this.configVar = "XPerlTooltipInfo"
XPerl_OptionsSetMyText(this, "XPERL_CONF_HIT_INDICATOR")
this.configVar = "CombatHitIndicator"
XPerl_OptionsSetMyText(this, "XPERL_CONF_MINIMAP_ICON")
this.flashFrame = XPerl_MinimapButton_Frame
this.flashShow = "MinimapButtonShown"
this.configVar = "MinimapButtonShown"
this.configClick = XPerl_MinimapButton_Init
XPerl_OptionsSetMyText(this, "XPERL_CONF_MAXIMUM_SCALE")
getglobal(this:GetName().."Low"):SetText("100%")
getglobal(this:GetName().."High"):SetText("400%")
this:SetMinMaxValues(100, 400)
this:SetValueStep(25)
this:SetValue(math.floor(XPerlConfig.MaximumScale * 100 + 0.5))
if (math.floor(XPerlConfig.MaximumScale * 100 + 0.5) ~= this:GetValue()) then
XPerlConfig.MaximumScale = this:GetValue() / 100
XPerl_Options_MaxScaleSet()
end
getglobal(this:GetName().."Current"):SetText(math.floor(XPerlConfig.MaximumScale * 100 + 0.5).."%")
--if (XPerl_DisallowClear()) then
-- XPerlConfig.ClearBlizzardFrames = 0
-- this:Hide()
--end
XPerl_OptionsSetMyText(this, "XPERL_CONF_CLEAR_BLIZZ")
this.configVar = "ClearBlizzardFrames"
XPerl_OptionsSetMyText(this, "XPERL_CONF_CASTPARTY_FEATURES")
this.Validate = function()
XPerl_Options_EnableSibling("CastPartyRaidOnly")
end
this.configVar = "CastParty"
XPerl_OptionsSetMyText(this, "XPERL_CONF_CASTPARTY_RAID")
this.configVar = "CastPartyRaidOnly"
XPerl_OptionsSetMyText(this, "XPERL_CONF_SAVEPERCHARACTER")
XPerlConfigSavePerCharacter = this:GetChecked()
XPerl_SetMyGlobal()
this:SetChecked(XPerlConfigSavePerCharacter)
XPerl_Options_LoadSettings_OnLoad()
XPerl_Options_LoadSettings_OnLoad()
GameTooltip:SetOwner(this, "ANCHOR_RIGHT", -15, 0)
GameTooltip:SetText(XPERL_CONF_LOAD_SETTINGS_DESC, nil, nil, nil, nil, 1)
GameTooltip:Hide()
-- Player Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PORTRAIT")
this.flashFrame = XPerl_Player_PortraitFrame
this.flashShow = "ShowPlayerPortrait"
this.flashEnd = XPerl_Player_UpdatePortrait
this.configVar = "ShowPlayerPortrait"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("Portrait3D")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PORTRAIT3D")
this.flashFrame = XPerl_Player_PortraitFrame
this.flashShow = "ShowPlayerPortrait"
this.flashEnd = XPerl_Player_UpdatePortrait
this.configVar = "ShowPlayerPortrait3D"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_LEVEL")
this.flashFrame = XPerl_Player_LevelFrame
this.flashShow = "ShowPlayerLevel"
this.configVar = "ShowPlayerLevel"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_ICON")
this.flashFrame = XPerl_Player_ClassTexture
this.flashShow = "ShowPlayerClassIcon"
this.configVar = "ShowPlayerClassIcon"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_XP")
this.flashFrame = XPerl_Player_XPBar
this.flashShow = "ShowPlayerXPBar"
this.configVar = "ShowPlayerXPBar"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PVP")
this.flashFrame = XPerl_Player_PVPRankIcon
this.flashEnd = function() XPerl_Player_NameFrame_PVPRankIcon:SetAlpha(0.3); end
this.configVar = "ShowPlayerPVPRank"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PVPICON")
this.flashFrame = XPerl_Player_PVPStatus
this.configVar = "ShowPlayerPVP"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_VALUES")
this.flashFrame = {XPerl_Player_StatsFrame_HealthBarText, XPerl_Player_StatsFrame_ManaBarText, XPerl_Player_StatsFrame_XPBarText}
this.flashEnd = XPerl_Player_UpdateDisplay
this.flashShow = "ShowPlayerValues"
this.configVar = "ShowPlayerValues"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PERCENT")
this.flashFrame = {XPerl_Player_StatsFrame_HealthBarPercent, XPerl_Player_StatsFrame_ManaBarPercent, XPerl_Player_StatsFrame_XPBarPercent}
this.flashEnd = XPerl_Player_UpdateDisplay
this.flashShow = "ShowPlayerPercent"
this.configVar = "ShowPlayerPercent"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_ENERGY")
this.flashFrame = XPerl_Player_EnergyTicker
this.configVar = "EnergyTicker"
this.configClick = XPerl_Player_TickerShowHide
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_PARTY_NUM")
this.flashFrame = XPerl_Player_GroupFrame
this.configVar = "ShowPartyNumber"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_FULLSCREEN")
this.configVar = "FullScreenStatus"
if (not XPerl_Player_Pet) then
this:Hide()
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_NAME")
this.flashFrame = XPerl_Player_Pet_NameFrame
this.flashEnd = XPerl_Player_Pet_UpdateDisplay
this.flashShow = "ShowPlayerPetName"
this.configVar = "ShowPlayerPetName"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_PORTRAIT")
this.flashFrame = XPerl_Player_Pet_PortraitFrame
this.flashEnd = XPerl_Player_Pet_UpdatePortrait
this.flashShow = "ShowPlayerPetPortrait"
this.configVar = "ShowPlayerPetPortrait"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("Portrait3D")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_PORTRAIT3D")
this.flashFrame = XPerl_Player_Pet_PortraitFrame
this.flashShow = "ShowPlayerPetPortrait"
this.flashEnd = XPerl_Player_Pet_UpdatePortrait
this.configVar = "ShowPlayerPetPortrait3D"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_HAPPINESS")
this.Validate = function()
XPerl_Options_EnableSibling("OnlySad")
XPerl_Options_EnableSibling("FlashSad")
end
this.flashFrame = XPerl_Player_Pet_HappyFrame
this.flashEnd = XPerl_Player_Pet_SetHappiness
this.configVar = "PetHappiness"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_ONLYSAD")
this.flashFrame = XPerl_Player_Pet_HappyFrame
this.flashEnd = XPerl_Player_Pet_SetHappiness
this.configVar = "PetHappinessSad"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_FLASHSAD")
this.flashFrame = XPerl_Player_Pet_HappyFrame
this.flashEnd = XPerl_Player_Pet_SetHappiness
this.configVar = "PetFlashWhenSad"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_LEVEL")
this.flashFrame = XPerl_Player_Pet_LevelFrame
this.flashShow = "ShowPetLevel"
this.configVar = "ShowPetLevel"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_XP")
XPerlConfig.ShowPetXP = XPerl_GetCheck(this)
XPerl_OptionActions()
this:SetChecked(XPerlConfig.ShowPetXP)
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_VALUES")
XPerlConfig.ShowPlayerPetValues = XPerl_GetCheck(this)
XPerl_OptionActions()
this:SetChecked(XPerlConfig.ShowPlayerPetValues)
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerlConfig.Scale_PetFrame + 0.5))
if (math.floor(100 * XPerlConfig.Scale_PetFrame + 0.5) ~= this:GetValue()) then
XPerlConfig.Scale_PetFrame = this:GetValue() / 100
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfig.Scale_PetFrame + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_PLAYER_PET_BUFF_SIZE")
getglobal(this:GetName().."Low"):SetText("14")
getglobal(this:GetName().."High"):SetText("38")
this:SetMinMaxValues(14, 38)
this:SetValueStep(1)
this:SetValue(XPerlConfig.PlayerPetBuffSize)
if (XPerlConfig.PlayerPetBuffSize ~= this:GetValue()) then
XPerlConfig.PlayerPetBuffSize = this:GetValue()
XPerl_Player_Pet_Set_Bits()
XPerl_Player_Pet_UpdateDisplay ()
end
getglobal(this:GetName().."Current"):SetText(XPerlConfig.PlayerPetBuffSize)
-- Target Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_PORTRAIT")
this.flashFrame = XPerl_Target_PortraitFrame
this.flashShow = "ShowTargetPortrait"
this.flashEnd = XPerl_Target_UpdatePortrait
this.configVar = "ShowTargetPortrait"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("Portrait3D")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_PORTRAIT3D")
this.flashFrame = XPerl_Target_PortraitFrame
this.flashShow = "ShowTargetPortrait"
this.flashEnd = XPerl_Target_UpdatePortrait
this.configVar = "ShowTargetPortrait3D"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_MANA")
this.flashFrame = XPerl_Target_StatsFrame_ManaBar
this.flashEnd = XPerl_Target_UpdateDisplay
this.configVar = "ShowTargetMana"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_BUFFSABOVE")
this.flashFrame = XPerl_Target_BuffFrame
this.configVar = "TargetBuffsAbove"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_REACTION")
this.flashFrame = XPerl_Target_NameFrame
this.configVar = "TargetReactionHighlight"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_ICON")
this.flashFrame = XPerl_Target_ClassTexture
this.flashShow = "ShowTargetClassIcon"
this.configVar = "ShowTargetClassIcon"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_MOBTYPE")
this.flashFrame = XPerl_Target_TypeFrame
this.flashEnd = XPerl_Target_UpdateDisplay
this.configVar = "ShowTargetMobType"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_LEVEL")
this.flashFrame = XPerl_Target_LevelFrame
this.flashEnd = XPerl_Target_UpdateDisplay
this.configVar = "ShowTargetLevel"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_ELITE")
this.flashFrame = XPerl_Target_BossFrame
this.flashEnd = XPerl_Target_UpdateDisplay
this.configVar = "ShowTargetElite"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_VALUES")
this.flashFrame = {XPerl_Target_StatsFrame_HealthBarText, XPerl_Target_StatsFrame_ManaBarText}
this.flashEnd = XPerl_Target_UpdateDisplay
this.flashShow = "ShowTargetValues"
this.configVar = "ShowTargetValues"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_PERCENT")
this.flashFrame = {XPerl_Target_StatsFrame_HealthBarPercent, XPerl_Target_StatsFrame_ManaBarPercent}
this.flashEnd = XPerl_Target_UpdateDisplay
this.flashShow = "ShowTargetPercent"
this.configVar = "ShowTargetPercent"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CPBLIZZ")
this.flashFrame = ComboFrame
this.flashEnd = function() ComboFrame:Hide(); end
this.configVar = "BlizzardCPMeter"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("Top")
XPerl_Options_EnableSibling("Bottom")
XPerl_Options_EnableSibling("Left")
XPerl_Options_EnableSibling("Right")
end
this:SetChecked(XPerlConfig.BlizzardCPPosition == "top")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CPBLIZZ_POSTOP")
XPerlConfig.BlizzardCPPosition = "top"
XPerl_Options_CheckRadio({"Top", "Bottom", "Left", "Right"})
XPerl_OptionActions()
this:SetChecked(XPerlConfig.BlizzardCPPosition == "bottom")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CPBLIZZ_POSBOTTOM")
XPerlConfig.BlizzardCPPosition = "bottom"
XPerl_Options_CheckRadio({"Top", "Bottom", "Left", "Right"})
XPerl_OptionActions()
this:SetChecked(XPerlConfig.BlizzardCPPosition == "left")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CPBLIZZ_POSLEFT")
XPerlConfig.BlizzardCPPosition = "left"
XPerl_Options_CheckRadio({"Top", "Bottom", "Left", "Right"})
XPerl_OptionActions()
this:SetChecked(XPerlConfig.BlizzardCPPosition == "right")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CPBLIZZ_POSRIGHT")
XPerlConfig.BlizzardCPPosition = "right"
XPerl_Options_CheckRadio({"Top", "Bottom", "Left", "Right"})
XPerl_OptionActions()
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CP")
this.flashFrame = XPerl_Target_NameFrame
this.configVar = "UseCPMeter"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_PVP")
this.flashFrame = XPerl_Target_PVPRankIcon
this.flashShow = "ShowTargetPVPRank"
this.flashEnd = function() XPerl_Target_NameFrame_PVPRankIcon:SetAlpha(0.3); end
this.configVar = "ShowTargetPVPRank"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_PVPICON")
this.flashFrame = XPerl_Target_NameFrame_PVPStatus
this.configVar = "ShowTargetPVP"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_RAIDICON_ALT")
this.flashFrame = XPerl_Target_NameFrame_RaidIcon
this.flashEnd = function() XPerl_Target_NameFrame_RaidIcon:Hide(); end
this.configVar = "AlternateRaidIcon"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_30YD")
this.configVar = "Show30YardSymbol"
this.configClick = XPerl_OptionActions
if (not XPerl_TargetTarget) then
this:Hide()
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETS_TARGET")
this.Validate = function()
XPerl_Options_EnableSibling("TargetsTargetsTarget")
XPerl_Options_EnableSibling("History")
XPerl_Options_EnableSibling("Buffs")
XPerl_Options_EnableSibling("TTTBuffs", getglobal(this:GetParent():GetName().."_TargetsTargetsTarget"))
XPerl_Options_EnableSibling("Level")
XPerl_Options_EnableSibling("Values")
XPerl_Options_EnableSibling("Percent")
XPerl_Options_EnableSibling("Mana")
end
this.flashFrame = XPerl_TargetTarget
this.flashEnd = function() XPerl_TargetTarget_UpdateDisplay (XPerl_TargetTarget); end
this.configVar = "ShowTargetTarget"
this.configClick = function()
XPerl_OptionActions()
if (XPerlConfig.ShowTargetTarget == 0) then
if (IsAddOnLoaded("XPerl_TargetTarget")) then
XPerl_Popup(XPERL_CONF_QUERY_DISABLE_TT, function() DisableAddOn("XPerl_TargetTarget"); end)
end
end
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETS_HISTORY")
this.configVar = "TargetTargetHistory"
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_BUFFS")
this.flashFrame = XPerl_TargetTarget_BuffFrame
this.flashShow = "TargetTargetBuffs"
this.configVar = "TargetTargetBuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_BUFFSABOVE")
this.flashFrame = XPerl_TargetTarget_BuffFrame
this.configVar = "TargetTargetBuffsAbove"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETS_TARGETS_TARGET")
this.Validate = function()
XPerl_Options_EnableSibling("TTTBuffs")
end
this.flashFrame = XPerl_TargetTargetTarget
this.flashEnd = function() XPerl_TargetTarget_Set_Bits(); XPerl_TargetTarget_UpdateDisplay (XPerl_TargetTargetTarget); end
this.configVar = "ShowTargetTargetTarget"
this.configClick = XPerl_OptionActions
getglobal(this:GetName().."Text"):SetWidth(160)
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGETTARGET_BUFFS")
this.flashFrame = XPerl_TargetTargetTarget_BuffFrame
this.flashShow = "TargetTargetTargetBuffs"
this.configVar = "TargetTargetTargetBuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_LEVEL")
this.flashFrame = XPerl_TargetTarget_LevelFrame
this.flashShow = "ShowTargetTargetLevel"
this.configVar = "ShowTargetTargetLevel"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_VALUES")
this.flashFrame = {XPerl_TargetTarget_StatsFrame_HealthBarText, XPerl_TargetTarget_StatsFrame_ManaBarText, XPerl_TargetTargetTarget_StatsFrame_HealthBarText, XPerl_TargetTargetTarget_StatsFrame_ManaBarText}
this.flashShow = "ShowTargetTargetValues"
this.configVar = "ShowTargetTargetValues"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_PERCENT")
this.flashFrame = {XPerl_TargetTarget_StatsFrame_HealthBarPercent, XPerl_TargetTarget_StatsFrame_ManaBarPercent, XPerl_TargetTargetTarget_StatsFrame_HealthBarPercent, XPerl_TargetTargetTarget_StatsFrame_ManaBarPercent}
this.flashShow = "ShowTargetTargetPercent"
this.configVar = "ShowTargetTargetPercent"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGETTARGET_MANA")
this.flashFrame = {XPerl_TargetTarget_StatsFrame_ManaBar, XPerl_TargetTargetTarget_StatsFrame_ManaBar}
this.flashEnd = function() XPerl_TargetTarget_UpdateDisplay(XPerl_TargetTarget); if (XPerl_TargetTargetTarget) then XPerl_TargetTarget_UpdateDisplay(XPerl_TargetTargetTarget); end; end
this.configVar = "ShowTargetTargetMana"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_BUFF_SIZE")
getglobal(this:GetName().."Low"):SetText("14")
getglobal(this:GetName().."High"):SetText("38")
this:SetMinMaxValues(14, 38)
this:SetValueStep(1)
this:SetValue(XPerlConfig.TargetBuffSize)
if (XPerlConfig.TargetBuffSize ~= this:GetValue()) then
XPerlConfig.TargetBuffSize = this:GetValue()
XPerl_Target_Set_Bits()
XPerl_Target_UpdateDisplay()
if (XPerl_TargetTarget) then
XPerl_TargetTarget_Set_Bits()
XPerl_TargetTarget_UpdateDisplay(XPerl_TargetTarget,true)
if (XPerl_TargetTargetTarget) then
XPerl_TargetTarget_UpdateDisplay(XPerl_TargetTargetTarget,true)
end
end
end
getglobal(this:GetName().."Current"):SetText(XPerlConfig.TargetBuffSize)
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_BUFF_ROWS")
getglobal(this:GetName().."Low"):SetText("1")
getglobal(this:GetName().."High"):SetText("6")
this:SetMinMaxValues(1, 6)
this:SetValueStep(1)
this:SetValue(XPerlConfig.TargetBuffRows)
if (XPerlConfig.TargetBuffRows ~= this:GetValue()) then
XPerlConfig.TargetBuffRows = this:GetValue()
XPerl_Target_Set_Bits()
XPerl_Target_UpdateDisplay()
if (XPerl_TargetTarget) then
XPerl_TargetTarget_Set_Bits()
XPerl_TargetTarget_UpdateDisplay(XPerl_TargetTarget,true)
if (XPerl_TargetTargetTarget) then
XPerl_TargetTarget_UpdateDisplay(XPerl_TargetTargetTarget,true)
end
end
end
getglobal(this:GetName().."Current"):SetText(XPerlConfig.TargetBuffRows)
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CASTABLE")
this.configVar = "TargetCastableBuffs"
this.configClick = XPerl_Target_UpdateDisplay
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_CURABLE")
this.configVar = "TargetCurableDebuffs"
this.configClick = XPerl_Target_UpdateDisplay
-- Party options
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_NAMES")
this.flashFrame = {XPerl_party1_NameFrame, XPerl_party2_NameFrame, XPerl_party3_NameFrame, XPerl_party4_NameFrame}
this.flashShow = "ShowPartyNames"
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "ShowPartyNames"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PORTRAIT")
this.flashFrame = {XPerl_party1_PortraitFrame, XPerl_party2_PortraitFrame, XPerl_party3_PortraitFrame, XPerl_party4_PortraitFrame}
this.flashShow = "ShowPartyPortrait"
--this.flashEnd = XPerl_Party_UpdateDisplayAll
this.flashEnd = function() if (XPerl_party1) then
for i = 1,4 do
XPerl_Party_UpdatePortrait(getglobal("XPerl_party"..i))
end
end
end
this.configVar = "ShowPartyPortrait"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("Portrait3D")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PORTRAIT3D")
this.flashFrame = {XPerl_party1_PortraitFrame, XPerl_party2_PortraitFrame, XPerl_party3_PortraitFrame, XPerl_party4_PortraitFrame}
this.flashShow = "ShowPartyPortrait"
this.flashEnd = getglobal(this:GetParent():GetName().."_Portrait").flashEnd
this.configVar = "ShowPartyPortrait3D"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_LEVEL")
this.flashFrame = {XPerl_party1_LevelFrame, XPerl_party2_LevelFrame, XPerl_party3_LevelFrame, XPerl_party4_LevelFrame}
this.flashShow = "ShowPartyLevel"
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "ShowPartyLevel"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_TARGET")
this.flashFrame = {XPerl_party1_TargetFrame, XPerl_party2_TargetFrame, XPerl_party3_TargetFrame, XPerl_party4_TargetFrame}
this.flashShow = "ShowPartyTarget"
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "ShowPartyTarget"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_ICON")
this.flashFrame = {XPerl_party1_LevelFrame_ClassTexture, XPerl_party2_LevelFrame_ClassTexture, XPerl_party3_LevelFrame_ClassTexture, XPerl_party4_LevelFrame_ClassTexture}
this.flashShow = "ShowPartyClassIcon"
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "ShowPartyClassIcon"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_VALUES")
this.flashFrame = {XPerl_party1_StatsFrame_HealthBarText, XPerl_party2_StatsFrame_HealthBarText, XPerl_party3_StatsFrame_HealthBarText, XPerl_party4_StatsFrame_HealthBarText,
XPerl_party1_StatsFrame_ManaBarText, XPerl_party2_StatsFrame_ManaBarText, XPerl_party3_StatsFrame_ManaBarText, XPerl_party4_StatsFrame_ManaBarText}
this.flashShow = "ShowPartyValues"
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "ShowPartyValues"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PERC")
this.flashFrame = {XPerl_party1_StatsFrame_HealthBarPercent, XPerl_party2_StatsFrame_HealthBarPercent, XPerl_party3_StatsFrame_HealthBarPercent, XPerl_party4_StatsFrame_HealthBarPercent,
XPerl_party1_StatsFrame_ManaBar_ManaBarPercent, XPerl_party2_StatsFrame_ManaBarPercent, XPerl_party3_StatsFrame_ManaBarPercent, XPerl_party4_StatsFrame_ManaBarPercent}
this.flashShow = "ShowPartyPercent"
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "ShowPartyPercent"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PVPICON")
this.flashFrame = XPerl_Player_PVPStatus
this.configVar = "ShowPartyPVP"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_INRAID")
this.configVar = "ShowPartyRaid"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_30YD")
this.configVar = "ShowParty30YardSymbol"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PETS")
this.flashFrame = {XPerl_partypet1, XPerl_partypet2, XPerl_partypet3, XPerl_partypet4}
this.flashEnd = XPerl_Party_Pet_UpdateDisplayAll
this.configVar = "ShowPartyPets"
this.configClick = function()
XPerl_OptionActions()
if (XPerlConfig.ShowPartyPets == 0) then
if (IsAddOnLoaded("XPerl_PartyPet")) then
XPerl_Popup(XPERL_CONF_QUERY_DISABLE_PARTY_PET, function() DisableAddOn("XPerl_PartyPet"); end)
end
end
end
this.Validate = function()
XPerl_Options_EnableSibling("PetNames")
XPerl_Options_EnableSibling("PetBuffs")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PETNAME")
this.flashFrame = {XPerl_partypet1_NameFrame, XPerl_partypet2_NameFrame, XPerl_partypet3_NameFrame, XPerl_partypet4_NameFrame}
this.flashEnd = XPerl_Party_Pet_UpdateDisplayAll
this.configVar = "ShowPartyPetName"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_PETBUFFS")
this.flashFrame = {XPerl_partypet1_NameFrame, XPerl_partypet2_NameFrame, XPerl_partypet3_NameFrame, XPerl_partypet4_NameFrame}
this.flashEnd = XPerl_Party_Pet_UpdateDisplayAll
this.configVar = "ShowPartyPetBuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_BUFFS")
this.flashFrame = {XPerl_party1_BuffFrame, XPerl_party2_BuffFrame, XPerl_party3_BuffFrame, XPerl_party4_BuffFrame}
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "PartyBuffs"
this.configClick = XPerl_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("Castable")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_CASTABLE")
this.configVar = "PartyCastableBuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_DEBUFFS")
this.Validate = function()
XPerl_Options_EnableSibling("Curable")
XPerl_Options_EnableSibling("Below")
end
this.flashFrame = {XPerl_party1_BuffFrame, XPerl_party2_BuffFrame, XPerl_party3_BuffFrame, XPerl_party4_BuffFrame}
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "PartyDebuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_CURABLE")
this.configVar = "PartyCurableDebuffs"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_DEBUFFSBELOW")
this.flashFrame = {XPerl_party1_BuffFrame, XPerl_party2_BuffFrame, XPerl_party3_BuffFrame, XPerl_party4_BuffFrame}
this.flashEnd = XPerl_Party_UpdateDisplayAll
this.configVar = "PartyDebuffsBelow"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_PARTY_BUFF_SIZE")
getglobal(this:GetName().."Low"):SetText("14")
getglobal(this:GetName().."High"):SetText("38")
this:SetMinMaxValues(14, 38)
this:SetValueStep(1)
this:SetValue(XPerlConfig.PartyBuffSize)
if (XPerlConfig.PartyBuffSize ~= this:GetValue()) then
XPerlConfig.PartyBuffSize = this:GetValue()
XPerl_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(XPerlConfig.PartyBuffSize)
-- Raid Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_SHOW")
this.Validate = function()
XPerl_Options_EnableSibling("Titles")
XPerl_Options_EnableSibling("Percent")
XPerl_Options_EnableSibling("ByClass")
XPerl_Options_EnableSibling("Tanker")
XPerl_Options_EnableSibling("Buffs")
XPerl_Options_EnableSibling("Debuffs")
XPerl_Options_EnableSibling("Castable")
XPerl_Options_EnableSibling("BuffsRight")
XPerl_Options_EnableSibling("BuffsInside")
XPerl_Options_EnableSibling("Motion")
XPerl_Options_EnableSibling("Groups_Grp1")
XPerl_Options_EnableSibling("Groups_Grp2")
XPerl_Options_EnableSibling("Groups_Grp3")
XPerl_Options_EnableSibling("Groups_Grp4")
XPerl_Options_EnableSibling("Groups_Grp5")
XPerl_Options_EnableSibling("Groups_Grp6")
XPerl_Options_EnableSibling("Groups_Grp7")
XPerl_Options_EnableSibling("Groups_Grp8")
--XPerl_Options_EnableSibling("Groups_Grp9")
XPerl_Options_EnableSibling("Groups_VSpacing")
end
this.configVar = "ShowRaid"
this.configClick = function()
XPerl_OptionActions()
if (XPerlConfig.ShowRaid == 0) then
if (IsAddOnLoaded("XPerl_RaidFrames")) then
XPerl_Popup(XPERL_CONF_QUERY_DISABLE_RAID, function() DisableAddOn("XPerl_RaidFrames"); end)
end
end
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_TITLES")
this.configVar = "ShowRaidTitles"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_UPWARD")
this.configVar = "RaidUpward"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_MANA")
this.configVar = "RaidMana"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_PERCENTS")
this.configVar = "ShowRaidPercents"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_SORTBYCLASS")
this.configVar = "SortRaidByClass"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_TANKER")
this.configVar = "RaidHighlightTanker"
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_BUFFS")
this.configVar = "RaidBuffs"
this.Validate = function()
XPerl_Options_EnableSibling("Castable", "or", getglobal(this:GetParent():GetName().."_Debuffs"))
end
this.configClick = function()
if (XPerlConfig.RaidBuffs == 1) then
XPerlConfig.RaidDebuffs = 0
getglobal(this:GetParent():GetName().."_Debuffs"):SetChecked(0)
end
this.Validate()
XPerl_Raid_OptionActions()
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_DEBUFFS")
this.configVar = "RaidDebuffs"
this.Validate = function()
XPerl_Options_EnableSibling("Castable", "or", getglobal(this:GetParent():GetName().."_Buffs"))
end
this.configClick = function()
if (XPerlConfig.RaidDebuffs == 1) then
XPerlConfig.RaidBuffs = 0
getglobal(this:GetParent():GetName().."_Buffs"):SetChecked(0)
end
this.Validate()
XPerl_Raid_OptionActions()
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_CASTABLE")
this.configVar = "BuffsCastableCurable"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_BUFFSRIGHT")
this.configVar = "RaidBuffsRight"
this.configClick = XPerl_Raid_OptionActions
this.Validate = function()
XPerl_Options_EnableSibling("BuffsInside")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_BUFFSINSIDE")
this.configVar = "RaidBuffsInside"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_BUFFTOOLTIPHELPER")
this.configVar = "BuffTooltipHelper"
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_MOTION")
this.configVar = "RaidMotion"
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP1")
this.configVar = "ShowGroup1"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP2")
this.configVar = "ShowGroup2"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP3")
this.configVar = "ShowGroup3"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP4")
this.configVar = "ShowGroup4"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP5")
this.configVar = "ShowGroup5"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP6")
this.configVar = "ShowGroup6"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP7")
this.configVar = "ShowGroup7"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_GROUP8")
this.configVar = "ShowGroup8"
this.configClick = XPerl_Raid_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAID_SPACING")
getglobal(this:GetName().."High"):SetText("20")
getglobal(this:GetName().."Low"):SetText("0")
this:SetMinMaxValues(40, 60)
this:SetValueStep(1)
this:SetValue(XPerlConfig.RaidVerticalSpacing)
if (XPerlConfig.RaidVerticalSpacing ~= this:GetValue()) then
XPerlConfig.RaidVerticalSpacing = this:GetValue()
XPerl_Raid_OptionActions()
end
getglobal(this:GetName().."Current"):SetText(XPerlConfig.RaidVerticalSpacing - 40)
-- All Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_PORTRAIT")
this.flashFrame = {XPerl_Player_PortraitFrame, XPerl_Player_Pet_PortraitFrame, XPerl_Target_PortraitFrame, XPerl_party1_PortraitFrame, XPerl_party2_PortraitFrame, XPerl_party3_PortraitFrame, XPerl_party4_PortraitFrame}
this.flashEnd = XPerl_OptionActions
this.configClick = XPerl_OptionActions
this.configSelection = {"ShowPlayerPortrait", "ShowPlayerPetPortrait", "ShowTargetPortrait", "ShowPartyPortrait"}
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_PORTRAIT3D")
this.flashFrame = {XPerl_Player_PortraitFrame, XPerl_Player_Pet_PortraitFrame, XPerl_Target_PortraitFrame, XPerl_party1_PortraitFrame, XPerl_party2_PortraitFrame, XPerl_party3_PortraitFrame, XPerl_party4_PortraitFrame}
this.flashEnd = XPerl_OptionActions
this.configClick = XPerl_OptionActions
this.configSelection = {"ShowPlayerPortrait3D", "ShowPlayerPetPortrait3D", "ShowTargetPortrait3D", "ShowPartyPortrait3D"}
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_LEVEL")
this.flashFrame = {XPerl_Player_LevelFrame, XPerl_Player_Pet_LevelFrame, XPerl_Target_LevelFrame, XPerl_TargetTarget_LevelFrame, XPerl_TargetTargetTarget_LevelFrame, XPerl_party1_LevelFrame, XPerl_party2_LevelFrame, XPerl_party3_LevelFrame, XPerl_party4_LevelFrame}
this.flashEnd = XPerl_OptionActions
this.configClick = XPerl_OptionActions
this.configSelection = {"ShowPlayerLevel", "ShowPetLevel", "ShowTargetLevel", "ShowTargetTargetLevel", "ShowPartyLevel"}
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_ICON")
this.flashFrame = {XPerl_Player_ClassTexture, XPerl_Target_ClassTexture, XPerl_party1_LevelFrame_ClassTexture, XPerl_party2_LevelFrame_ClassTexture, XPerl_party3_LevelFrame_ClassTexture, XPerl_party4_LevelFrame_ClassTexture}
this.flashEnd = XPerl_OptionActions
this.configSelection = {"ShowPlayerClassIcon", "ShowTargetClassIcon", "ShowPartyClassIcon"}
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_PVPFLAG")
this.flashFrame = {XPerl_Player_PVPStatus, XPerl_Target_PVPStatus, XPerl_TargetTarget_NameFrame_PVPStatus, XPerl_TargetTargetTarget_NameFrame_PVPStatus, XPerl_party1_NameFrame_PVPStatus, XPerl_party2_NameFrame_PVPStatus, XPerl_party3_NameFrame_PVPStatus, XPerl_party4_NameFrame_PVPStatus}
this.flashEnd = XPerl_OptionActions
this.configSelection = {"ShowPlayerPVP", "ShowTargetPVP", "ShowPartyPVP"}
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_PVP")
this.flashFrame = {XPerl_Player_NameFrame_PVPRankIcon, XPerl_Target_NameFrame_PVPRankIcon, XPerl_TargetTarget_NameFrame_PVPRankIcon, XPerl_TargetTargetTarget_NameFrame_PVPRankIcon}
this.flashEnd = function()
for i,frame in pairs(this.flashFrame) do
frame:SetAlpha(0.3)
end
end
this.configSelection = {"ShowPlayerPVPRank", "ShowTargetPVPRank"}
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_VALUES")
this.flashFrame = {XPerl_Player_StatsFrame_HealthBarText, XPerl_Player_StatsFrame_ManaBarText, XPerl_Player_StatsFrame_XPBarText, XPerl_Target_StatsFrame_HealthBarText, XPerl_Target_StatsFrame_ManaBarText, XPerl_TargetTarget_StatsFrame_HealthBarText, XPerl_TargetTarget_StatsFrame_ManaBarText, XPerl_TargetTargetTarget_StatsFrame_HealthBarText, XPerl_TargetTargetTarget_StatsFrame_ManaBarText, XPerl_party1_StatsFrame_HealthBarText, XPerl_party1_StatsFrame_ManaBarText, XPerl_party2_StatsFrame_HealthBarText, XPerl_party2_StatsFrame_ManaBarText, XPerl_party3_StatsFrame_HealthBarText, XPerl_party3_StatsFrame_ManaBarText, XPerl_party4_StatsFrame_HealthBarText, XPerl_party4_StatsFrame_ManaBarText}
this.flashEnd = XPerl_OptionActions
this.configSelection = {"ShowPlayerValues", "ShowTargetValues", "ShowPartyValues", "ShowTargetTargetValues"}
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_ALL_PERCENT")
this.flashFrame = {XPerl_Player_StatsFrame_HealthBarPercent, XPerl_Player_StatsFrame_ManaBarPercent, XPerl_Player_StatsFrame_XPBarPercent, XPerl_Target_StatsFrame_HealthBarPercent, XPerl_TargetTarget_StatsFrame_HealthBarPercent, XPerl_TargetTargetTarget_StatsFrame_HealthBarPercent, XPerl_Target_StatsFrame_ManaBarPercent, XPerl_TargetTarget_StatsFrame_ManaBarPercent, XPerl_TargetTargetTarget_StatsFrame_ManaBarPercent, XPerl_party1_StatsFrame_HealthBarPercent, XPerl_party1_StatsFrame_ManaBarPercent, XPerl_party2_StatsFrame_HealthBarPercent, XPerl_party2_StatsFrame_ManaBarPercent, XPerl_party3_StatsFrame_HealthBarPercent, XPerl_party3_StatsFrame_ManaBarPercent, XPerl_party4_StatsFrame_HealthBarPercent, XPerl_party1_StatsFrame_ManaBarPercent, XPerl_party1_StatsFrame_HealthBarPercent, XPerl_party4_StatsFrame_ManaBarPercent}
this.flashEnd = XPerl_OptionActions
this.configSelection = {"ShowPlayerPercent", "ShowTargetPercent", "ShowPartyPercent", "ShowTargetTargetPercent"}
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_PLAYER")
this:SetChecked(IsAddOnLoaded("XPerl_Player"))
this.Validate = function()
XPerl_Options_EnableSibling("PlayerPet")
end
if (this:GetChecked()) then
EnableAddOn("XPerl_Player")
else
DisableAddOn("XPerl_Player")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_PET")
this:SetChecked(IsAddOnLoaded("XPerl_PlayerPet"))
if (this:GetChecked()) then
EnableAddOn("XPerl_PlayerPet")
else
DisableAddOn("XPerl_PlayerPet")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_TARGET")
this:SetChecked(IsAddOnLoaded("XPerl_Target"))
this.Validate = function()
XPerl_Options_EnableSibling("TargetTarget")
end
if (this:GetChecked()) then
EnableAddOn("XPerl_Target")
else
DisableAddOn("XPerl_Target")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_TARGETTARGET")
this:SetChecked(IsAddOnLoaded("XPerl_TargetTarget"))
if (this:GetChecked()) then
EnableAddOn("XPerl_TargetTarget")
else
DisableAddOn("XPerl_TargetTarget")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_PARTY")
this:SetChecked(IsAddOnLoaded("XPerl_Party"))
this.Validate = function()
XPerl_Options_EnableSibling("PartyPet")
end
if (this:GetChecked()) then
EnableAddOn("XPerl_Party")
else
DisableAddOn("XPerl_Party")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_PARTYPET")
this:SetChecked(IsAddOnLoaded("XPerl_PartyPet"))
if (this:GetChecked()) then
EnableAddOn("XPerl_PartyPet")
else
DisableAddOn("XPerl_PartyPet")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_RAID")
this:SetChecked(IsAddOnLoaded("XPerl_RaidFrames"))
if (this:GetChecked()) then
EnableAddOn("XPerl_RaidFrames")
else
DisableAddOn("XPerl_RaidFrames")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_RAIDHELP")
this:SetChecked(IsAddOnLoaded("XPerl_RaidHelper"))
if (this:GetChecked()) then
EnableAddOn("XPerl_RaidHelper")
else
DisableAddOn("XPerl_RaidHelper")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADDON_RAIDADMIN")
this:SetChecked(IsAddOnLoaded("XPerl_RaidAdmin"))
if (this:GetChecked()) then
EnableAddOn("XPerl_RaidAdmin")
else
DisableAddOn("XPerl_RaidAdmin")
end
-- Colour Options
XPerl_OptionsSetMyText(this, "XPERL_CONF_COLOUR_NAMES")
this.configVar = "ClassColouredNames"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_COLOUR_CLASSIC")
this.configVar = "ClassicHealthBar"
this.configClick = XPerl_OptionActions
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_ENABLE")
this.XconfigVar = "RaidHelper"
this.configClick = XPerl_EnableDisable
this.Validate = function()
XPerl_Options_EnableSibling("CTTargets")
XPerl_Options_EnableSibling("CollectOthers")
XPerl_Options_EnableSibling("ThreatBar")
XPerl_Options_EnableSibling("Tooltips")
XPerl_Options_EnableSibling("UnitWidth")
XPerl_Options_EnableSibling("UnitHeight")
XPerl_Options_EnableSibling("ScaleOther")
XPerl_Options_EnableSibling("Scale")
XPerl_Options_EnableSibling("Transparency")
XPerl_Options_EnableSibling("BkTransparency")
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_CTTARGETS")
this.XconfigVar = "UseCTRATargets"
this.configClick = XPerl_MTRosterChanged
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_COLLECTOTHERS")
this.XconfigVar = "CollectOtherTargets"
this.configClick = function() XPerl_Toggle_CollectOtherTargets(true); end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_THREATBAR")
this.XconfigVar = "ThreatBar"
this.configClick = function() XPerl_Toggle_CollectOtherTargets(true); end
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_TOOLTIPS")
this.XconfigVar = "Tooltips"
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_MAXTANKS")
getglobal(this:GetName().."Low"):SetText("1")
getglobal(this:GetName().."High"):SetText("10")
this:SetMinMaxValues(1, 10)
this:SetValueStep(1)
this:SetValue(XPerlConfigHelper.MaxMainTanks)
if (XPerlConfigHelper.MaxMainTanks ~= this:GetValue()) then
XPerlConfigHelper.MaxMainTanks = this:GetValue()
XPerl_MakeTankList()
XPerl_SetTitle()
end
getglobal(this:GetName().."Current"):SetText(XPerlConfigHelper.MaxMainTanks)
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_UNITWIDTH")
getglobal(this:GetName().."Low"):SetText(XPERL_UNIT_WIDTH_MIN)
getglobal(this:GetName().."High"):SetText(XPERL_UNIT_WIDTH_MAX)
if (XPERL_UNIT_WIDTH_MIN) then
this:SetMinMaxValues(XPERL_UNIT_WIDTH_MIN, XPERL_UNIT_WIDTH_MAX)
else
this:SetMinMaxValues(50, 125)
end
this:SetValueStep(5)
this:SetValue(XPerlConfigHelper.UnitWidth)
if (XPerlConfigHelper.UnitWidth ~= this:GetValue()) then
XPerlConfigHelper.UnitWidth = this:GetValue()
XPerl_MakeTankList(true)
XPerl_MakeOtherTargetList()
end
getglobal(this:GetName().."Current"):SetText(XPerlConfigHelper.UnitWidth)
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_UNITHEIGHT")
getglobal(this:GetName().."Low"):SetText(XPERL_UNIT_HEIGHT_MIN)
getglobal(this:GetName().."High"):SetText(XPERL_UNIT_HEIGHT_MAX)
if (XPERL_UNIT_HEIGHT_MIN) then
this:SetMinMaxValues(XPERL_UNIT_HEIGHT_MIN, XPERL_UNIT_HEIGHT_MAX)
else
this:SetMinMaxValues(17, 30)
end
this:SetValueStep(1)
this:SetValue(XPerlConfigHelper.UnitHeight)
if (XPerlConfigHelper.UnitHeight ~= this:GetValue()) then
XPerlConfigHelper.UnitHeight = this:GetValue()
XPerl_MakeTankList(true)
XPerl_MakeOtherTargetList()
end
getglobal(this:GetName().."Current"):SetText(XPerlConfigHelper.UnitHeight)
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_SCALEOTHER")
getglobal(this:GetName().."Low"):SetText("40%")
getglobal(this:GetName().."High"):SetText("100%")
this:SetMinMaxValues(40, 100)
this:SetValueStep(1)
this:SetValue(math.floor(XPerlConfigHelper.OtherTargets_Scale * 100 + 0.5))
if (XPerlConfigHelper.OtherTargets_Scale * 100 ~= this:GetValue()) then
XPerlConfigHelper.OtherTargets_Scale = this:GetValue() / 100
XPerl_MakeOtherTargetList()
XPerl_SetTitle()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.OtherTargets_Scale + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(XPerlConfigHelper.Targets_Scale * 100 + 0.5))
if (math.floor(XPerlConfigHelper.Targets_Scale * 100 + 0.5) ~= this:GetValue()) then
XPerlConfigHelper.Targets_Scale = this:GetValue() / 100
XPerl_SetupFrames()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.Targets_Scale + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_ALPHA")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0, 1)
this:SetValueStep(0.01)
this:SetValue(XPerlConfigHelper.Targets_Transparency)
if (XPerlConfigHelper.Targets_Transparency ~= this:GetValue()) then
XPerlConfigHelper.Targets_Transparency = this:GetValue()
XPerl_Frame:SetAlpha(XPerlConfigHelper.Targets_Transparency)
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.Targets_Transparency).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_RAIDHELP_BACKALPHA")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0, 1)
this:SetValueStep(0.01)
this:SetValue(XPerlConfigHelper.Background_Transparency)
if (XPerlConfigHelper.Background_Transparency ~= this:GetValue()) then
XPerlConfigHelper.Background_Transparency = this:GetValue()
if (XPerl_Frame) then
XPerl_SetupFrameSimple(XPerl_Frame, XPerlConfigHelper.Background_Transparency)
end
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.Background_Transparency).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_COUNTERS")
this.Validate = function()
XPerl_Options_EnableSibling("TargetCountersSelf")
XPerl_Options_EnableSibling("Enemy")
XPerl_Options_EnableSibling("Scale")
XPerl_Options_EnableSibling("Transparency")
XPerl_Options_EnableSibling("BackTransparency")
end
this.XconfigVar = "TargetCounters"
this.configClick = function()
if (XPerlConfigHelper.TargetCounters == 1) then
XPerl_AssistsView_Open()
else
XPerl_AssistsView_Close()
end
end
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_COUNTERSSELF")
this.XconfigVar = "TargetCountersSelf"
XPerl_OptionsSetMyText(this, "XPERL_CONF_TARGET_COUNTERSENEMY")
this.XconfigVar = "TargetCountersEnemy"
XPerl_OptionsSetMyText(this, "XPERL_CONF_ASSIST_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerlConfigHelper.Scale_AssistsFrame + 0.5))
if (math.floor(100 * XPerlConfigHelper.Scale_AssistsFrame + 0.5) ~= this:GetValue()) then
XPerlConfigHelper.Scale_AssistsFrame = this:GetValue() / 100
XPerl_SetupFrames()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.Scale_AssistsFrame + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_ASSIST_ALPHA")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0, 1)
this:SetValueStep(0.01)
this:SetValue(XPerlConfigHelper.AssistsFrame_Transparency)
if (XPerlConfigHelper.AssistsFrame_Transparency ~= this:GetValue()) then
XPerlConfigHelper.AssistsFrame_Transparency = this:GetValue()
--XPerl_Assists_Frame:SetAlpha(XPerlConfigHelper.AssistsFrame_Transparency)
--XPerlScrollSeperator:SetAlpha(XPerlConfigHelper.Assists_BackTransparency)
XPerl_SetupFrames()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.AssistsFrame_Transparency).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_ASSIST_BACKALPHA")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0, 1)
this:SetValueStep(0.01)
this:SetValue(XPerlConfigHelper.Assists_BackTransparency)
if (XPerlConfigHelper.Assists_BackTransparency ~= this:GetValue()) then
XPerlConfigHelper.Assists_BackTransparency = this:GetValue()
if (XPerl_Assists_Frame) then
XPerl_SetupFrameSimple(XPerl_Assists_Frame, XPerlConfigHelper.Assists_BackTransparency)
--XPerlScrollSeperator:SetAlpha(XPerlConfigHelper.Assists_BackTransparency)
--XPerl_SetupFrames()
end
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerlConfigHelper.Assists_BackTransparency).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADMIN_AUTOHIDESHOW")
this.XconfigVars = "XPerl_Admin"
this.XconfigVar = "AutoHideShow"
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADMIN_ALPHA")
getglobal(this:GetName().."High"):SetText("100%")
getglobal(this:GetName().."Low"):SetText("0%")
this:SetMinMaxValues(0, 100)
this:SetValueStep(1)
this:SetValue(math.floor(100 * XPerl_Admin.Transparency + 0.5))
if (math.floor(100 * XPerl_Admin.Transparency + 0.5) ~= this:GetValue()) then
XPerl_Admin.Transparency = this:GetValue() / 100
XPerl_AdminSetupFrames()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerl_Admin.Transparency + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_ITEMCHECK_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerl_Admin.Scale_ItemCheck + 0.5))
if (math.floor(100 * XPerl_Admin.Scale_ItemCheck + 0.5) ~= this:GetValue()) then
XPerl_Admin.Scale_ItemCheck = this:GetValue() / 100
XPerl_AdminSetupFrames()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerl_Admin.Scale_ItemCheck + 0.5).."%")
XPerl_OptionsSetMyText(this, "XPERL_CONF_ADMIN_SCALE")
XPerl_Options_RegisterScalingSlider(this)
this:SetValue(math.floor(100 * XPerl_Admin.Scale_Admin + 0.5))
if (math.floor(100 * XPerl_Admin.Scale_Admin + 0.5) ~= this:GetValue()) then
XPerl_Admin.Scale_Admin = this:GetValue() / 100
XPerl_AdminSetupFrames()
end
getglobal(this:GetName().."Current"):SetText(math.floor(100 * XPerl_Admin.Scale_Admin + 0.5).."%")