Nhờ viết lisp gán giá trị text vào chiều cao Block Reference

[huynhdv.gtvt 1]

Em có một chuỗi block reference là kè có chiều cao H và có chuỗi text là chiều cao kè. Giờ e muốn gán giá trí text vào chiều cao kè (block reference) với cách như sau:

B1: Chọn chỗi text (Ví dụ có 10 text)

B2: Chọn đối tượng block reference (có 10 đối tượng)

Kết quả: Các block reference được gắn chiều cao là giá trị các text\

(Cụ thể em để trong file cad định kèm)

Ke.dwg

[Duong Nhat Duy 324]

Do gà nên mình chỉ viết được lisp theo kiểu chọn 1 text - 1 block thôi, 10 text thì bạn phải lệnh 10 lần. Bạn dùng tạm nhé :)

HKE.LSP

[huynhdv.gtvt 1]

1 giờ trước, Duong Nhat Duy đã nói:

Do gà nên mình chỉ viết được lisp theo kiểu chọn 1 text - 1 block thôi, 10 text thì bạn phải lệnh 10 lần. Bạn dùng tạm nhé :)

HKE.LSP

Cảm ơn bác

[tonyhuynh 3]

[tonyhuynh 3]

 

 

[huynhdv.gtvt 1]

:)