CollisionCount event occurs when the counter of a Sprite reaches zero. Sprite1 property
holds the sprite.
Example:
Sub gw_CollisionCount 'This event occurs when a Sprite counter reaches
zero
sprite.Value = gw.Sprite1 'Get
the sprite.
sprite.Counter = 100 ' We want more events
...
End Sub