|
Lisp : Probleme mit (polar ... )
Oberpeilsteiner Florian am 22.06.2011 um 13:46 Uhr (0)
Hallo,das ist mein erster Beitrag auf CAD.DE - ich hoffe ich mache keine (all zu großen) Fehler bei der Fragestellung:In meinem LISP-Programm wird eine Liste von Anweisungen in die Gruppencodes 10 und 42 einer Polylinie umgewandelt. Für die Ermittlung des Mittelpunktes eines Kreisbogens verwende ich den Anfangs- und Endpunkt der letzten Linie und den Endpunkt des Kreisbogens. In den meisten Fällen funktioniert der folgende Code.Code:(setq line (list "LINIE" 800 0 0 0 0)) ;aktueller Punkt(setq l ...
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit (polar ... )
Oberpeilsteiner Florian am 22.06.2011 um 15:22 Uhr (0)
Ich habe vor:Code:(polar (polar (list (nth 1 lastline) (nth 2 lastline)) (angle (list (nth 1 lastline) (nth 2 lastline)) (list (nth 1 line) (nth 2 line))) (/ (distance (list (nth 1 lastline) (nth 2 lastline)) (list (nth 1 line) (nth 2 line))) 2) ) (+ (/ pi 2) (angle (list (nth 1 lastline) (nth 2 lastline)) (list (nth 1 line) (nth 2 line))) ) (distance (list (nth 1 lastline) (nth 2 lastline)) (list (nth 1 line) (nth 2 line))) )einen Haltepunkt gesetzt,diesen Teil dann ...
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit (polar ... )
Oberpeilsteiner Florian am 28.06.2011 um 09:16 Uhr (0)
Hallo Marco,danke noch für denk Tipp mit Prüfen. Ist auf jeden Fall hilfreich das zu wissen.mfg Florian
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit (polar ... )
Oberpeilsteiner Florian am 22.06.2011 um 16:37 Uhr (0)
Hab jetzt das ganze noch mal überprüft und du hast recht.Da hab ich wohl den Wald vor lauter Bäumen nicht mehr gesehen. Das gemeine daran ist auch dass das anscheinend der einzige Punkt ist an dem die Berechnung des Zentrumspunktes auf diese Weise nicht funktioniert. (der Anfangspunkt der letzten Linie und der Endpunkt des Bogens sind identisch, dadurch entstehen die Parallelen)Danke für die rasche Antwort und ich Hoffe das nächste mal entdecke ich so einen Fehler bevor ich hier danach Fragemfg Florian
|
| In das Form Lisp wechseln |