0

# Trying to pull a player to another player, but it doesn't pull fast enough. Any tips?

I'm making a script that pulls the nearest player. It runs properly, but the character moves over incredibly slowly unless they are in the air, which I have tried fixing by forcing them up with Velocity and by making them not collide, but the collision isn't working and the up velocity isn't something I liked. Could someone look my code over and give me some tips to make it work better?

RS.UtilEvents.PullRope.OnServerEvent:Connect(function(player, Password, Target)
Target.Backpack.Stand.Value = 0
local pos = player.Character.LowerTorso
local bp = Instance.new("BodyPosition", Target.Character.HumanoidRootPart)
local stringie = Instance.new("Part", player.Character.HumanoidRootPart)
stringie.Shape = Enum.PartType.Block
local Distance = (Target.Character.HumanoidRootPart.Position-player.Character.HumanoidRootPart.Position).Magnitude
stringie.CFrame = CFrame.new(Target.Character.HumanoidRootPart.Position,player.Character.HumanoidRootPart.Position) * CFrame.new(0,0,-Distance/2)
stringie.Size = Vector3.new(.3,.3,Distance)
bp.Position = pos.Position
stringie.Anchored = true
stringie.CanCollide = false
stringie.Material = Enum.Material.SmoothPlastic
bp.D = 1000
bp.MaxForce = Vector3.new(10000, 10000, 10000)
bp.P = 10000
for i = 1,50 do
wait(.1)
bp.Position = pos.Position
Distance = (Target.Character.HumanoidRootPart.Position-player.Character.HumanoidRootPart.Position).Magnitude
stringie.CFrame = CFrame.new(Target.Character.HumanoidRootPart.Position,player.Character.HumanoidRootPart.Position) * CFrame.new(0,0,-Distance/2)
stringie.Size = Vector3.new(.3,.3,Distance)
if Distance < 3 then
for _,v in pairs(Target.Character:GetChildren()) do
if v:IsA("BasePart") then
v.CanCollide = true
end
end
else
for _,v in pairs(Target.Character:GetChildren()) do
if v:IsA("BasePart") then
v.CanCollide = false
end
end
end
if i == 50 then
for _,v in pairs(Target.Character:GetChildren()) do
if v:IsA("BasePart") then
v.CanCollide = true
end
end
Target.Backpack.Stand.Value = 1
bp:Destroy()
stringie:Destroy()
end
end
end)