Kopieren und Drehen (Autodesk/Lisp)


	Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte

	Von Digital Twins bis Hochleistungs-Computing: PNY präsentiert seine Zukunftstechnologien für die Industrie von morgen, eine Pressemitteilung Meldungen abonnieren
Autor	Thema: Kopieren und Drehen (863 mal gelesen)
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1149 Registriert: 20.12.2002	erstellt am: 24. Nov. 2005 12:55 <-- editieren / zitieren --> Unities abgeben: Hallo Ich will ein Objekt kopieren und um 90 Grad Drehen. mit entsel wähle ich das objekt. (command "_.copy" (entsel)"" (cdr(assoc 10 (entget (entlast))))pause "_rotate" (entlast)"" (cdr(assoc 10 (entget (entlast)))) 90.0) aber der Basispunkt der Kopie ist immer der des letzten Objektes,nicht der desen Objekt ich gewählt habe. Woll liegt das der Fehler. Danke ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
CADmium Moderator Maschinenbaukonstrukteur Beiträge: 13533 Registriert: 30.11.2003 .	erstellt am: 24. Nov. 2005 12:57 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz ..ungetestet.. aber ich denke dein Fehler ist klar??? (command "_.copy" (setq OBJECT(entsel))"" (cdr(assoc 10 (entget OBJECT)))pause "_rotate" OBJECT "" (cdr(assoc 10 (entget OBJECT))) 90.0) ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1149 Registriert: 20.12.2002	erstellt am: 24. Nov. 2005 13:00 <-- editieren / zitieren --> Unities abgeben: Hallo Thomas Bricht ab mit Folgender Meldung Befehl: (command "_.copy" (setq OBJECT(entsel))"" (cdr(assoc 10 (entget OBJECT)))pause "_rotate" OBJECT "" (cdr(assoc 10 (entget OBJECT))) 90.0) _.copy Objekt wählen: Objekte wählen: 1 gefunden Objekte wählen: Basispunkt angeben oder [Verschiebung/Mehrfach] <Verschiebung>: ; Fehler: Fehlerhafter Argumenttyp: lentityp (<Objektname: 7861f370> (2.62423 218.471 0.0)) Basispunkt angeben oder [Verschiebung/Mehrfach] <Verschiebung>: Zweiten Punkt angeben oder <ersten Punkt der Verschiebung verwenden>: ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
CADmium Moderator Maschinenbaukonstrukteur Beiträge: 13533 Registriert: 30.11.2003 .	erstellt am: 24. Nov. 2005 13:04 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz ja, dann mach (setq OBJECT (car(entsel))) ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1149 Registriert: 20.12.2002	erstellt am: 24. Nov. 2005 13:12 <-- editieren / zitieren --> Unities abgeben: @ Thomas Jetzt dreht er mir das original Objetk um 90 Grad, das Kopierte dreht er nicht. danke ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Dober Heinz Mitglied Technischer Zeichner Beiträge: 1149 Registriert: 20.12.2002 Autocad 2021/64B Win10 WORKSTATION Intel(R) CPU E5-1620 3.60GHz 32 GB Ram 64 Bit-Betriebssystem HP Designjet T7200 Grafik NVIDIA Quadro P4000 ZWCAD2021	erstellt am: 24. Nov. 2005 13:22 <-- editieren / zitieren --> Unities abgeben: @Thomas Jetzt Funkt es (command "_.copy" (setq OBJECT(car(entsel)))"" (cdr(assoc 10 (entget OBJECT)))pause "_rotate" (entlast) "" (cdr(assoc 10 (entget (entlast)))) 90.0) Danke dir ------------------ Heinz Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
CADmium Moderator Maschinenbaukonstrukteur Beiträge: 13533 Registriert: 30.11.2003 .	erstellt am: 24. Nov. 2005 13:26 <-- editieren / zitieren --> Unities abgeben: Nur für Dober Heinz ja, so ist das .. beim rotate natürlich die Kopie.. d.h. (entlast) nehmen ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)