Something has modified the database. Possibly the _.ZOOM _E   For a simple solution, maybe :   (defun c:qq () (cond ((zerop (getvar "DWGTITLED")) (setvar "CMDECHO" 1) (command "_.QSAVE") (while (> (getvar "CMDACTIVE") 0) (command pause)) (setvar "CMDECHO" 0)) ((> (getvar "DBMOD") 0) (command "_.QSAVE" "_Yes")) (T (command "_.QSAVE"))) (prin1))       HTH -David