---

Hi,

ich suche ein Lisp-Programm mit dem ich AutoCAD Zeichnungen auf einem Klick als IGES und als DWG abspeichern kann.

Gibts so was???

Danke!

Grüße

Hans-Peter

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Hans-Peter

mit folgendem Programm wird gespeichert wie gewünscht.
Wenn es dass ist, was du meinst, könntest du in einem Werkzeugkasten ein Symbol mit dem Kommando einfügen und mit einem Klick ausführen.

(defun my_save ( / CMD Pfad Name)
  (setq CMD (getvar "CMDDIA")
        Pfad (getvar "DWGPREFIX")
Name (vl-filename-base (getvar "DWGNAME")))
  (setvar "CMDDIA" 0)
; Speichern als DWG
  (command "_SAVE" (strcat Pfad Name ".dwg"))
; als IGES
  (command "_IGESOUT" (strcat Pfad Name ".igs") "") ; Options einstellen ?
  (setvar "CMDDIA" CMD)
  (alert (strcat "Gespeichert als \n \n" Pfad Name ".dwg\n" Pfad Name ".igs"))
  (princ)
)

Schöne Grüße
Helmut

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Helmut,

ja genau so etwas habe ich gesucht!!!

Vielen Dank!

Grüße

HP

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP