Đến nội dung


Hình ảnh
- - - - -

Lisp trợ giúp trong công tác giải phóng mặt bằng ?


  • Please log in to reply
2 replies to this topic

#1 thanhhoa.36

thanhhoa.36

    biết vẽ circle

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

Đã gửi 16 January 2011 - 11:16 PM

Chào các bác trên diễn đàn !
Em có một trường hợp như sau rất mong được các bác giúp đỡ
em có rất nhiều thửa đất, có một đường Plyline cắt ngang qua một số thửa đất như hình vẽ

http://www.cadviet.c...iles/3/vd_1.jpg

rất mong được các bác giúp đỡ em làm sao có thể đánh được :
- ĐÁNH SỐ THỬA
- TÍNH DIỆN TÍCH TRONG VÀO NGOÀI ĐƯỜNG GIỚI HẠN
- XUẤT SANG EXCELL bảng thống kê
Rất mong được các bác trên diện đàn anh em trắc địa bọn em đỡ vất vả, món Lisp này em chẳng biết gì

Cho em được cảm ơn các bác trước vậy

Đây là file em gửi kèm của em

http://www.cadviet.c...s/3/vd_10_1.rar
  • 0

#2 elleHCSC

elleHCSC

    biết lệnh copy

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

Đã gửi 16 March 2011 - 11:10 AM

Chào các bác trên diễn đàn !
Em có một trường hợp như sau rất mong được các bác giúp đỡ
em có rất nhiều thửa đất, có một đường Plyline cắt ngang qua một số thửa đất như hình vẽ

http://www.cadviet.c...iles/3/vd_1.jpg

rất mong được các bác giúp đỡ em làm sao có thể đánh được :
- ĐÁNH SỐ THỬA
- TÍNH DIỆN TÍCH TRONG VÀO NGOÀI ĐƯỜNG GIỚI HẠN
- XUẤT SANG EXCELL bảng thống kê
Rất mong được các bác trên diện đàn anh em trắc địa bọn em đỡ vất vả, món Lisp này em chẳng biết gì

Cho em được cảm ơn các bác trước vậy

Đây là file em gửi kèm của em

http://www.cadviet.c...s/3/vd_10_1.rar


* Viết bằng lisp để thoả mãn cả mấy cái yêu cầu của này của bạn là khá vất vả đó, còn nếu bạn sử dụng CADMAP thì có thể cũng làm được chí ít 3 mục tiêu:
- Tính diện tích thửa đất tổng (cái này dễ rồi vì đã có lisp trên CV hoặc dùng CADMAP)
- Đánh số thửa (cũng dễ trên CV cũng đã có lisp rồi)

mục tiêu thứ 3 : tính diện tích trong ngoài đường giới hạn của chỉ giới: bạn dùng CADMAP và nghiên cứu kỹ (mò mẫn đi) 2 mục của Map\Topology\ để tạo topo + closed_polylines và Map\query để "truy vấn" topo và xuất kết quả ra bản vẽ (chứ ko phải ra excel nhé), kết quả chạy cũng rất nhanh và chính xác đối với 1 tờ BĐ_ĐC hoặc cả bvẽ 1 tuyến đường dài. Trước CQ tôi có người ở XN làm rất thuần thục các công việc này, giờ ko còn làm công việc đó chắc "thất truyền" roài.

Hình đã gửi

Hình đã gửi
Công việc bận quá chứ có thời gian tôi ngồi làm cho bạn 1 tutor về cái cắt thửa rồi topo để tính diện tích trong ngoài cũng như xuất kết quả ra màn hình.

mục tiêu cuối : xuất bảng thống kê sang excel thì chắc phải lisp rồi, bạn kiếm trên CV xem có không chứ Modz theo từng y/c cụ thể thì tôi nghĩ là chưa có.
  • 0
Share for all, all will share !

--------------------
HTTP://WWW.HCSC.VN
HTTP://WWW.HCSC.COM.VN

#3 huynhphuoc

huynhphuoc

    biết zoom

  • Members
  • Pip
  • 11 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 01 June 2016 - 09:50 AM

cái ni bên MicroStation làm nhanh, gọn


  • 0

Huỳnh Phước
0905.606.205

ttktdc.phuoc@gmail.com
https://www.facebook...phuocdiodground

Trung tâm Kỹ thuật Tài nguyên và Môi trường tỉnh TT-Huế