Scripting Helpers is winding down operations and is now read-only. More info→

I've tried every way I can think of and still not luck, so how can I Debounce this correctly?

Asked by

Azuc 112

6 years ago

Edited 6 years ago

Basically spamming left shift will cause the InputEndeds stamina regen function to repeat for each time you let go of the button allowing you to regen stamina at an insane rate.

I have tried every placement of debounce I can think of and still hasnt changed a thing.

01local Player = game.Players.LocalPlayer
02local Mouse = Player:GetMouse()
03local Input = game:GetService("UserInputService")
04local Sprinting = Player.PlayerScripts:WaitForChild("Core").Sprinting
05 
06local Stamina = 100
07local Debounce = false
08 
09 
10 
11 
12Input.InputBegan:Connect(function(input)
13    if(input.KeyCode==Enum.KeyCode.Space) then
14        Stamina = Stamina - 7
15        print(Stamina) --Debugging Purposes
16    end
17end)
18 
19 
20Input.InputBegan:Connect(function(input)
21    if(input.KeyCode==Enum.KeyCode.LeftShift) then
22        Sprinting.Value = true
23        local Humanoid = game.Players.LocalPlayer.Character.Humanoid
24        if Humanoid then
25        Humanoid.WalkSpeed = 25
26        end
27        while Sprinting.Value == true and Stamina >= 6 do
28            if Stamina >=6 then
29            Stamina = Stamina - 1
30            wait(.05)
31            end
32            print(Stamina) --Debugging Purposes
33        end
34        Humanoid.WalkSpeed = 16
35        Sprinting.Value = false
36    end
37end)
38 
39Input.InputEnded:Connect(function(input)
40    if(input.KeyCode==Enum.KeyCode.LeftShift) then
41        Debounce = true
42        Sprinting.Value = false
43        local Humanoid = game.Players.LocalPlayer.Character.Humanoid
44        if Humanoid then
45            Humanoid.WalkSpeed = 16
46        end
47        while Sprinting.Value == false and Stamina <=99 and Debounce == true do
48            if Stamina <=99 then
49            Stamina = Stamina + 1
50            wait(.7)
51            print(Stamina) --Debugging Purposes
52            end
53        end
54        Debounce = false
55    end
56end)
 View all 56 lines...

If my answer satisfies your question, please accept it. RAYAN1565 691 — 6y

I have made this into a personal project and created a ScreenGui that shows stamina and alters it. If you would like a copy of it, I'd be happy to share with you. RAYAN1565 691 — 6y

1 answer

Answered by

RAYAN1565 691

6 years ago

Edited 6 years ago

When using a debounce, you must satisfy all four parts:

