luigi's ACF Exhaust system E2 particles

@name luigi's ACF Exhaust system
@inputs Engine:wirelink
@persist Smoke:array
#By luigi Just Place the chip on the Exhaust Pipe and wire it up the the engine.
if(first()){
function particleCustom(Material:string,Gravity:vector,SetVelocity:vector,SetPosition:vector,SetDuration:number,Collision:number,Bounce:number,SetColor:vector,StartAlpha:number,
EndAlpha:number,StartSize:number,EndSize:number){
    if(particleCanCreate()){
        particleSetMaterial(Material)
        particleGravity(Gravity)
        particleSetVelocity(SetVelocity)
        particleSetPosition(SetPosition)
        particleSetDuration(SetDuration)
        particleCollision(Collision)
        particleBounce(Bounce)
        particleSetColor(SetColor)
        particleSetStartAlpha(StartAlpha)
        particleSetEndAlpha(EndAlpha)
        particleSetStartSize(StartSize)
        particleSetEndSize(EndSize)
        particleCreate()
    }
}
Smoke = array(
	"particle/smokesprites_0001",
"particle/smokesprites_0002",
"particle/smokesprites_0003",
"particle/smokesprites_0004",
"particle/smokesprites_0005",
"particle/smokesprites_0006",
"particle/smokesprites_0007",
"particle/smokesprites_0008"
)
}
interval(80)
local Rpm = Engine["RPM",number]
#local Power = Engine["Power",number]
if(Rpm>0){
    local Color = (Rpm<1000) ? 200 : 155
    particleCustom(Smoke[random(8),string],vec(0,0,0),entity():up()*(Rpm/100),entity():toWorld(vec(0,0,5)),5,1,0,vec(Color),100,0,5,1000)
}