1/9
0/100
您的浏览器不支持进度条
下载所得到的文件列表
gps报告卫星轨道程序报告.doc
文档介绍:
计算GPS卫星位置实验任务书题目:计算GPS卫星位置专业:测绘工程班级:12-01学号:2012212600姓名:王威指导教师:庭叶时间:2014.10目录实验目的....................................................2实验过程流程图........................................2实验过程代码............................................3实验效果图...............................................8实验心得...................................................8实验目的:加深理解对在课堂上对GPS卫星坐标的计算,并复习以前测量学的相关公式和算法,提高我们的程序操作能力和知识转化能力。实验流程图计算卫星平均角速度计算归化时间计算平近点角计算偏近点角计算真近点角计算升交距角计算改正项计算改正后的升交距角、卫星矢径、mand1_Click()μ=398600500000000#ωe=0.0000729211567'卫星运行平均角速度n0=Sqr(μ)/Val(Text5.Text)/Val(Text5.Text)/Val(Text5.Text)n=n0+Val(Text11.Text)'归化时间Δt=Val(Text1.Text)+Val(Text2.Text)*(Val(Text20.Text)-Val(Text4.Text))+Val(Text3.Text)*(Val(Text20.Text)-Val(Text4.Text))^2t=Val(Text20.Text)-Δttk=t-Val(Text4.Text)'偏近点角Mk=Val(Text10.Text)+n*tkEk=MkForj=1To100Ek=Mk+Val(Text6.Text)*Sin(Ek)NextjEk=-0.2922365358'真近点角Vk=Atn((Sqr(1-Val(Text6.Text)^2)*Sin(Ek))/(Cos(Ek)-Val(Text6.Text)))'升角距角Φk=Vk+Val(Text8.Text)Text21.Text=Φk'摄动改正项的计算δu=Val(Text15.Text)*Cos(2*Φk)+Val(Text14.Text)*Sin(2*Φk)δr=Val(Text19.Text)*Cos(2*Φk)+Val(Text18.Text)*Sin(2*Φk)δi=Val(Text17.Text)*Cos(2*Φk)+Val(Text16.Text)*Sin(2*Φk)'改正后的升交距角、卫星矢径、轨道倾角uk=Φk+δurk=Val(Text5.Text)^2*(1-Val(Text6.Text)*Cos(Ek))+δrik=Val(Text7.Text)+Val(Text13.Text)*tk+δi'卫星在轨道平面上的坐标xk=rk*Cos(uk)yk=rk*Sin(uk)'升交点经度ΩkΩk=Val(Text9.Text)+(Val(Text12.Text)-ωe)*tk-ωe*Val(Text4.Text)'w卫星在地固坐标系的坐标 内容来自淘豆网www.taodocs.com转载请标明出处.