Free snippet of code for the next hacker who gets in:
p1:Particle=Particle.Create(1) p1.SetSpeed LIGHT_SPEED*0.99 p1.Dir=1 p2:Particle=Particle.Create(1) p2.SetSpeed LIGHT_SPEED*0.99 p2.Dir=-1 While Not KeyHit(KEY_ESCAPE) If Collided(p1,p2) Global bh:BlackHole = BlackHole.Create(10000000,10000000) Notify "Houston .. we have a problem!" Endif Wend