--[[
function trv(search,query)
 for _,i in pairs(search:GetChildren()) do
  if i:IsA(query) then if i.Name == "Screen" then if i.Name == "StockSplash" then i:remove() end local bb = script.ClutchManagment.StockSplash:Clone() bb.Parent = i end end
  trv(i,query)
 end
end

trv(game.Workspace,"ScreenGui")]]
--

script.ClutchToThrottle.Value = VR
if th == 12 then
if script.Parent.CarSeat.Gear.Value == 4 then 	
	if GEAR.Value == 4 then
		if Wrpm.Value*(Gear4/FinalDrive)*100 < Idle then
			rpm.Value = Idle
		else
			rpm.Value = Wrpm.Value*(Gear4/FinalDrive)*100
end

if Wrpm.Value*(Gear4/FinalDrive)*100 >= RPMLimiter then
	rwd.Torque = 0
else

if script.Parent.Control.Throttle.Computer.Value == 0 and script.Parent.CarSeat.CC.Value == false then
	rwd.Torque = 0.2
else
	
if (((rpm.Value/10000)-((sconfig*rpm.Value)/10000)^4.8)*hp/(config*size)) < ((Gear4/FinalDrive)*(hp/650))*scale then
	rwd.Torque = (((Gear4/FinalDrive)*(hp/650))*scale)*th.Value
else
rwd.Torque = 
(((rpm.Value/10000)-((sconfig*rpm.Value)/10000)^4.8)*hp/(config*size))*th.Value
				end
			end
		end
	end
end	end