---

Hallo,

ich möchte vorh. Blöcke an Linien oder Polylinien ausrichten.
Da es sehr viele sind, möchte ich das nicht über drehen mit Bezug machen.
Gibt es eine Funktion die dem Text ausrichten (rotatetext) ähnelt?
Also: "Zauber-Icon" drücken, Linie zu der der Block parallel sein soll anwählen, Block anwählen und an dem Ofang-Punkt dreht sich der Block dann parallel zur Linie.

Danke für Eure Hilfe!

------------------
Mit freundlichen Grüßen

Otze Mach Ed

.....wer lesen kann ist klar im Vorteil....

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

---

_align  ?

------------------
- Thomas -

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

---

sieh mal hier

------------------
Grüsse

Thomas

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

---

es gibt aber doch immer 2 Winkel ... 30 & 210 zB ... also mußt du mind. 2 Angaben machen
weil du die Richtung (Drehung) einer Linie ja nicht ansiehst !?

------------------
- Sebastian Mattis -

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

---

P-Linie als BKS-Quelle und

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)
  )
)

---

kann damit mehrere Blöcke am BKS relativ zur WKS ausrichten bzw. eigentlich nur rotieren. Skalierung geht eigentlich nur sauber mit _align.

------------------
"Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?"  Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF

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

---

Hallo Proxy,

das ist schon nah dran.
In meinem Block sind auch Attribute, die drehen sich leider nicht mit!?
Das ist ja fast Magie :-)

Kannst Du das noch mit "einbauen"?

Danke, danke!

------------------
Mit freundlichen Grüßen

Otze Mach Ed

.....wer lesen kann ist klar im Vorteil....

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

---

Kann mir hier einer helfen schnell das ucx an alle Attribute im Selectionset einzubauen. Komme da optisch zu echt "gestörten" Ergebnissen wenn der Basispunkt des Attributes von anderen abweicht.

------------------
"Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?"  Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF

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