WoWInterface

WoWInterface (http://www.wowinterface.com/forums/index.php)
-   OpenRDX: Post your UIs & DUIs (http://www.wowinterface.com/forums/forumdisplay.php?f=108)
-   -   Mine ! (Kasteel UI) (http://www.wowinterface.com/forums/showthread.php?t=23327)

Cripsii 05-06-09 09:51 PM

Mine ! (Kasteel UI)
 
Hi !

It's My UI... old, because I do not have much time to devote to wow. I prefer my love always, EVE Online:)

There has never been a release.

If you like It Maybe I will make a recovery :)

Only 2 screens in Alterac:




All provide by RDX exept the scrolling text (MSBT)

It's compatible with RDX 7.1.13

Enjoy and Fly Safe !

Inrego 03-16-10 03:59 PM

How did you make the buttons above your chat windows?

Brainn 03-16-10 07:35 PM

looks like the default blizzard chat-window/chat-tabs with different textures.

Inrego 03-17-10 04:15 AM

And how would you go about making that with rdx? Could you provide a recovery maybe? He's saying that all except the scrolling combat text, so this should be rdx.

Brainn 03-17-10 07:34 AM

i'm not sure how exactly he did it, there are multiple ways you could do it. easiest way i could think of would be to create an artframe for the background, place your default chatwindow on top of that and then use a custom autoexec-script to hide the textures and buttons from the default chatwindow.
you can also manage the chatframe and editbox directly in artframes, but that feature does not support docked chat-tabs and combatlog.

its not my ui, i dont know how he did it, the post is over 9 month old, its the only post the author ever made and he states that he does not play wow much, so i would not expact support from him :confused:

Cripsii 04-16-10 11:14 AM

Hello,

Well, I'm still here and I still play a little WoW has but casual.

I can if interested, my resume interface and adapted to the latest version of OpenRDX.

I am not still have my interface, but I'll look for the tabs already above the chat :)

Regards !

ps: It's my only post here but, I've participed over the old forum ! :p

Cripsii 04-16-10 12:44 PM

So, I found the script of the chat tab

After a few test, It seem to be OK.

Fisrt, create a script object nammed "autoexec" in your package explorer (I've created it in "script" package)
Then right click in your package and choose package info. Just Tick the checkbox "run autoexec" and save

Then in your autoexec script file copy/paste the script:

Code:

local event = CreateFrame"Frame"
local _G = getfenv(0)
local inherit = GameFontNormalSmall
local type = type
local _AddMessage = ChatFrame1.AddMessage
local buttons = {"UpButton", "DownButton", "BottomButton"}
local dummy = function() end

_G.CHAT_GUILD_GET = "(G) %s:\32"
_G.CHAT_RAID_GET = "(R) %s:\32"
_G.CHAT_PARTY_GET = "(P) %s:\32"
_G.CHAT_RAID_WARNING_GET = "(W) %s:\32"
_G.CHAT_RAID_LEADER_GET = "(L) %s:\32"
_G.CHAT_OFFICER_GET = "(O) %s:\32"
_G.CHAT_BATTLEGROUND_GET = "(B) %s:\32"
_G.CHAT_BATTLEGROUND_LEADER_GET = "(L) %s:\32"
_G.CHAT_SAY_GET = "%s:\32"
_G.CHAT_YELL_GET = "%s:\32"
_G.CHAT_WHISPER_GET = "%s:\32"
_G.CHAT_WHISPER_INFORM_GET = "(T) %s:\32"
_G.CHAT_FLAG_AFK = "[AFK] "
_G.CHAT_FLAG_DND = "[DND] "
_G.CHAT_FLAG_GM = "[GM] "

local str = "(%d) %3$s"
local channel = function(...)
    return str:format(...)
end

local AddMessage = function(self, text,...)
    if(type(text) == "string") then
        text = text:gsub("|Hplayer:([^:]+):(%d+)|h%[(.-)%]|h", "|Hplayer:%1:%2|h%3|h")
        text = text:gsub("%[(%d+)%. (.+)%].+(|Hplayer.+)", channel)
    end

    return _AddMessage(self, text, ...)
end

local scroll = function(self, dir)
    if(dir > 0) then
        if(IsShiftKeyDown()) then
            self:ScrollToTop()
        elseif(IsControlKeyDown()) then
            self:ScrollUp(); self:ScrollUp(); self:ScrollUp()
        else
            self:ScrollUp()
        end
    elseif(dir < 0) then
        if(IsShiftKeyDown()) then
            self:ScrollToBottom()
        elseif(IsControlKeyDown()) then
            self:ScrollDown(); self:ScrollDown(); self:ScrollDown()
        else
            self:ScrollDown()
        end
    end
end

for i=1, NUM_CHAT_WINDOWS do
    local cf = _G["ChatFrame"..i]
    cf:SetScript("OnMouseWheel", scroll)

    cf:SetFading(false)
    cf:EnableMouseWheel(true)

    for k, button in pairs(buttons) do
        button = _G["ChatFrame"..i..button]
        button:Hide()
        button.Show = dummy
    end

    cf.AddMessage = AddMessage
end

ChatFrameMenuButton:Hide()
ChatFrameMenuButton.Show = dummy

local editbox = ChatFrameEditBox
editbox:ClearAllPoints()
editbox:SetPoint("BOTTOMLEFT",  ChatFrame1, "TOPLEFT", -10, 15)
editbox:SetPoint("BOTTOMRIGHT", ChatFrame1, "TOPRIGHT", 5, 15)
editbox:SetAltArrowKeyMode(false)

local a, b, c = select(6, editbox:GetRegions())
a:Hide(); b:Hide(); c:Hide()

local function tellTarget(s)
    if not UnitExists('target') and UnitName('target') and UnitIsPlayer('target') and GetDefaultLanguage('player') == GetDefaultLanguage('target') or not (s and s:len()>0) then
        return
    end

    local name, realm = UnitName('target')
    if realm and realm ~= GetRealmName() then
        name = ('%s-%s'):format(name, realm)
    end
    SendChatMessage(s, 'WHISPER', nil, name)
end

SlashCmdList['TELLTARGET'] = tellTarget
SLASH_TELLTARGET1 = '/tt'

local OnEnter = function(self)
-- Mouseover
  self:SetNormalFontObject(GameFontNormalSmall)
if(_G["ChatFrame"..self:GetID()] == SELECTED_CHAT_FRAME) then
      self:SetNormalFontObject(GameFontNormalSmall)
    --    message("Vert!");
    else
      self:SetNormalFontObject(GameFontNormalSmall)
    end
 

end
local OnLeave = function(self)
  if(_G["ChatFrame"..self:GetID()] == SELECTED_CHAT_FRAME) then
      self:SetNormalFontObject(GameFontNormalSmall)
    --    message("Vert!");
    else
      self:SetNormalFontObject(GameFontNormalSmall)
    end

end
local OnShow = function(self)
    self:GetParent():SetNormalFontObject(GameFontRedSmall)
end
local OnHide = function(self)

    self:GetParent():SetNormalFontObject(GameFontNormalSmall)
end

local rollCF = function()
    for i = 1, 7 do
        local chat = _G["ChatFrame"..i]
        local tab = _G["ChatFrame"..i.."Tab"]
        local flash = _G["ChatFrame"..i.."TabFlash"]

        flash:GetRegions():SetTexture(nil)
        flash:SetScript("OnShow", OnShow)
        flash:SetScript("OnHide", OnHide)

        _G["ChatFrame"..i.."TabLeft"]:Hide()
        _G["ChatFrame"..i.."TabMiddle"]:Hide()
        _G["ChatFrame"..i.."TabRight"]:Hide()

        tab:SetScript("OnEnter", OnEnter)
        tab:SetScript("OnLeave", OnLeave)

        tab.SetAlpha = dummy
        if(chat == SELECTED_CHAT_FRAME) then
            tab:SetNormalFontObject(GameFontNormalSmall)
        else
            tab:SetNormalFontObject(GameFontNormalSmall)
        end
        tab:GetHighlightTexture():SetTexture(nil)

        if(chat.isDocked) then
            tab:Show()
            tab.Hide = dummy
        else
            tab.SetAlpha = nil
            tab.Hide = nil
        end
    end
end

event.PLAYER_LOGIN = function()
    rollCF()
    hooksecurefunc("FCF_OpenNewWindow", rollCF)
    hooksecurefunc("FCF_Close", function(self)
        UIParent.Hide(_G[self:GetName().."Tab"])
    end)

    local _orig_FCF_Tab_OnClick = FCF_Tab_OnClick
    FCF_Tab_OnClick = function(button)
        _orig_FCF_Tab_OnClick(button)

        for k, v in pairs(DOCKED_CHAT_FRAMES) do
            if(v == SELECTED_CHAT_FRAME) then
                _G[v:GetName().."Tab"]:SetNormalFontObject(GameFontNormalSmall)
            else
                _G[v:GetName().."Tab"]:SetNormalFontObject(GameFontNormalSmall)
            end
        end
    end

    FCF_ChatTabFadeFinished = dummy
end

event:SetScript("OnEvent", function(self, event, ...)
    self[event](self, event, ...)
end)
event:RegisterEvent"PLAYER_LOGIN"

Then reload your UI.

This script is OLD, probably it had a few bug.

Sorry for english

Regard,

Cripsii

sigg 04-17-10 12:47 AM

Hi Cripsii

The new version is managing the chatframe now.

If you want to use this script, do not check the box "disable chatframes from the menu blizzard manager"

Regards
sigg
:)


All times are GMT -6. The time now is 10:52 AM.

vBulletin © 2014, Jelsoft Enterprises Ltd
©2012 ZAM Network LLC