Slide script slower

local UIS = game:GetService(“UserInputService”)
local char = script.Parent
local slideAnim = Instance.new(“Animation”)

slideAnim.AnimationId = “https://www.roblox.com/assets/?id=9415043023”

local keybind = Enum.KeyCode.C
local canslide = true

UIS.InputBegan:Connect(function(input,gameprocessed)
if gameprocessed then return end
if not canslide then return end

if input.KeyCode == keybind then
canslide = false

local playAnim = char.Humanoid:LoadAnimation(slideAnim)
playAnim:Play()


local slide = Instance.new("BodyVelocity")
slide.MaxForce = Vector3.new(1,0,1) * 30000
slide.Velocity = char.HumanoidRootPart.CFrame.lookVector * 100
slide.Parent = char.HumanoidRootPart

for count = 1, 8 do
  wait(.1)
  slide.Velocity *= .7
end
playAnim:Stop()
slide:Destroy()
canslide = true

end
end)

What can I add to script so that the slide become weaker if I keep doing it and after like 4 seconds of not doing it, it goes back to normal
Can someone please do this for me it would rlly help