Common Lisp: A Gentle Introduction has you code a bunch of neat little projects, I'm especially fond of the substitution cypher solving program. It reminds me of Covert Action.