Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  Ausrichten mehrere Elemente

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Ausrichten mehrere Elemente (380 mal gelesen)
Session
Mitglied
Technischer Zeichner


Sehen Sie sich das Profil von Session an!   Senden Sie eine Private Message an Session  Schreiben Sie einen Gästebucheintrag für Session

Beiträge: 70
Registriert: 24.05.2005

erstellt am: 14. Sep. 2006 15:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo.
Ich haben mehrere 3D Blöcke in einer Ebene liegen, die richtig ausgerichtet sind, und möchte alle diese Blöcke in dieser Ebene in richtung X-Achse an einem selben Punkt verschieben.
Anders erklärt:
Ich zeichne gerade einen Rohrverteiler, und die Ventile sollen alle höhenmässig paralell im Raum liegen. Leider ist das beim Einfügen nicht möglich, da das "Einfügen" über eine eigene Applikation funzt.
d.h. ich kann die Blöcke nicht an einem bestimmten Punkt einfügen sondern MUSS für diese Applikation (ACPlant Designer) die Punktfangfunktion "Nächster" nehmen. Daher muss ich im Anschluss jeden einzelnen Block angreifen und mit der Punkt-Filterfunktion an einen definierten Punkt schieben.
Der ACPlantdesiger hat leider keine Funktion für das Verschieben mehrer Blöcke an eine Refernzlinie etc. Kann AutoCAD das ??

Bitte um Hilfe, Danke
Chrisu

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Proxy
Ehrenmitglied
Stateless-DHCP v6-Paketfragmentierer


Sehen Sie sich das Profil von Proxy an!   Senden Sie eine Private Message an Proxy  Schreiben Sie einen Gästebucheintrag für Proxy

Beiträge: 1629
Registriert: 13.11.2003

Tastaturen, Mäuse,
Pladden, Monitore, ...

erstellt am: 14. Sep. 2006 15:47    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Session 10 Unities + Antwort hilfreich

Ja, mit Lisp ... einfach ein BKS-Anlegen ... dann die Blöcke mit Lisp am Bassispunkt entlang rotieren (sieht aus wie ausrichten)  . Lisp müsste auch hier im Forum rumfliegen ... Suchbegriffe _allign, bks / ucs ... wenn nicht kann es ja schnell geschrieben werden.

------------------
MfG Proxy

Bitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung gestellt.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Session
Mitglied
Technischer Zeichner


Sehen Sie sich das Profil von Session an!   Senden Sie eine Private Message an Session  Schreiben Sie einen Gästebucheintrag für Session

Beiträge: 70
Registriert: 24.05.2005

erstellt am: 14. Sep. 2006 15:56    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Verteiler.JPG

 
Danke für die schnelle Antwort.
Anbei eine kurze Skizze von dem, was ich brauch ....
Nur damit wir vom selben reden 

Man sieht darauf die T-Stücke und die Ventile links davon sollen einheitlich 50 mm von den T-Stücken entfernt sein.

lg
Chrisu

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Proxy
Ehrenmitglied
Stateless-DHCP v6-Paketfragmentierer


Sehen Sie sich das Profil von Proxy an!   Senden Sie eine Private Message an Proxy  Schreiben Sie einen Gästebucheintrag für Proxy

Beiträge: 1629
Registriert: 13.11.2003

Tastaturen, Mäuse,
Pladden, Monitore, ...

erstellt am: 14. Sep. 2006 19:47    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Session 10 Unities + Antwort hilfreich

Lösungsvorschlag (1):
Code:

(defun C:block_rotate ()
  (setq #cb (ssget)
z  0
  )
  (setq bksxdir (getvar "ucsxdir"))
  (setq p1 (list 0 0))
  (setq p2 (list (car bksxdir) (cadr bksxdir)))
  (setq bksrot (angle p1 p2))
  (repeat (sslength #cb)
    (setq cb (entget (ssname #cb z))
  z  (1+ z)
    )
    (setq cb (subst (cons 50 bksrot) (assoc 50 cb) cb))
    (entmod cb)
  )
)


Lösungsvorschlag (2):

Code:


(defun C:alignsameblocks (/ block blockname blockwinkel #bloecke z BLK nw)
  (command "_.undo" "_G")
  (setq block (entsel "\nVORGABEBLOCK WÄHLEN:")
block (if block
(car block)
      )
  )
  (if (and block
  (= "INSERT" (cdr (assoc 0 (entget block))))
      )
    (setq blockname  (cdr (assoc 2 (entget block)))
  blockwinkel (* (/ (cdr (assoc 50 (entget block))) pi) 180.0)
  #bloecke    (ssget "x" (list (cons 0 "INSERT") (cons 2 blockname)))
  z       0
    )
  )
  (if #bloecke
    (progn
      (princ (sslength #bloecke))
      (repeat (sslength #bloecke)
(setq block (entget (setq BLK (ssname #bloecke z)))
      z     (1+ z)
      nw    (* (/ (cdr (assoc 50 block)) pi) 180.0)
)
(command "_.rotate"
BLK
""
(cdr (assoc 10 block))
"B"
nw
blockwinkel
)
      )
    )
  )
  (command "_.undo" "_E")
)
(princ)


------------------
MfG Proxy

Bitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung gestellt.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Cadzia
Ehrenmitglied V.I.P. h.c.
CAD/Grafik-Dienstleister



Sehen Sie sich das Profil von Cadzia an!   Senden Sie eine Private Message an Cadzia  Schreiben Sie einen Gästebucheintrag für Cadzia

Beiträge: 2912
Registriert: 02.07.2004

AutoCAD 2020 + MAP + WS.LandCAD
Bricscad V21 pro

erstellt am: 14. Sep. 2006 19:55    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Session 10 Unities + Antwort hilfreich

Hallo Chrisu,

mal noch ein aderer Weg.
markiere die (Hilfs-)Linie und schau im Eigeschaftsfenter nach dem "X-Wert" ; den Zahlenwert kopierst Du Dir in die Zwischenablage (Strg+c).

danach markierst Du nur die Blöcke und fügst im Eigenschaftsfenter unter "Position X", den vorherigen Wert wieder ein (Strg+v) - voila  


------------------
Grüße Karin 

Willst du wertvolle Dinge sehen, so brauchst du nur dorthin zu blicken, wohin die große Menge nicht sieht.  (Laotse)

[Diese Nachricht wurde von Cadzia am 14. Sep. 2006 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Session
Mitglied
Technischer Zeichner


Sehen Sie sich das Profil von Session an!   Senden Sie eine Private Message an Session  Schreiben Sie einen Gästebucheintrag für Session

Beiträge: 70
Registriert: 24.05.2005

erstellt am: 15. Sep. 2006 09:30    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Danke Euch Beiden.

Vor allem Dir, Cadzia für den einfachen Weg, der ist super.
(Wenn ich ein bissi nachgedacht hätte ... aber man lernt nie aus.)

@Proxy
Mit Lisp´s & Co habe ich bis jetzt noch nicht so viel zu tun gehabt, aber ich werde mich da mal reinlesen, wie die anzuwenden sind etc.
Trotzdem vielen Dank.

lg 
Chrisu

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz