fxp计算器程序.docVIP

一、大地坐标化直角坐标计算程序（DA HUAN ZHI） 1、程序功能 本程序可用于国家统一投影带的正算求解（由B、L换算为X、Y）平面坐标，可输出加上带号和500Km常数的Y值。 2、数学模型 x=X+（（（（H-58）H+61）M/30+（4E+5）Q-H）M/12+1）/NTM/2 y=5×105（（（（H-18）H-（58H-14）E+5）M/20+Q-H）M/6+1）NW。 式中： X=RB-SC（32005.7801+V(133.9123+0.7032V)）; S=SinB;C=CosB;V=Sin2B;R=6367558.49686;B为纬度。 T=tgB;h=T2;E=67.385254×10-4；M=W2；W=CosB; Q=l+E;N=6399698.90178/;l=L+L0。 3、实用计算程序 程序名称：DA HUAN ZHI 程序清单： “B=”？B：“L=”？L：“A=”？A：“P=”？P：If P=3：Then（A÷3）×10∧（6）+5×10∧（5）→D：Else (A+3) ÷6×10∧（6）+5×10∧ （5）→D：IfEnd：π÷180→S：6367558.49686→R：tan(B) →T：Cos(B) →C：TT→H：TC→U：UU→v：(L-A)CS→W：WW→M：0.006738525415CC→E：（1+E）→Q：6399698.9018÷→N：RBS-UC（32005.78006+V（133.92133+0.7031V））→I:”X=”:I+((((H-58)H+61)M÷30+（4E+5）Q-H)M÷12+1）NTM÷2◣ “Y=”：D+（（（（H-18）H-（58H-14）E+5）M÷20+Q-H）M÷6+1）NW◣ ”OK” 4、变量名称和存储器内容 此程序是大地坐标化为直角坐标，即B、L坐标化为X、Y坐标。 B-----该计算点的纬度（°′″）； L-----该计算点的经度（°′″）； A------经度所在中央子午线度数（°）； P-----为3°带或6°带直角坐标编码，计算3°带坐标输入3，计算6°带坐标输入6。 5、具体操作步骤及实例 将B=43°42′10″；L=127°26′51″分别换算成3度带和6度带直角坐标。 (1)转化为3°带坐标，中央子午线A=126。 具体操作步骤 步骤 按 健 显 示 步骤 按 健 显 示 1 AC 光标闪动 2 FILE 文件屏幕 3 上下移光标 DA HUAN ZHI 4 EXE B=? 5 43°42′10″EXE L=? 6 127°26′51″EXE A=？ 7 126 EXE P=? 8 3EXE X=4841902.071 9 EXE Y000 EXE OK 计算结果：X=4841902.071；Y000 (2) 转化为6°带坐标，中央子午线A=129。 具体操作步骤 步骤 按 健 显 示 步骤 按 健 显 示 1 AC 光标闪动 2 FILE 文件屏幕 3 上下移光标 DA HUAN ZHI 4 EXE B=? 5 43°42′10″EXE L=? 6 127°26′51″EXE A= 7 129 EXE P=? 8 6EXE X=4842055.202 9 EXE Y150 10 EXE OK 计算结果：X=4842055.202;Y150 二、井下定点贯通测量计算程序（DING DIAN） 1、程序功能 本程序功能，是根据已知导线边坐标X 、Y、 H。求取与任意待定点相连接要素，即指向角、距离、倾角等。 2、数学模型 = = B= - ； W=CosB; 3 、实用计算程序 程序名称：DING DIAN 程序清单： “XA=”？A：“YA=”？O：“XB=”？C：“YB=”？D：“HB=”？N“XP=”？ E：“YP=”？F：“HP=”？M：Pol((A-C),(O-D):J＜0＝＞J+360→G:J→G:Pol((E-C),(F-D)) →S:J＜0＝＞J+360→K:J→K: K-G→B:If B＜0：Then B+360→B: IfEnd:”B=”:B▼DMS◣ “S=”: S◣ (M-N)÷S→V:tan-1(V)→U:”U=”:U▲DMS◣ S÷Cos(U)→L:”L=”:L◣ “OK” 4、变量名称和存储器内容 本程序是已知三点坐标,求取贯通数据的，即指向角、水平距离、倾角等。 XA、YA------后视点X、Y坐标。 XB、YB------仪器站点X、Y坐标。 XP、YP------贯通点X、Y坐标； B -