Phần mềm vẽ đường đồng mức

Thấy nhiều bạn than phiền những lisp vẽ Đường Đồng Mức (ĐĐM) hay chạy chậm rì rì, thậm chí thỉnh thoảng treo lắp thêm, bắt buộc tôi làm tính năng này ship hàng xã hội.

You watching: Phần mềm vẽ đường đồng mức

Đang xem: Phần mượt vẽ mặt đường đồng mức

Đang xem: Phần mềm vẽ con đường đồng mức

Lisp có một phần mối cung cấp từ Internet, tôi hiệu chỉnh và bổ sung cập nhật để tăng vận tốc xử lý. Một phần không giống tự viết.

Code mnghỉ ngơi đề nghị đầy đủ fan tha hồ nước vọc. Lệnh: DDM.

Test cùng với bạn dạng vẽ 22629 points sinh sống sản phẩm công nghệ tôi chỉ mất 60 giây (với những thông số khoác định trong lisp).

Chức năng: vẽ các tam giác TIN, vẽ ĐĐM, sơn màu theo cao độ mang đến ĐĐM.

Đối tượng: tập các point, hoặc tập các text, hoặc tập các block_att cao độ.

File Cad để test:

http://www.mediafire.com/file/c3ey62x9rb35bu6/Draw_Contour_HA.dwg

File Lisp:

http://www.mediafire.com/file/90u0sgqmukkuft7/Draw_Contour_HA.lsp

File Image:

http://www.mediafire.com/view/ydyhy3csv9pg4yd/Draw_Contour_HA.png

 

Còn đôi điều không ưa thích lắm, đang sửa sau. Hy vọng được mang lại nguồn vui mang lại số đông người!

49Chia sẻ bài xích đăng nàyLiên kết cho tới bài bác đăngChia sẻ bên trên những website khác

thanhduan2407 260

thanhduan2407 260

biết lệnh adcenterNhà quảng cáo 2601.119 bài viếtGiới tính:MaleĐã đăng Tháng 11 13, năm 2016

Thấy nhiều người thở than những lisp vẽ Đường Đồng Mức (ĐĐM) thường chạy chậm rì rì, thậm chí còn thỉnh thoảng treo trang bị, yêu cầu tôi làm cho tính năng này Giao hàng cộng đồng.

Lisp có nguồn trên Internet, tôi hiệu chỉnh với bổ sung để tăng vận tốc xử lý.

Code mở phải mọi người tha hồ vọc. Lệnh: DDM.

Test cùng với phiên bản vẽ 22629 points sinh hoạt máy tôi chỉ mất 60 giây.

Chức năng: vẽ những tam giác TIN, vẽ ĐĐM, sơn color theo cao độ đến ĐĐM.

Đối tượng: tập những point, hoặc tập các text, hoặc tập các block_att cao độ.

File Cad để test:

http://www.mediafire.com/file/c3ey62x9rb35bu6/Draw_Contour_HA.dwg

File Lisp:

http://www.mediafire.com/file/90u0sgqmukkuft7/Draw_Contour_HA.lsp

File Image:

http://www.mediafire.com/view/ydyhy3csv9pg4yd/Draw_Contour_HA.png

 

Còn đôi điều chưa bằng lòng lắm, vẫn sửa sau. Hy vọng được mang lại mối cung cấp vui đến mọi người!

Cháu cảm ơn chưng Hạ nhiều! Chúc chưng sức khỏe với thành công xuất sắc trong cuộc sống!

Chia sẻ bài xích đăng nàyLiên kết tới bài bác đăngChia sẻ trên những website khác

hoquangvinh 6

*

hoquangvinh 6

biết lệnh extendThành viên 6199 bài bác viếtĐã đăng Tháng 11 13, năm nhâm thìn

không test không còn các vụ việc nhưng mà lisp vẫn chạy ngon rồi

thanks bác HA khôn cùng nhiều

Chia sẻ bài bác đăng nàyLiên kết cho tới bài xích đăngChia sẻ trên những trang web khác

KangKung 247

KangKung 247

biết lệnh trimThành viên 247192 bài bác viếtGiới tính:MaleĐã đăng Tháng 11 13, năm nhâm thìn

Lisp của chưng Hạ chạy giỏi, bạn viết Lisp có trung khu, tuy vậy còn có lỗi đem nhầm Justify của Text. Chỉ đúng vào lúc Justify là Left sót lại thì đem sai điểm dẫn mang lại lưới mô hình chiều cao bị lệch cho nên vì thế đường đồng nấc cũng lệch theo. Bác Hạ buộc phải chũm đoạn mã này: (setq lstXYZ (mapcar “(lambda(ent) (cdr (assoc 10 (entget ent)))) lstEnt))

