Cleaned up drawCard, added setters for Game, using Control.Monad.Trans.State.