vanilla-wow-addons – Rev 1
?pathlinks?
<Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/
..\FrameXML\UI.xsd">
<Script file="Perl_Config_All.lua"/>
<Frame name="Perl_Config_All_Frame" frameStrata="DIALOG" hidden="true" enableMouse="true">
<Size>
<AbsDimension x="600" y="380"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="Perl_Config_Frame">
<Offset>
<AbsDimension x="0" y="-120"/>
</Offset>
</Anchor>
</Anchors>
<Layers>
<Layer level="ARTWORK">
<Texture name="Perl_Config_All_Header" file="Interface\DialogFrame\UI-DialogBox-Header">
<Size>
<AbsDimension x="256" y="64"/>
</Size>
<Anchors>
<Anchor point="TOP">
<Offset>
<AbsDimension x="0" y="12"/>
</Offset>
</Anchor>
</Anchors>
</Texture>
<FontString inherits="GameFontNormal" text="All">
<Anchors>
<Anchor point="TOP" relativeTo="Perl_Config_All_Header">
<Offset>
<AbsDimension x="0" y="-14"/>
</Offset>
</Anchor>
</Anchors>
</FontString>
<FontString name="$parent_Texture_Text" inherits="GameFontNormal" text="Textured Bars">
<Anchors>
<Anchor point="LEFT" relativePoint="TOPLEFT">
<Offset>
<AbsDimension x="20" y="-30"/>
</Offset>
</Anchor>
</Anchors>
</FontString>
<FontString name="$parent_Transparency_Text" inherits="GameFontNormal" text="Transparency">
<Anchors>
<Anchor point="LEFT" relativePoint="TOPLEFT">
<Offset>
<AbsDimension x="350" y="-30"/>
</Offset>
</Anchor>
</Anchors>
</FontString>
<FontString name="$parent_MiniMap_Text" inherits="GameFontNormal" text="MiniMap Button Position">
<Anchors>
<Anchor point="LEFT" relativePoint="TOPLEFT">
<Offset>
<AbsDimension x="350" y="-90"/>
</Offset>
</Anchor>
</Anchors>
</FontString>
<FontString name="$parent_Misc_Text" inherits="GameFontNormal" text="Frames">
<Anchors>
<Anchor point="LEFT" relativePoint="TOPLEFT">
<Offset>
<AbsDimension x="20" y="-190"/>
</Offset>
</Anchor>
</Anchors>
</FontString>
<FontString name="$parent_Scaling_Text" inherits="GameFontNormal" text="Scaling">
<Anchors>
<Anchor point="LEFT" relativePoint="TOPLEFT">
<Offset>
<AbsDimension x="20" y="-325"/>
</Offset>
</Anchor>
</Anchors>
</FontString>
</Layer>
</Layers>
<Frames>
<CheckButton name="$parent_CheckButton1" inherits="UICheckButtonTemplate" id="1">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Texture_Text">
<Offset>
<AbsDimension x="20" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Texture #1");
</OnLoad>
<OnClick>
Perl_Config_All_Frame_CheckButton2:SetChecked(nil) <!-- We need to uncheck Button 2 -->
Perl_Config_All_Frame_CheckButton3:SetChecked(nil) <!-- We need to uncheck Button 3 -->
Perl_Config_All_Frame_CheckButton4:SetChecked(nil) <!-- We need to uncheck Button 4 -->
Perl_Config_All_Frame_CheckButton5:SetChecked(nil) <!-- We need to uncheck Button 5 -->
Perl_Config_All_Frame_CheckButton6:SetChecked(nil) <!-- We need to uncheck Button 6 -->
Perl_Config_All_Texture_Update(1);
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton2" inherits="UICheckButtonTemplate" id="2">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_CheckButton1">
<Offset>
<AbsDimension x="0" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Texture #2");
</OnLoad>
<OnClick>
Perl_Config_All_Frame_CheckButton1:SetChecked(nil) <!-- We need to uncheck Button 1 -->
Perl_Config_All_Frame_CheckButton3:SetChecked(nil) <!-- We need to uncheck Button 3 -->
Perl_Config_All_Frame_CheckButton4:SetChecked(nil) <!-- We need to uncheck Button 4 -->
Perl_Config_All_Frame_CheckButton5:SetChecked(nil) <!-- We need to uncheck Button 5 -->
Perl_Config_All_Frame_CheckButton6:SetChecked(nil) <!-- We need to uncheck Button 6 -->
Perl_Config_All_Texture_Update(2);
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton3" inherits="UICheckButtonTemplate" id="3">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_CheckButton2">
<Offset>
<AbsDimension x="0" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Texture #3");
</OnLoad>
<OnClick>
Perl_Config_All_Frame_CheckButton1:SetChecked(nil) <!-- We need to uncheck Button 1 -->
Perl_Config_All_Frame_CheckButton2:SetChecked(nil) <!-- We need to uncheck Button 2 -->
Perl_Config_All_Frame_CheckButton4:SetChecked(nil) <!-- We need to uncheck Button 4 -->
Perl_Config_All_Frame_CheckButton5:SetChecked(nil) <!-- We need to uncheck Button 5 -->
Perl_Config_All_Frame_CheckButton6:SetChecked(nil) <!-- We need to uncheck Button 6 -->
Perl_Config_All_Texture_Update(3);
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton4" inherits="UICheckButtonTemplate" id="4">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_CheckButton3">
<Offset>
<AbsDimension x="0" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Texture #4");
</OnLoad>
<OnClick>
Perl_Config_All_Frame_CheckButton1:SetChecked(nil) <!-- We need to uncheck Button 1 -->
Perl_Config_All_Frame_CheckButton2:SetChecked(nil) <!-- We need to uncheck Button 2 -->
Perl_Config_All_Frame_CheckButton3:SetChecked(nil) <!-- We need to uncheck Button 3 -->
Perl_Config_All_Frame_CheckButton5:SetChecked(nil) <!-- We need to uncheck Button 5 -->
Perl_Config_All_Frame_CheckButton6:SetChecked(nil) <!-- We need to uncheck Button 6 -->
Perl_Config_All_Texture_Update(4);
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton5" inherits="UICheckButtonTemplate" id="5">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_CheckButton4">
<Offset>
<AbsDimension x="0" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Texture #5");
</OnLoad>
<OnClick>
Perl_Config_All_Frame_CheckButton1:SetChecked(nil) <!-- We need to uncheck Button 1 -->
Perl_Config_All_Frame_CheckButton2:SetChecked(nil) <!-- We need to uncheck Button 2 -->
Perl_Config_All_Frame_CheckButton3:SetChecked(nil) <!-- We need to uncheck Button 3 -->
Perl_Config_All_Frame_CheckButton4:SetChecked(nil) <!-- We need to uncheck Button 4 -->
Perl_Config_All_Frame_CheckButton6:SetChecked(nil) <!-- We need to uncheck Button 6 -->
Perl_Config_All_Texture_Update(5);
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton6" inherits="UICheckButtonTemplate" id="6">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_CheckButton5">
<Offset>
<AbsDimension x="0" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("No Texture");
</OnLoad>
<OnClick>
Perl_Config_All_Frame_CheckButton1:SetChecked(nil) <!-- We need to uncheck Button 1 -->
Perl_Config_All_Frame_CheckButton2:SetChecked(nil) <!-- We need to uncheck Button 2 -->
Perl_Config_All_Frame_CheckButton3:SetChecked(nil) <!-- We need to uncheck Button 3 -->
Perl_Config_All_Frame_CheckButton4:SetChecked(nil) <!-- We need to uncheck Button 4 -->
Perl_Config_All_Frame_CheckButton5:SetChecked(nil) <!-- We need to uncheck Button 5 -->
Perl_Config_All_Texture_Update(0);
</OnClick>
</Scripts>
</CheckButton>
<Button name="$parent_Button1" inherits="UIPanelButtonTemplate" text="Lock All Frames">
<Size>
<AbsDimension x="170" y="22"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Misc_Text">
<Offset>
<AbsDimension x="20" y="-45"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnClick>
Perl_Config_All_Lock_Unlock(1);
</OnClick>
</Scripts>
</Button>
<Button name="$parent_Button2" inherits="UIPanelButtonTemplate" text="Unlock All Frames">
<Size>
<AbsDimension x="170" y="22"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Button1">
<Offset>
<AbsDimension x="0" y="-30"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnClick>
Perl_Config_All_Lock_Unlock(0);
</OnClick>
</Scripts>
</Button>
<Slider name="$parent_Slider1" inherits="OptionsSliderTemplate" minValue="1" maxValue="149" valueStep="1">
<Size>
<AbsDimension x="200" y="15"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Scaling_Text">
<Offset>
<AbsDimension x="20" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnValueChanged>
getglobal(this:GetName().."Text"):SetText(getglobal(this:GetName()):GetValue());
Perl_Config_All_Set_Scale(getglobal(this:GetName()):GetValue());
</OnValueChanged>
</Scripts>
</Slider>
<CheckButton name="$parent_CheckButton7" inherits="UICheckButtonTemplate" id="7">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPRIGHT" relativeTo="$parent_Slider1">
<Offset>
<AbsDimension x="20" y="0"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Set To Current UI Scale");
</OnLoad>
<OnClick>
Perl_Config_All_Set_Scale();
</OnClick>
</Scripts>
</CheckButton>
<Slider name="$parent_Slider2" inherits="OptionsSliderTemplate" minValue="0" maxValue="100" valueStep="1">
<Size>
<AbsDimension x="200" y="15"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Transparency_Text">
<Offset>
<AbsDimension x="20" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnValueChanged>
getglobal(this:GetName().."Text"):SetText(getglobal(this:GetName()):GetValue());
Perl_Config_All_Set_Transparency(getglobal(this:GetName()):GetValue());
</OnValueChanged>
</Scripts>
</Slider>
<Slider name="$parent_Slider3" inherits="OptionsSliderTemplate" minValue="0" maxValue="360" valueStep="1">
<Size>
<AbsDimension x="260" y="15"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_MiniMap_Text">
<Offset>
<AbsDimension x="-40" y="-25"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnValueChanged>
getglobal(this:GetName().."Text"):SetText(getglobal(this:GetName()):GetValue());
Perl_Config_All_Set_MiniMap_Position(getglobal(this:GetName()):GetValue());
</OnValueChanged>
</Scripts>
</Slider>
<CheckButton name="$parent_CheckButton8" inherits="UICheckButtonTemplate" id="8">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_MiniMap_Text">
<Offset>
<AbsDimension x="20" y="-50"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Show MiniMap Button");
</OnLoad>
<OnClick>
Perl_Config_All_Set_MiniMap_Button();
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton9" inherits="UICheckButtonTemplate" id="9">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Misc_Text">
<Offset>
<AbsDimension x="20" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Transparent Frame Background");
</OnLoad>
<OnClick>
Perl_Config_All_Set_Transparent_Background();
</OnClick>
</Scripts>
</CheckButton>
<Button name="$parent_Button3" inherits="UIPanelButtonTemplate" text="Load Global Settings">
<Size>
<AbsDimension x="150" y="22"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPRIGHT" relativeTo="$parent_Button1">
<Offset>
<AbsDimension x="200" y="0"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnClick>
Perl_Config_Global_Load_Settings();
Perl_Config_All_Display();
DEFAULT_CHAT_FRAME:AddMessage("|cffffff00Perl Classic Unit Frames: Global Settings Loaded.");
</OnClick>
</Scripts>
</Button>
<Button name="$parent_Button4" inherits="UIPanelButtonTemplate" text="Save Global Settings">
<Size>
<AbsDimension x="150" y="22"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Button3">
<Offset>
<AbsDimension x="0" y="-30"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnClick>
Perl_Config_Global_Save_Settings();
DEFAULT_CHAT_FRAME:AddMessage("|cffffff00Perl Classic Unit Frames: Global Settings Saved.");
</OnClick>
</Scripts>
</Button>
<Button name="$parent_Button5" inherits="UIPanelButtonTemplate" text="Reset Frame Positions">
<Size>
<AbsDimension x="170" y="22"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Button2">
<Offset>
<AbsDimension x="0" y="-30"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnClick>
Perl_Config_Frame_Reset_Positions();
DEFAULT_CHAT_FRAME:AddMessage("|cffffff00Perl Classic Unit Frames: Frame Positions have been reset.");
</OnClick>
</Scripts>
</Button>
<CheckButton name="$parent_CheckButton10" inherits="UICheckButtonTemplate" id="10">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_Misc_Text">
<Offset>
<AbsDimension x="210" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("CastParty/Genesis Support");
</OnLoad>
<OnClick>
Perl_Config_All_Set_CastParty_Support();
</OnClick>
</Scripts>
</CheckButton>
<CheckButton name="$parent_CheckButton11" inherits="UICheckButtonTemplate" id="11">
<Size>
<AbsDimension x="20" y="20"/>
</Size>
<Anchors>
<Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="$parent_CheckButton10">
<Offset>
<AbsDimension x="0" y="-20"/>
</Offset>
</Anchor>
</Anchors>
<Scripts>
<OnLoad>
getglobal(this:GetName().."Text"):SetText("Progressively Colored Health Bars");
</OnLoad>
<OnClick>
Perl_Config_All_Set_Color_Health();
</OnClick>
</Scripts>
</CheckButton>
</Frames>
</Frame>
</Ui>
Generated by GNU Enscript 1.6.5.90.