;열려있는 모든 도면을 저장하기 (defun c:saveall (/ acad docs)  (vl-load-com)  (setq myacad (vlax-get-acad-object)        docs (vla-get-documents myacad)  )  (vlax-for doc docs (vla-save doc))  (vlax-release-object docs)  (vlax-release-object myacad)  (princ) )