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

Is there a way to make this more smooth?

Asked by

Senor_Chung 210

10 years ago

I've made a sprinting script when you press 'q', you sprint. Your camera also zooms out a little. But when you rapidly press 'q' the camera looks bad. How would i go about making it look smother?

here is the script:

01mouse = game.Players.LocalPlayer:GetMouse()
02 
03mouse.KeyDown:connect(function(key)
04    if key == "q" then
05        script.Parent:TweenSize(UDim2.new(0,100,0,50),"InOut","Quad",2,true)
06        script.Parent:TweenSize(UDim2.new(1,100,0,50),"InOut","Quad",6,false)
07        wait()
08        script.Parent.BackgroundColor3 = Color3.new(0,0,1)
09        if game.Workspace.CurrentCamera.FieldOfView ~= 80 then
10        for i = 70,80,1 do
11                game:GetService("RunService").RenderStepped:wait()
12                game.Workspace.CurrentCamera.FieldOfView = i
13            end
14        end
15    end
16end)
17 
18mouse.KeyUp:connect(function(key)
19    if key == "q" then
20        script.Parent.BackgroundColor3 = Color3.new(0,1,0)
21        script.Parent:TweenSize(UDim2.new(1,100,0,50),"InOut","Quad",6,true)
22        script.Parent:TweenSize(UDim2.new(0,100,0,50),"InOut","Quad",2,false)
23        if game.Workspace.CurrentCamera.FieldOfView ~= 70 then
24            for i = 80,70,-1 do
25                game:GetService("RunService").RenderStepped:wait()
26                game.Workspace.CurrentCamera.FieldOfView = i
27            end
28        end
29    end
30end)
 View all 30 lines...

here is the game so you see what it looks like:

http://www.roblox.com/games/197480972/---

The Sprint is amazing. The people who keep pressing Q are just noobs who want unlimited sprint. It's good as is. Keep it up, and oh, I like that counter that keeps going up the higher you get. GreekGodOfMLG 244 — 10y

Thanks! Senor_Chung 210 — 10y

1 answer

Answered by

Muoshuu 580

10 years ago

You could set a debounce that does not allow the function to fire if in the middle of firing.

Example:

01mouse = game.Players.LocalPlayer:GetMouse()
02local firing=false
03 
04mouse.KeyDown:connect(function(key)
05    if key == "q" then
06        if not firing then
07            firing=true
08            script.Parent:TweenSize(UDim2.new(0,100,0,50),"InOut","Quad",2,true)
09            script.Parent:TweenSize(UDim2.new(1,100,0,50),"InOut","Quad",6,false)
10            wait()
11            script.Parent.BackgroundColor3 = Color3.new(0,0,1)
12            if game.Workspace.CurrentCamera.FieldOfView ~= 80 then
13                for i = 70,80,1 do
14                    game:GetService("RunService").RenderStepped:wait()
15                    game.Workspace.CurrentCamera.FieldOfView = i
16                end
17            end
18            firing=false
19        end
20    end
21end)
22 
23mouse.KeyUp:connect(function(key)
24    if key == "q" then
25        if not firing then
26            firing=true
27            script.Parent.BackgroundColor3 = Color3.new(0,1,0)
28            script.Parent:TweenSize(UDim2.new(1,100,0,50),"InOut","Quad",6,true)
29            script.Parent:TweenSize(UDim2.new(0,100,0,50),"InOut","Quad",2,false)
30            if game.Workspace.CurrentCamera.FieldOfView ~= 70 then
31                for i = 80,70,-1 do
32                    game:GetService("RunService").RenderStepped:wait()
33                    game.Workspace.CurrentCamera.FieldOfView = i
34                end
35            end
36            firing=false
37        end
38    end
39end)
 View all 39 lines...

Click here for more information on 'debounce'

Is there a way to make this more smooth?

1 answer

Answer this question