Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <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="Warmup.lua"/>
- <Frame name="WarmupOutputFrame" enableMouse="true" movable="true" parent="UIParent" hidden="true">
- <Anchors>
- <Anchor point="LEFT"/>
- </Anchors>
- <Size>
- <AbsDimension x="430" y="480"/>
- </Size>
- <TitleRegion setAllPoints="true"/>
- <Backdrop bgFile="Interface\Tooltips\UI-Tooltip-Background" 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>
- <ScrollingMessageFrame name="WarmupChatFrame" displayDuration="604800.0" maxLines="500">
- <Anchors>
- <Anchor point="TOPLEFT">
- <Offset>
- <AbsDimension x="7" y="-7"/>
- </Offset>
- </Anchor>
- <Anchor point="BOTTOMRIGHT">
- <Offset>
- <AbsDimension x="-8" y="9"/>
- </Offset>
- </Anchor>
- </Anchors>
- <Scripts>
- <OnLoad>
- self:EnableMouseWheel(1)
- </OnLoad>
- <OnMouseWheel>
- if delta > 0 then
- if IsShiftKeyDown() then
- for i = 1, 20 do
- self:ScrollUp()
- end
- else
- self:ScrollUp()
- end
- elseif 0 > delta then
- if IsShiftKeyDown() then
- for i = 1, 20 do
- self:ScrollDown()
- end
- else
- self:ScrollDown()
- end
- end
- </OnMouseWheel>
- </Scripts>
- <FontString inherits="ChatFontNormal" justifyH="LEFT"/>
- </ScrollingMessageFrame>
- </Frames>
- <Scripts>
- <OnLoad>
- -- set our default colors
- self:SetBackdropBorderColor(0.9, 0.82, 0.0);
- self:SetBackdropColor(0, 0, 0);
- </OnLoad>
- </Scripts>
- </Frame>
- </Ui>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement