; Zusammen mit der AcetUtil.lsp und der TxtExp.lsp geladen 
sollte der Befehl TXTEXP auch in LT2024 und neuer funktionieren.
; CADffm 14.08.2023

(defun acet-file-remove (x)(vl-file-delete x)(princ (strcat "\n" x " gelöscht\n"))(princ))
(defun acet-str-format (x y) (vl-string-subst x "%1" (itoa y)))
(princ "\nEXPRESSTOOLSLT.lsp geladen")
(princ)