<- PRPL reference <- Particles
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