[发明专利]一种基于AutoCAD进行场地土方平整计算的方法

说明书

技术领域

本发明涉及一种利用AutoCAD进行场地土方平整计算的方法。

背景技术

在土木、水利等建设工程中，场地的平整是工程前期建设的重要程序，场地平整中涉及的土方挖填工程量对整个工程造价也有影响。传统的土方平整计算利用地形图人工进行计算，精度不高且工作量大。而利用卫星遥感技术或三维逆向建模技术统计工程量虽然准确、快捷，但花费较大，对于一些较小的工程十分不经济。

发明内容

本发明提供一种进行场地平整土方计算的方法，该方法利用测量图提取场地标高信息，然后利用VBA模块进行计算。该方法简便且可根据需要调节计算精度，适用于灰场闭库、山区建筑等场地平整土方计算中。

本发明采用以下技术方案：

一种利用AutoCAD进行场地土方平整计算的方法，包括：

通过测绘装置获取地形测量数据，将地形测量数据输入到处理器的AutoCAD中形成地形测量图；

在AutoCAD中对地形测量图进行网格的划分；

为地形测量图中的每一个网格输入该地形处的标高信息；

使用AutoCAD中的 VBA模块提取地形测量图中的标高信息并进行计算，获取土方挖填量。

所述网格大小可调。

所述标高信息输入完成后，删除地形测量图中的其它信息，仅保留高程数据。

本发明的有益效果：利用VBA对提取的数据进行自动计算，节省了人工计算的时间；通过对划分网格大小的控制可以控制土方计算的精度。

附图说明

图1为AutoCAD打开的地形测量图。

图2为划分网格的地形测量图。

图3为仅保留高程数据的地形测量图。

具体实施方式

下面结合附图和具体实施方式对本发明作进一步详细说明。

本发明的利用AutoCAD进行场地土方平整计算的方法，该方法简便且可根据需要调节计算精度，适用于灰场闭库、山区建筑等场地平整土方计算中。

具体步骤如下：

（1）通过测绘装置获取地形测量数据，将地形测量数据输入到处理器的AutoCAD中形成地形测量图；

（2）在AutoCAD中对地形测量图进行网格的划分；

（3）为地形测量图中的每一个网格输入该地形处的标高信息；

（4）使用AutoCAD中的 VBA模块提取地形测量图中的标高信息并进行计算，获取土方挖填量。

网格大小可调，即可以根据精度需要调整网格大小，网格越小精度越高。

为了提高计算速度，标高信息输入完成后，删除地形测量图中的其它信息，仅保留高程数据。

如图1~3所示，是一种应用于某灰场闭库的示意图。

图1为AutoCAD打开的某工程的测量地形图，在CAD中新建两个图层data1、data2，分别放置未修改和修改后的数据。data1与data2的图层颜色应设置为不同的颜色。

在地形图上添加网格，并添加初始标高值，标高值可随意输入，输入的数据放置在data1图层上。输入后结果如图2。本实例中网格大小为5m×5m，可根据要求的精度调整网格大小。

根据实测的地形图修改网格中的数据。由于输入数据较多，在输入一些数据后需要运行outputlet()模块，将修改过后的数据放置到data2图层上，如果没有修改则还放置在data1图层上。由于两个图层颜色不同，可以明显的区分网格中的数据有没有修改过。outputlet()的VBA代码为：

Sub outputlet()

On Error Resume Next

Dim objtext As Object

For Each objtext In ThisDrawing.ModelSpace

If objtext.Layer = data1 Then

If objtext.TextString <> "250" Then

objtext.Layer = data2

End If

End If

Next objtext

End Sub

输入数据完成后可删除掉地形等多余图元，以提高程序运行速度，删除后仅保留高程数据，如图3所示。