Đến nội dung


Hình ảnh

AE cho hỏi trích mặt bằng??


  • Please log in to reply
9 replies to this topic

#1 Bluster

Bluster

    biết vẽ line

  • Members
  • PipPip
  • 27 Bài viết
Điểm đánh giá: 4 (bình thường)

Đã gửi 20 October 2010 - 06:40 PM

Chào AE!

Mình đang có 1 file CAD tổng mặt bằng rất lớn. Cho mình hỏi có cách nào hay lấy đc 1 vùng đát hình chữ nhật trong tổng mặt bằng đấy không? Hiện nay mình đang định khoang vùng cần lấy rồi del vùng thừa. Cách này ko tiện lợi tí nào. Cảm ơn đã đọc
  • 0

#2 huong259

huong259

    biết lệnh refedit

  • Members
  • PipPipPipPipPipPipPip
  • 596 Bài viết
Điểm đánh giá: 350 (khá)

Đã gửi 20 October 2010 - 11:17 PM

Chào AE!

Mình đang có 1 file CAD tổng mặt bằng rất lớn. Cho mình hỏi có cách nào hay lấy đc 1 vùng đát hình chữ nhật trong tổng mặt bằng đấy không? Hiện nay mình đang định khoang vùng cần lấy rồi del vùng thừa. Cách này ko tiện lợi tí nào. Cảm ơn đã đọc

Có cách làm đơn giản thôi, anh chịu khó đọc bài viết này:
http://www.cadviet.c...p?showtopic=347
  • 0

#3 Bluster

Bluster

    biết vẽ line

  • Members
  • PipPip
  • 27 Bài viết
Điểm đánh giá: 4 (bình thường)

Đã gửi 20 October 2010 - 11:22 PM

Có cách làm đơn giản thôi, anh chịu khó đọc bài viết này:
http://www.cadviet.c...p?showtopic=347


Layout thì mình biết nhưng mình đang muốn làm trên không gian model vì mình còn thiết kế trên mặt bằng đó nữa. Cảm ơn ý kiến của bạn
  • 0

#4 huong259

huong259

    biết lệnh refedit

  • Members
  • PipPipPipPipPipPipPip
  • 596 Bài viết
Điểm đánh giá: 350 (khá)

Đã gửi 21 October 2010 - 12:06 AM

Layout thì mình biết nhưng mình đang muốn làm trên không gian model vì mình còn thiết kế trên mặt bằng đó nữa. Cảm ơn ý kiến của bạn

http://www.cadviet.c...showtopic=22087
  • 1

#5 Bluster

Bluster

    biết vẽ line

  • Members
  • PipPip
  • 27 Bài viết
Điểm đánh giá: 4 (bình thường)

Đã gửi 21 October 2010 - 05:14 PM

Cám ơn bạn đã nhiệt tình. Mình đã đọc bài viết bạn dẫn link nhưng hình như cũng chưa giải quyết đc vấn đề của mình. Mình đưa file cad ở đây. Mong bạn nào có thể lấy ra vùng trong hình chữ nhật 1 cách tiện lợi nhất

http://www.mediafire...8olir2p5wo95msz
  • 0

#6 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 21 October 2010 - 05:31 PM

Thì bác chọn tất cả,rồi biến nó thành 1 block,rồi dùng xclip để trích xuất ra vùng HCN đó.Nếu không muốn block thì mình nghĩ đào sâu vào cách cũ là khoanh vùng,dùng extrim cắt bên ngoài đi,dùng fast select chọn tất cả đối tượng bên trong rồi move ra 1 chỗ khác để xử lý,cũng có lâu lắm đâu,30s cho 1 hình thui mà ^^
(PS : Thậm chí có lisp xóa toàn bộ đối tượng ngoài vùng trích xuất sau khi extrim,khéo 1 phát chỉ mất 5s là bác có vùng chữ nhật riêng biệt bác ạ :lol: )
  • 1

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


#7 Bluster

Bluster

    biết vẽ line

  • Members
  • PipPip
  • 27 Bài viết
Điểm đánh giá: 4 (bình thường)

Đã gửi 21 October 2010 - 08:20 PM

Thì bác chọn tất cả,rồi biến nó thành 1 block,rồi dùng xclip để trích xuất ra vùng HCN đó.Nếu không muốn block thì mình nghĩ đào sâu vào cách cũ là khoanh vùng,dùng extrim cắt bên ngoài đi,dùng fast select chọn tất cả đối tượng bên trong rồi move ra 1 chỗ khác để xử lý,cũng có lâu lắm đâu,30s cho 1 hình thui mà ^^
(PS : Thậm chí có lisp xóa toàn bộ đối tượng ngoài vùng trích xuất sau khi extrim,khéo 1 phát chỉ mất 5s là bác có vùng chữ nhật riêng biệt bác ạ :lol: )


thanks.Cái xclip hình như chỉ là làm ẩn đi vùng xung quanh thôi. Còn FS chọn vùng giao với hình CN mình chọn. Cũng là tiện lợi lên rồi ^^
  • 0

#8 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 22 October 2010 - 08:08 AM

