Hi...
Ich bins mal wieder. Bin mit meinen Programmen schon weit vorangekommen, allerdings bin ich jetzt auf ein Problem gestoßen.
Ich generiere mir mit einem Makro ein Fülle an Arbeitsebene, die jeweils die Querschnittsflächen eines Bauteils beinhalten und setze sie alle in einen AE-Satz.
Nun möchte ich mit der beiliegenden Funktion mir alle Flächenschwerpunkte anzeigen lassen, was auch wunderbar funktioniert, und danach alle Schwerpunkte in der richtigen Reihenfolge in eine Liste einlesen, um daraus dann einen 3D-Interpolationsspline zu erstellen.
Allerdings klappt das mit Einlesen nicht...Die Reihenfolge kann ich auch nicht beinflussen.
:local-functions '(
(mittellinie ()
(setf WP_LIST (sd-call-cmds (get_selection :focus_type *sd-workplane-seltype* :select :recursive :in_wpset WP_SET)))
(display (length WP_LIST))
(defun looping (number)
(let ((counter 0))
(loop
(setf TMP_WP (nth counter WP_LIST))
(current_wp TMP_WP)
(area_props :wp TMP_WP :show_centroid :on)
(incf counter)
(when (= counter number ) (return "done"))
)
)
)
(looping (length WP_LIST))
(setf POINT_LIST (sd-call-cmds (get_selection :focus_type *sd-c-vertex-2d-seltype* :select :all_at_top)))
(display POINT_LIST)
) ;end mittellinie
) ;end local functions
Kann mir jemand da vielleicht helfen? Wäre über jede Idee glücklich...
Vielen Dank im Voraus...
D.Bredehorn
P.S.:Ich arbeite mit OSD v12 !!!