plr = game.Players.LocalPlayer
mouse = plr:GetMouse()
part = nil
bp = nil
particles = nil
mouse.Button1Down:connect(function()
	if plr.Character.Parent == workspace.Camera then
		if mouse ~= nil then
			if mouse.Target ~= nil then
				part = mouse.Target
				bp = Instance.new("BodyPosition",part)
				bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
				bp.Position = part.Position
				particles = Instance.new("ParticleEmitter",part)
				particles.Color = ColorSequence.new(Color3.new(0,0,0))
				particles.Size = NumberSequence.new(1)
				particles.Texture = "rbxassetid://292289455"
				particles.VelocitySpread = 360
				particles.Speed = NumberRange.new(0)
				particles.RotSpeed = NumberRange.new(0)
				particles.Rotation = NumberRange.new(0)
				particles.Rate = 250
				particles.Lifetime = NumberRange.new(.2,.4)
				particles.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(.12,.688,0),NumberSequenceKeypoint.new(.891,.887,0),NumberSequenceKeypoint.new(1,1,0)})
				dwn = true
			end
		end
		while dwn == true do
			wait()
			bp.Position = mouse.hit.p
			if part then
				if part.Parent:FindFirstChildOfClass("Humanoid") then
					part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = true
				end
			end
		end
	end
end)
mouse.Button1Up:connect(function()
	dwn = false
	if part then if part.Parent:FindFirstChildOfClass("Humanoid") then part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false end part = nil end
	if bp then bp:Destroy() end
	if particles then particles:Destroy() end
end)
base = Instance.new("ScreenGui",plr.PlayerGui)
bbg = Instance.new("BillboardGui",plr.Character.Head)
bbg.Size = UDim2.new(0,200,0,50)
bbg.StudsOffset = Vector3.new(0,3,0)
bbgTl = Instance.new("TextLabel",bbg)
bbgTl.BackgroundTransparency = 1
bbgTl.Size = UDim2.new(10,0,1,0)
bbgTl.Position = UDim2.new(-4.5,0,0,0)
bbgTl.Font = "Code"
bbgTl.Text = " "
bbgTl.TextSize = 25
bbgTl.TextStrokeColor3 = Color3.new(1,1,1)
bbgTl.TextColor3 = Color3.new(0,0,0)
bbgTl.TextStrokeTransparency = 0
bbgTl.TextWrapped = true
plr.Chatted:connect(function(msg)
	bbgTl.Text = msg
	wait(5)
	if bbgTl.Text == msg then
		bbgTl.Text = " "
	end
end)
touchCounter = 0