-- PURE INTERNAL LIVE CHAT (STRICT USERNAME: TEXT)
-- NO MESSAGING REMOTES USED - INVISIBLE TO MODERN CHAT
local Players = game:GetService("Players")
local StarterGui = game:GetService("StarterGui")
local LocalPlayer = Players.LocalPlayer

-- 1. KILL MODERN CHAT (NO PUBLIC MESSAGES)
task.spawn(function()
    while true do
        pcall(function() StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.Chat, false) end)
        task.wait(1)
    end
end)

-- 2. GUI SETUP (CORE GUI)
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "PureInternalNetwork"
ScreenGui.Parent = (gethui and gethui()) or game:GetService("CoreGui")

local Main = Instance.new("Frame", ScreenGui)
Main.Size = UDim2.new(0, 420, 0, 250)
Main.Position = UDim2.new(0, 10, 0, 55)
Main.BackgroundColor3 = Color3.fromRGB(35, 45, 60)
Main.BackgroundTransparency = 0.2
Main.Active = true
Main.Draggable = true
Instance.new("UICorner", Main).CornerRadius = UDim.new(0, 12)

local Scroll = Instance.new("ScrollingFrame", Main)
Scroll.Size = UDim2.new(1, -20, 1, -70)
Scroll.Position = UDim2.new(0, 10, 0, 10)
Scroll.BackgroundTransparency = 1
Scroll.AutomaticCanvasSize = Enum.AutomaticSize.Y
Scroll.CanvasSize = UDim2.new(0, 0, 0, 0)
Scroll.ScrollBarThickness = 2

local UIList = Instance.new("UIListLayout", Scroll)
UIList.Padding = UDim.new(0, 4)

local InputArea = Instance.new("Frame", Main)
InputArea.Size = UDim2.new(0.94, 0, 0, 40)
InputArea.Position = UDim2.new(0.03, 0, 1, -50)
InputArea.BackgroundColor3 = Color3.fromRGB(15, 20, 25)
InputArea.BackgroundTransparency = 0.4
Instance.new("UICorner", InputArea).CornerRadius = UDim.new(0, 20)

local TextBox = Instance.new("TextBox", InputArea)
TextBox.Size = UDim2.new(0.85, 0, 1, 0)
TextBox.Position = UDim2.new(0, 15, 0, 0)
TextBox.BackgroundTransparency = 1
TextBox.Font = Enum.Font.GothamMedium
TextBox.TextSize = 16
TextBox.TextColor3 = Color3.new(1, 1, 1)
TextBox.PlaceholderText = "Type /clear or chat internally..."
TextBox.Text = ""

-- 3. THE RENDERER (STRICT ea1964/OWNER: TEXT)
local function AddText(user, msg)
    local label = Instance.new("TextLabel", Scroll)
    label.Size = UDim2.new(1, 0, 0, 0)
    label.AutomaticSize = Enum.AutomaticSize.Y
    label.BackgroundTransparency = 1
    label.Font = Enum.Font.GothamBold
    label.TextSize = 18
    label.RichText = true
    label.TextXAlignment = Enum.TextXAlignment.Left
    label.TextWrapped = true
    
    local col = Color3.fromHSV(tick() % 1, 0.5, 1)
    local finalUser = user

    -- ea1964/OWNER SPECIAL TAG
    if user == "ea1964" or user:find("ea1964") then
        col = Color3.fromRGB(255, 215, 0) -- GOLD
        finalUser = "ea1964/OWNER"
    end
    
    local hex = string.format("#%02X%02X%02X", col.R*255, col.G*255, col.B*255)
    label.Text = string.format("<font color='%s'>%s</font>: <font color='#FFFFFF'>%s</font>", hex, finalUser, msg)
    
    task.defer(function()
        Scroll.CanvasPosition = Vector2.new(0, Scroll.AbsoluteCanvasSize.Y)
    end)
end

-- 4. LIVE INTERNAL SYNC (Invisible to Roblox Chat)
local function SetupListener(player)
    player.Chatted:Connect(function(msg)
        -- We intercept the chat event locally to show in OUR script window
        -- But since CoreGui:Chat is disabled, Roblox doesn't process it publicly
        AddText(player.Name, msg)
    end)
end

for _, p in pairs(Players:GetPlayers()) do SetupListener(p) end
Players.PlayerAdded:Connect(SetupListener)

-- 5. SENDING LOGIC (STAYS INSIDE SCRIPT)
TextBox.FocusLost:Connect(function(enter)
    if enter and TextBox.Text ~= "" then
        local msg = TextBox.Text
        if msg:lower() == "/clear" then
            for _, v in pairs(Scroll:GetChildren()) do if v:IsA("TextLabel") then v:Destroy() end end
        else
            -- Displays strictly in the UI
            AddText(LocalPlayer.Name, msg)
            
            -- Optional: If you want other script users to see it, we use a hidden string
            local tag = LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("InternalData") or Instance.new("StringValue", LocalPlayer.Character)
            tag.Name = "InternalData"
            tag.Value = msg
            task.wait(0.1)
            tag.Value = "" 
        end
        TextBox.Text = ""
    end
end)

-- 6. TOGGLE BUTTON
local ToggleBtn = Instance.new("ImageButton", ScreenGui)
ToggleBtn.Size = UDim2.new(0, 42, 0, 42)
ToggleBtn.Position = UDim2.new(0, 60, 0, 5) 
ToggleBtn.BackgroundColor3 = Color3.fromRGB(30, 45, 60)
ToggleBtn.BackgroundTransparency = 0.3
ToggleBtn.Image = "rbxasset://textures/ui/Chat/Chat.png"
Instance.new("UICorner", ToggleBtn)
ToggleBtn.MouseButton1Click:Connect(function() Main.Visible = not Main.Visible end)

AddText("System", "Internal Network Active. No modern chat logs.")