24/02/2026

Lisp hoàn công hầm thủy điện | By NguyenHuuNhan | AutoLISP Reviewer

Ứng dụng được phát triển/Sưu tầm bởi đội ngũ AutoLISP Thật là đơn giản
   

Thông tin thêm: 👉👉👉

Tool hoàn công Hầm

Mục tiêu của công việc

Sau khi đơn vị thi công đào theo bản vẽ thiết kế nhưng thực chất sẽ không chính xác có chỗ thừa thiếu so với thiết kế. Bây giờ họ cần đo vẽ lại và tính khối lượng lại.

Việc đo vẽ theo tọa độ x,y,z

Các lệnh của lisp là xử lý số liệu x,y,z để dựng lại các mặt cắt theo tọa độ phẳng x,y và tính toán lại khối lượng.


Lisp có các lệnh như sau:

1.    Tạo tuyến: TTH

Số liệu đầu vào là file txt có tọa độ x,y,z theo mẫu đã quy định.

Lisp load file vào và phun ra các điểm.

 

2.    Vẽ mặt cắt ngang: TNH

Sẽ xuất hiện giao diện để cài đặt như số hang số cột, khoảng cách hang, cột ….

Pick vẽ TN và chọn các điểm đã tạo ở lệnh tạo tuyến và pick điểm đặt để vẽ các mặt cắt ngang

 

3.    Copy mặt cắt thiết kế: CPTK

Yêu cầu mặt cắt thiết kế là đường polyline kín có 2 trục giao ở tâm là đường Line

Chọn mặt cắt thiết kế, pick điểm tim hầm, chọn mặt cắt hầm đã vẽ được ở vẽ mặt cắt hầm.

Kết quả thu được:

 

4.    Bo kín mặt cắt thực tế: VVH

Chọn các mặt cắt đã vẽ để bo kín các mặt cắt đã vẽ:

 

5.    Dim sai lệch giữa thiết kế và thực tế: DimH

Chọn đường polyline thực tế-> chọn đường polyline thiết kế->Chọn toàn bộ các mặt cắt ngang:

Kết quả:

 

6.    Điền cao độ thiết kế: DIENTK

Chọn đường polyline thiết kế ->Chọn toàn bộ các mặt cắt->Nhập chữ số lẽ:

Kết quả:

 

7.    Vẽ trắc dọc hầm: VTD

Giao diện cài đặt trắc dọc:

Sau khi điền các thông số của trắc dọc pick vẽ trắc dọc -> chọn các mặt cắt và pick điểm đặt trắc dọc:

Kết quả:

 

8.    Tính khối lượng: DIENDT

Nhập các thông số mặc định -> chọn mặt cắt pick điểm đặt bảng khối lượng:

 

 

 

9.    Vẽ mặt bằng hầm: MBH

Chọn các mặt cắt ngang->Chọn polyline tim hầm

Kết quả:

 

10. Xuất tọa độ hầm hiệu chỉnh: XUATTD

Mục đích là sau khi hiệu chỉnh mặt cắt ngang hầm muốn lấy lại tọa độ. Nên chỉ xuất các mặt cắt hiệu chỉnh không nên xuất lại toàn bộ vì số liệu tính toán lại không đúng với số liệu đo ban đầu.

11. Điền tọa độ tim lên mặt cắt ngang:

Chọn toàn bộ mặt cắt -> nhập số lẻ:

Kết quả:



Ứng dụng trả phí do anh Nguyễn Hữu Nhân phát triển!


SĐT liên hệ:

 Zalo: 0848.998.045

Báo giá ứng dụng

Thông tin Ứng dụng:
📢 THÔNG BÁO GIÁ ỨNG DỤNG

💰 Giá: 750K / 1 máy

🖥 Bản quyền cố định theo phần cứng máy tính


Link tải (MediaFire)

📥 https://www.mediafire.com/



---------------------------------------------------------------------------------------------
Ứng dụng được phát triển bởi đội ngũ AutoLISP Thật là đơn giản - Tác giả ứng dụng in D2P

    

Mọi thông tin xin liên hệ Fanpage AutoLISP Thật là đơn giản!
Cảm ơn bạn đã theo dõi!

Không có nhận xét nào:

Đăng nhận xét

Tổng hợp lisp xuất AutoCAD sang Excel và ngược lại | A2ELIST Miễn phí và Trả phí D2X E2A B2E TE | AutoLISP Reviewer

Ứng dụng được phát triển/Sưu tầm bởi đội ngũ AutoLISP Thật là đơn giản     Thông tin thêm: 👉👉👉