Hi there,
Hopefully someone can shine a bit of light on what I'm doing wrong here.
I want to rotate a 3dpolyline about an already specified UCS, the commands in the attached .lsp file work but needing to select the line again each time, I tried using (command "PSelect" "P" "") , but this does not work for me.
Is there a more elegant solution to this?
And also cant figure out how to get the join command to join the lines back to gether properly.
I'm probably overlooking something quite simple but cant figure it out.
Any help with these would be greatly appreciated.
(defun c:FLIP()
(command "Rotate3D" (setq ss1 (ssget)) "" "0,0,0" "1,0,0" "" "270")
(command "Explode" (setq ss1 (ssget)) "")
(command "change" (setq ss1 (ssget)) "" "P" "E" "0" "")
(command "Join" (setq ss1 (ssget)) "")
(princ)
)