Checks if the given particle exists and is not destroyed. Returns 0 if the id is invalid or it is not a particle.

<-pid IsParticle if
    <-pid 0.1 DamageParticle
endif