; CADLabo.com - layer names only
(defun c:CR_LAYERS ()
  (command "_.-LAYER" "_New" "WALL,DIM,GUIDE" "")
  (princ "\nCheck layers with LAYER.")
  (princ)
)