Đến nội dung


Hình ảnh
- - - - -

[Đã xong] - Lisp convert đường, điểm lên Google Earth


  • Please log in to reply
41 replies to this topic

#21 dongson08

dongson08

    Chưa sử dụng CAD

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

Đã gửi 15 October 2013 - 01:59 PM

Hi cảm ơn các bác đã quan tâm.
Lisp đây:
http://www.cadviet.c...converter_1.lsp
Lisp này nhận số liệu đầu vào là file txt. Format số liệu như sau
[Tên điểm] [Toạ độ Lat-WGS84] [Toạ độ Long-WGS84]
Các bác Test thử xem có vấn đề gì không nhé. Thanks các bác.

Mình chỉ có file cad không có file txt thì chuyển thế nào vậy bạn.thanks


  • 0

#22 phuongkq

phuongkq

    biết vẽ line

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

Đã gửi 31 January 2014 - 06:44 PM

Hi cảm ơn các bác đã quan tâm.
Lisp đây:
http://www.cadviet.c...converter_1.lsp
Lisp này nhận số liệu đầu vào là file txt. Format số liệu như sau
[Tên điểm] [Toạ độ Lat-WGS84] [Toạ độ Long-WGS84]
Các bác Test thử xem có vấn đề gì không nhé. Thanks các bác.

Bạn có thể upload file text bạn làm không? và giải thích giùm làm sao để có số liệu bạn nói với. Mình thử như bạn nói và file kml tạo ra không có dữ liệu bạn ạ, không báo lỗi nào cả.

Minh đính kèm file text của mình bạn nhé

thanks bạn nhiềuhttp://www.cadviet.c.../12225_gps3.txt


  • 0

#23 minhphuong_humg

minhphuong_humg

    biết lệnh offset

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

Đã gửi 05 February 2014 - 03:59 PM

Link mới đây bạn:

http://www.cadviet.c...converter_2.lsp

Thông thường từ file tọa độ LatLong mình dùng lisp trên để convert thành file *.kml rồi mở bằng GoogleEarth là xong. Chưa bao giờ xuất file kml từ GE cả.

Chào KangKung, mình đã check thử file số liệu mẫu bạn đính kèm. Kết quả cho ra như hình vẽ bạn xem có phải không?

 

2883_ge.png

 

Nếu đúng, thì mình nghĩ rằng Việt Nam mình cũng có nhiều số liệu để test chứ làm sao lại bay cả sang TQ để test chứ. :D

Nếu chưa chính xác thì bạn chỉ mình nhé.

Trân trọng.


  • 0

#24 KangKung

KangKung

    biết lệnh array

  • Members
  • PipPipPip
  • 189 Bài viết
Điểm đánh giá: 227 (khá)

Đã gửi 08 February 2014 - 11:53 AM

Lâu quá không ghé thăm Cadviet nên chậm trễ trong việc phản hồi mong các bạn thông cảm.

 

Chào bạn minhphuong_humg. Kết quả convert của bạn hoàn toàn đúng không có vấn đề gì cả. Việc số liệu nhảy sang Trung Quốc là do mình lấy số liệu ngẫu nhiên thôi chứ không phải số liệu thực tế.

 

Bạn phuongkq. Số liệu của bạn ở dạng tọa độ phẳng XY trong khi Lisp mình viết chỉ convert số liệu ở dạng tọa độ WGS84 thôi. Bạn chuyển đổi số liệu từ hệ XY sang WGS84 trước khi chạy Lisp là được.


  • 1

#25 Polyline

Polyline

    biết lệnh mirror

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

Đã gửi 08 February 2014 - 03:09 PM

Oh, vậy làm sao để chuyển toạ độ phẳng XY thành WGS84 vậy bạn?


  • 0

#26 KangKung

KangKung

    biết lệnh array

  • Members
  • PipPipPip
  • 189 Bài viết
Điểm đánh giá: 227 (khá)

Đã gửi 08 February 2014 - 09:51 PM

Cái này thì phải có chuyên môn về Trắc địa thì mới làm được Polyline ah.


  • 0

#27 HoaVien

HoaVien

    biết vẽ arc

  • Members
  • PipPip
  • 44 Bài viết
Điểm đánh giá: 12 (tàm tạm)

Đã gửi 09 February 2014 - 08:22 AM

Chào KangKung, mình đã check thử file số liệu mẫu bạn đính kèm. Kết quả cho ra như hình vẽ bạn xem có phải không?

 

2883_ge.png

 

Nếu đúng, thì mình nghĩ rằng Việt Nam mình cũng có nhiều số liệu để test chứ làm sao lại bay cả sang TQ để test chứ. :D

Nếu chưa chính xác thì bạn chỉ mình nhé.

Trân trọng.

KangKung chắc là hậu bối của vua Quang Trung (ôm mộng bắc tiến) ?!

 

