-- ==========================================================
-- 🌙 BLUE3 MASTER SUITE - FINAL (ZERO LAG EDITION)
-- ==========================================================

local CoreGui = game:GetService("CoreGui")
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")

if CoreGui:FindFirstChild("Blue3_Final") then CoreGui.Blue3_Final:Destroy() end

local sg = Instance.new("ScreenGui", CoreGui); sg.Name = "Blue3_Final"
local LocalPlayer = Players.LocalPlayer
local IsOpen = true
local Looping = false

-- [ LAG-FREE AUTO-CLICKER / ANTI-AFK ]
local VirtualUser = game:GetService("VirtualUser")
LocalPlayer.Idled:Connect(function()
    VirtualUser:CaptureController()
    VirtualUser:ClickButton2(Vector2.new())
end)

-- [ TOGGLE BUTTON ]
local toggle = Instance.new("TextButton", sg)
toggle.Size = UDim2.new(0, 45, 0, 45); toggle.Position = UDim2.new(0, 5, 0.5, -22)
toggle.BackgroundColor3 = Color3.fromRGB(0, 150, 255); toggle.Text = "B3"; toggle.Font = "GothamBold"
toggle.TextColor3 = Color3.new(1,1,1); toggle.Active = true; toggle.Draggable = true
Instance.new("UICorner", toggle).CornerRadius = UDim.new(1, 0)
local tStroke = Instance.new("UIStroke", toggle); tStroke.Thickness = 2; tStroke.Color = Color3.new(1,1,1)

-- [ MAIN WINDOW ]
local main = Instance.new("Frame", sg)
main.Size = UDim2.new(0, 680, 0, 400); main.Position = UDim2.new(0.5, -340, 0.5, -200)
main.BackgroundColor3 = Color3.fromRGB(15, 15, 18); main.Active = true; main.Draggable = true
Instance.new("UICorner", main)

toggle.MouseButton1Click:Connect(function()
    IsOpen = not IsOpen
    main.Visible = IsOpen
    toggle.BackgroundColor3 = IsOpen and Color3.fromRGB(0, 150, 255) or Color3.fromRGB(255, 50, 50)
end)

-- SCROLL FACTORY
local function makeScroll(parent, pos, size)
    local s = Instance.new("ScrollingFrame", parent)
    s.Position = pos; s.Size = size; s.BackgroundTransparency = 0.8; s.BackgroundColor3 = Color3.new(0,0,0)
    s.ScrollBarThickness = 4; s.CanvasSize = UDim2.new(0,0,0,0)
    local l = Instance.new("UIListLayout", s); l.Padding = UDim.new(0, 3)
    l:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
        s.CanvasSize = UDim2.new(0, 0, 0, l.AbsoluteContentSize.Y + 5)
    end)
    return s
end

local rScroll = makeScroll(main, UDim2.new(0, 10, 0, 45), UDim2.new(0.32, 0, 1, -100))
local pScroll = makeScroll(main, UDim2.new(0.68, -10, 0, 45), UDim2.new(0.32, 0, 1, -50))

-- INPUTS
local function box(place, y)
    local t = Instance.new("TextBox", main); t.Size = UDim2.new(0, 220, 0, 35); t.Position = UDim2.new(0, 235, 0, y)
    t.PlaceholderText = place; t.Text = ""; t.BackgroundColor3 = Color3.new(0,0,0); t.TextColor3 = Color3.new(1,1,1)
    t.Font = "Code"; Instance.new("UICorner", t); return t
end
local rIn = box("REMOTE NAME...", 50)
local pIn = box("TARGET PLAYER...", 90)
local aIn = box("ARGUMENT (OPTIONAL)...", 130)

-- EXECUTION ENGINE (THREADED TO PREVENT LAG)
local function run(target)
    task.defer(function() -- Runs on a separate thread so your screen doesn't lag
        for _, v in pairs(game:GetDescendants()) do
            if v.Name == rIn.Text then
                local t = Players:FindFirstChild(target) or target
                if v:IsA("RemoteEvent") then
                    if aIn.Text ~= "" then v:FireServer(t, aIn.Text) else v:FireServer(t) end
                elseif v:IsA("RemoteFunction") then
                    v:InvokeServer(t)
                end
            end
        end
    end)
end

-- BUTTONS
local function btn(txt, x, y, w, h, col, func)
    local b = Instance.new("TextButton", main); b.Text = txt; b.Size = UDim2.new(0, w, 0, h); b.Position = UDim2.new(0, x, 0, y)
    b.BackgroundColor3 = col; b.TextColor3 = Color3.new(1,1,1); b.Font = "GothamBold"; Instance.new("UICorner", b); b.MouseButton1Click:Connect(func)
end

btn("FIRE SINGLE", 235, 175, 105, 35, Color3.fromRGB(180, 50, 50), function() run(pIn.Text) end)
btn("FIRE ALL", 350, 175, 105, 35, Color3.fromRGB(100, 50, 180), function() for _, p in pairs(Players:GetPlayers()) do run(p.Name) end end)
btn("NUKE (100x)", 235, 220, 220, 35, Color3.fromRGB(255, 120, 0), function() for i=1,100 do run(pIn.Text) end end)

local lBtn = Instance.new("TextButton", main)
lBtn.Size = UDim2.new(0, 220, 0, 35); lBtn.Position = UDim2.new(0, 235, 0, 265); lBtn.Text = "LOOP: OFF"
lBtn.BackgroundColor3 = Color3.fromRGB(50, 50, 50); lBtn.TextColor3 = Color3.new(1,1,1); lBtn.Font = "GothamBold"
Instance.new("UICorner", lBtn)
lBtn.MouseButton1Click:Connect(function()
    Looping = not Looping
    lBtn.Text = Looping and "LOOPING..." or "LOOP: OFF"
    lBtn.BackgroundColor3 = Looping and Color3.fromRGB(0, 200, 100) or Color3.fromRGB(50, 50, 50)
end)

-- SCANNER
btn("RE-SCAN REMOTES", 10, 345, 218, 35, Color3.fromRGB(0, 120, 220), function()
    for _, v in pairs(rScroll:GetChildren()) do if v:IsA("TextButton") then v:Destroy() end end
    for _, v in pairs(game:GetDescendants()) do
        if v:IsA("RemoteEvent") or v:IsA("RemoteFunction") then
            local b = Instance.new("TextButton", rScroll); b.Size = UDim2.new(1, -5, 0, 30); b.Text = v.Name
            b.BackgroundColor3 = Color3.fromRGB(40,40,45); b.TextColor3 = Color3.new(1,1,1); b.Font = "Code"; b.TextSize = 10
            Instance.new("UICorner", b); b.MouseButton1Click:Connect(function() rIn.Text = v.Name end)
        end
    end
end)

-- PLAYER LIST
local function refP()
    for _, v in pairs(pScroll:GetChildren()) do if v:IsA("TextButton") then v:Destroy() end end
    for _, p in pairs(Players:GetPlayers()) do
        local b = Instance.new("TextButton", pScroll); b.Size = UDim2.new(1, -5, 0, 30); b.Text = p.Name
        b.BackgroundColor3 = Color3.fromRGB(40,40,45); b.TextColor3 = Color3.new(1,1,1); b.Font = "Code"
        Instance.new("UICorner", b); b.MouseButton1Click:Connect(function() pIn.Text = p.Name end)
    end
end
Players.PlayerAdded:Connect(refP); Players.PlayerRemoving:Connect(refP); refP()

-- LOOP TASK
task.spawn(function()
    while task.wait(0.1) do if Looping then run(pIn.Text) end end
end)