bởi đoạn mã sau đây: (setq lstXYZ (mapoto “(lambda(ent) (if (= (+ (cdr(assoc 72 (setq txt(entget ent)))) (cdr(assoc 73 txt))) 0) (cdr (assoc 10 txt)) (cdr (assoc 11 txt)))) lstEnt))

1Chia sẻ bài bác đăng nàyLiên kết tới bài xích đăngChia sẻ trên những trang web khác

gia_bach 1.504

*

gia_bach 1.504

biết lệnh adcentertruemen.vn Team 1.5041.557 bài viếtGiới tính:MaleVị trí:TP..HCMĐã đăng Tháng 11 14, năm 2016

Like mạnh mẽ.

 

Lisp của bác Hạ chạy giỏi, bạn viết Lisp gồm trung khu, tuy nhiên còn tồn tại lỗi đem nhầm Justify của Text …

KangKung : chuyện nhỏ tuổi mà lại ?!

Chia sẻ bài đăng nàyLiên kết tới bài xích đăngChia sẻ trên những website khác

thanhduan2407 260

thanhduan2407 260

biết lệnh adcenterNhà lăng xê 2601.119 bài viếtGiới tính:MaleĐã đăng Tháng 11 15, 2016

Các bác mang lại em hỏi là cùng với phiên bản vẽ em gửi sau đây các bác bỏ chạy hết bao nhiêu giây ạ?

http://www.mediafire.com/file/0dbynwl6ic97na7/BINH+DO+DAK+DOA_TL500_L3.dwg

Em chạy nó mất rộng 800 giây

Chia sẻ bài xích đăng nàyLiên kết tới bài đăngChia sẻ trên những website khác

Bee 142

Bee 142

biết lệnh xrefThành viên 142514 bài bác viếtĐã đăng Tháng 11 15, 2016

Các bác cho em hỏi là cùng với bản vẽ em gửi dưới đây các bác chạy không còn từng nào giây ạ?

http://www.mediafire.com/file/0dbynwl6ic97na7/BINH+DO+DAK+DOA_TL500_L3.dwg

Em chạy nó mất rộng 800 giây

Của bản thân 172s bước 1m.

 

Chia sẻ bài đăng nàyLiên kết tới bài xích đăngChia sẻ trên những website khác

Doan Van Ha 3.016

Doan Van Ha 3.016

biết lệnh adcenterModerator 3.0165.775 bài viếtGiới tính:MaleĐã đăng Tháng 11 15, 2016

Máy phần đa bạn sao lờ lững nhỉ? Máy mình:

– Cách 2.0m: 63 giây

– Cách 1.0m: 116 giây

– Bước 0.5m: 224 giây

Chia sẻ bài bác đăng nàyLiên kết cho tới bài bác đăngChia sẻ bên trên những website khác

Bee 142

Bee 142

biết lệnh xrefThành viên 142514 bài xích viếtĐã đăng Tháng 11 15, năm 2016

Máy phần lớn bạn sao chậm chạp nhỉ? Máy mình:

– Bước 2.0m: 63 giây

– Cách 1.0m: 116 giây

– Cách 0.5m: 224 giây

Máy chưng i7, thứ e Pen IV. ^_^

Chia sẻ bài đăng nàyLiên kết tới bài đăngChia sẻ bên trên các trang web khác

Doan Van Ha 3.016

Doan Van Ha 3.016

biết lệnh adcenterModerator 3.0165.775 bài xích viếtGiới tính:MaleĐã đăng Tháng 11 15, năm nhâm thìn

Oa! Vậy tôi sẽ đổi mới cho nkhô cứng hơn chút ít nữa.

Chia sẻ bài đăng nàyLiên kết cho tới bài bác đăngChia sẻ trên các trang web khác

Tuynh 1

Tuynh 1

biết vẽ ellipseThành viên 156 bài bác viếtGiới tính:MaleVị trí:NVĐã đăng Tháng 11 15, năm nhâm thìn

Cám ơn chưng nhé lisp chạy khôn xiết ngon. Tiện phía trên em cũng yên cầu chưng hoàn toàn có thể thêm lệnh tạo ra điểm trên mô hình tam giác Polyline3D ko Có nghĩa là tăng dày thêm điểm trêm mô hình 

Chia sẻ bài đăng nàyLiên kết cho tới bài xích đăngChia sẻ trên những trang web khác

ndtnv 459

ndtnv 459

biết lệnh xrefThành viên 459525 bài viếtGiới tính:MaleVị trí:SaigonĐã đăng Tháng 11 16, 2016

Thấy đa số chúng ta than phiền các lisp vẽ Đường Đồng Mức (ĐĐM) thường xuyên chạy lờ đờ, thậm chí còn đôi khi treo lắp thêm, nên tôi làm tính năng này giao hàng cộng đồng.