Trong khi đó minhphuong_humg lại lo đụng chạm đến ông hàng xóm hay gây sự ?


  • 1

#28 ThuyLinh313

ThuyLinh313

    biết lệnh mtext

  • Members
  • PipPipPipPip
  • 288 Bài viết
Điểm đánh giá: 142 (tàm tạm)

Đã gửi 09 February 2014 - 04:27 PM

@Kangkung: Đơn giản thôi bạn ạ. Mình đã từng có ý định làm lisp này theo ý tưởng mình đã đề nghị với bạn ở trang 1. Tuy nhiên giờ mình không có điều kiện để viết lisp nữa rồi.

Ý tưởng:

1. Chuyển pline trong Cad (VN2000) lên GE (WGS-84)

2. Chuyển tuyến từ GE (WGS-84) sang Cad (VN2000)

Các bạn bên trắc địa có nhiều phần mềm có thể làm việc này, thường là phần mềm có tính phí và làm việc độc lập với Cad. Không thân thiện với các bạn tư vấn giao thông, thủy lợi, cấp thoát nước.

Các phần mềm đó có thể khác nhau nhưng bắt buộc phải theo 1 phương trình chuyển đổi chung giữa VN2000 và WGS-84 do bộ Tài nguyên và môi trường phê duyệt. Bạn có thể tham khảo quyết định số 05/2007/QĐ-BTNMT để có phương trình cùng 7 tham số chuyển đổi.


  • 1

#29 Polyline

Polyline

    biết lệnh mirror

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

Đã gửi 10 February 2014 - 08:20 AM

Vấn đề mấu chốt là chuyển đổi qua lại giữa VN2000 và WGS-84. Đúng là đã có những ứng dụng để làm việc này nhưng nó không miễn phí. Ý tưởng thì thật tuyệt vời, nhưng tiếc là bạn ThuyLinh313 đã không (chưa) biến nó thành hiện thực. Mong chờ sự quan tâm của các bạn!!


  • 0

#30 Polyline

Polyline

    biết lệnh mirror

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

Đã gửi 10 February 2014 - 04:27 PM

@Kangkung: Đơn giản thôi bạn ạ. Mình đã từng có ý định làm lisp này theo ý tưởng mình đã đề nghị với bạn ở trang 1. Tuy nhiên giờ mình không có điều kiện để viết lisp nữa rồi.

Ý tưởng:

1. Chuyển pline trong Cad (VN2000) lên GE (WGS-84)

2. Chuyển tuyến từ GE (WGS-84) sang Cad (VN2000)

Các bạn bên trắc địa có nhiều phần mềm có thể làm việc này, thường là phần mềm có tính phí và làm việc độc lập với Cad. Không thân thiện với các bạn tư vấn giao thông, thủy lợi, cấp thoát nước.

Các phần mềm đó có thể khác nhau nhưng bắt buộc phải theo 1 phương trình chuyển đổi chung giữa VN2000 và WGS-84 do bộ Tài nguyên và môi trường phê duyệt. Bạn có thể tham khảo quyết định số 05/2007/QĐ-BTNMT để có phương trình cùng 7 tham số chuyển đổi.

Quyết định này có 7 tham số nhưng không có phương trình nào bạn ạ! Mình không phải chuyên ngành trắc địa, chẳng biết dùng nó vào việc gì hết! (^_^)


  • 0

#31 ThuyLinh313

ThuyLinh313

    biết lệnh mtext

  • Members
  • PipPipPipPip
  • 288 Bài viết
Điểm đánh giá: 142 (tàm tạm)

Đã gửi 10 February 2014 - 05:23 PM

ồ. mình tưởng quyết định này công bố các hệ số chuyển đổi thì phải kèm theo phương trình dành cho chúng. mình chỉ biết quyết định đó công bố hệ số chứ chưa đọc nó.

Các bạn có thể tìm văn bản số 1123/ĐĐBD-CNTĐ của cục đo đạc bản đồ. họ có cung cấp phương trình sử dung 7 hệ số trên. mình chỉ có bản giấy của băn bản trên, đt mình không có máy ảnh :D


  • 1

#32 Polyline

Polyline

    biết lệnh mirror

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

Đã gửi 11 February 2014 - 08:22 AM

http://www.dosm.gov....5722&interface=

Mình tìm được phần giới thiệu nhưng không thấy văn bản nào cả. Nếu bạn nào tìm được vui lòng upload vào đây.


  • 0

#33 ThuyLinh313

ThuyLinh313

    biết lệnh mtext

  • Members
  • PipPipPipPip
  • 288 Bài viết
Điểm đánh giá: 142 (tàm tạm)

Đã gửi 11 February 2014 - 09:54 AM

mình kí hiệu lại các tham số do các kí hiệu ở văn bản gốc ko gõ được. Hi vọng giúp được các bạn

 