Index a variable and set it to false (or true if you want but we'll focus on the former).

Within the if-then statement, check for whether the variable is set to false. If it is, the code will continue to run. If not, the code will not execute further.

Usually the next line after the if-then statement, change the variable to the opposite (in this case, we'll change it to true). This prevents the script to run the code again since the variable is no longer equal to false. Thus the if-then statement fails and the rest of the code will not run which is what we want. We want the code to run once and not multiple times.

After the code has executed completely, we change the variable back to false.

The above information is useful in certain scripts. But I can recreate two scripts: one for walkspeed and one for stamina, that does not need to utilize debounce.

The scripts below is written in a way that doesn't need to use debounce and is less complicated than the script you attempted to write.

These scripts should appear in the following order with the following names under StarterGui:

"StarterGui" (StarterGui)

"staminaScript" (LocalScript)

"Stamina" (IntValue) Set the value to '100' in Studio

"walkSpeedScript" (LocalScript)

"staminaScript":

01local player = game.Players.LocalPlayer
02local humanoid = game.Players.LocalPlayer.Character:FindFirstChild("Humanoid")
03local input = game:GetService("UserInputService")
04local leftShift, space = 0, 0
05local t, f = true, false
06 
07input.InputBegan:Connect(function(key)
08    if (key.KeyCode == Enum.KeyCode.LeftShift) then
09        leftShift = t
10    elseif (key.KeyCode == Enum.KeyCode.Space) then
11        space = t
12    end
13end)
14 
15input.InputEnded:Connect(function(key)
16    if (key.KeyCode == Enum.KeyCode.LeftShift) then
17        leftShift = f
18    elseif (key.KeyCode == Enum.KeyCode.Space) then
19        space = f
20    end
21end)
22 
23function staminaProc()
24    if leftShift == t and script.Stamina.Value >= 6 then
25        script.Stamina.Value = script.Stamina.Value - 6
26        wait(1)
27    elseif leftShift == t and script.Stamina.Value < 6 then
28        script.Stamina.Value = script.Stamina.Value + 1
29        wait(0.5)
30    elseif leftShift == f and script.Stamina.Value < 100 then
31        script.Stamina.Value = script.Stamina.Value + 1
32        wait(0.5)
33    end
34 
35    if space == t and script.Stamina.Value >= 7 then
36        script.Stamina.Value = script.Stamina.Value - 7
37        wait(0.6)
38    elseif space == t and script.Stamina.Value < 7 then
39        script.Stamina.Value = script.Stamina.Value + 1
40        wait(0.5)
41    elseif space == f and script.Stamina.Value < 100 then
42        script.Stamina.Value = script.Stamina.Value + 1
43        wait(0.5)
44    end
45end
46 
47while true do
48    wait()
49    staminaProc()
50end
 View all 50 lines...

"walkSpeedScript":

01local player = game.Players.LocalPlayer
02local humanoid = game.Players.LocalPlayer.Character:FindFirstChild("Humanoid")
03local input = game:GetService("UserInputService")
04local leftShift, space = 0, 0
05local t, f = true, false
06 
07input.InputBegan:Connect(function(key)
08    if (key.KeyCode == Enum.KeyCode.LeftShift) then
09        leftShift = t
10    elseif (key.KeyCode == Enum.KeyCode.Space) then
11        space = t
12    end
13end)
14 
15input.InputEnded:Connect(function(key)
16    if (key.KeyCode == Enum.KeyCode.LeftShift) then
17        leftShift = f
18    elseif (key.KeyCode == Enum.KeyCode.Space) then
19        space = f
20    end
21end)
22 
23function walkSpeedProc()
24    if leftShift == t and script.Parent.Stamina.Value < 6 then
25        humanoid.WalkSpeed = 16
26        humanoid.JumpPower = 0
27    elseif leftShift == t and script.Parent.Stamina.Value >= 6 then
28        humanoid.WalkSpeed = 25
29    elseif leftShift == f then
30        humanoid.WalkSpeed = 16
31    end
32 
33    if space == t and script.Parent.Stamina.Value >= 7 then
34        humanoid.JumpPower = 50
35    elseif space ==  t and script.Parent.Stamina.Value < 7 then
36        humanoid.JumpPower = 0
37    elseif space == f then
38        humanoid.JumpPower = 0
39    end
40end
41 
42while true do
43    wait()
44    walkSpeedProc()
45end
 View all 45 lines...

I read this over and made the changes necessary but I run into the same issue but just in reverse now if I spam shift the stamina just shoots down forever extremely fast Azuc 112 — 6y

Yeah I tried it and its still having the same issue, I honestly have no idea why at this point. Azuc 112 — 6y

Yeah im at a complete loss at this point, maybe I need to rewrite it all from scratch. At the moment when you run it after you sprint the first time there is a huge delay before it lets you sprint again even though you have the stamina. Azuc 112 — 6y

I wrote up a new script that should solve all your frustrations. Basically, I just set each key to either true or false. Then after that I ran a loop function that checks which keys are set to true and which set to false and changes properties (such as stamina and walkspeed) accordingly. RAYAN1565 691 — 6y

I've tried every way I can think of and still not luck, so how can I Debounce this correctly?

1 answer

Answer this question