---

Hallo Lisp-Gemeinde,
ich suche eine Möglichkeit per Lisp die Endpunkte eines Bogens zu ändern.
Hintergrund ist, dass ich zunächst prüfe, ob sich ein Bogen in einem Rechteck befindet bzw. dieses schneidet. Das Bestimmen der Endpunkte des Bogens sowie der eventuellen Schnittpunkte des Bogens mit dem Rechteck ist klar. Wie kann ich nun z.B. für den Fall, dass der Bogen mit beiden Enden über das Rechteck hinausragt, die Endpunkte auf die Koordinate des jeweiligen Schnittpunktes ändern - quasi ein Stutzen ohne den Stutz-Befehl. Den existierenden Bogen zu löschen und durch einen neuen zu ersetzten (über die ermittelten Schnittpunkte und dem Radius) wäre sicher eine Möglichkeit. Gibt es aber auch eine andere Möglichkeit analog zur subst-Funktion?
Danke für eure Hilfe im Voraus!
Uwe

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

---

Das Bogen-Objekt speichert im GC50/51 Start und Endwinkel des Bogens ..
die mußt du aus den Endpunktkoordinaten ( und  Mittelpunkt .. mit (angle..) ) neu berechnen und mit subst in der ENTGET-Liste ändern .. ein entmod sollte dann den Bogen anpassen.

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

---

Hallo Thomas,
vielen Dank für die schnelle Antwort.
Die Lösung über die Winkel ist mir bekannt - ich hatte nur gehofft, dass es direkt auf Koordinatenebene möglich ist, die Punkte abzuändern.
Uwe

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

---

Na aber wenn die Punkte schon Bekannt sind, sind die benötigten winkel doch mit 2 Funktionen berechnet

Code:

---

(setq WinkelAnfang (angle Mittelpunkt Bogenanfang)
      WinkelEnde  (angle Mittelpunkt Bogenende)
)

---

------------------
Mit freundlichem Gruß

Udo Hübner

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