--//Backfire//--
--(Instructions)
--1: Put your ExhaustH into the 'Body' of the car.
--2: Make sure you exhaust is seperated into 2 meshes, the inside and the outer exhaust.
--3: Name the inside of the exhaust (the black part) 'Hot1'
--4: Put this script into the 'Plugins'
--5: Now when you rev your exhaust will heat up.

local randomability = math.random (1, 10)
	--[[
if script.Parent.Values.RPM.Value > 9400 and randomability <=1 and script.Parent.Values.Throttle.Value ~= 1 then
	car.Body.Exhaust.BFLight1.SpotLight.Enabled = true
	wait (0.03)
	car.Body.Exhaust.BFLight1.SpotLight.Enabled = false
	wait (0.07)
end
]]
if script.Parent.Values.RPM.Value > 5000 then
	if FE then
		handler:FireServer("heat1")
	else
	car.Body.ExhaustH.Hot1.Decal.Transparency = math.min(car.Body.ExhaustH.Hot1.Decal.Transparency+.005,1)
	car.Body.ExhaustH.Hot2.Decal.Transparency = math.min(car.Body.ExhaustH.Hot1.Decal.Transparency+.005,1)
	end
else
	if FE then
		handler:FireServer("heat2")
	else
	car.Body.ExhaustH.Hot1.Decal.Transparency = math.max(car.Body.ExhaustH.Hot1.Decal.Transparency-.01,0)
	car.Body.ExhaustH.Hot2.Decal.Transparency = math.max(car.Body.ExhaustH.Hot1.Decal.Transparency-.01,0)
	end
end

if car.Body.ExhaustH.Hot1.Decal.Transparency > .8 then
	if FE then
		handler:FireServer("heat3")
	else
	car.Body.ExhaustH.Hot1.Spark.Enabled = true
	car.Body.ExhaustH.Hot2.Spark.Enabled = true
	end
	else
		if FE then
		handler:FireServer("heat4")
	else
	car.Body.ExhaustH.Hot1.Spark.Enabled = false
	car.Body.ExhaustH.Hot2.Spark.Enabled = false
	end
end
