坐标法测图系统设计优化

坐标法测图系统的设计优化是在具体实际工作通过多年不断分析、探讨、应用中进行。采用多种细部测量方法。采用计算机采集带连线简码空间数据（简码、坐标、高程），根据数据采集的各展点显示值（即以图幅下角为零与图上对应成1:1000比例），使用一支三角板，按支距法进行展点，现场绘图。地物编码和图形信息寄托在图纸上。确保测图不出现漏测，测错、绘错，以及野外操作速度较快，效益更高。系统为菜单式软件，各级菜单均由中文提示，汉字化软件易学好用，消除人机之间的语言障碍，提供简便、快捷作业方式，很大程度地实现数据的自动转移，避免大量的数据输入、输出操作，程序可以自动取用控制测量成果文件中所需要的已知数据，且自动分类生成带连线简码空间数据文件。内业编辑工作对数据格式的转换就可实现地物点连线。减少很大内业编辑工作量。

坐标法测图系统操作上分为准备阶段，采集阶段，成果阶段。

准备阶段是引人第10类控制测量成果文件，第1～9类地图数据文件建立或数据清除。

采集阶段是坐标法测图系统关键。多种细部测量方法：主要有观测的极坐标、后方交会、方向直线交会、角度交会，有丈量的十字尺、距离交会、距离直线交会和方向距离交会。在系统操作上设置快捷键对各细部测量方法进行快速切换。野外操作过程分观测数据输入、计算展绘、数据存储。在计算机上，显示屏按观测数据输入、计算展绘、数据存储进行分区显示。操作过程在各显示区体现，各显示区保留原有的信息。可以一边进行展点绘图，一边进行观测数据输入或者数据存储。野外作业操作速度更快，工作效率更高。对野外操作过程中容易出错或者数据改变，在各测量方法操作上设置快捷键对各阶段进行快速切入，出错容易消除，数据错误减少，操作简便快速。以PC-E500计算机对常用极坐标法采集数据为例：显示屏分为一，二，三区。一区显示观测数据（距离、截尺、垂直角、水平角）的输入操作信息，二区显示坐标，高程及现场展点所需的显示值，三区显示数据存储操作信息。在观测数据输入采用一个字符来切换（手工键盘或自动传输）输入方法。具体操作：启用测距极坐标法程序。在仪器类型选择经纬仪下，用键盘输入视距、截尺、垂直角、水平角，即可得到待定点的坐标，高程及现场展点显示值。在仪器类型选择全站仪下，当显示输入斜距时，输入“Ｐ”切换输入方法，数据可从全站仪通过传送电缆自动传输到计算机。计算机接收到全站仪的斜距、垂直角、水平角。当输入觇标高后，即可得到待定点的坐标高程及现场展点显示值。当不需测高程时，在显示输入觇标高（截尺）时，输入“0”。当显示分类存储时可选择（0～10）中的数字输入并输入点名，分类存储。当不需存储时，输入“0”。根据展点显示值（即以图幅下角为零与图上对应成1:1000比例），使用一支三角板，按支距法进行展点，在野外现场作业确保测图不出现漏测，测错，绘错。特设置改变截尺输入快捷键，快速消除野外作业观测、立尺不在同一地点，立尺改变觇标高出现的错误。也可以实现测一点产生不同高程的多点，常用于坎类地物测量，测坎上或者坎下点又产生坎下或者坎上点。快捷键设置：PF1键为从图幅零坐标输入（x0、y0）切入；PF2键为从测站设置输入切入；PF3键为从观测数据输入切入；PF4键为从改变截尺输入切入；PF5键为从坐标高程及展点显示值，进行分类数据存储切入。无论在任何情况下只要按快捷键就可从相对应的阶段切入，使野外数据采集更简便，出错率降低，工作效益更高。

控制测量成果，测图的地图数据的格式：点名（DM），坐标（X、Y），高程（H）。在测图的地图数据中，点名（DM）默认为“*”，以“+”表示连接上一点的地物连线关系。测图的地图数据分类存储可达到同一地物相邻点相连，仅用“+”就可表示连接关系的目的。例如：采集点的顺序（1、2、3、4、5、6、7、8、9、10）。把（1、2、7、8）为一地物存入一类数据文件，把（3、4、5、9）为一地物存入二类数据文件，把（6、10）为一地物存入三类数据文件，这样就可以使（1、2、7、8）；（3、4、5、9）；（6、10）数据存储为相邻点。（1、3、6）点名（DM）为“*”，（2、7、8），（4、5、9），（10）点名（DM）为“+”。达到（1、2、7、8）点连一线，（3、4、5、9），点连一线，（6、10）点连一线。实现多根尺或者同时测多种地物点的测量，达到相邻地物点相连。一个数据文件存储一地物后可再存储另一地物。数据文件中每类可存储多种地物。内业编辑工作对测图的地图数据格式的转换就可实现地物点连线。仅对地物进行编码追加、替换、修改，减少很大内业编辑工作量，就完成数字图的编辑工作。

