A freecell game in pascal!