How to select/fillet specific edges of a 3D solid

[Anonymous]

I am trying to use AutoLisp to automatically fillet *some* of the edges of a 3D solid, which I would like to choose programmatically (no user selection). I need to do some complex/extensive selection so I cannot do that "by hand".

To fix ideas, let's say i want to simply fillet the edges of the top face in a cube. I can create the cube, access the cube entity and look inside its (misterious) association list, but I cannot find any way to select its edges and to feed the selection to a call to the command FILLETEDGE.

Is that even possible?!

(command "box" "0,0,0" "1,1,1")
(setq aslist (entget (entlast)))
(command "filletedge" "r" 0.1 [...list of edges?!?!]); <= any idea?

[marko_ribar · Accepted solution]

Have you tried to feed FILLETEDGE command with points as tokens instead of imaginary edges? To get points, you could try XEDGES command, extract curves and then use (vlax-curve-xxx) functions to get points after which you can remove extracted curves, or simply do UNDO to point before XEDGES... Finally, you could feed FILLETEDGE with points to get desired result... I don't know if it will work, but I strongly believe that point data as tokens should work well like with all other commands used in lisp with (command), (vl-cmdf) or (command-s) functions...

[lena.talkhina]

Welcome to the Autodesk Community @Anonymous !

Great to see you here on LISP forum.

Hope you will find a solution soon.