PasteShr

New Paste Browse

local ReplicatedStorage = game:GetService("ReplicatedStorage")
local StarterGui = game:GetService("StarterGui")
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer

if(_G.CSConnections)then
    for _, con in next,_G.CSConnections do
        con:Disconnect()
    end
end

local function sysMsg(Text: string)
    local Message  = {
        Color = Color3.fromRGB(0,255,255); 
        Font = Enum.Font.SourceSansBold;
        TextSize = 18;
    }
    Message.Text = Text
    StarterGui:SetCore("ChatMakeSystemMessage",Message)
end

local Chat = LocalPlayer.PlayerGui.Chat.Frame.ChatChannelParentFrame.Frame_MessageLogDisplay.Scroller :: Frame
local OnMessageDoneFiltering = ReplicatedStorage:WaitForChild("DefaultChatSystemChatEvents"):WaitForChild("OnMessageDoneFiltering")

_G.CSConnections = {}
local PlayersLastMessage = {}
local PlayersLastTarget = {}

_G.CSConnections['chat'] = Chat.ChildAdded:Connect(function(child)
    if #child.TextLabel:GetChildren() >= 2 then return end
    if not child.TextLabel:FindFirstChild("TextButton") then return end

local yield
    yield = child.TextLabel.Changed:Connect(function(p)
        if p == "Text" then
           yield:Disconnect() yield = nil
        end
    end) table.insert(_G.CSConnections, C)

repeat task.wait()
    until not yield

local Text = child.TextLabel.Text:match('<font.-</font>(.*)')  :: TextLabel
    local Name = child.TextLabel.TextButton.Text:match("%[(.*)%]") :: TextButton
    PlayersLastMessage[Name] = Text
end)

local function OnChatted(message, isMuted, speakerDisplay)
    local isWhisper, Target, privMessage = message:match('(/w%s(.-)%s%s?(.*))')
    message = privMessage or message
    local notInChat = (message ~= PlayersLastMessage[speakerDisplay])
    local isPrivate = (isWhisper or notInChat)
    if not isPrivate then return end
    if Target then
        Target = Players[Target].DisplayName
    end
    local lastTarget = PlayersLastTarget[speakerDisplay]
    sysMsg("["..speakerDisplay.." -> "..(Target or lastTarget or '?').."]: "..message)
    PlayersLastTarget[speakerDisplay] = Target or lastTarget
end

local blockedIds = StarterGui:GetCore("GetBlockedUserIds")
local function isBlocked(player: Player)
    for _, blockedId in pairs(blockedIds) do
        if player.UserId == blockedId then
            return true
        end
    end
    return false
end

local SpyEnabled = true

_G.CSConnections['self_logger'] = OnMessageDoneFiltering.OnClientEvent:Connect(function(packet, channel)
    if packet.Message:match("/spy") then
        SpyEnabled = not SpyEnabled
        sysMsg("[[ Spy::"..(SpyEnabled and "ON" or "OFF").." ]]")
end end)

sysMsg("[ Spying Chats ]")
for _, Player: Player in next, Players:GetPlayers() do
    if Player.Name == LocalPlayer.Name or isBlocked(Player) then continue end
    local Connection = Player.Chatted:Connect(function(a,b)
        if not SpyEnabled then return end
        task.wait(.05) -- To wait for the ChildAdded to process the message
        OnChatted(a,b, Player.DisplayName)
    end)
    table.insert(_G.CSConnections, Connection)
end

Paste Settings

Paste Title : [Optional]

Paste Folder : [Optional]

Syntax Highlighting : [Optional]

Paste Expiration : [Optional]

Paste Status : [Optional]

Password : [Optional]

Description: [Optional]

Tags: [Optional]

Encrypt Paste (?)

You are currently not logged in, this means you can not edit or delete anything you paste. Sign Up or Login

Recent Pastes

any og name pastebin
Plaintext | 1 | 2 minutes ago
dead rails script pastebin
Plaintext | 1 | 7 minutes ago
basketball zero script pastebin
Plaintext | 1 | 7 minutes ago
fish it script pastebin
Plaintext | 4 | 12 minutes ago
prodigy script pastebin
Plaintext | 4 | 17 minutes ago
nfl universe football script pastebin
Plaintext | 4 | 17 minutes ago
rivals script pastebin keyless
Plaintext | 4 | 17 minutes ago

Paste Settings

Site Languages