singel surface particle system

Hey, does anyone know of any single surface particle systems made in blitz? Want to see the speed differences and how they went and implemented it.

code archives has one... the source to my demo below has another (I think that source was released while I was away)