local Players = game:GetService("Players")

local gui = Instance.new("ScreenGui")
gui.Name = "QuickBlocker"
gui.ResetOnSpawn = false
gui.Parent = game.CoreGui

local mainFrame = Instance.new("Frame")
mainFrame.Size = UDim2.new(0, 220, 0, 280)
mainFrame.Position = UDim2.new(1, -240, 0, 100)
mainFrame.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true
mainFrame.Draggable = true
mainFrame.Parent = gui
Instance.new("UICorner", mainFrame).CornerRadius = UDim.new(0, 10)

local titleBar = Instance.new("Frame")
titleBar.Size = UDim2.new(1, 0, 0, 28)
titleBar.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
titleBar.BorderSizePixel = 0
titleBar.Parent = mainFrame
Instance.new("UICorner", titleBar).CornerRadius = UDim.new(0, 10)

local title = Instance.new("TextLabel")
title.Size = UDim2.new(1, -40, 1, 0)
title.Position = UDim2.new(0, 10, 0, 0)
title.BackgroundTransparency = 1
title.Text = "QuickBlocker"
title.Font = Enum.Font.GothamBold
title.TextSize = 14
title.TextColor3 = Color3.fromRGB(220, 220, 220)
title.TextXAlignment = Enum.TextXAlignment.Left
title.Parent = titleBar

local minimize = Instance.new("TextButton")
minimize.Size = UDim2.new(0, 28, 1, 0)
minimize.Position = UDim2.new(1, -28, 0, 0)
minimize.BackgroundTransparency = 1
minimize.Text = "−"
minimize.Font = Enum.Font.GothamBold
minimize.TextSize = 18
minimize.TextColor3 = Color3.fromRGB(180, 180, 180)
minimize.Parent = titleBar

local searchBox = Instance.new("TextBox")
searchBox.Size = UDim2.new(1, -20, 0, 24)
searchBox.Position = UDim2.new(0, 10, 0, 34)
searchBox.PlaceholderText = "Search players..."
searchBox.Text = ""
searchBox.Font = Enum.Font.Gotham
searchBox.TextSize = 14
searchBox.TextColor3 = Color3.fromRGB(235, 235, 235)
searchBox.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
searchBox.BorderSizePixel = 0
searchBox.Parent = mainFrame
Instance.new("UICorner", searchBox).CornerRadius = UDim.new(0, 6)

local playerList = Instance.new("ScrollingFrame")
playerList.Size = UDim2.new(1, -20, 1, -70)
playerList.Position = UDim2.new(0, 10, 0, 62)
playerList.BackgroundTransparency = 1
playerList.ScrollBarThickness = 4
playerList.CanvasSize = UDim2.new(0, 0, 0, 0)
playerList.Parent = mainFrame

local layout = Instance.new("UIListLayout", playerList)
layout.Padding = UDim.new(0, 4)

local toggleBtn = Instance.new("TextButton")
toggleBtn.Size = UDim2.new(0, 36, 0, 36)
toggleBtn.Position = UDim2.new(1, -50, 0, 100)
toggleBtn.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
toggleBtn.Text = "+"
toggleBtn.Font = Enum.Font.GothamBold
toggleBtn.TextSize = 20
toggleBtn.TextColor3 = Color3.fromRGB(235, 235, 235)
toggleBtn.Visible = false
toggleBtn.Parent = gui
Instance.new("UICorner", toggleBtn).CornerRadius = UDim.new(1, 0)

local playerButtons = {}

local function refreshPlayers()
    local currentPlayers = {}
    for _, plr in ipairs(Players:GetPlayers()) do
        if plr ~= Players.LocalPlayer then
            if searchBox.Text == "" or string.find(plr.Name:lower(), searchBox.Text:lower()) or string.find(plr.DisplayName:lower(), searchBox.Text:lower()) then
                currentPlayers[plr] = true
                if not playerButtons[plr] then
                    local btn = Instance.new("TextButton")
                    btn.Size = UDim2.new(1, 0, 0, 28)
                    btn.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
                    btn.Text = plr.DisplayName .. " (@" .. plr.Name .. ")"
                    btn.Font = Enum.Font.Gotham
                    btn.TextSize = 13
                    btn.TextColor3 = Color3.fromRGB(235, 235, 235)
                    btn.Parent = playerList
                    Instance.new("UICorner", btn).CornerRadius = UDim.new(0, 6)

                    btn.MouseButton1Click:Connect(function()
                        game:GetService("StarterGui"):SetCore("PromptBlockPlayer", plr)
                    end)

                    playerButtons[plr] = btn
                end
            end
        end
    end

    for plr, btn in pairs(playerButtons) do
        if not currentPlayers[plr] then
            btn:Destroy()
            playerButtons[plr] = nil
        end
    end

    playerList.CanvasSize = UDim2.new(0, 0, 0, layout.AbsoluteContentSize.Y)
end

Players.PlayerAdded:Connect(refreshPlayers)
Players.PlayerRemoving:Connect(refreshPlayers)
searchBox:GetPropertyChangedSignal("Text"):Connect(refreshPlayers)
layout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
    playerList.CanvasSize = UDim2.new(0, 0, 0, layout.AbsoluteContentSize.Y)
end)

minimize.MouseButton1Click:Connect(function()
    mainFrame.Visible = false
    toggleBtn.Visible = true
end)

toggleBtn.MouseButton1Click:Connect(function()
    mainFrame.Visible = true
    toggleBtn.Visible = false
end)

task.spawn(function()
    while true do
        refreshPlayers()
        task.wait(1)
    end
end)