1:1万地形图54与80坐标系换算程序

<a href="attachment/200312313314327266.rar">200312313314327266.rar</a>

 

 　　　　　　国家测绘局第一航测遥感院　杨战辉

 　　现在我国1:1万地形图修测和重测,平面均采用1980西安坐标
 系,高程采用1985国家高程基准。 为了生产单位批量开展生产，
 尤其是1:1万修测图,需要展绘一套54坐标系,一套80坐标系,加图
 廓点改正数操作复杂,加之98 年国家测绘局提出治理七大江河生
 产1:1万DEM要求，需提供一套准确的基础图廓信息数据，为此，
 本人在原分别计算54坐标系、80坐标系图廓元素程序的基础上编
 写了一个综合程序, 可方便准确计算出一幅图所需的三套信息 ,
 根据1:1万老图号计算出对应新图号,80坐标系图廓坐标,54 坐标
 系图廓坐标,再根据图廓点的54换到80坐标的△X△Y 改正数计算
 出54坐标系图廓点在80坐标系的坐标,可满足1:1万地形图图廓的
 基础信息要求。
 　　1.程序所需信息
 　 (1)所需计算的1:1万老图号,如I-49-40-(61)
 　 (2)由国家大地数据处理中心按经纬度提供的54到80 坐标系四
 个图廓点改正数
 　　　DX1　　　　DY1
 　　　DX2　　　　DY2
 　　　DX3　　　　DY3
 　　　DX4　　　　DY4
 　　2.操作步骤
 　　该程序在DOS环境下,用Fortran语言编写,程序名为RFV5480.
 exe,将程序拷入PC机的一个目录RFV下即可,运行程序小于100KB。
 　(1)C:\RFV>RFV5480
 　　提示输入1:1万标准老图号
 　　如 I-49-040-(61)
 　　注意:
 　　第一个字母要大写,49位置为二位,40位置为三位, 不足三位
 前边补"0",61位置为二位,不足二位时前边补"0"。
 　(2)屏幕显示该图的54图廓信息,其中包括四个图廓点经纬度信
 息,查取四个图廓点,改正坐标数,按F6.2格式屏幕上提示的1 →2
 →3→4顺序输入,如果下一点的改正数与上一点相同时,可直接回
 车,默认上次输入。屏幕显示三套坐标。
 　(3)提示是否打印
 　　键入"Y"即可按一下格式打印,打印一份按回车, 程序提示是
 否继续解算新图号,键"Y"开始开下一幅图,直接回车结束。
 

好东西，谢谢！<img src="images/post/smile/dvbbs/em05.gif" />
找国家大地数据处理中心（在西安）要坐标系四
个图廓点改正数是要钱的，好像每个点50大洋