EmacsPoker is a very simple video poker game that runs inside of Emacs.
It’s available from my web page: http://marc.abramowitz.info/archives/2006/04/17/emacs-poker/
If you have ideas or code that you want to contribute, e-mail me at msabramo at yahoo dot com.
Replace line 30 with :
(defconst poker-suits '(♥ ♦ ♠ ♣))
and it look a litle bit nicer