local y=workspace.FilteringEnabled local c=script.Parent.Car.Value local T=c:WaitForChild("\065\067\054\095\070\069\095\083\111\117\110\100\115")local F=require(c["\065-\067\104\097\115\115\105\115 \084\117\110\101"])local E=0 local H=0 local l=.13 local n=.4 local Z=0 local j=0 local M=0 local k=0 local a=0 script:WaitForChild("\082\101\118")script.Parent.Values.Gear.Changed:connect(function()H=1 if script.Parent.Values.RPM.Value>5000 then a=.2 end end)for y,c in pairs(c.DriveSeat:GetChildren())do for y,T in pairs(script:GetChildren())do if c.Name==T.Name then c:Stop()wait()c:Destroy()end end end T:FireServer("\110\101\119\083\111\117\110\100","\082\101\118",c.DriveSeat,script.Rev.SoundId,0,0,true)T:FireServer("\112\108\097\121\083\111\117\110\100","\082\101\118")c.DriveSeat:WaitForChild("\082\101\118")while wait()do H=math.max(0,H-.1)local W=script.Parent.Values.RPM.Value if script.Parent.Values.Throttle.Value<=F.IdleThrottle/100 then M=math.max(.3,M-.2)Z=math.max(0,Z-.05)j=1 else M=math.min(1,M+.1)Z=1 j=0 end a=math.min(1,a+.2)if script.Parent.Values.RPM.Value>F.Redline-F.RevBounce/4 and script.Parent.Values.Throttle.Value>F.IdleThrottle/100 then k=.5 else k=1 end if not script.Parent.IsOn.Value then E=math.max(E-.015,0)else E=1 end local d=E*(((15*M)*a)*k)+(((n*j)*Z)*(1-M))*math.sin(tick()*50)local S=math.max((script.Rev.SetPitch.Value+(script.Rev.SetRev.Value*W)/F.Redline)*E^2+(l*H)*math.sin(80*tick()),script.Rev.SetPitch.Value)if y then T:FireServer("\117\112\100\097\116\101\083\111\117\110\100","\082\101\118",script.Rev.SoundId,S,d)else c.DriveSeat.Rev.Volume=d c.DriveSeat.Rev.Pitch=S end end
--[[
		___      _______                _     
	   / _ |____/ ___/ /  ___ ____ ___ (_)__ 
	  / __ /___/ /__/ _ \/ _ `(_-<(_-</ (_-<
	 /_/ |_|   \___/_//_/\_,_/___/___/_/___/
 						SecondLogic @ Inspare
]]
local FE = workspace.FilteringEnabled
local car = script.Parent.Car.Value
local handler = car:WaitForChild("AC6_FE_Sounds")
local _Tune = require(car["A-Chassis Tune"])
local on = 0
local mult = 0
local det = 0.13
local trm = 0.4
local trmmult = 0
local trmon = 0
local throt = 0
local redline = 0
local shift = 0

script:WaitForChild("Rev")

script.Parent.Values.Gear.Changed:connect(function()
	mult = 1
	if script.Parent.Values.RPM.Value > 5000 then
		shift = 0.2
	end
end)

for i, v in pairs(car.DriveSeat:GetChildren()) do
	for _, a in pairs(script:GetChildren()) do
		if v.Name == a.Name then
			v:Stop()
			wait()
			v:Destroy()
		end
	end
end

handler:FireServer("newSound", "Rev", car.DriveSeat, script.Rev.SoundId, 0, 0, true)
handler:FireServer("playSound", "Rev")
car.DriveSeat:WaitForChild("Rev")

while wait() do
	mult = math.max(0, mult - 0.1)
	local _RPM = script.Parent.Values.RPM.Value

	if script.Parent.Values.Throttle.Value <= _Tune.IdleThrottle / 100 then
		throt = math.max(0.3, throt - 0.2)
		trmmult = math.max(0, trmmult - 0.05)
		trmon = 1
	else
		throt = math.min(1, throt + 0.1)
		trmmult = 1
		trmon = 0
	end
	shift = math.min(1, shift + 0.2)
	if
		script.Parent.Values.RPM.Value > _Tune.Redline - _Tune.RevBounce / 4
		and script.Parent.Values.Throttle.Value > _Tune.IdleThrottle / 100
	then
		redline = 0.5
	else
		redline = 1
	end
	if not script.Parent.IsOn.Value then
		on = math.max(on - 0.015, 0)
	else
		on = 1
	end
	local Volume = (on * (15 * throt * shift * redline) + (trm * trmon * trmmult * (1 - throt) * math.sin(tick() * 50)))
	local Pitch = math.max(
		((script.Rev.SetPitch.Value + script.Rev.SetRev.Value * _RPM / _Tune.Redline) * on ^ 2)
			+ (det * mult * math.sin(80 * tick())),
		script.Rev.SetPitch.Value
	)
	if FE then
		handler:FireServer("updateSound", "Rev", script.Rev.SoundId, Pitch, Volume)
	else
		car.DriveSeat.Rev.Volume = Volume
		car.DriveSeat.Rev.Pitch = Pitch
	end
end