Lisp bao gồm một phần nguồn từ bỏ Internet, tôi hiệu chỉnh với bổ sung để tăng tốc độ giải pháp xử lý. Một phần khác từ bỏ viết.

Code mlàm việc đề xuất phần lớn bạn tha hồ nước vọc. Lệnh: DDM.

Test cùng với phiên bản vẽ 22629 points làm việc đồ vật tôi chỉ mất 60 giây (cùng với những thông số kỹ thuật khoác định vào lisp).

See more: 18+ Dấu Hiệu Con Gái Thích Bạn Nên Biết Để Dễ Tỏ Tình Nhanh, 10 Biểu Hiện Bạn Cần Để Ý

Chức năng: vẽ các tam giác TIN, vẽ ĐĐM, đánh color theo cao độ mang đến ĐĐM.

Đối tượng: tập các point, hoặc tập những text, hoặc tập các block_att cao độ.

File Cad để test:

http://www.mediafire.com/file/c3ey62x9rb35bu6/Draw_Contour_HA.dwg

File Lisp:

http://www.mediafire.com/file/90u0sgqmukkuft7/Draw_Contour_HA.lsp

File Image:

http://www.mediafire.com/view/ydyhy3csv9pg4yd/Draw_Contour_HA.png

 

Còn vài nét chưa chấp nhận lắm, đang sửa sau. Hy vọng được đem về mối cung cấp vui mang lại phần đông người!

Tôi cũng có dự định viết chương trình Đường Đồng Mức bằng ARX và vẫn viết chấm dứt phần sản xuất lưới tam giác. Tuy nhiên mang đến phần vẽ ĐĐM, xem thêm các tệp tin cad tôi thấy ĐĐM vẽ bởi các line xấp xỉ Spline buộc phải cực kỳ mịn. Search tìm kiếm bí quyết Spline không ra, mặt khác vì chưng không tồn tại chuyên môn sâu về trắc địa buộc phải không rõ nguyên lý xê dịch Spline như thế nào đề xuất còn để đó.

Tđắm đuối khảo file demo thì thấy lisp của công ty Doan Van Ha chạy không đủ các chỗ (>15), ĐĐM còn thô phải ngần ngừ tất cả đạt y/c TCđất nước hình chữ S không?

Về thắc mắc bên https://truemen.vn/forum/topic/14210-hoi-ve-lisp-thuat-toan-y-tuong-coding/page-142?do=findComment&comment=410604

bạn thử dùng cách lựa chọn các line cùng cao độ rồi sử dụng lệnh PEDIT Join của cad coi.

Chia sẻ bài đăng nàyLiên kết tới bài đăngChia sẻ bên trên các website khác

Doan Van Ha 3.016

Doan Van Ha 3.016

biết lệnh adcenterModerator 3.0165.775 bài xích viếtGiới tính:MaleĐã đăng Tháng 11 16, năm nhâm thìn

Tôi cũng đều có ý định viết lịch trình Đường Đồng Mức bằng ARX cùng đang viết ngừng phần sản xuất lưới tam giác. Tuy nhiên cho phần vẽ ĐĐM, tham khảo các tệp tin cad tôi thấy ĐĐM vẽ bởi các line xấp xỉ Spline nên hết sức mịn. Search kiếm tìm phương pháp Spline không ra, ngoài ra vì không tồn tại chuyên môn sâu về trắc địa đề nghị không rõ chế độ giao động Spline như thế nào nên còn để kia.

Tmê say khảo tệp tin demo thì thấy lisp của chúng ta Doan Van Ha chạy không đủ những chỗ (>15), ĐĐM còn thô bắt buộc lừng chừng có đạt y/c TCnước ta không?

Về thắc mắc bên https://truemen.vn/forum/topic/14210-hoi-ve-lisp-thuat-toan-y-tuong-coding/page-142?do=findComment&comment=410604

các bạn thử sử dụng phương pháp lựa chọn các line thuộc cao độ rồi dùng lệnh PEDIT Join của cad xem.

1). Thiếu nhiều chỗ là vì khoảng cách mang mang định 30m cảm thấy không được khép tam giác. User gồm quyền tăng nhưng.

2). Pedit chậm rì rì lắm, tuyệt nhất là lúc giải pháp xử lý tập béo.

Chia sẻ bài bác đăng nàyLiên kết cho tới bài bác đăngChia sẻ bên trên các website khác

ndtnv 459

ndtnv 459

biết lệnh xrefThành viên 459525 bài bác viếtGiới tính:MaleVị trí:SaigonĐã đăng Tháng 11 16, năm 2016

Test bên trên sản phẩm công nghệ tôi :

Cách 2.0m: 121 giây

PEDIT Join trên bv mẫu:

Select objects: 15090 found

14935 segments added lớn 154 polylines : 4687 millisecs

