Đến nội dung


Hình ảnh
- - - - -

[Yêu cầu] Nhờ viết lisp tách block


  • Please log in to reply
3 replies to this topic

#1 victor85

victor85

    biết lệnh stretch

  • Members
  • PipPipPip
  • 169 Bài viết
Điểm đánh giá: 10 (tàm tạm)

Đã gửi 19 April 2012 - 11:44 AM

Nhờ các bác viết dùm em lisp sau với ạ:
Trong bản vẽ có 1 số các block A.
Trong block A có một cụm đối tượng XYZ.
Sau khi sử dụng lisp thì cụm đối tượng XYZ sẽ tách khỏi block A và cụm đối tượng XYZ sẽ tạo thành block B. Và các block B có trùng điểm chèn và góc xoay xo với các block A trong bản vẽ.

Lisp: divide_block.lsp
Chọn block cần tách A: -> enter.
Chọn cụm đối tượng XYZ để tạo thành block B: -> enter.
Nhập tên mới của block B: -> enter
Chạy lisp ra kết quả ạ.

Em hơi băn khoăn khi nhờ viết lisp này khi không biết có chọn được đối tượng bên trong của block A ko khi mà đang ở không gian vẽ,
hy vọng các cao thủ lisp có thể làm được giúp em với ạ. Em cảm ơn nhiều!
  • 0

#2 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5450 Bài viết
Điểm đánh giá: 2625 (tuyệt vời)

Đã gửi 19 April 2012 - 12:24 PM

Nhờ các bác viết dùm em lisp sau với ạ:
Trong bản vẽ có 1 số các block A.
Trong block A có một cụm đối tượng XYZ.
Sau khi sử dụng lisp thì cụm đối tượng XYZ sẽ tách khỏi block A và cụm đối tượng XYZ sẽ tạo thành block B. Và các block B có trùng điểm chèn và góc xoay xo với các block A trong bản vẽ.

Lisp: divide_block.lsp
Chọn block cần tách A: -> enter.
Chọn cụm đối tượng XYZ để tạo thành block B: -> enter.
Nhập tên mới của block B: -> enter
Chạy lisp ra kết quả ạ.
Em hơi băn khoăn khi nhờ viết lisp này khi không biết có chọn được đối tượng bên trong của block A ko khi mà đang ở không gian vẽ,
hy vọng các cao thủ lisp có thể làm được giúp em với ạ. Em cảm ơn nhiều!

Dùng hàm NENTSEL thì chọn được đối tượng bên trong block.
  • 0

* Chỉ nên yêu cầu Lisp khi bạn làm việc đó mất cả ngày nhưng họ chỉ viết 1 giờ. Đừng nêu yêu cầu Lisp khi bạn chỉ làm 1 giờ nhưng bắt họ phải mất cả ngày.

* Nhờ viết lisp cũng như đi khám bệnh. Chỉ gởi căn cước và than sắp chết thì không bác sỹ nào cứu sống được.


#3 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (tuyệt vời)

Đã gửi 19 April 2012 - 01:21 PM

Làm tay sẽ nhanh hơn, vì nentsel chỉ pick từng đối tượng 1
Vào Blockeditor xóa những thứ k cần và SaveAs block B
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#4 victor85

victor85

    biết lệnh stretch

  • Members
  • PipPipPip
  • 169 Bài viết
Điểm đánh giá: 10 (tàm tạm)

Đã gửi 19 April 2012 - 02:34 PM

Làm tay sẽ nhanh hơn, vì nentsel chỉ pick từng đối tượng 1
Vào Blockeditor xóa những thứ k cần và SaveAs block B

có lẽ nên làm tay vậy. Cảm ơn ketxu đã góp ý nhé.
  • 0