---

Hallo

Ich habe folgendes Problem:
Ich möchte in AutoLisp eine Kontur zusammenhängender Linien (keine Polylinien) versetzen, wobei jede Linie individuell um einen bestimmten Wert versetzt werden soll. Das lässt sich mit dem AutoCad Versetz-Befehl leider nicht machen, also muss ich das wohl oder übel in Lisp nachprogrammieren.
Ist im Prinzip ja gar nicht so schwer: Endpunkte der Linie ermitteln, Winkel ermitteln, zum Winkel 90 Grad dazurechnen (Kontur verläuft immer im Uhrzeigrsinn) und mittels Polar-Funktion die versetzten Punkte berechnen und dann in einem weiteren Durchgang mittels inters-Befehl das Ganze wieder zu einer zusammenhängenden Kontur verbinden.
Das Problem hierbei ist aber, dass bei der resultierenden Kontur ev. Linien wegfallen können, wenn sich das aus der Geometrie so ergibt - meine Frage deshalb, hat jemand einen Lösungsansatz wie man ermitteln kann welche Linien wegfallen oder ev. ein kleines Lisp-Beispiel auf Lager?
Vielen Dank!

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

---

schnitte.gif

Hallo,

nachdem ich nochmal genau gelesen habe ....
.. würde ich es halt unter VB machen.

Linien der Kontur der Reihe nach in ein Array speichern.
(Die Reihenfolge könnte man auch automatisch ermitteln)
Mit Entity.Offset die jeweiligen Linien (individuel) versetzen.

Bei ersten Element beginnend mit "intersecWith" die Schnitte
mit dem nächsten und übernächsten Element rechnen.
Ist die Entfernung Anfangspunkt zum Schnittpunkt übernächstes
Element kleiner als die Entfernung Anfangspunkt zum Schnitt
nächstes ELement fällt das nächste Element aus der Kontur.

Stelli

------------------
Warum lisp'eln wenns's auch anders geht.

[Diese Nachricht wurde von Stelli1 am 26. Sep. 2005 editiert.]

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

---

Erstmal Danke für die Antwort!

Ich finde, das man das in Lisp auch relativ einfach umsetzten kann und Lisp liegt mir halt bei AutoCAD einfach besser als VB.

Das eigentliche Problem ist aber zu bestimmen, welche Linien wegfallen.
Dein Lösungsansatz funktioniert zwar im beigefügten Beispiel, bei komplexeren Linienverläufen stimmt das Ergebnis aber nicht.
Ich denke, man muss von einer Linie ausgehen und diese mit allen anderen schneiden lassen. Von allen Linien die schneiden, "gewinnt" dann diejenige, die die Linie am kürzesten macht und mit dieser Linie gehts dann weiter, die dazwischenligenden Linien fallen weg.
Das Problem ist nur, wenn die Linie, von der ich ausgehe, eine Linie ist, die eigentlich wegfallen würde, dann ensteht eine falsche Kontur :-(

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