Vâng.xclip chính là để ẩn vùng xung quanh đi
Gói gọn lại trong 2 bước thôi bác ạ.Nhưng làm trên bản copy,hoặc save as ra chỗ khác,vì mỗi lần làm với 1 vùng
1.Chọn đường biên bao vùng cần trích xuất -> extrim để tách rời khung ra
2.Quét từ trái sang phải cả vùng khoanh đó.
Hoặc trong trường hợp vùng bao không phải là HCN đơn thuần thì :
2.Đánh lệnh xóa toàn bộ các đối tượng ngoài đường bao đó ra,e gửi kèm lisp đây.Lệnh OD

(defun C:OD ( / en ss lst ssall bbox tmp head)
;_Required Express tools
;_OutSide Contour Delete
(vl-load-com)
(if (null ACET-GEOM-OBJECT-POINT-LIST)
(progn
(alert "Chuong trinh can Express tools!!!")
(exit)
)
)
(if (and (setq en (car(entsel "\nChon duong bien: ")))
(wcmatch (cdr(assoc 0 (entget en))) "*POLYLINE,CIRCLE,ELLIPSE,SPLINE"))
(progn
(setq bbox (ACET-ENT-GEOMEXTENTS en))
(setq bbox (mapcar '(lambda(x)(trans x 0 1)) bbox))
(setq lst (ACET-GEOM-OBJECT-POINT-LIST en 1e-6))
(while lst
(setq head (car lst)
tmp (cons head tmp)
lst (vl-remove-if '(lambda(pt)(equal pt head 1e-3))(cdr lst))
)
)
(setq lst (reverse tmp))
(ACET-SS-ZOOM-EXTENTS (ACET-LIST-TO-SS (list en)))
(command "_.Zoom" "0.95x")
(if (and
(setq ss (ssget "_CP" lst))
(setq ssall (ssget "_X" (list (assoc 410 (entget en)))))
)
(progn
(setq tmp '-1)
(repeat (sslength ss)
(ssdel (ssname ss (setq tmp (1+ tmp))) ssall)
)
;;; (ACET-SS-ENTDEL ssall)
(command "_.ERASE" ssall "")
)
)
)
)
)

  • 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


#9 thiep

thiep

    biết dimbaseline

  • Members
  • PipPipPipPipPip
  • 369 Bài viết
Điểm đánh giá: 260 (khá)

Đã gửi 22 October 2010 - 02:54 PM

Chào AE!

Mình đang có 1 file CAD tổng mặt bằng rất lớn. Cho mình hỏi có cách nào hay lấy đc 1 vùng đát hình chữ nhật trong tổng mặt bằng đấy không? Hiện nay mình đang định khoang vùng cần lấy rồi del vùng thừa. Cách này ko tiện lợi tí nào. Cảm ơn đã đọc

Chào Bluster,
Lisp này mình viet đã lâu, bạn có thể trích đo bằng hình vuông, hình chữ nhật, hình tròn. Thiep định phát triển thêm các hình khác như ellípe, đa giác... nhưng bận quá chưa tiếp tục được
http://www.cadviet.c...s/3/trichbd.lsp
Sau khi tạo hinh xong, user rê hinh này vào khu vực cần trích thửa, nó sẽ copy các đối tượng bên trong và giao với hinh (giống như 1 nam châm). Sau đó, user rê các đối tượng này đến vị trí cần đặt, ví dụ đặt ở giữa bản vẽ TRÍCH ĐO ĐỊA CHÍNH THỬA ĐẤT. Lisp sẽ cắt bỏ những đường bên ngoài.
Bạn có thể vào đây để tham khảo thêm:
http://www.cadviet.c...&...ost&p=74050
Bạn nên post đúng vào mục VIẾT LISP TEO YÊU CẦU để mọi người dễ theo dõi.
  • 2

#10 hamster2102

hamster2102

    biết lệnh copy

  • Advance Member
  • PipPipPip
  • 111 Bài viết
Điểm đánh giá: 21 (tàm tạm)

Đã gửi 03 October 2012 - 08:46 PM

Chào Bluster,
Lisp này mình viet đã lâu, bạn có thể trích đo bằng hình vuông, hình chữ nhật, hình tròn. Thiep định phát triển thêm các hình khác như ellípe, đa giác... nhưng bận quá chưa tiếp tục được
http://www.cadviet.c...s/3/trichbd.lsp
Sau khi tạo hinh xong, user rê hinh này vào khu vực cần trích thửa, nó sẽ copy các đối tượng bên trong và giao với hinh (giống như 1 nam châm). Sau đó, user rê các đối tượng này đến vị trí cần đặt, ví dụ đặt ở giữa bản vẽ TRÍCH ĐO ĐỊA CHÍNH THỬA ĐẤT. Lisp sẽ cắt bỏ những đường bên ngoài.
Bạn có thể vào đây để tham khảo thêm:
http://www.cadviet.c...&...ost&p=74050
Bạn nên post đúng vào mục VIẾT LISP TEO YÊU CẦU để mọi người dễ theo dõi.

bạn Thiệp chỉnh sửa khâu nhập kích thước khung nhìn thành select object mà không phải tính chiều dài với chiều cao khung nhìn thì hay quá, thanks :D
  • 0
Nếu biết rằng em đã lấy chồng
Anh mừng biết mấy em biết không
Bao năm quen biết, bao năm mệt
Tính ra cũng khổ mấy năm ròng