LISP GÁN SỐ THỨ TỰ CHO BLOCKATT THEO HƯỚNG ĐƯỜNG DẪN

[Minh Nghĩa 2]

Kính nhờ các cao thủ, giúp em viết lisp, em đang làm bản vẽ định vị cây, có mục đánh số thứ tự cho cây bằng Block Atttribute.

Các Block Atttribute đã gán vào mỗi vị trí sẵn với số hiệu mặc định là 1, em muốn đánh số thứ tự theo hướng mà mình muốn, đánh số thứ tự hàng loạt cho từng hàng, còn pick từng cây thì em đã có, nhưng do mỗi cây trên hàng rất nhiều, và số hàng rất nhiều, cả nghìn cây, nên em không thể đánh thứ tự thủ công được, mà muốn đánh thứ tự hàng loạt theo từng hàng 1 nhờ các Pro giúp đỡ em cảm ơn

[Lương Sơn 2]

19 giờ trước, Minh Nghĩa đã nói:

Kính nhờ các cao thủ, giúp em viết lisp, em đang làm bản vẽ định vị cây, có mục đánh số thứ tự cho cây bằng Block Atttribute.

Các Block Atttribute đã gán vào mỗi vị trí sẵn với số hiệu mặc định là 1, em muốn đánh số thứ tự theo hướng mà mình muốn, đánh số thứ tự hàng loạt cho từng hàng, còn pick từng cây thì em đã có, nhưng do mỗi cây trên hàng rất nhiều, và số hàng rất nhiều, cả nghìn cây, nên em không thể đánh thứ tự thủ công được, mà muốn đánh thứ tự hàng loạt theo từng hàng 1 nhờ các Pro giúp đỡ em cảm ơn

E cũng đang cần tìm lisp này. nếu có thì tiện quá ạ.

Hiện tại em cũng hay phải làm như thế này. A có thể tham khảo cách của em xem có tiện hơn không ạ.

B1: Tạo sẵn BlockATT trong bản vẽ.

B2: Tạo đường Pline theo hướng cần rải block (Lưu ý điểm đầu của Pline sẽ là điểm chèn Block có STT là 1).

B3: Xuất tọa độ các điểm nút của Pline. Lisp xuất tọa độ thì có nhiều rồi. em đang dùng lisp C2F. C2F_XuattoadoTExt....rar

B4: Mở file Excel Sample lên. Cột X,Y anh copy tọa độ tương ứng vào. Cột Block Name anh để tên của BlockATTđã tạo ở B1. Cột Att1 thì anh đánh STT từ đầu đến cuối. Các cột còn lại nếu không có dữ liệu gì thì anh bỏ trống. Sau đó ấn nút Export to Autocad. Excel sẽ chèn BlockATT theo tọa độ tương ứng vào bản vẽ cad anh đang mở. (Lưu ý: khi ấn Export thì bản vẽ cad anh đang mở phải là bản vẽ cần chèn Block).

 

C2F_XuattoadoTExt....rar

[Minh Nghĩa 2]

Cảm ơn bạn, nhưng như thế phải vẽ lại đường pline qua các att, cái này là có săn đường pline và block att rồi, chỉ việc đánh số thôi

[sam8xd 48]

Theo yêu cầu của bạn thì lisp này đáp ứng tốt