local plr = game["Players"]["LocalPlayer"]
local rs = game:GetService("RunService")
local enabled = false
local att
local pulled = {}

local function Clean()
    for _,v in next, pulled do
        if v and v.Parent then
            for _,k in next, v:GetDescendants() do
                if k:IsA("Torque")
                or k:IsA("AlignPosition")
                or k:IsA("Attachment") 
                or k:IsA("LinearVelocity") then
                    k:Destroy()
                end
            end
        end
    end
    table.clear(pulled)
end

local following
local function SetupPlr()

    if following then following:Disconnect() following = nil end
    Clean()

    local char = plr.Character or plr.CharacterAdded:wait()
    local hrp = char:WaitForChild("HumanoidRootPart")

    for i,v in next, workspace:GetDescendants() do
        if v.Name == "122212Folder" then v:Destroy() end
    end

    local Folder = Instance.new("Folder", workspace)
    Folder.Name = "122212Folder"
    local part = Instance.new("Part", Folder)
     att = Instance.new("Attachment", part)

    part.Anchored = true 
    part.Transparency = .5
    part.Size = Vector3.one
    part.CanCollide = false
    part.CFrame = hrp.CFrame * CFrame.new(0,75,0)
    
    following = rs.RenderStepped:Connect(function()
        if not hrp or not hrp.Parent then return end
        if enabled then part.CFrame = hrp.CFrame * CFrame.new(0, 0, -60) end
    end)  

    return hrp
end

local hrp = SetupPlr()


if not getgenv().Network then
    getgenv().Network = {
        Parts = {},
        Velo = Vector3.new(10, 10, 10)
    }

    Network.RetainPart = function(v)
        if typeof(v) == "Instance" and v:IsA("BasePart") and v:IsDescendantOf(workspace) then
            table.insert(Network.Parts, v)
            v.CustomPhysicalProperties = PhysicalProperties.new(0, 0, 0, 0, 0)
        end
    end

    local function Control()
        plr.ReplicationFocus = workspace
        rs.Heartbeat:Connect(function()
            sethiddenproperty(plr, "SimulationRadius", math.huge)
            for i,v in next, Network.Parts do
                if v:IsDescendantOf(workspace) then
                    v.Velocity = Network.Velo
                end
            end
        end)
    end
    Control()
end

local no = {
    ["AlignPosition"] = true,
    ["BodyGyro"] = true,
    ["BodyVelocity"] = true,
    ["BodyPosition"] = true,
    ["LinearVelocity"] = true,
    ["BodyAngularVelocity"] = true,
    ["BodyForce"] = true,
    ["BodyThrust"] = true,
    ["Weld"] = true,
    ["WeldConstraint"] = true,
    ["Attachment"] = true,
    ["Torque"] = true,
    ["RocketPropulsion"] = true
}

local function Pull(v)
    if not enabled then return end
    if not att then return end

    if (
        v:IsA("BasePart")
        and not v.Anchored
        and v.Parent
        and not v.Parent:FindFirstChild("Humanoid")
        and not         game.Players:GetPlayerFromCharacter(v:FindFirstAncestorOfClass("Model"))
        and v.Name ~= "Handle"
    ) then
        if v.AssemblyRootPart == hrp.AssemblyRootPart then
            return
        end
        for i, k in next, v:GetDescendants() do
            if no[k.Name] then
                k:Destroy()
            end
        end 
        v.CanCollide = false
        v.AssemblyLinearVelocity = Vector3.new(0,0,0.1)         
        Network.RetainPart(v)

        local att0 = Instance.new("Attachment", v)

        local align = Instance.new("AlignPosition", v)
        align.Attachment0 = att0
        align.Attachment1 = att
        align.MaxForce = math.huge
        align.MaxVelocity = math.huge
        align.Responsiveness = 20
        local t = Instance.new("Torque", v)
        t.Torque = Vector3.new(0, 9999999999, 0)
        t.Attachment0 = att0
        
        

        table.insert(pulled, v)
    end
end



workspace.DescendantAdded:Connect(function(v)
    if enabled then
        task.defer(function()
            Pull(v)
        end)
    end
end)

local gui = Instance.new("ScreenGui", plr["PlayerGui"])
gui.Name = "Evil Blackhole Gui"
gui.ResetOnSpawn = false
local frame = Instance.new("Frame", gui)
local button = Instance.new("TextButton", frame)


frame.AnchorPoint = Vector2.new(0.5, 0.5)
frame.Size = UDim2.new(0.3, 0, 0.15, 0)
frame.BackgroundColor3 = Color3.new(0,0,0)
frame.Position = UDim2.new(0.175, 0, 0.925, 0)

local c = Instance.new("UICorner", frame)
local s = Instance.new("UIStroke", frame)
s.Thickness = 3
s.Color = Color3.new(1,0, 0)

button.AnchorPoint = Vector2.new(0.5, 0.5)
button.TextScaled = true
button.Text = "Disabled"
button.Font = "FredokaOne"
button.Position = UDim2.new(0.5, 0, 0.5, 0)
button.TextColor3 = Color3.new(1,1,1)
button.BackgroundColor3 = Color3.new(0, 1, 0)
button.Size = UDim2.new(0.9, 0, 0.9, 0)
button.BackgroundTransparency = 1

local s1 = Instance.new("UIStroke", button)
s1.Thickness = 1.5

local function Pulling()
    for i,v in next, workspace:GetDescendants() do
        Pull(v)
    end
end

button.MouseButton1Click:Connect(function()    
    if enabled then
        button.Text = "Disabled"
        s.Color = Color3.new(1, 0, 0)
        enabled = false        
    elseif not enabled then
        button.Text = "Enabled"
        s.Color = Color3.new(0, 1, 0)
        enabled = true

        task.defer(Pulling)
    end
end)

plr.CharacterAdded:Connect(function()
    hrp = SetupPlr()
end)