Chia sẻ bài xích đăng nàyLiên kết tới bài xích đăngChia sẻ bên trên các trang web khác

Doan Van Ha 3.016

Doan Van Ha 3.016

biết lệnh adcenterModerator 3.0165.775 bài viếtGiới tính:MaleĐã đăng Tháng 11 17, năm nhâm thìn

Đây là lisp giải quyết và xử lý các ngôi trường vừa lòng vật dụng cùi:http://www.mediafire.com/file/h5ylnsdd0sf6s5c/Draw_Contour_HA02.fas

Làm tự thiện tại hiện nay nặng nề lắm: MC Phan Anh.

Post bài bác lên CV hiện thời còn cực nhọc hơn: tôi

Giá như có ai đó có Web xuất sắc nhằm theo?

13Chia sẻ bài bác đăng nàyLiên kết tới bài xích đăngChia sẻ bên trên các trang web khác

thanhduan2407 260

thanhduan2407 260

biết lệnh adcenterNhà truyền bá 2601.119 bài viếtGiới tính:MaleĐã đăng Tháng 11 18, 2016

Đây là lisp giải quyết và xử lý các trường vừa lòng trang bị cùi:

http://www.mediafire.com/file/h5ylnsdd0sf6s5c/Draw_Contour_HA02.fas

Làm tự thiện tại hiện thời nặng nề lắm: MC Phan Anh.

Post bài xích lên CV bây giờ còn khó hơn: tôi

Giá nhỏng bao gồm ai kia có Web tốt nhằm theo?

Bác xuất sắc cùng thật thân mật.

Mong anh Hoành upgrade Web chứ nhiều trang bị tương đối bất tiện.

Ví dụ:

Em mong mỏi Up ảnh lên cứ đọng đề xuất up lên trang khác rồi copy links. 

Muốn xóa bài mình vừa đăng không đúng mà ko được.

Thời gian đăng bài bác nó báo nkhô giòn vượt cũng ko được, cđọng yêu cầu hóng 1 cơ hội mới đăng được.

Các trang hiển thị hơi không nhiều, toàn bị trôi, phải vào phần bài viết cá thể hoặc các chủ đề new thấy được.

…….

Chia sẻ bài đăng nàyLiên kết cho tới bài xích đăngChia sẻ bên trên các website khác

HUYNHTS99 0

HUYNHTS99 0

Chưa áp dụng CADThành viên 01 bài bác viếtĐã đăng Tháng 6 24, 2018

m1-gan-cao-vị.dwg

những bác mang đến em hỏi : cạnh tam giác TIN max là sao ạ những bác?làm thế nào biết chọn số bao những đến phù hợp ạ?(0.0001 tốt 0,02 hay 10 …em chưa biết ý nghĩa sâu sắc của chính nó yêu cầu em k rõ phương pháp lựa chọn số như thế nào vào vô vàn số mang đến phù hợp.)em chọn point đúng k những chưng.nghỉ ngơi ví dụ của chưng nhà bên trên cùng em lựa chọn các điểm bên trên cad những bác bỏ ah.sau công đoạn này em m1-gan-cao-bởi vì.dwglựa chọn bôi Black đối tượng người sử dụng rồi ấn enter đồ vật báo chạy dứt mất 0s.em thấy k chọn được đối tượng như thế nào các bác ah.những bác chỉ mang đến em với ạ.

Chia sẻ bài bác đăng nàyLiên kết cho tới bài đăngChia sẻ bên trên những trang web khác

WRU 1

WRU 1

Chưa áp dụng CADThành viên 11 bài viếtĐã đăng Tháng 9 16, 2018

Có bác làm sao đến em xin đoạn Clip lí giải áp dụng với. 

Em sử dụng mà lại không được.

See more: Pin 3000Mah Sử Dụng Được Bao Lâu ? Thách Thức Ngày Dài Với Pin 3000Mah Của V3Max

Em cảm ơn những bác?

1Chia sẻ bài bác đăng nàyLiên kết tới bài đăngChia sẻ trên các trang web khác

nguyenanh93 9

nguyenanh93 9

biết vẽ lineThành viên 927 bài viếtĐã đăng Tháng 10 1, 2018

Hôm trước bản thân bao gồm phát âm topic này với thấy vận tốc chạy của lisp điều đó là khá trễ. Nên sự hiểu biết về bài toán vẽ mặt đường đồng nút và làm cho tool nhằm vẽ. Tool arx của bản thân mình chạy

Đã đăng Tháng 10 1, 2018

Đã đăng Tháng 1 26, 2019

Đã đăng Tháng 5 9, 2019

Đã đăng Tháng 5 9, 2019

Đã đăng Tháng 5 9, 2019

 

Tạo tài khoản

Đăng ký một thông tin tài khoản new trong xã hội của công ty chúng tôi. Điều kia dễ dàng cơ mà.