procedure GetStatisitcs(var avgSz: CommonTypes.Size; var avgPoints: integer);

This is GetStatisitcs, a member of class Blackruns.