[yêu cầu] cộng text, mtext, dimtext... rồi ghi ra cell table

[colombus 3]

Tôi đã có lisp cộng các text, mtext, dimtext, attribute ... rôi gán kết quả vào một text đã có (adt_text-dim-sum.lsp đính kèm)

Sau đó dùng lisp copy text gán vào ô cell table của autocad (ttc_text to cell.lsp đính kèm)

 

Nay tôi mong muốn có một lisp gộp 2 công việc này lại : cộng bằng cách click đối tượng trên màn hình rồi ghi kết quả click vào ô cell table

 

Rất mong có bạn nào đó quan tâm giúp cho tôi.

Cảm ơn các bạn , cảm ơn Cadviet đã giúp cho công việc của tôi và nhiều người khác được tốt đẹp hơn

adt_text-dim-sum.lsp

ttc_text to cell.lsp

 

Nhân tiện kết quả không lấy số thập phân... hoặc nếu tốt hơn có mục chọn lấy bao nhiêu số thập phân... hoặc cho tôi biết dòng lisp nào cần sửa để có số lượng số thập phân mong muốn. Xin cảm ơn