local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer

-- 1. GUI Setup (Independent & Draggable)
local ScreenGui = Instance.new("ScreenGui", LocalPlayer:WaitForChild("PlayerGui"))
ScreenGui.Name = "DarkAura_Brookhaven_V13"
ScreenGui.ResetOnSpawn = false

local MainFrame = Instance.new("Frame", ScreenGui)
MainFrame.Size = UDim2.new(0, 380, 0, 260)
MainFrame.Position = UDim2.new(0.5, -190, 0.4, -130)
MainFrame.BackgroundColor3 = Color3.fromRGB(10, 10, 10)
MainFrame.BackgroundTransparency = 0.2
MainFrame.Active = true
MainFrame.Draggable = true 
Instance.new("UICorner", MainFrame).CornerRadius = UDim.new(0, 15)

local ScrollingFrame = Instance.new("ScrollingFrame", MainFrame)
ScrollingFrame.Size = UDim2.new(1, -20, 0.7, 0)
ScrollingFrame.Position = UDim2.new(0, 10, 0, 15)
ScrollingFrame.BackgroundTransparency = 1
ScrollingFrame.AutomaticCanvasSize = Enum.AutomaticSize.Y
ScrollingFrame.ScrollBarThickness = 2

local UIList = Instance.new("UIListLayout", ScrollingFrame)
UIList.VerticalAlignment = Enum.VerticalAlignment.Top
UIList.Padding = UDim.new(0, 5)

local TextBox = Instance.new("TextBox", MainFrame)
TextBox.Size = UDim2.new(1, -30, 0, 40)
TextBox.Position = UDim2.new(0, 15, 1, -55)
TextBox.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
TextBox.TextColor3 = Color3.fromRGB(255, 255, 255)
TextBox.PlaceholderText = "Secret Message (No Age Gate)... 🔱"
Instance.new("UICorner", TextBox)

-- 2. RGB Creator Tag Logic
local function getRGB() return Color3.fromHSV(tick() % 5 / 5, 1, 1):ToHex() end

local function addMessage(senderName, message, isSystem)
    local msgLabel = Instance.new("TextLabel", ScrollingFrame)
    msgLabel.Size = UDim2.new(1, 0, 0, 25)
    msgLabel.BackgroundTransparency = 1
    msgLabel.RichText = true
    msgLabel.Font = Enum.Font.SourceSansBold
    msgLabel.TextSize = 17
    msgLabel.TextXAlignment = Enum.TextXAlignment.Left
    msgLabel.TextColor3 = Color3.fromRGB(255, 255, 255)

    if isSystem then
        msgLabel.Text = "<font color='#FFD700'>System : </font>" .. message
    else
        if senderName == "Premium_Roger" then
            task.spawn(function()
                while msgLabel and msgLabel.Parent do
                    msgLabel.Text = "<font color='#" .. getRGB() .. "'>[CREATOR]</font> <b>" .. senderName .. "</b>: " .. message
                    task.wait(0.1)
                end
            end)
        else
            msgLabel.Text = "<b>" .. senderName .. "</b>: " .. message
        end
    end
end

-- 3. THE MAGIC: Name-Packet Sync
-- Brookhaven players' DisplayName property is replicated!
local lastProcessed = {}

local function sendBrookhavenMsg(text)
    local char = LocalPlayer.Character
    local hum = char and char:FindFirstChildOfClass("Humanoid")
    if hum then
        local originalName = hum.DisplayName
        -- Sending message through DisplayName packet
        hum.DisplayName = "[AUR]" .. text
        task.wait(0.2)
        hum.DisplayName = originalName -- Switch back instantly
    end
end

-- Listen for any player changing their name to a secret packet
RunService.Heartbeat:Connect(function()
    for _, p in pairs(Players:GetPlayers()) do
        local char = p.Character
        local hum = char and char:FindFirstChildOfClass("Humanoid")
        if hum and hum.DisplayName:sub(1, 5) == "[AUR]" then
            local msg = hum.DisplayName:sub(6)
            if lastProcessed[p.UserId] ~= msg then
                lastProcessed[p.UserId] = msg
                addMessage(p.DisplayName, msg, false)
            end
        end
    end
end)

-- 4. Events
TextBox.FocusLost:Connect(function(enter)
    if enter and TextBox.Text ~= "" then
        sendBrookhavenMsg(TextBox.Text)
        addMessage(LocalPlayer.DisplayName, TextBox.Text, false) -- Local visual
        TextBox.Text = ""
    end
end)

addMessage("System", "Brookhaven Secret Network Active 🔱", true)