Modified script to use lisp instead of CommonLisp