|
Lisp : DXF-EXPORTIEREN
udouk am 26.08.2009 um 13:56 Uhr (0)
Hallo Leute,ich hoffe hier jemanden zu finden, der mir eventuell helfen kann.Ich habe eine Zeichnung mit vielen Elementen und möchte nun einige auswählen, kopieren und diese als dxf speichern, wobei ich wärend des speicherns den neuen Nullpunkt der DXF-Datei auswälen möchte, damit z.B. die Ecke eines Rechteckes in der neuen DXF-Datei auf 0,0,0 liegt.Leider sind meine Lisp-Kentnisse als sehr mäßig zu bezeichnen und darum hab ich schon mal versucht, eine fertige Copieren und dann Drehen Datei umzuscheiben - ...
| | In das Form Lisp wechseln |
|
Lisp : DXF-EXPORTIEREN
udouk am 26.08.2009 um 15:00 Uhr (0)
Danke für die superschnelle Antwort!!!Also, mein Versuch eine Vorhandene Kopieren & Drehen LISP-Datei umzuschreiben sieht nun so aus:_________________________________________________________________________(VL-LOAD-COM)(defun C XF-EX (/ SGET)(princ "
Objekte zum Exportieren wählen: ")(if (setq SGET (ssget))(DXF-EX SGET))(princ))(defun DXF-EX (AUSWAHL / LST-ORGOBJECTS P SSET-COPIED)(if (setq LST-ORGOBJECTS (DT:SELSET-VLA-OBJECTLIST AUSWAHL))(while (setq P (DT:SAFE-EVAL(list getpoint"
Nullpunkt wählen: ")))( ...
| | In das Form Lisp wechseln |
|
Lisp : Dynamischer Block ändert Namen?
udouk am 24.10.2012 um 14:22 Uhr (0)
Hallo Cad-DE ler.Ich hab da ein Problem mit Dynamischen Blöcken.Ich hab eine LISP geschrieben (mehr zusammenkopiert), die unter anderem einen Block mit bestimmten Namen sucht und dann Attributswerte aus diesem Block ausliest und weiterverarbeitet (in meinem Fall für die Dateinamenerstellung beim DXF-Export)Code:(defun c:IMADXFBATCHNEU () (init) (command "_pasteclip" "0,0,0") (setq ORDNER (strcat "C:Users" (getvar "LOGINNAME") "Favorites")) (setq Blockwahl (ssget "_X" ((0 . "INSERT")(2 . "Nummerierung_1zu10 ...
| | In das Form Lisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
