Script/AutoLISP to convert 3D Solid to 3D Faces

Script/AutoLISP to convert 3D Solid to 3D Faces

McGrathR1992
Participant Participant
218 Views
2 Replies
Message 1 of 3

Script/AutoLISP to convert 3D Solid to 3D Faces

McGrathR1992
Participant
Participant

Hi,

I am trying to create an automated process to convert all 3D Solids in a dwg to 3D Faces. script if possible but LISP if necessary.

I have noticed the MESHSMOOTH command doesn't properly execute in a script. There are other forum posts on this.

Does anyone have a way to convert this. Thanks.

 

(Using Basic Autocad 2022)

0 Likes
219 Views
2 Replies
Replies (2)
Message 2 of 3

DGCSCAD
Collaborator
Collaborator

Here's something to get you started:

 

(defun c:sol2mesh ( / tmp_ss)
(setq tmp_ss (ssget "x" '((0 . "3DSOLID"))))
(command "MESHSMOOTH" tmp_ss "")
(princ)
)
AutoCad 2018 (full)
Win 11 Pro
0 Likes
Message 3 of 3

hosneyalaa
Advisor
Advisor

Can you attached example drawing 

0 Likes