chroma coding nesting depth

are there any text editors which chroma-code lisp code by nesting depth, something like this

(defun factorial (n)(if (<= n 1)
1
(* n (factorial (- n 1)))))

Cusp colorizes the code where the cursor is at the moment.
See also colorize.

Your question reminded me of an old Lemonodor post.