基于VB的全站仪数据通信和转换

S ett ings
PortO p en
解释
注意事项
设置 并 返回 通 讯端 口 必须在打开端口之前设置好
号。
端口号。
以字 符 串的 形 式设 置
并返回波特率、奇 偶校 验、数据位、停止位。
字 符串 形 式: / BBBB, P, D, S0。 BBBB为波特率, P为奇 偶校验, D为 数据位数, S 为
Spo s= InStr( C_Str. Item ( i), " + " )
H or= M id( C_Str. Item ( i) , Spos+ 1)
k= k+ 1
同上
Case " 22"-从 G SI格式中提取 / 垂直角 0
同上
Case " 31"-从 G SI格式中提取 / 斜距 0
End Se lect
Po int# ID, H orizontal # Ang le, Vertica l # Ang le, Slope# D istance, East ing, Northing, O rtho # H e igh,t Instrum ent# H e igh,t R eflecto r# H eigh,t End
2011年 2月 第 1期
城市 勘测 U rban G eo technical Investiga tion& Surv ey ing
文章编号: 1672- 8262( 2011) 01- 120- 03
中图分类号: P209
F eb. 2011 N o. 1
文献标识码: B
基于 VB的全站仪数据通信和转换
依次表示点号、水平角、垂直角、斜距、东坐标、北 坐标、正高、仪器高、棱镜高和结束标志。根据工程的 不同需要, 导出相应的全站仪数据, 再转换为测量软件 需要的数据格式, 实现全站仪与测绘软件的无缝联结。
3 M SC omm 控件的重要属性
M icrosoft Comm un icat ions Contro l ( 以 下 简 称 M SComm ) 是 M icroso ft 公司提供的简化 W indow s下串 行通信编程的 A ctiveX 控件, 它 为应用程序提供 了通 过串行接口收发数据的简 便方法。利 用 MSComm 控 制就可以实现计算机与全站仪的串口通讯。M SComm
M SC omm 1. PortO pen= T rue End If Do
D oEvents L oop U ntil (M SComm 1. InBufferCount > = 2) M SComm 1. Inpu tLen= 0-接收 到 全站 仪 信号, 读取 全 部数 据; M SComm 1. InpuMt ode= com InpuMt odeT ext 上面一段为 M SComm 控件的设置, 事后内存通 讯和实时通 讯都是一样的。 1 00:
[M ]. 徕卡测量系统有限公司资料. [ 3] 明日科技 , 高春艳, 安剑等编. V isua l Basic程序 程序开发
范例宝典 [M ]. 北京: 人民邮电出版 社, 2009
D ata Communication and Converting of Total Station Based on V isual Basic
刘迪* , 杨永平, 邓标
(云 南省电力设计院, 云南 昆明 650053) 摘 要: 介绍了 V B中的 M SComm 控件的使用方法, 讨论了在计算机与 全站仪之间 进行数据 通讯的关 键技术。 最后, 以徕卡全站仪为例, 给出实现两者数据 通讯和格式转换的应用程序。 关键词: 全站仪; M SComm; V B; 数据通讯
1 22
N ex t i T im er1. Interval= 0-设置计时器停止计时 End Sub
城市 勘测
2011年 2月
接操作, 提供标准的事件处理函数、过程, 并通过属性 的方法进行串行通讯参数的设置, 可以较容易地解决 串口通讯问题。
本程序在多个变电站和线路测量工程的实际使用 过程中运行稳定、操作简单、结果准确、能减少测量人 员的工作量, 且数据输出格式能满足不同测量软件的 数据格式要求。
图 2 实时通讯数据整理
5结 语
M SC omm 控件是由一系列 W indow s AP I函数封装 集合而成, 它使用户避开了对复杂的低层次函数的直
参考 文献 [ 1] 刘兴权, 梁艳平, 肖红. 计算机 和全站仪 通讯的关 键技术
[ J]. 四川测绘, 2000, 23( 3) : 121~ 122 [ 2] 徕 卡 测 量 系 统 有 限 公 司. 徕 卡 测 量 办 公 室 使 用 手 册
L iu D ,i Yang YongP ing, Deng B iao ( Yunnan E lectric Pow er Design Institute, Kunm ing 650051, China) A bstract: T he using m ethods o f VB M SComm contron are introduced in the paper, and the key techno logys of data comm un ication betw een com puter and tota l station are discussed. A t las,t the app lication o f data comm un icat ion and convert ing are show n based on the exam ple o f L e ica total sta tion. K ey words: To tal Station; M SComm; V isua l Basic; Data Comm un ication
停止位数。
设置 并 返回 通 讯端 口 的状 态。 也可 以 打 开
和关闭端口。
设置为 T rue打开端 口, False 关闭端口并清除接收和传输
缓冲 区。程序 终 止时, 控件 自动关闭串行端口。
Inpu t
从接收缓冲区返回和删 设置 InputLen 为 0, 则 Input 除字符。 InputLen 属性 属性读取缓冲区中全部的内 是读取字符的个数。 容。
以上数据中 110002+ 00000P01中 / 110表示测量 点号的字索引, 用于标识该数据块, / + 0之后的 / P010 为测量点号; 21. 324 + 14936324 的 / 210表示水平角, 14936324 是 水 平 角 为 / 149b 36c3214d0; 22. 324 + 05058439中的 / 220表示垂 直角, 05058439是 天顶距 / 50b58c4319d0; 31. . 00 + 00003304 中的 / 310表示斜 距, 00003304是斜距 31304 m。接下来的三个数据块
O utput
向传 输 缓冲 区 写一 个 字符串。
接收 缓 冲区 中 等待 的 InBuf ferC ount 字符数。
设置该属性为 0 可以清除接 收缓冲区。
4 徕卡全站仪数据通讯程序的实现
全站仪数据通讯可以分为事后内存通讯和实时通
讯, 两种方式在设置 M SComm 控件上完全一致。现将
事后内存通讯程序的主要代码示例如下:
D oEvents str= M SComm 1. Inpu t I f str < > " " T hen In_S tr= In_S tr+ str T ex t1. T ext= Int( In_Str, 3) = " EO F " T hen-自定 义格 式, 文件 尾有字符 EO F
方式 表示。
Fo r i= 1 T o C_Str. Count
s1= L eft( C_S tr. Item ( i), 2)
Se lec t Case s1
Case " 11"-从 G SI格式中提取 / 点号 0
Spo s= InStr( C_Str. Item ( 1) , " + " )
s2= M id( C _Str. Item ( i), Spo s+ 1)
本文利用可视化语言 V isua Basic开发 了全站仪 通讯程序, 并 在徕卡 TCR702、TCR802、TCR1201 等多 台仪器中试用。为了实现测量数据与测量工作软件的 无缝联结, 还开发了全站仪数据格式转换程序, 现以徕 卡 TCR1201为例, 介绍数据通讯的关键要点。
2 徕卡全站仪数据格式
1引 言
随着测绘技术的不断发展、测绘仪器的更新换代、 计算机的全面普及, 测绘工作越来越向自动化、智能化 方向发展 [ 1] 。尤其是智能全站仪的面世以及计算机技 术的广泛使用, 更是导致测量工作的一次革命。目前, 全站仪的功能越来越强大, 应用越来越广泛。从碎部 测量到地形图数据采集, 从纵横断面的测量到建筑物 沉降监测, 特别是自动监测系统, 全站仪都显示出其特 有的优势。因此, 开发全站仪内部程序和内存, 减轻测 绘人员劳动强度, 提高工作效率, 就显得越来越重要。
M SComm 1. PortO pen= F a lse Ex it Sub End If G oTo 100
全站仪数据导出来, 可进行数据整理, 即把自定义
格式的数据全部读出来, 界面如图 1所示。
图 1 事后内存通讯数据整理
最后可以根据自己需要导出一定的数据格式, 满
足测绘软件的要求。
全站仪数据实时传送与事后传送有两个区别, 一
发计 时器事件;
End If T ime r1. Enab led= T rue G oT o 10: