PacMania is a project mainly written in Common Lisp, it's free.
Pac Man in Lisp
To load: (load "game")
To run: Random: (simple-run) BFS: (run-bfs) DFS: (run-dfs)