zjg728

2007年08月02日 17:48:05

2楼

程序部分清单

快捷键设置

314 KEY 1,"G.*AA"+CHR$ 13

316 KEY 2,"G.*BB"+CHR$ 13

318 KEY 3,"G.*CC"+CHR$ 13

320 KEY 4,"G.*DD"+CHR$ 13

322 KEY 5,"G.*EE"+CHR$ 13

建立分区地图数据文件

352 FOR I=1TO 9

354 OPEN (NA$+STR$ (I))FOR OUTPUT AS #10

356 CLOSE #10:NEXT I

图幅零坐标输入（X0，Y0）

442 *AA:INPUT "X0=";X0

444 INPUT "Y0=";Y0

测站设置

458 *BB:INPUT "CE ZAN=?";A$,"HUO SI=?";B$

460 XA=0:YA=0:XB=0:YB=0

462 AAA=10:LOCATE 22,0:INPUT "LOAD=?(1-10)";AAA

464 OPEN (NA$+STR$ (AAA)) FOR INPUT AS #2

466 IF EOF (2)THEN 478

468 INPUT #2,N$,X,Y,H

470 IF N$=A$ THEN XA=X,YA=Y,HA=H

472 IF N$=B$ THEN XB=X,YB=Y,HB=H

474 IF (XA<>0)AND (XB<>0)THEN 478

476 GOTO 466

478 CLOSE #2

观测数据输入，分区显示操作

512 *CC:IF XA=0GOTO 458

514 IF R$="K"OR R$="T"THEN LOCATE 0,0:PRINT "S= ";:LOCATE 8,0:INPUT DS$:GOTO 520

516 LOCATE 0,0:PRINT "DS=(P) ";:LOCATE 8,0:INPUT DS$

518 IF DS$="P" THEN GOSUB *P:GOTO 544

520 DS=VAL DS$

524 PRINT "L=(0) ";:LOCATE 6,1:INPUT L

526 PRINT "Z= ";:LOCATE 6,2:INPUT Z

528 PRINT "B= ";:LOCATE 6,3:INPUT B

530 IF R$="K"OR R$="T"THEN DS=DS*SIN (DEG Z)

532 GOTO 544

改变截尺输入及计算

540 *DD:LOCATE 0,1:PRINT "L=(0) ";:LOCATE 8,1:INPUT L

544 D=DS*SIN (DEG Z)

546 DH=(D/TAN (DEG Z)

548 IF R$="K" THEN DH=-DH

550 T=TA+DEG B+180:T=T-INT (T/360)*360:X=XA+D*COS T:Y=YA+D*SIN T

552 IF L=0THEN H=0:GOTO 558

554 IF Z=90THEN H=HA+I-L:GOTO 558

556 H=HA+I+DH-L

坐标高程及展点显示值，进行分类数据存储

558 *EE:BEEP 1,4:LOCATE 15,1:USING "########.###":PRINT "X=";MDF X;:USING "########.#":PRINT K*(X-X0)

560 LOCATE 15,2:USING "########.###":PRINT "Y=";MDF Y;:USING "########.#":PRINT K*(Y-Y0)

562 LOCATE 15,3:USING "########.##":PRINT "H=";MDF H;:USING "#########.##":PRINT MDF H

570 LOCATE 20,0:INPUT "SAVE=?(0/1-9) ";WI

572 IF WI=0 THEN GOTO 514

584 RR$="*":LOCATE 16,0:INPUT " D.M=? ";RR$

586 OPEN (NA$+STR$ (WI)) FOR APPEND AS #5

588 X=INT (X*1000+0.5)/1000:Y=INT (Y*1000+0.5)/1000:H=INT (H*100+0.5)/100

590 PRINT #5,RR$;",";X;",";Y;",";H

592 LOCATE 20,0:PAUSE " OK ! ";RR$;" ":CLOSE #5

594 GOTO 514