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

Applying maximum speed doesn't work?

Asked by

6 years ago

So I'm making a Model that is hovering on the ground (thanks to a BodyPosition that's Position is set a little above the ground and it's MaxForce is set to 0, 40000, 0) and can be steered. The model consists of a Part (in which is a Script, a BodyGyro, BodyPosition and a BodyVelocity) and a VehicleSeat that is welded to the Part. The Script makes it so the signals sent by the player to VehicleSeat are changing the properties of BodyGyro and BodyVelocity. This is how it looks:

01local RunService = game:GetService("RunService")
02local part = script.Parent
03local bodyGyro = part.BodyGyro
04local bodyVel = part.BodyVelocity
05local seat = script.Parent.Parent.VehicleSeat
06local goBack, goForward = false, false
07local turnLeft, turnRight = false, false
08 
09local maxForward = 20
10local maxBack = -10
11 
12seat:GetPropertyChangedSignal("Occupant"):Connect(function(char)
13    local currentSpeed = 0
14    local currentAngle = 0
15    RunService.Heartbeat:Connect(function(step)
16        bodyVel.Velocity = (part.CFrame.LookVector  * currentSpeed)
17        bodyGyro.CFrame =  CFrame.Angles(math.rad(0), math.rad(currentAngle), math.rad(0))
18        if seat.Throttle == -1 then
19            if goBack then return end
20            goBack = true
21            repeat wait(.1)
22                currentSpeed = currentSpeed - 1
23            until seat.Throttle ~= -1 or currentSpeed <= maxBack -- The 2nd statement doesn't seem to do anything.
24            goBack = false
25        elseif seat.Throttle == 1 then
26            if goForward then return end
27            goForward = true
28            repeat wait(.1)
29                currentSpeed = currentSpeed + 1
30            until seat.Throttle ~= 1 or currentSpeed >= maxForward -- Here too.
31            goForward = false
32        end
33        if seat.Steer == -1 then
34            if turnLeft then return end
35            turnLeft = true
36            repeat wait(.01) 
37                currentAngle = currentAngle + 1
38            until seat.Steer ~= -1  
39            turnLeft = false             
40        elseif seat.Steer == 1 then
41            if turnRight then return end
42            turnRight = true
43            repeat wait(.01) 
44                currentAngle = currentAngle - 1
45            until seat.Steer ~= 1
46            turnRight = false
47        end
48    end)
49end)
 View all 49 lines...

The Model speeds up fine and rotates fine too, but the maximum speed I applied to it doesn't do anything. The speed easily goes above 20. I tried doing other things to fix it but nothing worked. Thanks for reading.

I'm not too familiar with using forces, but have you tried setting max speed to much lower values? Other then that I could see using heartbeat causing a railgun effect since it's run so often, try putting a /60 after currentSpeed on line 16 maybe clc02 553 — 6y

It just makes the Model speed up slower Tymberlejk 143 — 6y

1 answer

Answered by

GooierApollo664 183

6 years ago

01local RunService = game:GetService("RunService")
02local part = script.Parent
03local bodyGyro = part.BodyGyro
04local bodyVel = part.BodyVelocity
05local seat = script.Parent.Parent.VehicleSeat
06local goBack, goForward = false, false
07local turnLeft, turnRight = false, false
08 
09local maxForward = 20
10local maxBack = -10
11 
12 
13local waitTime = 0.1--bigger it gets, slower boat will be
14seat:GetPropertyChangedSignal("Occupant"):Connect(function(char)
15    local currentSpeed = 0
16    local currentAngle = 0
17    RunService.Heartbeat:Connect(function(step)
18        bodyVel.Velocity = (part.CFrame.LookVector  * currentSpeed)
19        bodyGyro.CFrame =  CFrame.Angles(math.rad(0), math.rad(currentAngle), math.rad(0))
20        if seat.Throttle == -1 then
21--          if goBack then return end
22 --           goBack = true--
23 
24            if seat.Throttle == -1 and (currentSpeed <= maxBack) then-- this
25                currentSpeed = currentSpeed - 1
26            end --
27 
28--          goBack = false
29        elseif seat.Throttle == 1 then
30 --         if goForward then return end
31 --         goForward = true
32 
33            if seat.Throttle == 1 and (currentSpeed <= maxForward) then --and this
34                currentSpeed = currentSpeed + 1
35            end
36 
37 --         goForward = false
38        end
39        if seat.Steer == -1 then
40--          if turnLeft then return end
41--          turnLeft = true
42 
43            if seat.Steer == -1 then
44                currentAngle = currentAngle + 1
45            end   
46 
47--          turnLeft = false              
48        elseif seat.Steer == 1 then
49--          if turnRight then return end
50--          turnRight = true
51 
52            if seat.Steer == 1 then
53                currentAngle = currentAngle - 1
54            end
55 
56--            turnRight = false
57        end
58    end)
59    wait(waitTime)
60end)
 View all 60 lines...

I believe this should work, but I'm not sure why you need those booleans and checking them for nothing at 1, 2, 3 and 4 and then reassigning them you aren't using them, so to keep Code clean I recommend you to put them out

Applying maximum speed doesn't work?

1 answer

Answer this question