LISP - Automatic Save that runs at set intervals

[tyeelaw13]

Is there any way to have a lisp routine run at a set interval? I am looking to see if i can do a save every 10 minutes with a different name each time. Since AutoCAD doesn't save the backup saves when it closes, several people in my workplace are looking for a way to save a drawing that is in a design phase so they might be able to revert back to undo changes that were made.

Thank you in advance.

[Opie]

I would think you would need to look into reactors.

[Mike.Perry]

Hi

Here is something from Peter Jamtgaard (an old LISP Guild post) that might prove an interesting starting point...

VLR_AUTO_SAVE.LSP is a program that will save after every 10 commands. It will not save while a lisp program is being executed.

Try it out and let me know if you like it or not, bugs, you know.

(defun C:VLR_AUTO_SAVE ()
  (vl-load-com)
  (setq ASRXN1 (vlr-editor-reactor nil '((:vlr-commandended	 . ASCOM1)))
 	   ASRXN2 (vlr-lisp-reactor nil   '((:vlr-lispWillStart	. ASCOM2)))
 	   ASRXN3 (vlr-lisp-reactor nil   '((:vlr-lispended		. ASCOM3)))
  )
 )
 (defun ASCOM1 (CALL CALLBACK)
  (if (not LISPRUN)
   (progn
    (cond
 	((= (car CALLBACK) "SAVE")
 	 (setq ASCOUNT 0)
 	)
 	((= (car CALLBACK) "QSAVE")
 	 (setq ASCOUNT 0)
 	)
    )
    (if (not ASCOUNT)
 	(setq ASCOUNT 0)
 	(if (> ASCOUNT 9)
 	 (progn
 	  (setq ASCOUNT 0)
 	  (vla-save (vla-get-activedocument (vlax-get-acad-object)))
 	  (print "AutoSave")
 	 )
 	 (progn
 	  (setq ASCOUNT (1+ ASCOUNT))
 	  (print ASCOUNT)
 	 )
 	)
    )
   )
  )
 )
 (defun ASCOM2 (CALL CALLBACK)
  (setq LISPRUN 'T)
 )
 (defun ASCOM3 (CALL CALLBACK)
  (setq LISPRUN nil)
 )

Have a good one, Mike

[peter]

try this version

[jwanstaett]

If you are use AutoCAD 2000 and up all you need to do is open options and on open and save tab set automatic save to 10 minutes and select the check box for automatic save and create backup copy with each save. on the files tab set the Automatic Save File Location to the path where to save the files. AutoCAD will do the job for you. The files will be save with a name like filename_1_1_1427.sv$ or filename_1_1_2427.Bak use the date modified is the time the file was saved. To to revert back change the sv$ or bak to dwg and open the file.

Note: if thefile is not open for 10 min the autosave will not take place

[Mike.Perry]

If you are use AutoCAD 2000 and up all you need to do is open options and on open and save tab set automatic save to 10 minutes and select the check box for automatic save and create backup copy with each save. on the files tab set the Automatic Save File Location to the path where to save the files. AutoCAD will do the job for you. The files will be save with a name like filename_1_1_1427.sv$ or filename_1_1_2427.Bak use the date modified is the time the file was saved. To to revert back change the sv$ or bak to dwg and open the file.

Note: if thefile is not open for 10 min the autosave will not take place

Hi

Under most normal conditions the SV$ and BAK files will automatically be deleted once a clean exit from the drawing file(s) occurs.

ID: TS68939 - BAK files created as backups of SV$ automatic save files are not deleted after exit

ID: TS73581 - Automatic save files (SV$ files) no longer kept after normal exit

ID: TS20536 - Automatic save (SV$) files

Have a good one, Mike

[kennet.sjoberg]

Hi

Under most normal conditions the SV$ and BAK files will automatically be deleted ...

mnnnnot really.. the bak file in not deleted after a normal exit, but you can tell the system to not create it.

: ) Happy Computing !

kennet

[Mike.Perry]

mnnnnot really.. the bak file in not deleted after a normal exit, but you can tell the system to not create it.

Hi

The BAK file will be a copy of the drawing file from the Save before Closing, therefore only one BAK will exist... totally pointless in the context of this thread...

Have a good one, Mike

[Jeff_M]

I think that THIS thread over at theSwamp.org has exactly what you are looking for. The post by Kerry, specifically.

Jeff

[kennet.sjoberg]

Hi
The BAK file will be a copy of the drawing file from the Save before Closing, therefore only one BAK will exist... totally pointless in the context of this thread...

Have a good one, Mike

Absolutely correct, I was just correcting your statement, about automatically deleting *.BAK files.

: ) Happy Computing !

kennet