Hệ 3 phương trình gồm:

PT1: X = xo + k(X'+aY'+bZ')

PT2: Y=yo+k(-aX'+Y'+cZ')

PT3: Z=zo+k(bX'-cY'+Z')

 

Trong đó:

X,Y,Z: Toạ độ điểm hệ cần tính chuyển sang, đơn vị m

X',Y',Z': Toạ độ điểm hệ gốc, đơn vị m

Các hệ số theo QĐ số 05/2007

xo,yo,zo: Tham số dịch chuyển gốc toạ độ, đơn vị m

a,b,c: góc xoay trục tọa độ (góc xoay ơle) tương ứng với các trục X,Y,Z, đơn vị giây. khi tính cần chuyển sang radian. (chả hiểu sao Bộ không cho ở radian luôn đi)

k: hệ số tỷ lệ chiều dài giữa 2 hệ.


  • 2

#34 lacpv

lacpv

    Chưa sử dụng CAD

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

Đã gửi 21 July 2014 - 01:05 AM

Bạn upload lai file lisp giúp link die mất rồi, tks


  • 0

#35 DanKhaosat

DanKhaosat

    biết lệnh scale

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

Đã gửi 21 July 2014 - 08:46 AM

Đề nghị anh Kakung cho lại file đi đường dẫn cũ không doawnload được!

Thanhk


  • 0

#36 hungnvbt

hungnvbt

    Chưa sử dụng CAD

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

Đã gửi 06 August 2014 - 04:02 PM

Chào các bác
Em mới hoàn thành lisp Lisp đưa đường và điểm lên Google Earth. Đặc điểm của Lisp này là convert toạ độ của điểm hoặc tuyến khảo sát lên Google. Điều này thuận tiện cho những bác hay phải khảo sát những công trình dạng tuyến như đường ôtô, ống dẫn dầu, cáp quang biển v.v… theo dõi xem tuyến khảo sát của mình đi qua những đâu và gặp những địa vật gì. Hoặc có thể dùng cho những bác Trắc địa đi tìm mốc xem nó nằm ở đâu. Việc chuyển điểm lên Google Earth thì có nhiều phần mềm làm được nhưng trên diễn đàn chưa thấy bác nào viết lisp về vấn đề này nên em định đưa lên diễn đàn để kiếm Like mà không biết có bác nào có nhu cầu hay không?

Bạn có thể up lại file không vậy hay gửi cho minh vào mail hungnvbt@gmail.com


  • 0

#37 vien302

vien302

    Chưa sử dụng CAD

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

Đã gửi 06 August 2014 - 05:59 PM

Link mới đây bạn:

http://www.cadviet.c...converter_2.lsp

Thông thường từ file tọa độ LatLong mình dùng lisp trên để convert thành file *.kml rồi mở bằng GoogleEarth là xong. Chưa bao giờ xuất file kml từ GE cả.

cho xin lisp này đi bạn, đang cần: vien302@zing.vn. Cám on truoc.


  • 0

#38 ksmtruong

ksmtruong

    Chưa sử dụng CAD

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

Đã gửi 23 September 2014 - 03:32 PM

Link mới đây bạn:

http://www.cadviet.c...converter_2.lsp

Thông thường từ file tọa độ LatLong mình dùng lisp trên để convert thành file *.kml rồi mở bằng GoogleEarth là xong. Chưa bao giờ xuất file kml từ GE cả.

bạn gửi cho mình xin một bản nhé mail: ksmtruong@gmail.com .cảm ơn bạn


  • 0

#39 ksmtruong

ksmtruong

    Chưa sử dụng CAD

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

Đã gửi 23 September 2014 - 03:47 PM

Oh, vậy làm sao để chuyển toạ độ phẳng XY thành WGS84 vậy bạn?

bạn dùng phần mềm Geo_Tool nhé !


  • 0

#40 TheTC_SONHATCC

TheTC_SONHATCC

    biết pan

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

Đã gửi 07 February 2015 - 12:06 PM

Ứng dụng của module này dùng để chuyển bản vẽ AutoCAD sang định dạng KMZ

  1. Load file KMZ_Trans.fas, lệnh của em nó là GE nhé
  2. Đã  sửa lại để tự động thiết lập Dialog tương ứng với cả các phiên bản AutoCAD cú không hỗ trợ Unicode
  3. Hộp thoại sẽ tự động chuyển về tiếng Việt có hoặc không có dấu tùy thuộc từng bản AutoCAD
  4. Lưu ý:  Trường hợp muốn chuyển đường LW Polyline trong đó có cả các đoạn nối là đường cong thì phải phá vỡ nó trước khi chuyển vì khi nó còn là Polyline thì chỉ lấy các Vertext để chuyển  http://www.cadviet.c...8_kmz_trans.zip

  • 2