Simplux

0 followers•6mo ago

45,960 views

Simplux's Chat Logger

Description

simple & lightweight chat logger
toggle with HOME
file saves to workspace/simplux-logger/

Script Code

230 lines•9.2 KB

--simplux's chat logger

--toggle with HOME

--files save to workspace/simplux-logger/

local UserInputService = game:GetService("UserInputService")

local Players = game:GetService("Players")

local MarketPlaceService = game:GetService("MarketplaceService")

local Player = Players.LocalPlayer

local function cleanup()

local name = "SimpluxLoggerGui"

local old1 = Player:WaitForChild("PlayerGui"):FindFirstChild(name)

local old2 = (gethui and gethui() or game:GetService("CoreGui")):FindFirstChild(name)

if old1 then old1:Destroy() end

if old2 then old2:Destroy() end

end

cleanup()

local chatData = {Logs = {}, ChatterCounts = {}, TaggedCount = 0}

local ScreenGui = Instance.new("ScreenGui")

ScreenGui.Name = "SimpluxLoggerGui"

ScreenGui.ResetOnSpawn = false

ScreenGui.Parent = Player:WaitForChild("PlayerGui")

local chatLogs = Instance.new("Frame")

chatLogs.Name = "SimpluxLogger"

chatLogs.Size = UDim2.new(0, 400, 0, 300)

chatLogs.Position = UDim2.new(0.5, -200, 0.5, -150)

chatLogs.BackgroundColor3 = Color3.fromRGB(30, 30, 30)

chatLogs.BorderSizePixel = 0

chatLogs.Active = true

chatLogs.ClipsDescendants = true

chatLogs.Parent = ScreenGui

local function addLog(sender, message)

local scrollFrame = chatLogs:FindFirstChild("ScrollingFrame")

if not scrollFrame then return end

local currentPos = scrollFrame.CanvasPosition.Y

local frameHeight = scrollFrame.AbsoluteSize.Y

local canvasHeight = scrollFrame.AbsoluteCanvasSize.Y

local isAtBottom = currentPos >= (canvasHeight - frameHeight) - 15

local timestamp = os.date("%H:%M:%S")

local displayEntry = string.format("[%s] - (%s): %s", timestamp, sender, message)

table.insert(chatData.Logs, displayEntry)

chatData.ChatterCounts[sender] = (chatData.ChatterCounts[sender] or 0) + 1

local _, tags = message:gsub("#", "")

if tags >= 2 then chatData.TaggedCount = chatData.TaggedCount + 1 end

local logEntry = Instance.new("TextLabel")

logEntry.Size = UDim2.new(1, -10, 0, 20)

logEntry.BackgroundTransparency = 1

logEntry.Text = displayEntry

logEntry.TextColor3 = Color3.fromRGB(255, 255, 255)

logEntry.TextSize = 16

logEntry.Font = Enum.Font.SourceSans

logEntry.TextXAlignment = Enum.TextXAlignment.Left

logEntry.TextWrapped = true

logEntry.Parent = scrollFrame

if isAtBottom then

task.defer(function()

scrollFrame.CanvasPosition = Vector2.new(0, 999999)

end)

end

local titleBar = Instance.new("Frame")

titleBar.Size = UDim2.new(1, 0, 0, 35)

titleBar.BackgroundColor3 = Color3.fromRGB(24, 24, 24)

titleBar.BorderSizePixel = 0

titleBar.Parent = chatLogs

local versionTitle = Instance.new("TextLabel")

versionTitle.Size = UDim2.new(1, -70, 1, 0)

versionTitle.Position = UDim2.new(0, 10, 0, 0)

versionTitle.BackgroundTransparency = 1

versionTitle.Text = "Simplux's Logger v1.8.3"

versionTitle.TextColor3 = Color3.fromRGB(255, 255, 255)

versionTitle.TextXAlignment = Enum.TextXAlignment.Left

versionTitle.Font = Enum.Font.SourceSans

versionTitle.TextSize = 14

versionTitle.Parent = titleBar

local CloseBtn = Instance.new("TextButton")

CloseBtn.Size = UDim2.new(0, 35, 0, 35)

CloseBtn.Position = UDim2.new(1, -35, 0, 0)

CloseBtn.BackgroundTransparency = 1

CloseBtn.Text = "X"

CloseBtn.TextColor3 = Color3.fromRGB(255, 255, 255)

CloseBtn.Font = Enum.Font.SourceSans

CloseBtn.TextSize = 18

CloseBtn.Parent = titleBar

CloseBtn.MouseButton1Click:Connect(function() ScreenGui:Destroy() end)

local scrollFrame = Instance.new("ScrollingFrame")

scrollFrame.Name = "ScrollingFrame"

scrollFrame.Size = UDim2.new(1, -20, 1, -95)

scrollFrame.Position = UDim2.new(0, 10, 0, 45)

scrollFrame.BackgroundColor3 = Color3.fromRGB(20, 20, 20)

scrollFrame.BorderSizePixel = 0

scrollFrame.ScrollBarThickness = 4

scrollFrame.AutomaticCanvasSize = Enum.AutomaticSize.Y

scrollFrame.Parent = chatLogs

local logList = Instance.new("UIListLayout")

logList.Parent = scrollFrame

logList.Padding = UDim.new(0, 2)

local saveFile = Instance.new("TextButton")

