Nhờ viết lisp Xoay Text tự động trong chi tiết cơ khí

[khanhbinhlk 0]

Chào các anh chị !

Hiện tại em cần hỗ trợ 1 lisp như sau: e có các chi tiết có tên ở giữa nhưng tên( text) với chi tiết(polyline) nó không trùng chiều với nhau( theo chiều dài của chi tiết), nhờ các anh chị viết dùm e 1 lisp tự động tên(text) xoay theo chiều dài của chi tiết với ạ, có tự động cỡ chữ lớn theo chi tiết càng tốt ạ(chữ không to hơn chi tiết).

Em xin cảm ơn !

FILE MAU.dwg

[cuongtk2 360]

XoayText2Pline.zip

Trước hết chuyển đổi 2dpolyline thành lwpolyline bằng lệnh ConvertPoly. Sau đó dùng lệnh XoayText2Pline

[CadExTools 104]

Chủ thớt dùng phiên bản Autonest bao nhiêu thế?

[khanhbinhlk 0]

2 giờ trước, cuongtk2 đã nói:

XoayText2Pline.zip

Trước hết chuyển đổi 2dpolyline thành lwpolyline bằng lệnh ConvertPoly. Sau đó dùng lệnh XoayText2Pline

dạ cám ơn a quan tâm ạ, mà e tải về máy là file dll e ko biết cách nào chuyển thành lisp hết, nhờ a hỗ trợ chỉ giúp e với,

[khanhbinhlk 0]

2 giờ trước, CadExTools đã nói:

Chủ thớt dùng phiên bản Autonest bao nhiêu thế?

mình cũng ko rõ nữa, nhưng phần mềm này khá lâu kkk bạn có phần mềm nào hay hơn ko chỉ mình với.

[cuongtk2 360]

Em dùng lệnh Netload để load file dll. Anh cũng viết = lisp nhưng nó không chịu chạy, chắc bị cùn lisp rồi.

[khanhbinhlk 0]

42 phút trước, cuongtk2 đã nói:

Em dùng lệnh Netload để load file dll. Anh cũng viết = lisp nhưng nó không chịu chạy, chắc bị cùn lisp rồi.

hiện tại e dùng cad 2007 nên ko add vào đc rồi a, ca khó rồi :)))

[CadExTools 104]

25 phút trước, khanhbinhlk đã nói:

hiện tại e dùng cad 2007 nên ko add vào đc rồi a, ca khó rồi :)))

Để vụ này mình xử cho. hehe

[CadExTools 104]

XoayText.zip

 

Giải nén, load 2 file trong đó, lệnh SS nhé bạn

[khanhbinhlk 0]

yess tks a nhiều nhé, e sử dụng đc rồi ạ, chỉ bị mấy chi tiết biên dạng xéo còn lại ok ngon ngẻ hết, đỡ tốn công 90% :))))