recentchat: almost perfect interaction
This commit is contained in:
Sattva
+134
-64
@@ -3859,6 +3859,7 @@
|
|||||||
for i = 1, 50 do
|
for i = 1, 50 do
|
||||||
if _G["ChatFrame" .. i] and _G["ChatFrame" .. i]:GetMaxLines() ~= 4096 then
|
if _G["ChatFrame" .. i] and _G["ChatFrame" .. i]:GetMaxLines() ~= 4096 then
|
||||||
_G["ChatFrame" .. i]:SetMaxLines(4096);
|
_G["ChatFrame" .. i]:SetMaxLines(4096);
|
||||||
|
_G["ChatFrame" .. i]:SetMaxLines(4096);
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
-- Process temporary chat frames
|
-- Process temporary chat frames
|
||||||
@@ -13228,19 +13229,25 @@
|
|||||||
-- Recent chat window
|
-- Recent chat window
|
||||||
----------------------------------------------------------------------
|
----------------------------------------------------------------------
|
||||||
|
|
||||||
-- Replace your old RecentChatWindow block with this:
|
-- Recent chat window
|
||||||
if LeaPlusLC["RecentChatWindow"] == "On" and not LeaLockList["RecentChatWindow"] then
|
if LeaPlusLC["RecentChatWindow"] == "On" and not LeaLockList["RecentChatWindow"] then
|
||||||
|
|
||||||
-- initialize only once
|
-- only initialize once
|
||||||
if not LeaPlusLC._RecentChatInit then
|
if not LeaPlusLC._RecentChatInit then
|
||||||
LeaPlusLC._RecentChatInit = true
|
LeaPlusLC._RecentChatInit = true
|
||||||
|
|
||||||
-- 1) Main frame (keeps Leatrix look)
|
----------------------------------------
|
||||||
|
-- 1) Main frame (Leatrix look) --
|
||||||
|
----------------------------------------
|
||||||
local frame = CreateFrame("Frame", "LeaPlusRecentChatFrame", UIParent)
|
local frame = CreateFrame("Frame", "LeaPlusRecentChatFrame", UIParent)
|
||||||
frame:Hide()
|
frame:Hide()
|
||||||
frame:SetSize(600, LeaPlusLC["RecentChatSize"])
|
frame:SetSize(600, LeaPlusLC["RecentChatSize"])
|
||||||
frame:SetPoint("BOTTOM", UIParent, "BOTTOM", 0, 130)
|
frame:SetPoint("BOTTOM", UIParent, "BOTTOM", 0, 130)
|
||||||
frame:SetFrameStrata("DIALOG")
|
frame:SetFrameStrata("HIGH")
|
||||||
|
frame:EnableMouse(true)
|
||||||
|
frame:SetResizable(true)
|
||||||
|
frame:SetMinResize(600, 50)
|
||||||
|
frame:SetMaxResize(600, 680)
|
||||||
frame:SetBackdrop({
|
frame:SetBackdrop({
|
||||||
bgFile = "Interface\\BUTTONS\\WHITE8X8",
|
bgFile = "Interface\\BUTTONS\\WHITE8X8",
|
||||||
edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
|
edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
|
||||||
@@ -13249,105 +13256,168 @@
|
|||||||
})
|
})
|
||||||
frame:SetBackdropColor(0, 0, 0, 0.6)
|
frame:SetBackdropColor(0, 0, 0, 0.6)
|
||||||
|
|
||||||
-- 2) Scroll frame using stock template
|
----------------------------------------
|
||||||
|
-- 2) Title bar (drag/resize/close) --
|
||||||
|
----------------------------------------
|
||||||
|
local title = CreateFrame("Frame", nil, frame)
|
||||||
|
title:SetSize(600, 36)
|
||||||
|
title:SetPoint("TOP", frame, "TOP", 0, 40)
|
||||||
|
title:SetFrameStrata("MEDIUM")
|
||||||
|
title:EnableMouse(true)
|
||||||
|
title:SetMovable(true)
|
||||||
|
title:SetBackdrop(frame:GetBackdrop())
|
||||||
|
title:SetBackdropColor(0, 0, 0, 0.6)
|
||||||
|
|
||||||
|
-- message count
|
||||||
|
title.count = title:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
|
||||||
|
title.count:SetPoint("LEFT", 9, 0)
|
||||||
|
title.count:SetFont(title.count:GetFont(), 16)
|
||||||
|
title.count:SetText("Messages: 0")
|
||||||
|
|
||||||
|
-- drag-to-size & close hint
|
||||||
|
title.hint = title:CreateFontString(nil, "ARTWORK", "GameFontNormalLarge")
|
||||||
|
title.hint:SetPoint("RIGHT", -9, 0)
|
||||||
|
title.hint:SetFont(title.hint:GetFont(), 16)
|
||||||
|
title.hint:SetText(L["Drag to size"] .. " | " .. L["Right-click to close"])
|
||||||
|
title.hint:SetWidth(600 - title.count:GetStringWidth() - 30)
|
||||||
|
title.hint:SetJustifyH("RIGHT")
|
||||||
|
|
||||||
|
-- drag, resize and close handlers
|
||||||
|
title:HookScript("OnMouseDown", function(self, btn)
|
||||||
|
if btn == "LeftButton" then
|
||||||
|
frame:StartSizing("TOP")
|
||||||
|
elseif btn == "RightButton" then
|
||||||
|
frame:Hide()
|
||||||
|
end
|
||||||
|
end)
|
||||||
|
title:HookScript("OnMouseUp", function(self, btn)
|
||||||
|
if btn == "LeftButton" then
|
||||||
|
frame:StopMovingOrSizing()
|
||||||
|
LeaPlusLC["RecentChatSize"] = frame:GetHeight()
|
||||||
|
elseif btn == "MiddleButton" then
|
||||||
|
LeaPlusLC["RecentChatSize"] = 170
|
||||||
|
frame:SetSize(600, 170)
|
||||||
|
frame:ClearAllPoints()
|
||||||
|
frame:SetPoint("BOTTOM", UIParent, "BOTTOM", 0, 130)
|
||||||
|
end
|
||||||
|
end)
|
||||||
|
|
||||||
|
----------------------------------------
|
||||||
|
-- 3) ScrollFrame + EditBox (ElvUI) --
|
||||||
|
----------------------------------------
|
||||||
local scroll = CreateFrame("ScrollFrame", "LeaPlusRecentChatScroll", frame, "UIPanelScrollFrameTemplate")
|
local scroll = CreateFrame("ScrollFrame", "LeaPlusRecentChatScroll", frame, "UIPanelScrollFrameTemplate")
|
||||||
scroll:SetAllPoints(frame)
|
scroll:SetPoint("TOPLEFT", frame, "TOPLEFT", 26, -36)
|
||||||
|
scroll:SetPoint("BOTTOMRIGHT", frame, "BOTTOMRIGHT", -34, 8)
|
||||||
|
|
||||||
local sb = scroll.ScrollBar
|
local sb = scroll.ScrollBar
|
||||||
sb:ClearAllPoints()
|
sb:ClearAllPoints()
|
||||||
sb:SetPoint("TOPLEFT", scroll, "TOPRIGHT", 3, -16)
|
sb:SetPoint("TOPLEFT", scroll, "TOPRIGHT", 3, -16)
|
||||||
sb:SetPoint("BOTTOMLEFT", scroll, "BOTTOMRIGHT", 3, 16)
|
sb:SetPoint("BOTTOMLEFT", scroll, "BOTTOMRIGHT", 3, 16)
|
||||||
|
|
||||||
-- 3) True multi-line EditBox child (parented to scroll)
|
|
||||||
local edit = CreateFrame("EditBox", "LeaPlusRecentChatEditBox", scroll)
|
local edit = CreateFrame("EditBox", "LeaPlusRecentChatEditBox", scroll)
|
||||||
edit:SetMultiLine(true)
|
|
||||||
edit:SetFontObject(ChatFontNormal)
|
edit:SetFontObject(ChatFontNormal)
|
||||||
edit:SetMaxLetters(99999)
|
edit:SetMultiLine(true)
|
||||||
|
edit:SetMaxLetters(0)
|
||||||
edit:SetAutoFocus(false)
|
edit:SetAutoFocus(false)
|
||||||
edit:SetWidth(scroll:GetWidth())
|
edit:EnableMouse(true)
|
||||||
|
edit:EnableMouseWheel(true)
|
||||||
edit:SetPoint("TOPLEFT", scroll, "TOPLEFT", 0, 0)
|
edit:SetPoint("TOPLEFT", scroll, "TOPLEFT", 0, 0)
|
||||||
edit:SetPoint("BOTTOMRIGHT", scroll, "BOTTOMRIGHT", 0, 0)
|
edit:SetWidth(scroll:GetWidth())
|
||||||
scroll:SetScrollChild(edit)
|
scroll:SetScrollChild(edit)
|
||||||
|
|
||||||
-- 4) Auto-scroll to bottom on new text
|
-- helper to close
|
||||||
edit:SetScript("OnTextChanged", function(self, userInput)
|
local function Close()
|
||||||
if not userInput then
|
edit:ClearFocus()
|
||||||
scroll:SetVerticalScroll(scroll:GetVerticalScrollRange())
|
edit:SetText("")
|
||||||
end
|
frame:Hide()
|
||||||
end)
|
end
|
||||||
|
|
||||||
-- 5) Close on Escape
|
-- right-click to close on all areas
|
||||||
edit:SetScript("OnEscapePressed", function() frame:Hide() end)
|
frame:HookScript("OnMouseDown", function(_, btn) if btn == "RightButton" then Close() end end)
|
||||||
|
scroll:HookScript("OnMouseDown", function(_,btn) if btn == "RightButton" then Close() end end)
|
||||||
|
edit:HookScript("OnMouseDown", function(_, btn) if btn == "RightButton" then Close() end end)
|
||||||
|
edit:SetScript("OnEscapePressed", Close)
|
||||||
|
|
||||||
-- 6) Mouse-wheel: Shift=top/bottom, Alt=page, otherwise small step
|
-- dynamically resize edit-box height
|
||||||
scroll:EnableMouseWheel(true)
|
local function ResizeEdit(count)
|
||||||
|
local _, size = edit:GetFont()
|
||||||
|
local needed = count * (size + 2)
|
||||||
|
edit:SetHeight(math.max(needed, scroll:GetHeight()))
|
||||||
|
end
|
||||||
|
|
||||||
|
-- scroll with mouse-wheel
|
||||||
scroll:SetScript("OnMouseWheel", function(self, delta)
|
scroll:SetScript("OnMouseWheel", function(self, delta)
|
||||||
local curr = self:GetVerticalScroll()
|
local cur = self:GetVerticalScroll()
|
||||||
local max = self:GetVerticalScrollRange()
|
local max = self:GetVerticalScrollRange()
|
||||||
local h = self:GetHeight()
|
local h = self:GetHeight()
|
||||||
local step = 20
|
local step= 20
|
||||||
if delta > 0 then
|
if delta > 0 then
|
||||||
if IsShiftKeyDown() then
|
cur = IsShiftKeyDown() and 0
|
||||||
curr = 0
|
or IsAltKeyDown() and cur - h
|
||||||
elseif IsAltKeyDown() then
|
or cur - step
|
||||||
curr = curr - h
|
|
||||||
else
|
|
||||||
curr = curr - step
|
|
||||||
end
|
|
||||||
else
|
else
|
||||||
if IsShiftKeyDown() then
|
cur = IsShiftKeyDown() and max
|
||||||
curr = max
|
or IsAltKeyDown() and cur + h
|
||||||
elseif IsAltKeyDown() then
|
or cur + step
|
||||||
curr = curr + h
|
|
||||||
else
|
|
||||||
curr = curr + step
|
|
||||||
end
|
|
||||||
end
|
end
|
||||||
if curr < 0 then curr = 0 elseif curr > max then curr = max end
|
if cur < 0 then cur = 0 elseif cur > max then cur = max end
|
||||||
self:SetVerticalScroll(curr)
|
self:SetVerticalScroll(cur)
|
||||||
end)
|
end)
|
||||||
|
|
||||||
-- 7) Helper to gather all lines from a ChatFrame
|
----------------------------------------
|
||||||
local function GatherLines(chatFrame)
|
-- 4) Populate on Ctrl+Click tabs --
|
||||||
local t = {}
|
----------------------------------------
|
||||||
local n = 0
|
local function ShowChatbox(chatFrame)
|
||||||
for i = 1, chatFrame:GetNumMessages() do
|
edit:ClearFocus()
|
||||||
|
edit:SetText("")
|
||||||
|
local num = chatFrame:GetNumMessages()
|
||||||
|
if num == 0 then return end
|
||||||
|
local start = (num > 128) and (num - 127) or 1
|
||||||
|
local cnt = 0
|
||||||
|
for i = start, num do
|
||||||
local msg = select(1, chatFrame:GetMessageInfo(i))
|
local msg = select(1, chatFrame:GetMessageInfo(i))
|
||||||
if msg then
|
if msg then
|
||||||
n = n + 1
|
msg = gsub(msg, "|T.-|t", "") -- strip textures
|
||||||
t[n] = msg
|
msg = gsub(msg, "|A.-|a", "") -- strip atlases
|
||||||
|
edit:Insert(msg)
|
||||||
|
edit:Insert("\n")
|
||||||
|
cnt = cnt + 1
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
return t, n
|
title.count:SetText("Messages: " .. cnt)
|
||||||
|
ResizeEdit(cnt)
|
||||||
|
scroll:SetVerticalScroll(0) -- show oldest at top
|
||||||
|
frame:Show()
|
||||||
end
|
end
|
||||||
|
|
||||||
-- 8) Ctrl+Left-click on any ChatFrameXTab toggles & fills the window
|
-- hook each tab with its own index
|
||||||
for i = 1, NUM_CHAT_WINDOWS do
|
for id = 1, NUM_CHAT_WINDOWS do
|
||||||
local tab = _G["ChatFrame"..i.."Tab"]
|
local tab = _G["ChatFrame"..id.."Tab"]
|
||||||
if tab then
|
if tab then
|
||||||
tab:HookScript("OnMouseUp", function(self, btn)
|
tab:HookScript("OnMouseUp", (function(idx)
|
||||||
if btn == "LeftButton" and IsControlKeyDown() then
|
return function(self, btn)
|
||||||
if frame:IsShown() then
|
if btn == "LeftButton" and IsControlKeyDown() then
|
||||||
frame:Hide()
|
if frame:IsShown() then
|
||||||
else
|
Close()
|
||||||
local chat = _G["ChatFrame"..i]
|
else
|
||||||
local lines, count = GatherLines(chat)
|
ShowChatbox(_G["ChatFrame"..idx])
|
||||||
edit:SetText(table.concat(lines, "\n", 1, count))
|
end
|
||||||
scroll:SetVerticalScroll(scroll:GetVerticalScrollRange())
|
|
||||||
frame:Show()
|
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
end)
|
end)(id))
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
-- store references if needed elsewhere
|
-- store refs if needed
|
||||||
LeaPlusLC.RecentChatFrame = frame
|
LeaPlusLC.RecentChatFrame = frame
|
||||||
|
LeaPlusLC.RecentChatTitle = title
|
||||||
LeaPlusLC.RecentChatScroll = scroll
|
LeaPlusLC.RecentChatScroll = scroll
|
||||||
LeaPlusLC.RecentChatEdit = edit
|
LeaPlusLC.RecentChatEdit = edit
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
----------------------------------------------------------------------
|
----------------------------------------------------------------------
|
||||||
-- Show cooldowns
|
-- Show cooldowns
|
||||||
----------------------------------------------------------------------
|
----------------------------------------------------------------------
|
||||||
|
|||||||
Reference in New Issue
Block a user