local O=workspace.FilteringEnabled local w=script.Parent.Car.Value local V=w:WaitForChild("\065\067\054\095\070\069\095\083\111\117\110\100\115")local W=require(w["\065-\067\104\097\115\115\105\115 \084\117\110\101"])local q=0 local D=0 local c=0 local B=0 local a=0 local U=0 local r=0 local F=0 local H=0 script:WaitForChild("\082\101\118")script.Parent.Values.Gear.Changed:connect(function()D=1 if script.Parent.Values.RPM.Value>5000 then H=.2 end end)for O,w in pairs(w.DriveSeat:GetChildren())do for O,V in pairs(script:GetChildren())do if w.Name==V.Name then w:Stop()wait()w:Destroy()end end end V:FireServer("\110\101\119\083\111\117\110\100","\082\101\118",w.DriveSeat,script.Rev.SoundId,0,script.Rev.Volume,true)V:FireServer("\112\108\097\121\083\111\117\110\100","\082\101\118")w.DriveSeat:WaitForChild("\082\101\118")while wait()do D=math.max(0,D-.1)local t=script.Parent.Values.RPM.Value if script.Parent.Values.Throttle.Value<=W.IdleThrottle/100 then r=math.max(.3,r-.2)a=math.max(0,a-.05)U=1 else r=math.min(1,r+.1)a=1 U=0 end H=math.min(1,H+.2)if script.Parent.Values.RPM.Value>W.Redline-W.RevBounce/4 and script.Parent.Values.Throttle.Value>W.IdleThrottle/100 then F=.5 else F=1 end if not script.Parent.IsOn.Value then q=math.max(q-.015,0)else q=1 end local u=((3*r)*H)*F+(((B*U)*a)*(3-r))*math.sin(tick()*50)local x=math.max((script.Rev.SetPitch.Value+(script.Rev.SetRev.Value*t)/W.Redline)*q^2+(c*D)*math.sin(80*tick()),script.Rev.SetPitch.Value)if O then V:FireServer("\117\112\100\097\116\101\083\111\117\110\100","\082\101\118",script.Rev.SoundId,x,u)else w.DriveSeat.Rev.Volume=u w.DriveSeat.Rev.Pitch=x 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
local trm = 0
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, script.Rev.Volume, 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 = (3 * throt * shift * redline) + (trm * trmon * trmmult * (3 - 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
