(defun c:HELLOENV ()
  (princ "\nCADLabo: AutoLISP is ready.")
  (princ)
)