local Player = game.Players.LocalPlayer
local Dragging = false
local Bin = Instance.new("HopperBin")
Bin.Name = "Drag Player"

function onButton1Down(Mouse)
    local Target = game.Players:GetPlayerFromCharacter(Mouse.Target.Parent) or game.Players:GetPlayerFromCharacter(Mouse.Target.Parent.Parent)
    if Target ~= nil then
        Dragging = true
        Mouse.TargetFilter = Target.Character
        while Dragging and game:GetService("RunService").Stepped:wait() do
            Target.Character:SetPrimaryPartCFrame(CFrame.new(Mouse.Hit.p))
        end
    end
end

function onButton1Up(Mouse)
    Mouse.TargetFilter = Player.Character
    Dragging = false
end

Bin.Selected:connect(function(Mouse)
    Mouse.Button1Down:connect(function() onButton1Down(Mouse) end)
    Mouse.Button1Up:connect(function() onButton1Up(Mouse) end)
end)

Bin.Parent = Player.Backpack