Góc nhờ trợ giúp về lisp lọc đối tượng

[mdchuyen 3]

Nhờ các bác giúp em lisp lọc đối tượng trong nhiều đường PL khép kín như bản vẽ đính kèm

test.dwg

[Doan Van Ha 3.180]

4 phút trước, mdchuyen đã nói:

Nhờ các bác giúp em lisp lọc đối tượng trong nhiều đường PL khép kín như bản vẽ đính kèm

test.dwg

Bạn nên mô tả rõ ràng chứ mở bản vẽ ra mà zoom qua lại hơi khổ

[mdchuyen 3]

1 phút trước, Doan Van Ha đã nói:

Bạn nên mô tả rõ ràng chứ mở bản vẽ ra mà zoom qua lại hơi khổ

dạ : cụ thể bản vẽ có nhiều đường PL khép kín bên trong có chưa các đối tượng (text, mtext, block, pline hở, line ) và nhiều đối tượng khác nằm ngoài các PL khép kín đó. Giờ Cháu mong muốn có 1 lisp để quét toàn bộ dạng cửa sổ. Kết quả nó chọn các đối tượng chỉ trong các pl khép kín để mình có thể di chuyển hoặc copy ạ

[limfx 17]

Thấy trước và sau y như nhau

 

[7o7 79]

Tôi nghĩ lisp này bác @mdchuyen  làm được mà sao lại hỏi?? 

Ở đây chỉ có 2 việc::

1- Xác định pline kín và các điểm của nó, pline này hình chữ nhật thì càng dễ.

2- Bắt các đối tượng bên trong pline kín.

Cả 2 đều là việc đơn giản, bác thớt có thể làm được.

[ndtnv 481]

Chọn Pline khép kín:

(ssget '((0 . "LWPOLYLINE")(-4 . "&")(70 . 1)))

lisp SICP (select in closed  pline) chưa xét pline hở có điểm đầu trùng điểm cuối

 

 

 

SICP.rar

[mdchuyen 3]

32 phút trước, ndtnv đã nói:

Chọn Pline khép kín:

(ssget '((0 . "LWPOLYLINE")(-4 . "&")(70 . 129)))

lisp SICP (select in closed  pline) chưa xét pline hở có điểm đầu trùng điểm cuối

SICP.rar

quá ok rồi bác

[huumanh.pro 0]

Chào các bác, các bác cho em xin lại lisp Sicp với, em tải mà nó báo ko có file, cảm ơn các bác.

[TonyDSK 1]

Vào lúc 11/11/2022 tại 10:27, ndtnv đã nói:

Chọn Pline khép kín:

(ssget '((0 . "LWPOLYLINE")(-4 . "&")(70 . 1)))

lisp SICP (select in closed  pline) chưa xét pline hở có điểm đầu trùng điểm cuối

 

 

SICP.rar

Bác cho em xin lại lisp này được không bác, em tải về toàn báo lỗi, cảm ơn bác rất nhiều!