A game of 2048 implemented in Tcl.