《测量程序设计》实验报告编写参考案例.docVIP

测量程序设计 实验报告 （2012—2013学年第 2 学期） 实验名称： 《常用测量函数编写》实验 实验时间： 2013年3月15日 实验地点： 临潼9#205（机房） 指导教师： 陈宪冬 专业班级： 测绘工程1005 姓 名： 刁田田 学 号： 1010020502 西安科技大学测绘学院测绘系（教研室） 二〇一一年二月 一、实验目的 通过本次试验，复习C语言的基本语法和函数的编写技能，掌握测量常用函数编写技巧及其需要注意的问题，通过编码调试进一步加深和理解测量常用计算函数的数学模型和使用过程，并能编制的函数正确、实用。 二、实验内容 1.编写角度变弧度的函数 2.编写弧度变角度的函数 3.编写坐标正算函数 4.设计并编制对话框程序，实现简单的坐标正算。 三、实验平台 实验在测绘学院实验中心GIS实验室进行，使用GIS实验室的计算机，Microsoft Visual C++ 6.0软件平台进行编程调试。 四、实验成果 1.编写角度变弧度的函数 double CADlg::ang2hd(double ang) { if(ang0) { int du = int(ang); int fen = int( (ang-du)*100 ); double miao = ((ang - du)*100 - fen)*100; return ( du + fen/60. + miao/3600. )*TOPI; } if( ang0) { ang = fabs(ang); int du = int(ang); int fen = int( (ang-du)*100 ); double miao = ((ang - du)*100 - fen)*100; double arc = ( du + fen/60. + miao/3600. )*TOPI; return -arc; } return 0; } 2.编写弧度变角度的函数 void CADlg::hudu2dfm(const double hudu, int *du, int *fen, double *miao) { double arc = 0.0; if (hudu0) //isnagtive { arc = fabs(hudu); double sec = (arc)*648000.0/PI; *du = (int)(sec/3600.0); *fen = (int)((sec-(*du)*3600.0)/60.0); *miao = sec - (*du)*3600 - (*fen)*60; *du = -*du; } else //positive { arc = hudu; double sec = (arc)*648000.0/PI; *du = (int)(sec/3600.0); *fen = (int)((sec-(*du)*3600.0)/60.0); *miao = sec - (*du)*3600 - (*fen)*60; } return; } CString CADlg::hd2ang(double hd) { int du, fen; double miao; hudu2dfm( hd, du, fen, miao); CString str; if (hd0) //isnagtive { double ang = (-du*10000 + fen*100 + miao)/10000. ; str.Format( %10.6lf, ang); str.TrimLeft(); str = - + str; } else //positive { double ang = (du*10000 + fen*100 + miao)/10000. ; str.Format( %10.6lf, ang); } return str; } 3.编写坐标正算函数 static double HDist(double x1,double y1,double x2,double y2) { double dx = x2 - x1; double dy = y2 - y1; return sqrt( dx * dx + dy * dy ); } stati