hoakd4
-
Số lượng nội dung
7 -
Đã tham gia
-
Lần ghé thăm cuối
Bài đăng được đăng bởi hoakd4
-
-
7 phút trước, duy782006 đã nói:Mình bỏ lisp này lâu rồi nay cũng không biết ở đâu. Hiện mình dùng cái này của leemac rất ok.
Em cũng đã tải lisp LM như anh nói, nhưng em bị lỗi là khi chèn lại điểm block . Vị trí block của em bị thay đổi.
Anh có thể xem lại giúp em dc k ah.
Đường link e tải về đây http://www.lee-mac.com/changeblockinsertion.html
-
Vào lúc 8/6/2009 tại 07:21, duy782006 đã nói:Cứ đi theo đường mòn hoài mà không tới đích nên mình bỏ toàn bộ và đi theo hướng mới kết quả rất tốt, đúng cả với trường hợp block bị mirror, tỉ lệ x và y khác nhau, góc quay.
-Tên lệnh: DBL.
-Chọn Block cần chỉnh.
-Chọn điểm chèn mới.
=> Lisp báo ra tên block và số lượng của block vừa chỉnh (tất nhiên là đã làm công việc chỉnh xong rồi)
-Ưu điểm không thay đổi tên block sau khi hoàn tất công việc và không có block rác.
-Nhược điểm: nếu block lựa chọn còn nằm trong 1 block khác nửa thì quá trình thay đổi sẽ không hoàn tất dẩn đến việc song song tồn tại block cũ và block trung gian lúc này các block đã dời điểm chèn sẽ mang tên block trung gian bao gồm tên cũ + taothem.
-Mình đã chạy thử trên bản quy hoạch với dưới 100 block thấy ổn các bạn test thử giúp.
Em chào bác, Em cảm ơn bác đã dành thời gian viết lisp này, em đang rất cần lisp này để chỉnh sửa bản vẽ, nhưng hiện tại link bị lỗi k tải dc, mong Bác bớt chút thời gian gửi lại giúp em dc k ah. Em cảm ơn bác nhiều
-
Vào lúc 5/7/2012 tại 11:39, NTD đã nói:CẢM ƠN BÁC DUY
Sao mọi người vẫn đưa ra các ý kiến khác ko dùng Lisp của bác Duy nhỉ , em đã test Lisp này rồi , chuẩn , nhanh , ko gặp lỗi nào , roteta , miror , scale , ko xảy ra lỗi nào lại còn nhanh . Tóm lại...... là yêu lắm cơ :D
Em đang theo dõi bài viết về thay đổi điểm chèn block. Bác DUY có úp lisp lên nhưng hiện tại file bị lỗi k tải dc, anh em nào đã tải lisp này rồi cho em xin lại dc không ah. Em cảm ơn rất nhiều.
Chúc các Bác mạnh khỏe
-
2 phút trước, nikizi đã nói:Bạn bị nhầm vì chưa đọc kỹ. Phần bạn nói không phải câu lệnh nên không sử dụng được là đúng rồi :D
Đây là 2 câu lệnh để thực hiện. Chúc vui
DẠ. Em đã làm được rồi ah. cảm ơn a rất nhiều ah.
-
14 giờ trước, nikizi đã nói:Bạn xem thêm ở đây nhé :D
Em đã tải về và đây đúng là Lisp em cần. Nhưng em đang đọc và làm thử thì chưa sử dụng được.
Anh có thể hướng dẫn giúp em được không ah?
Cụ thể là Khi em ap lisp vào cad, nhưng em không thao tác tiếp được, vì đọc trong file lisp lệnh tắt em không thấy có ( hay do em k tìm đúng lệnh tắt ) để sử dụng tiếp.
( (defun LM:AddObjectstoBlock ( doc block ss / lst mat )
(setq lst (LM:ss->vla ss)
mat (LM:Ref->Def block)
mat (vlax-tmatrix (append (mapcar 'append (car mat) (mapcar 'list (cadr mat))) '((0. 0. 0. 1.))))VÀ LỆNH TRỪ ĐỐI TƯỢNG ( (defun LM:RemovefromBlock ( doc ent )
(vla-delete (vlax-ename->vla-object ent))
(vla-regen doc acAllViewports)
(princ)
Anh có thể chỉ giúp em được k ah? em cảm ơn và mong hồi âm của anh -
Em chào anh. Bây giờ em mới đọc mục này, lisp anh gửi rất hay. Em đã dùng được khi cộng thêm đối tượng vào block, nhưng khi cần tách hay xóa 1 đối tượng trong block thì em không dùng được, rất mong anh chỉ giúp em. Nó hiện dòng lệnh ( Command: XOA
Chon doi tuong can xoa: ; error: no function definition: DELETEOBJECTFROMBLOCK
Command:)Em cảm ơn a nhiều.
Đổi điểm chèn sau khi đã chèn block khắp nơi
trong Sử dụng AutoCAD
Đã đăng · Trả lời báo cáo
Em đã làm dc rồi ah. Em cảm ơn anh đã giúp . Có gì không hiểu em sẽ hỏi thêm ah