Etop is a project mainly written in Emacs Lisp, it's free.

Run "top" to display information about processes