Add a new score to the list
function Add(APoints: cardinal; ALevel: cardinal; ASaveList: boolean): boolean