vanilla-wow-addons – Rev 1

Subversion Repositories:
Rev:
<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_Player.lua"/>


        <!-- Real Frames -->
        <Frame name="Perl_Player_Frame" movable="true" parent="UIParent" hidden="true" enableMouse="true">
                <Size>
                        <!-- The size of this frame determines what can be clicked for the menu and moving, hence it is the same size as the name frame. (This is no longer true in 0.48) -->
                        <AbsDimension x="200" y="24"/>
                </Size>
                <Anchors>
                        <Anchor point="TOPLEFT">
                                <Offset>
                                        <AbsDimension x="-3" y="-43"/>
                                </Offset>
                        </Anchor>
                </Anchors>


                <!-- Script Events -->
                <Scripts>
                        <OnLoad>
                                Perl_Player_OnLoad();
                        </OnLoad>
                        <OnEvent>
                                Perl_Player_OnEvent(event);
                        </OnEvent>
                        <OnUpdate>
                                Perl_Player_Portrait_Combat_Text();
                        </OnUpdate>
                </Scripts>


                <!-- Main Frames -->
                <Frames>
                        <!-- Frame for the drop down menu. -->
                        <Frame name="Perl_Player_DropDown" inherits="UIDropDownMenuTemplate" id="1" hidden="true">
                                <Size>
                                        <AbsDimension x="10" y="10"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOP">
                                                <Offset>
                                                        <AbsDimension x="0" y="0"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Scripts>
                                        <OnLoad>
                                                Perl_PlayerDropDown_OnLoad();
                                        </OnLoad>
                                </Scripts>
                        </Frame>


                        <!-- Player Name -->
                        <Frame name="Perl_Player_NameFrame">
                                <Size>
                                        <AbsDimension x="200" y="24"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPLEFT">
                                                <Offset>
                                                        <AbsDimension x="0" y="0"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Backdrop bgFile="Interface\AddOns\Perl_Config\Perl_Black" edgeFile="Interface\Tooltips\UI-Tooltip-Border" tile="true">
                                        <EdgeSize>
                                                <AbsValue val="16"/>
                                        </EdgeSize>
                                        <TileSize>
                                                <AbsValue val="16"/>
                                        </TileSize>
                                        <BackgroundInsets>
                                                <AbsInset left="5" right="5" top="5" bottom="5"/>
                                        </BackgroundInsets>
                                </Backdrop>
                                <Layers>
                                        <Layer level="OVERLAY">
                                                <!-- Rest/Combat Icon -->
                                                <Texture name="Perl_Player_ActivityStatus" file="Interface\CharacterFrame\UI-StateIcon">
                                                        <Size>
                                                                <AbsDimension x="32" y="31"/>
                                                        </Size>
                                                        <Anchors>
                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                        <Offset>
                                                                                <AbsDimension x="0" y="0"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Texture>

                                                <!-- PVP Icon -->
                                                <Texture name="Perl_Player_PVPStatus" file="Interface\TargetingFrame\UI-PVP-FFA">
                                                        <Size>
                                                                <AbsDimension x="32" y="32"/>
                                                        </Size>
                                                        <Anchors>
                                                                <Anchor point="TOPLEFT" relativePoint="TOPLEFT">
                                                                        <Offset>
                                                                                <AbsDimension x="2" y="-2"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Texture>

                                                <!-- Leader Icon -->
                                                <Texture name="Perl_Player_LeaderIcon" file="Interface\GroupFrame\UI-Group-LeaderIcon" hidden="true">
                                                        <Size>
                                                                <AbsDimension x="16" y="16"/>
                                                        </Size>
                                                        <Anchors>
                                                                <Anchor point="TOP">
                                                                        <Offset>
                                                                                <AbsDimension x="0" y="7"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Texture>

                                                <!-- Master Icon -->
                                                <Texture name="Perl_Player_MasterIcon" file="Interface\GroupFrame\UI-Group-MasterLooter" hidden="true">
                                                        <Size>
                                                                <AbsDimension x="16" y="16"/>
                                                        </Size>
                                                        <Anchors>
                                                                <Anchor point="TOPLEFT">
                                                                        <Offset>
                                                                                <AbsDimension x="65" y="7"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Texture>
                                        </Layer>
                                </Layers>
                        </Frame>


                        <!-- Player Name Frame for ArcaneBar improvement -->
                        <Frame name="Perl_Player_Name">
                                <Size>
                                        <AbsDimension x="200" y="24"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="Perl_Player_NameFrame">
                                                <Offset>
                                                        <AbsDimension x="0" y="0"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Frames>
                                        <Button name="Perl_Player_Name_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="200" y="24"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>
                                </Frames>
                                <Layers>
                                        <Layer level="OVERLAY">
                                                <!-- Name Text -->
                                                <Fontstring name="Perl_Player_NameBarText" inherits="GameFontNormal" text="Error!">
                                                        <Anchors>
                                                                <Anchor point="LEFT" relativeTo="Perl_Player_ClassTexture" relativePoint="RIGHT">
                                                                        <Offset>
                                                                                <AbsDimension x="5" y="0"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                        <Color r="1" g="1" b="0"/>
                                                </Fontstring>
                                        </Layer>
                                </Layers>
                        </Frame>


                        <!-- Player Raid Group Number Frame -->
                        <Frame name="Perl_Player_RaidGroupNumberFrame">
                                <Size>
                                        <AbsDimension x="65" y="24"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPLEFT" relativePoint="TOPLEFT" relativeTo="Perl_Player_NameFrame">
                                                <Offset>
                                                        <AbsDimension x="0" y="20"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Frames>
                                        <Button name="Perl_Player_RaidGroupNumberFrame_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="65" y="24"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>
                                </Frames>
                                <Backdrop bgFile="Interface\AddOns\Perl_Config\Perl_Black" edgeFile="Interface\Tooltips\UI-Tooltip-Border" tile="true">
                                        <EdgeSize>
                                                <AbsValue val="16"/>
                                        </EdgeSize>
                                        <TileSize>
                                                <AbsValue val="16"/>
                                        </TileSize>
                                        <BackgroundInsets>
                                                <AbsInset left="5" right="5" top="5" bottom="5"/>
                                        </BackgroundInsets>
                                </Backdrop>
                                <Layers>
                                        <Layer level="OVERLAY">
                                                <!-- Raid Group Number Text -->
                                                <Fontstring name="Perl_Player_RaidGroupNumberBarText" inherits="GameFontNormal" text="Error!">
                                                        <Anchors>
                                                                <Anchor point="TOP">
                                                                        <Offset>
                                                                                <AbsDimension x="0" y="-5"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Fontstring>
                                        </Layer>
                                </Layers>
                        </Frame>


                        <!-- Level Frame -->
                        <Frame name="Perl_Player_LevelFrame">
                                <Size>
                                        <AbsDimension x="34" y="42"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPLEFT" relativePoint="BOTTOMLEFT" relativeTo="Perl_Player_NameFrame">
                                                <Offset>
                                                        <AbsDimension x="0" y="5"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Frames>
                                        <Button name="Perl_Player_LevelFrame_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="34" y="42"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>
                                </Frames>
                                <Backdrop bgFile="Interface\AddOns\Perl_Config\Perl_Black" edgeFile="Interface\Tooltips\UI-Tooltip-Border" tile="true">
                                        <EdgeSize>
                                                <AbsValue val="16"/>
                                        </EdgeSize>
                                        <TileSize>
                                                <AbsValue val="16"/>
                                        </TileSize>
                                        <BackgroundInsets>
                                                <AbsInset left="5" right="5" top="5" bottom="5"/>
                                        </BackgroundInsets>
                                </Backdrop>
                                <Layers>
                                        <Layer level="OVERLAY">
                                                <!-- Class Icon -->
                                                <Texture name="Perl_Player_ClassTexture" file="Interface\Glues\CharacterCreate\UI-CharacterCreate-Classes">
                                                        <Size>
                                                                <AbsDimension x="24" y="24"/>
                                                        </Size>
                                                        <Anchors>
                                                                <Anchor point="TOPLEFT" relativePoint="TOPLEFT">
                                                                        <Offset>
                                                                                <AbsDimension x="5" y="-5"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Texture>

                                                <!-- Level Text -->
                                                <Fontstring name="Perl_Player_LevelFrame_LevelBarText" inherits="GameFontNormalSmall" text="Error!">
                                                        <Anchors>
                                                                <Anchor point="BOTTOM">
                                                                        <Offset>
                                                                                <AbsDimension x="0" y="4"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Fontstring>
                                        </Layer>
                                </Layers>
                        </Frame>


                        <!-- Portrait Frame -->
                        <Frame name="Perl_Player_PortraitFrame">
                                <Size>
                                        <AbsDimension x="60" y="61"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPRIGHT" relativePoint="TOPLEFT" relativeTo="Perl_Player_NameFrame">
                                                <Offset>
                                                        <AbsDimension x="5" y="0"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Backdrop bgFile="Interface\AddOns\Perl_Config\Perl_Black" edgeFile="Interface\Tooltips\UI-Tooltip-Border" tile="true">
                                        <EdgeSize>
                                                <AbsValue val="16"/>
                                        </EdgeSize>
                                        <TileSize>
                                                <AbsValue val="16"/>
                                        </TileSize>
                                        <BackgroundInsets>
                                                <AbsInset left="5" right="5" top="5" bottom="5"/>
                                        </BackgroundInsets>
                                </Backdrop>
                                <Frames>
                                        <Button name="Perl_Player_PortraitFrame_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="60" y="61"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>
                                        <PlayerModel name="$parent_PlayerModel" hidden="true">
                                                <Size>
                                                        <AbsDimension x="50" y="50"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="CENTER">
                                                                <Offset>
                                                                        <AbsDimension x="1" y="-1"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnUpdate>
                                                                this:SetCamera(0);
                                                        </OnUpdate>
                                                </Scripts>
                                        </PlayerModel>
                                </Frames>
                                <Layers>
                                        <!-- Portrait -->
                                        <Layer level="ARTWORK">
                                                <Texture name="Perl_Player_Portrait">
                                                        <Size>
                                                                <AbsDimension x="48" y="48"/>
                                                        </Size>
                                                        <Anchors>
                                                                <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_PortraitFrame">
                                                                        <Offset>
                                                                                <AbsDimension x="0" y="-6"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Texture>
                                        </Layer>
                                </Layers>
                        </Frame>


                        <!-- Portrait Text Frame -->
                        <Frame name="Perl_Player_PortraitTextFrame">
                                <Size>
                                        <AbsDimension x="60" y="61"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPLEFT" relativePoint="TOPRIGHT" relativeTo="Perl_Player_PortraitFrame">
                                                <Offset>
                                                        <AbsDimension x="0" y="0"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Layers>
                                        <Layer level="OVERLAY">
                                                <Fontstring name="Perl_Player_HitIndicator" inherits="NumberFontNormalHuge" hidden="true" text="Error!">
                                                        <FontHeight>
                                                                <AbsValue val="30"/>
                                                        </FontHeight>
                                                        <Color r="1.0" g="1.0" b="1.0"/>
                                                        <Anchors>
                                                                <Anchor point="CENTER" relativePoint="CENTER" relativeTo="Perl_Player_PortraitFrame">
                                                                        <Offset>
                                                                                <AbsDimension x="0" y="0"/>
                                                                        </Offset>
                                                                </Anchor>
                                                        </Anchors>
                                                </Fontstring>
                                        </Layer>
                                </Layers>
                        </Frame>


                        <!-- Player Stats -->
                        <Frame name="Perl_Player_StatsFrame">
                                <Size>
                                        <AbsDimension x="240" y="54"/>
                                </Size>
                                <Anchors>
                                        <Anchor point="TOPLEFT" relativePoint="BOTTOMLEFT" relativeTo="Perl_Player_NameFrame">
                                                <Offset>
                                                        <AbsDimension x="30" y="5"/>
                                                </Offset>
                                        </Anchor>
                                </Anchors>
                                <Backdrop bgFile="Interface\AddOns\Perl_Config\Perl_Black" edgeFile="Interface\Tooltips\UI-Tooltip-Border" tile="true">
                                        <EdgeSize>
                                                <AbsValue val="16"/>
                                        </EdgeSize>
                                        <TileSize>
                                                <AbsValue val="16"/>
                                        </TileSize>
                                        <BackgroundInsets>
                                                <AbsInset left="5" right="5" top="5" bottom="5"/>
                                        </BackgroundInsets>
                                </Backdrop>
                                <Frames>
                                        <!-- 1.10 Click Solution -->
                                        <Button name="Perl_Player_StatsFrame_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="240" y="54"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>

                                        <!-- Health Bar -->
                                        <StatusBar name="Perl_Player_HealthBar" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT">
                                                                <Offset>
                                                                        <AbsDimension x="10" y="-10"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture name="Perl_Player_HealthBarTex" file="Interface\TargetingFrame\UI-StatusBar"/>
                                                <BarColor r="0" g="0.8" b="0"/>
                                                <Layers>
                                                        <!-- Text -->
                                                        <Layer level="OVERLAY">
                                                                <Fontstring name="Perl_Player_HealthBarText" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                                        <Offset>
                                                                                                <AbsDimension x="70" y="0"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                                <Fontstring name="Perl_Player_HealthBarTextPercent" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="TOP" relativePoint="TOP">
                                                                                        <Offset>
                                                                                                <AbsDimension x="0" y="1"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                                <Fontstring name="Perl_Player_HealthBarTextCompactPercent" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                                        <Offset>
                                                                                                <AbsDimension x="35" y="0"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                        </Layer>
                                                </Layers>
                                        </StatusBar>
                                        <StatusBar name="Perl_Player_HealthBarBG" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_HealthBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture file="Interface\TargetingFrame\UI-TargetingFrame-BarFill"/>
                                                <BarColor r="0" g="0.8" b="0" a="0.25"/>
                                        </StatusBar>
                                        <Button name="Perl_Player_HealthBar_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_HealthBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnEnter>
                                                                Perl_Player_HealthShow();
                                                        </OnEnter>
                                                        <OnLeave>
                                                                Perl_Player_HealthHide();
                                                        </OnLeave>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>

                                        <!-- Mana Bar -->
                                        <StatusBar name="Perl_Player_ManaBar" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="BOTTOM" relativeTo="Perl_Player_HealthBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="-2"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture name="Perl_Player_ManaBarTex" file="Interface\TargetingFrame\UI-StatusBar"/>
                                                <BarColor r="0" g="0" b="1"/>
                                                <Layers>
                                                        <!-- Text -->
                                                        <Layer level="OVERLAY">
                                                                <Fontstring name="Perl_Player_ManaBarText" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                                        <Offset>
                                                                                                <AbsDimension x="70" y="0"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                                <Fontstring name="Perl_Player_ManaBarTextPercent" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="TOP" relativePoint="TOP">
                                                                                        <Offset>
                                                                                                <AbsDimension x="0" y="1"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                                <Fontstring name="Perl_Player_ManaBarTextCompactPercent" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                                        <Offset>
                                                                                                <AbsDimension x="35" y="0"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                        </Layer>
                                                </Layers>
                                        </StatusBar>
                                        <StatusBar name="Perl_Player_ManaBarBG" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_ManaBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture file="Interface\TargetingFrame\UI-TargetingFrame-BarFill"/>
                                                <BarColor r="0" g="0" b="1" a="0.25"/>
                                        </StatusBar>
                                        <Button name="Perl_Player_ManaBar_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_ManaBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnEnter>
                                                                Perl_Player_ManaShow();
                                                        </OnEnter>
                                                        <OnLeave>
                                                                Perl_Player_ManaHide();
                                                        </OnLeave>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>

                                        <!-- Druid Mana Bar -->
                                        <StatusBar name="Perl_Player_DruidBar" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="BOTTOM" relativeTo="Perl_Player_HealthBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="-2"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture name="Perl_Player_DruidBarTex" file="Interface\TargetingFrame\UI-StatusBar"/>
                                                <BarColor r="0" g="0" b="1"/>
                                                <Layers>
                                                        <!-- Text -->
                                                        <Layer level="OVERLAY">
                                                                <Fontstring name="Perl_Player_DruidBarText" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                                        <Offset>
                                                                                                <AbsDimension x="70" y="0"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                                <Fontstring name="Perl_Player_DruidBarTextPercent" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="TOP" relativePoint="TOP">
                                                                                        <Offset>
                                                                                                <AbsDimension x="0" y="1"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                                <Fontstring name="Perl_Player_DruidBarTextCompactPercent" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="RIGHT" relativePoint="RIGHT">
                                                                                        <Offset>
                                                                                                <AbsDimension x="35" y="0"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                        </Layer>
                                                </Layers>
                                        </StatusBar>
                                        <StatusBar name="Perl_Player_DruidBarBG" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_DruidBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture file="Interface\TargetingFrame\UI-TargetingFrame-BarFill"/>
                                                <BarColor r="0" g="0" b="1" a="0.25"/>
                                        </StatusBar>
                                        <Button name="Perl_Player_DruidBar_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="150" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_DruidBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnEnter>
                                                                Perl_Player_DruidBarManaShow();
                                                        </OnEnter>
                                                        <OnLeave>
                                                                Perl_Player_DruidBarManaHide();
                                                        </OnLeave>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>

                                        <!-- XP Bar -->
                                        <StatusBar name="Perl_Player_XPBar" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="220" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOPLEFT" relativePoint="BOTTOMLEFT" relativeTo="Perl_Player_ManaBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="-2"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture name="Perl_Player_XPBarTex" file="Interface\TargetingFrame\UI-StatusBar"/>
                                                <BarColor r="0" g="0.6" b="0.6"/>
                                                <Layers>
                                                        <!-- Text -->
                                                        <Layer level="OVERLAY">
                                                                <Fontstring name="Perl_Player_XPBarText" inherits="GameFontNormalSmall" text="Error!">
                                                                        <Anchors>
                                                                                <Anchor point="TOP" relativePoint="TOP">
                                                                                        <Offset>
                                                                                                <AbsDimension x="0" y="1"/>
                                                                                        </Offset>
                                                                                </Anchor>
                                                                        </Anchors>
                                                                        <Color r="1" g="1" b="1"/>
                                                                </Fontstring>
                                                        </Layer>
                                                </Layers>
                                        </StatusBar>
                                        <StatusBar name="Perl_Player_XPBarBG" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="220" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_XPBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture file="Interface\TargetingFrame\UI-TargetingFrame-BarFill"/>
                                                <BarColor r="0" g="0.6" b="0.6" a="0.25"/>
                                        </StatusBar>
                                        <StatusBar name="Perl_Player_XPRestBar" inherits="TextStatusBar">
                                                <Size>
                                                        <AbsDimension x="220" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_XPBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <BarTexture  name="Perl_Player_XPRestBarTex" file="Interface\TargetingFrame\UI-TargetingFrame-BarFill"/>
                                                <BarColor r="0" g="0.6" b="0.6" a="0.5"/>
                                        </StatusBar>
                                        <Button name="Perl_Player_XPBar_CastClickOverlay">
                                                <Size>
                                                        <AbsDimension x="220" y="10"/>
                                                </Size>
                                                <Anchors>
                                                        <Anchor point="TOP" relativePoint="TOP" relativeTo="Perl_Player_XPBar">
                                                                <Offset>
                                                                        <AbsDimension x="0" y="0"/>
                                                                </Offset>
                                                        </Anchor>
                                                </Anchors>
                                                <Scripts>
                                                        <OnLoad>
                                                                this:RegisterForClicks('LeftButtonUp', 'RightButtonUp', 'MiddleButtonUp', 'Button4Up', 'Button5Up');
                                                        </OnLoad>
                                                        <OnEnter>
                                                                Perl_Player_XPTooltip();
                                                        </OnEnter>
                                                        <OnLeave>
                                                                GameTooltip:Hide();
                                                        </OnLeave>
                                                        <OnClick>
                                                                Perl_Player_MouseClick(arg1);
                                                        </OnClick>
                                                        <OnMouseDown>
                                                                Perl_Player_MouseDown(arg1);
                                                        </OnMouseDown>
                                                        <OnMouseUp>
                                                                Perl_Player_MouseUp(arg1);
                                                        </OnMouseUp>
                                                </Scripts>
                                        </Button>
                                </Frames>
                        </Frame>
                </Frames>
        </Frame>
</Ui>

Generated by GNU Enscript 1.6.5.90.