Datei wurde beim Foerdertest gleich 2 mal gespeichert. Einmal reicht.

Lisp/VarioFoerderer.lsp

@@ -1223,17 +1223,7 @@
     (setq result-pfad (getenv "DXFM_RESULTS"))
     (setq result-pfad (strcat (getenv "DXFM_BLOCKS") "../results"))
   )
-  (setq dateiname (strcat result-pfad
-                          "/FOERDERTEST_"
-                          (menucmd "M=$(edtime,$(getvar,date),YYYYMODD-HHmmss)")
-                          ".dxf"))
-  (princ (strcat "\n\n📁 Gespeichert als: " dateiname))
-  (command "_.DXFOUT" dateiname "V" "2018" "16")
-  
-  (princ "\n\n>>> FOERDERTEST abgeschlossen! <<<")
-  (princ)
-
-
+ 
   ;; Dateiname: datum-HHMM.dxf
   (if (getenv "DXFM_RESULTS")
     (setq result-pfad (getenv "DXFM_RESULTS"))