| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Block SPIEGELN Attribute bleibt (657 mal gelesen)
|
Kleiner_pally
Mitglied
Zeichner
   Beiträge: 74
Registriert: 03.05.2004 AutoCAD 2002 Netzwerk
mit Express Tool
Mein Os: XP prof.
AMD Athlon 2000+
512 MB RAM
NIVIDA GEFORCE Grafikkarte
|
erstellt am: 25. Mai. 2004 14:27  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, suche so ein Lisp das genauso funkt. wie Block drehen Attribute bleibt. zb. Zum verwenden von schnittpfeilen (Block u. Attr.)wenn ich sie drehen und dann spiegeln will. evtl. kennt jemand sowas... Gruß pally Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
gmk
Mitglied
Dipl.-Ing.(FH) Vermessung
Beiträge: 667
Registriert: 23.10.2002 Autocad 2004, WS CadCompass, Normica V2000, WinXP Prof., AMD Athlon 64 X2, 2GB, NVIDIA GeForce 7600GS, HP1055CM
|
erstellt am: 25. Mai. 2004 17:41 <-- editieren / zitieren --> Unities abgeben: Nur für Kleiner_pally 
|
Kleiner_pally
Mitglied
Zeichner
Beiträge: 74
Registriert: 03.05.2004 AutoCAD 2002 Netzwerk
mit Express Tool
Mein Os: XP prof.
AMD Athlon 2000+
512 MB RAM
NIVIDA GEFORCE Grafikkarte
|
erstellt am: 26. Mai. 2004 07:47 <-- editieren / zitieren --> Unities abgeben:
|
AndreasK5
Mitglied
Beiträge: 2
Registriert: 21.11.2005
|
erstellt am: 21. Nov. 2005 12:01 <-- editieren / zitieren --> Unities abgeben: Nur für Kleiner_pally
Das Prog. funktioniert ja super, aber man kann natürlich nur immer ein Element auswählen. Wie müsste dieses Programm aussehen damit man einen ganzen Auswahlsatz bearbeiten kann? Ist das ein großer Aufwand? MfG
Andreas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
joern bosse
Ehrenmitglied
Dipl.-Ing. Vermessung
Beiträge: 1734
Registriert: 11.10.2004 Window 10
ACAD 2021
CIVIL 2021
BricsCAD V14-V22
Intel(R) Core(TM)i5-8250U CPU @ 1.60GHz 1.80 GHz
16.0GB RAM
NVIDIA GeForce GTX 1050<P>
|
erstellt am: 21. Nov. 2005 12:15 <-- editieren / zitieren --> Unities abgeben: Nur für Kleiner_pally
Hallo Andreas, mit einem Auswahlsatz sollte das folgendermaßen funktionieren:
Code:
(DEFUN c:sp_blo (/ dx n aws)
(princ "\nBitte Blöcke auswählen:")
(if (setq aws (ssget (list (cons 0 "INSERT"))))
(progn
(setq n 0)
(repeat (sslength aws) (SETQ dx (* (CDR (ASSOC 41 (entget(ssname aws n)))) -1))
(entmod (subst (cons 41 dx)
(assoc 41 (entget(ssname aws n)))
(entget(ssname aws n)))
) ; setq
(setq n (+ n 1))))
(alert "Es wurden keine Blöcke ausgewählt.")) )
------------------
viele Grüße Jörn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
AndreasK5
Mitglied
Beiträge: 2
Registriert: 21.11.2005
|
erstellt am: 21. Nov. 2005 15:56 <-- editieren / zitieren --> Unities abgeben: Nur für Kleiner_pally
|
Foren auf CAD.de (alle Foren)
| 
