资源描述：
《矿山巷道的自动绘制与标注》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、第4期矿山测量No142005年12月MINESURVEYINGDec12005矿山巷道的自动绘制与标注徐克科,郭增长,李伟(河南理工大学测量工程学院,河南焦作454001)摘要:结合最新的AutoCAD2005,采用其嵌入的VBA,利用其强大的数据库访问功能,通过动态数组、DBGrid控件、OLEAutomation引用、ActivexAutomation等技术,对井下导线点测量资料编辑成特定的数据库文件,然后设计VBA程序任意录入调用数据并自动完成数据之间的计算与转换。最后通过AutoCAD视图实现巷道的自动绘制,同时按绘图标准自动绘制导线点,自动标注
2、点号及底板高程,大大提高了绘图效率。关键词:巷道;高程;标注;VBA;数字化;导线点;Autocad2005中图分类号:TD171文献标识码:B文章编号:1001-358X(2005)04-0026-03目前,国内煤矿应用的大部分绘图软件是在Au2仪,所获得观测数据为:水平观测角、平距、左帮距、toCAD环境下开发的,都能自动绘制直线巷道,再加右帮距。由这些数据根据解析几何知识可以计算出上后期手工编辑,基本上能满足一般矿图的绘制工测站点坐标pti(x,y),若使用全站仪则可直接得导作。但是,这些手工干预较多,导线点的绘制,点号线点坐标。然后再进一步通过如下
3、算法求出巷道左及高程的手工标注也较繁锁,而且绘制精度不高。右帮线各点的坐标值pl(x,y),pr(x,y),并在两相邻尤其在一些特殊情况,会对巷道实际位置产生较大的帮线之间处理交点问题。的误差,严重影响矿图的质量和使用。另外,也缺少如图1所示,由pt1,pt2坐标可以计算出直线将现场观测数据正确转换调入AutoCAD自动成图的pt1-pt2的方位角。根据左右帮距的定义即左右帮功能。笔者在与开滦煤矿合作进行矿图自动绘制系距是按照垂直于巷道丈量的。所以,分别由导线点统开发过程中,针对上述问题,采用内嵌的VBA进第一点pt1、第二点pt2为圆心,以其左帮距sl1
4、、sl2行二次开发,设计了数据库自动调入录用数据的绘为半径画圆,得出两圆上方的外公切线pt1-pt2即制模块,实现了巷道的自动绘制与标注。为第一条左帮线。在直角梯形pt11-pt21-pt1-pt2中通过几何数学算法求出pt1-pt11,pt2-pt211巷道的空间数据结构的方位角,进而得出帮线上两点pt11和pt21的位置巷道的空间数据主要有巷道中各导线点的坐标坐标,连线即是左帮线。依次类推,接着再求出导线(xi,yi,zi)和各导线点处距巷道两帮的距离(左帮pt2-pt3的左帮线等等。如果相邻帮线之间(如距,右帮距),帮距主要用于确定巷道宽度变化和巷p
5、t11-pt21和pt211-pt31)的方位角弧度值之差小道轴线的位移。巷道的空间数据结构见表1。于010002(约4秒)时,则看作近似平行,不取其交点表1巷道的空间数据结构(交点ptj1的值可取pt21或pt211),否则采用两直序号字段名数据类型宽度小数位数线求交点函数PublicFunctionjoin(pt1AsVariant,1导线点序号数字30pt2AsVariant,pt3AsVariant,pt4AsVariant)求出2导线点坐标(xi,yi,zi)数字103交点ptj1,则左帮线的帮线点依次为pt11、ptj1和3左帮距数字53pt3
6、1。同理,可求出右帮线上各帮线点。4右帮距数字53在VBA程序设计模块中,建立函数如下:5底板高程数字53建立求方位角的函数:PublicFunctionangle(pt1AsVariant,pt2AsVa22巷道绘制的算法原理riant)AsDoubleangle=Atn((pt2(1)-pt1(1))/(pt2井下实际观测时采用导线观测,并在导线点处(0)$pt1(0)))量测左、右两测距离以确定巷道宽度。若使用经纬26第4期徐克科等:矿山巷道的自动绘制与标注2005年12月图1巷道绘制的算法原理图示EndFunction准模块Module1、标准模块
7、Module2和一个窗体求坐标值函数(极坐标法):Form1。其中ThisDrawing的程序代码部分如下:PublicFunctionpoint(ptAsVariant,dAsOptionExplicitDouble,angleAsDouble)AsVariantPublicSubsuccess()Dimp(0To2)AsDoubleUserForm11Showp(0)=pt(0)+d3Cos(angle)EndSubp(1)=pt(1)+d3Sin(angle)上面语句定义了引导程序执行的宏。Module1point=p模块程序为计算巷道帮线上各点坐标
8、包括相临帮线EndFunction上交点坐标的函数与算法;Modu
