|
Rund um AutoCAD : Kombination zweier Lisp-Dateien bzw. Arbeitsweisen...
wronzky am 01.08.2012 um 13:17 Uhr (0)
Hallo K. Franke,klar ist das möglich. ErsetzeCode:... ;Dummy-Text wählen: sel (entsel " vorhandenen Text picken... ") ; Element und Pickpunkt el (entget (car sel)) ; Element (Text) ;Dummy-Text durch Wert (berechnet) ersetzen: el (subst (cons 1 proz) (assoc 1 el) el) ) of setq (entmod el) ;Dummy-Text schreiben...durchCode: ...W (angle (list x1 y1) (list x2 y2)))(command "_text" (list x1 y1) 2.5 (/(* 180.0 W)Pi) proz)...Mit ein bischen Suche wärst Du aber warscheinlich auch HIERAUF g ...
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Makro Automatischer Import (Einfügen) von DWGs auf Nullpunkt
wronzky am 16.08.2012 um 10:35 Uhr (0)
Hallo Trainman,ein kurzes Lisp könnte Dir auch helfen:Code:(defun c:vox-insert-all-dwg ( / dir) (setq dir "c: emp");Verzeichniss (setvar "attreq" 0) (foreach i (vl-directory-files dir "*.dwg") (command "_-insert" (strcat dir i) "_scale" 1 "_rotate" 0 "0,0,0") ))Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Hyperlink als Text im Block anzeigen
wronzky am 17.06.2013 um 09:31 Uhr (0)
... keine Ahnung, warum die Klammer abhanden gekommen ist, aber Thomas hat recht mit seiner Vermutung.zu Lisp-Tools auch nochmal ein Link zu den FAQ.Und nochmal das korrigierte Progrämmchen:Code:(defun c:show-hyperlinks ( / inserts insert z att-name hyper att) (vl-load-com) (setq inserts (ssget ((0 . "INSERT"))) z -1 att-name "Dateiname"); !! Hier Name des Attributs definieren !! (while (setq insert (ssname inserts (setq z (1+ z)))) (setq hyper (vla-get-url (vla-item (vla-get-hyperlinks (vlax-ename-vla-ob ...
|
In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block beschriftung wie im Athena
wronzky am 07.07.2013 um 10:48 Uhr (1)
Zitat:Original erstellt von Markus2013:ämmmm ja ne is klarFalls aber doch noch nicht ganz, hilft Dir User FAQ gerne weiter : Wie LISP Tool laden ?Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
In das Form Rund um AutoCAD wechseln |