sub getSpriteCenter( spr_id, ByRef x, ByRef y)

Returns a sprites center of mass