saveFile.Size = UDim2.new(1, -30, 0, 30)

saveFile.Position = UDim2.new(0, 15, 1, -40)

saveFile.BackgroundColor3 = Color3.fromRGB(45, 45, 45)

saveFile.Text = "Save to File"

saveFile.TextColor3 = Color3.fromRGB(255, 255, 255)

saveFile.Font = Enum.Font.SourceSans

saveFile.TextSize = 16

saveFile.Parent = chatLogs

local function createResizeHandle(name, pos, anchor)

local handle = Instance.new("TextButton")

handle.Name = name

handle.Size = UDim2.new(0, 20, 0, 20)

handle.Position = pos

handle.AnchorPoint = anchor

handle.BackgroundTransparency = 1

handle.Text = ""

handle.ZIndex = 10

handle.Parent = chatLogs

local resizing = false

handle.InputBegan:Connect(function(input)

if input.UserInputType == Enum.UserInputType.MouseButton1 then resizing = true end

end)

UserInputService.InputChanged:Connect(function(input)

if resizing and input.UserInputType == Enum.UserInputType.MouseMovement then

local mouse = UserInputService:GetMouseLocation()

local absPos = chatLogs.AbsolutePosition

local absSize = chatLogs.AbsoluteSize

if name == "RB" then

chatLogs.Size = UDim2.new(0, math.max(200, mouse.X - absPos.X), 0, math.max(150, (mouse.Y - 36) - absPos.Y))

elseif name == "LB" then

local newX = mouse.X

local newWidth = (absPos.X + absSize.X) - newX

if newWidth > 200 then

chatLogs.Position = UDim2.new(0, newX, 0, absPos.Y + 36)

chatLogs.Size = UDim2.new(0, newWidth, 0, absSize.Y)

end

elseif name == "RT" then

local newY = mouse.Y - 36

local newHeight = (absPos.Y + absSize.Y) - newY

if newHeight > 150 then

chatLogs.Position = UDim2.new(0, absPos.X, 0, newY + 36)

chatLogs.Size = UDim2.new(0, absSize.X, 0, newHeight)

end

elseif name == "LT" then

local newX = mouse.X

local newY = mouse.Y - 36

local newWidth = (absPos.X + absSize.X) - newX

local newHeight = (absPos.Y + absSize.Y) - newY

if newWidth > 200 and newHeight > 150 then

chatLogs.Position = UDim2.new(0, newX, 0, newY + 36)

chatLogs.Size = UDim2.new(0, newWidth, 0, newHeight)

end

end)

UserInputService.InputEnded:Connect(function(input) if input.UserInputType == Enum.UserInputType.MouseButton1 then resizing = false end end)

end

createResizeHandle("RB", UDim2.new(1, 0, 1, 0), Vector2.new(1, 1))

createResizeHandle("LB", UDim2.new(0, 0, 1, 0), Vector2.new(0, 1))

createResizeHandle("RT", UDim2.new(1, 0, 0, 0), Vector2.new(1, 0))

createResizeHandle("LT", UDim2.new(0, 0, 0, 0), Vector2.new(0, 0))

saveFile.MouseButton1Click:Connect(function()

local success, info = pcall(function() return MarketPlaceService:GetProductInfo(game.PlaceId) end)

local gameName = success and info.Name or "Unknown"

local mostFreq, leastFreq, totalC, max, min = "N/A", "N/A", 0, 0, math.huge

for u, c in pairs(chatData.ChatterCounts) do

totalC = totalC + 1

if c > max then max = c; mostFreq = u end

if c < min then min = c; leastFreq = u end

end

local header = string.format("-- %s (%d)\n-- %d messages, %d unique chatters, %d filtered\n-- most active: %s | least active: %s\n\n",

gameName, game.PlaceId, #chatData.Logs, totalC, chatData.TaggedCount, mostFreq, leastFreq)

local fullContent = header .. table.concat(chatData.Logs, "\n")

local writeSuccess = pcall(function()

if makefolder then makefolder("simplux-logger") end

writefile("simplux-logger/log_"..os.time()..".txt", fullContent)

end)

saveFile.Text = writeSuccess and "Saved Stats!" or "Failed!"

task.wait(2)

saveFile.Text = "Save to File"

end)

local dragging, dragStart, startPos

titleBar.InputBegan:Connect(function(input)

if input.UserInputType == Enum.UserInputType.MouseButton1 then

dragging = true dragStart = input.Position startPos = chatLogs.Position

end

end)

UserInputService.InputChanged:Connect(function(input)

if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then

local delta = input.Position - dragStart

chatLogs.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)

end

end)

UserInputService.InputEnded:Connect(function(input) if input.UserInputType == Enum.UserInputType.MouseButton1 then dragging = false end end)

UserInputService.InputBegan:Connect(function(input, gp)

if not gp and input.KeyCode == Enum.KeyCode.Home then ScreenGui.Enabled = not ScreenGui.Enabled end

end)

for _, p in pairs(Players:GetPlayers()) do p.Chatted:Connect(function(m) addLog(p.Name, m) end) end

Players.PlayerAdded:Connect(function(p) p.Chatted:Connect(function(m) addLog(p.Name, m) end) end)

Simplux's Chat Logger

Description

Script Code

Comments

Activity

Activity

Script Code

You might also like

You might also like