888x888x888

đc rồi thank bạn nhé

Thôi mình EXPLODE rồi JOIN chúng lại cũng đc. Mà có cái sao mình dùng cái lisp kia kết thúc lệnh rồi mà nó vẫn bôi đen các đường bo ấy nhỉ, vẽ xong cứ phải REGEN lại, bác fix giúp mình lỗi đó đc ko

Mình tìm thấy lisp này trên diễn đàn, Lisp dùng khá ok nhưng lại tạo đường bo ở dạng Region, Mình muốn đường bo thành dạng polyline, Bác nào sửa giúp mình với ạ Thank (defun c:bao() (setq p (getpoint "pick diem :")) (command "._boundary" "A" "O" "R" "" p "") (Command "._region" "L" "") (setq el (entlast)) (redraw el 3) (while (setq p (getpoint "pick diem :")) (command "._boundary" p "") (Command "._region" "L" "") (command "._union" el "L" "") (setq el (entlast)) (redraw el 3) ) )