| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Kopieren und drehen (3964 mal gelesen)
|
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
   Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 15. Jul. 2003 12:41  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, ich versuche gerade mir ein Makro zu basteln. Aber leider bricht es immer ab.
Ich möchte ein Objekt in einem Arbeitsgang erst um 2 Punkte kopieren und dann am Einfügepunkt das neue Objekt drehen. Hat jemand so ein Makro oder LISP?
Danke schon mal! ------------------
Mit freundlichen Grüßen Otze Mach Ed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Caladia
Ehrenmitglied V.I.P. h.c.
Beiträge: 2546
Registriert: 04.03.2002 ACAD2009
ACAD2010 SP2
ACAD2011 SP1
ABDS-S 2012 SP2
ABDS-S 2013 SP2
ABDS-S 2014 SP1
ABDS-S 2015 SP2
ABDS-S 2016
Expresstools
A3-Makroboard
16-Tasten Lupe
Impression 3
Win7 64bit
IE11
Firefox
Office2003 SP3
|
erstellt am: 15. Jul. 2003 12:53 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd 
|
CADwiesel
Moderator
CAD4FM UG
    
Beiträge: 1968
Registriert: 05.09.2000 AutoCAD, Bricscad
Wir machen das Mögliche unmöglich
|
erstellt am: 15. Jul. 2003 12:55 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
|
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 15. Jul. 2003 13:02 <-- editieren / zitieren --> Unities abgeben:
Hallo Caladia, ja, fast.
Aber ich brauche den Befehl sooo oft und möchte zwischendurch nicht so viele Eingaben tätigen.
Muß doch irgendwie einfacher gehen. ------------------
Mit freundlichen Grüßen Otze Mach Ed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 15. Jul. 2003 13:07 <-- editieren / zitieren --> Unities abgeben:
Hallo Cadwiesel, natürlich habe ich vorher gesucht.
Aber das LISP kopiert direkt am Drehpunkt.
Ich möchte von a nach b kopieren und dann an b drehen. Ohne zwischendurch Eingaben zu tätigen! ------------------
Mit freundlichen Grüßen Otze Mach Ed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Dober Heinz
Mitglied
Technischer Zeichner
Beiträge: 1143
Registriert: 20.12.2002 Autocad 2020/64B
Win10
WORKSTATION Intel(R) CPU E5-1620 3.60GHz
16,0GB Ram
64 Bit-Betriebssystem
HP Designjet T7200
Grafik NVIDIA Quadro P4000
ZWCAD2019
|
erstellt am: 15. Jul. 2003 13:07 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
|
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 15. Jul. 2003 13:09 <-- editieren / zitieren --> Unities abgeben:
|
R.Bless
Mitglied
Bauzeichner, CAD Administrator
Beiträge: 288
Registriert: 27.03.2003
|
erstellt am: 15. Jul. 2003 14:53 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
|
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 15. Jul. 2003 15:35 <-- editieren / zitieren --> Unities abgeben:
|
Jürgen H
Mitglied
CAD-Konstrukteur
Beiträge: 116
Registriert: 19.11.2002 AutoCAD 2007, Windows XP Home Edition
|
erstellt am: 17. Jul. 2003 09:28 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo, ich hab da ein Lisp, jedoch weis ich nicht ob es genau deinen Anforderungen entspricht: Es können mehrere Einfügepunkte eines eingefügten W-Blocks nach einander angegeben werden d.h. Programm aufrufen, W-Block auswählen, Blockeinfügepunkte bestimmen, Befehl beenden mit Rechtsklick. Das Programm enthält zwei Funktionen: EP - fragt nur nach den Einfügepunkten, EPD – nach den Einfügepunkten und Drehwinkeln. Grüße
Jürgen H Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 17. Jul. 2003 10:39 <-- editieren / zitieren --> Unities abgeben:
Hallo Jürgen, nee, da hast Du nicht richtig gelesen was ich wollte.
Aber da hatte ich ja auch schon was bekommen. Nun zu Deiner LISP, so was ähnliches suche ich auch.
Und zwar "mehrfach" Blöcke einfügen aus der Zeichnung in der ich bin!
Hast Du da auch was? ------------------
Mit freundlichen Grüßen
Otze Mach Ed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
T. Bürger
Mitglied
Technischer Angestellter
Beiträge: 201
Registriert: 30.01.2001 AcadCAD MEP 2008 (D A CH)
|
erstellt am: 17. Jul. 2003 13:03 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo OtzeMachEd, vieleicht sowas: ;;<-Start Code
(defun C:MBLOCK()
(setq #att# (car (entsel "\nvorhandenen Block wählen: "))
#el# (entget #att#)
) (setvar "clayer"(cdr (assoc 8 #el#)))
(while
(setq #bepf# (getpoint "\nEinfügepunkt"))
(command "_insert"
(cdr (assoc 2 #el#))
#bepf#
"XYZ"
(cdr (assoc 41 #el#))
(cdr (assoc 42 #el#))
(cdr (assoc 43 #el#))
pause
)
)
)
;;<-Ende Code ------------------
Grüße T. Bürger  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
OtzeMachEd
Mitglied
Bauzeichner & CAD Systembetreuer
Beiträge: 201
Registriert: 30.05.2003 WIN XP Prof.
ACAD 2010
ADT 2010
Express Tools
|
erstellt am: 17. Jul. 2003 13:34 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas, schon besser aber noch nicht perfekt. Ich möchte aus meinen Blöcken in der Zeichnung auswählen können!
Aber die LISP werde ich auch benutzen! Danke, 5 Units! ------------------
Mit freundlichen Grüßen
Otze Mach Ed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Masterkoop
Mitglied
Beiträge: 6
Registriert: 23.05.2011
|
erstellt am: 14. Jul. 2011 15:05 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo Leute, respect wie ihr mit dem Autocad umgehne könnt. Leider komme ich etwas spät um beim Thema teilzunehmen, aber ich hoffe ihr könntet mir trotzdem helfen. Denn befehl unten finde ich super. ^C^C_select;\_copy;_p;;\\_rotate;_l;;@;\#
Jetzt dachte ich mir ihr könnt superschnell einen für drehen mit bezug erstellen.
Genauer: Basispunkt = Bezugspunkt und auch keine Möglichkeit für das normale drehen.
Ihr wehrt meine Rettung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Masterkoop
Mitglied
Beiträge: 6
Registriert: 23.05.2011
|
erstellt am: 14. Jul. 2011 15:11 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo Leute, respect wie ihr mit dem Autocad umgehne könnt. Leider komme ich etwas spät um beim Thema teilzunehmen, aber ich hoffe ihr könntet mir trotzdem helfen. Denn befehl unten finde ich super. ^C^C_select;\_copy;_p;;\\_rotate;_l;;@;\#
Jetzt dachte ich mir ihr könnt superschnell einen für drehen mit bezug erstellen.
Genauer: Basispunkt = Bezugspunkt und auch keine Möglichkeit für das normale drehen.
Ihr wehrt meine Rettung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Masterkoop
Mitglied
Beiträge: 6
Registriert: 23.05.2011
|
erstellt am: 14. Jul. 2011 15:18 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo Leute, respect wie ihr mit dem Autocad umgehne könnt. Leider komme ich etwas spät um beim Thema teilzunehmen, aber ich hoffe ihr könntet mir trotzdem helfen. Denn befehl unten finde ich super. ^C^C_select;\_copy;_p;;\\_rotate;_l;;@;\#
Jetzt dachte ich mir ihr könnt superschnell einen für drehen mit bezug erstellen.
Genauer: Basispunkt = Bezugspunkt und auch keine Möglichkeit für das normale drehen.
Ihr wehrt meine Rettung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Masterkoop
Mitglied
Beiträge: 6
Registriert: 23.05.2011
|
erstellt am: 14. Jul. 2011 15:24 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo Leute, respect wie ihr mit dem Autocad umgehne könnt. Leider komme ich etwas spät um beim Thema teilzunehmen, aber ich hoffe ihr könntet mir trotzdem helfen. Denn befehl unten finde ich super. ^C^C_select;\_copy;_p;;\\_rotate;_l;;@;\#
Jetzt dachte ich mir ihr könnt superschnell einen für drehen mit bezug erstellen.
Genauer: Basispunkt = Bezugspunkt und auch keine Möglichkeit für das normale drehen.
Ihr wehrt meine Rettung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Masterkoop
Mitglied
Beiträge: 6
Registriert: 23.05.2011
|
erstellt am: 14. Jul. 2011 15:39 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo Leute, respect wie ihr mit dem Autocad umgehne könnt. Leider komme ich etwas spät um beim Thema teilzunehmen, aber ich hoffe ihr könntet mir trotzdem helfen. Denn befehl unten finde ich super. ^C^C_select;\_copy;_p;;\\_rotate;_l;;@;\#
Jetzt dachte ich mir ihr könnt superschnell einen für drehen mit bezug erstellen.
Genauer: Basispunkt = Bezugspunkt und auch keine Möglichkeit für das normale drehen.
Seit bitte meine Rettung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Masterkoop
Mitglied
Beiträge: 6
Registriert: 23.05.2011
|
erstellt am: 14. Jul. 2011 15:41 <-- editieren / zitieren --> Unities abgeben: Nur für OtzeMachEd
Hallo Leute, respect wie ihr mit dem Autocad umgehen könnt. Leider komme ich etwas spät um beim Thema teilzunehmen, aber ich hoffe ihr könntet mir trotzdem helfen. Denn befehl unten finde ich super. ^C^C_select;\_copy;_p;;\\_rotate;_l;;@;\#
Jetzt dachte ich mir ihr könnt superschnell einen für drehen mit bezug erstellen.
Genauer: Basispunkt = Bezugspunkt und auch keine Möglichkeit für das normale drehen.
Seit bitte meine Rettung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
