----------------------------------------------------------------

while wait() do 
if script.Parent.Values.Boost.Value > _Tune.TurboPSI - 3 and script.Parent.Values.RPM.Value > _Tune.PeakRPM - 2000 then 
 Lag = math.random(1,40)
end
if script.Parent.Values.Boost.Value > _Tune.TurboPSI - 3 and script.Parent.Values.RPM.Value > _Tune.PeakRPM - 2000 then 
 Lag2 = math.random(1,40)
if Lag == Lag2 and _Tune.MisFire == false  then 
Tlag = true 
script.Parent.Values.TLA.Value = DefaultTurboLag + Reducer 
wait (1)
Tlag = false
script.Parent.Values.TLA.Value = DefaultTurboLag
elseif Lag == Lag2 and _Tune.MisFire == true and RllyLag == true  then 
Tlag = true 
script.Parent.Values.TLA.Value = DefaultTurboLag + Reducer 
car.Body.Exhaust.E1.Afterburn.Rate = 100
car.Body.Exhaust.E1.Afterburn.Size = NumberSequence.new(2)
car.Body.Exhaust.E1.L.Range = 9
wait (0.5)
Tlag = false
script.Parent.Values.TLA.Value = DefaultTurboLag - Reducer 
wait (0.5)
script.Parent.Values.TLA.Value = Missfireboost
wait (1)
script.Parent.Values.TLA.Value = DefaultTurboLag
car.Body.Exhaust.E1.Afterburn.Rate = 0
car.Body.Exhaust.E1.Afterburn.Size = NumberSequence.new(0.5)
car.Body.Exhaust.E1.L.Range = 0 
wait (1)
RllyLag = false 
wait (Missfireboostwait)
RllyLag = true 
end
end
end
