|
Rund um Autocad : Speichern unter
SebZ am 23.05.2007 um 13:14 Uhr (0)
Hallo Alfred,wenn du dich ein bisschen mit Lisp auskennst, könnte dieser Codeschnipsel funktionieren (unter 2004 ungetestet).Nach Belieben kannst du den Zeichnungsnamen noch einstellen. Mit den Systemvariablen DWGPREFIX und DWGNAME hast du Zugriff auf den aktuellen Pfad und Namen deiner Ausgangsdatei, aus denen du ja vielleicht noch eine neue Bezeichnung bilden möchtest.Code:(defun c:multisave() (setq fd-alt (getvar "FILEDIA")) (setvar "FILEDIA" 0) (command "_saveas" "2004" "") (command "_saveas" "DXF" "V" ...
| | In das Form Rund um Autocad wechseln |
|
Lisp : mehrfachen GC unter XDATA herausfischen
SebZ am 30.01.2009 um 18:43 Uhr (0)
Hallo Forum,Um unter der Vielzahl der mit einer von mir verwendeten externen Applikation erzeugten Elemente deren jeweilige Kategorie zu bestimmen, wird in den XDATA dieser App ein fünfstelliger Eintrag unter GC 1071 verwendet. Es gibt aber pro Element mehrere Einträge mit dem GC 1071. Relevant ist in meinem Fall der zuerst auftretende fünfstellige Wert. Leider ist dieser in der Regel nicht der erste GC 1071 überhaupt, und vor allem habe ich noch keine Regel herausgefunden, wie viele 1071-GCs vor dem gesuc ...
| | In das Form Lisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
SebZ am 24.02.2005 um 12:28 Uhr (0)
Hallo miteinand, habe mir mittlerweile die verschiedenen Bausteine hier im Thread runtergeladen und erste Erfahrungen gesammelt. Im Lisp BLOCK_NEW_BASISPUNKT_AUTO (BNBA) hab ich folgende Verallgemeinerung eingebaut (***** = geänderte Zeile): (defun C:BLOCK_NEW_BASISPUNKT_AUTO ( / AWS OBJEKT OBJEKTDATEN NAME ORIGIN ROTATION SKALIERUNG MOD1 MOD2 #el#) (startErrorHandler BLOCK_NEW_BASISPUNKT T (( cmdecho 0)( expert 0) ( HIGHLIGHT 1)( OSMODE 639)( ATTREQ 0))) ***** (setq Sch ...
| | In das Form AutoLisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |