Nhờ mn sửa lisp IMF gộp bản vẽ , xin lisp gộp bản vẽ

[davidbeckkham123 0]

Mình có lụm nhặt được cái lisp khá hay để gộp các file bản vẽ là IMF. Tuy nhiên thì lisp có một nhược điểm là các bản vẽ sẽ bị nối tiếp vào nhau, khung tên dính vào nhau. Giờ nhờ các cao thủ sửa giúp mình khoảng cách mỗi bản vẽ sẽ là 1000 với chứ gộp xong ngồi kéo độ 30 bản vẽ thì hơi lâu.
Hoặc ai có lisp nào về gộp bản vẽ hay thì cho mình xin với, cảm ơn tất cả mn !

[davidbeckkham123 0]

mình muốn kết quả thế này 

IMF GBV.LSP

[davidbeckkham123 0]

còn đây là kết quả hiện tại của lisp các khung tên dính vào nhau, mong mn giúp đỡ

[davidbeckkham123 0]

đây là lisp IMF 

IMF GBV.LSP

[tien2005 248]

5 giờ trước, davidbeckkham123 đã nói:

đây là lisp IMF 

IMF GBV.LSP

Bạn dùng notepad mở file lisp tìm đến dòng lệnh

xht    (+ xht (abs (car (mapcar '- p2 p1))))

 rồi sửa thành

xht    (+ xht (abs (car (mapcar '- p2 p1))) 1000)

lưu file là được rồi

[davidbeckkham123 0]

3 giờ trước, tien2005 đã nói:

Bạn dùng notepad mở file lisp tìm đến dòng lệnh

xht    (+ xht (abs (car (mapcar '- p2 p1))))

 rồi sửa thành

xht    (+ xht (abs (car (mapcar '- p2 p1))) 1000)

lưu file là được rồi

CẢM ƠN ANH NHIỀU Ạ

[thewind0910 11]

4 giờ trước, tien2005 đã nói:

Bạn dùng notepad mở file lisp tìm đến dòng lệnh

xht    (+ xht (abs (car (mapcar '- p2 p1))))

 rồi sửa thành

xht    (+ xht (abs (car (mapcar '- p2 p1))) 1000)

lưu file là được rồi

thanks bác, em cũng dùng ké được cái lisp này .. hehe cũng đang đi tìm may sao tự dưng gặp luôh

[truong123456 3]

helo bạn. Mình có sửa nhưng sao nó vẫn bị đè bản vẽ bạn nhỉ ? 

[ronaldo2002 4]

Vào lúc 3/4/2024 tại 08:53, truong123456 đã nói:

helo bạn. Mình có sửa nhưng sao nó vẫn bị đè bản vẽ bạn nhỉ ? NÓ LIÊN QUAN ĐẾN GỐC TỌA ĐỘ CỦA BẢN VẼ GỐC. TẤT CẢ ĐỀU LÀ 0,0,0 THÌ SẼ ĐẸP