卡西欧5800计算器程序.doc

《卡西欧5800计算器程序.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、CASIOfx—5800计算器工程测量与公路测量程序1、坐标正算＂X0=″?X:＂Y0=″?Y:＂I=″?I:＂J=″?JX+ICos(J)→U:Y+ISin(J)→V＂X=″:U（待求点的X坐标）＂Y=″:V（待求点的Y坐标）说明：X0Y0：已知点坐标I：两点的距离J：方位角2、坐标反算Lbl0＂X1=″?X:＂Y1=″?Y:＂X2=″?U:＂Y2=″?V Pol(U-X,V-Y): J<0J+360→J＂I=″:I＂J=″:JDMSGOTO0说明：X1Y1：第一点的坐标，X2Y2第二点的坐标，I：两点的距离，J：方位角3、圆曲线＂X0=″?X:＂Y0=″?Y:＂FW

2、J=″?D:＂QDHAO=″?G:＂ZDHAO=″?C:＂R=″?RLbl1＂DQHAO=″?LL

3、O=″?J:＂H+B″=?B:＂I1=″?C:＂I2=″?D:＂R=″?R:＂T=″?T:((D-C)÷100)÷Abs((D-C)÷100)→A:Abs(0.5R(D-C)÷100)→S＂T″:SJ-T→XJ＋T→YLbl0＂DQ=″?LIfL

4、″?A:＂Y0=″?B:＂FWJ=″?D: Lbl0＂LS=″?L:＂PY=″?C ReC(L,D) ＂X=″:A+I+CCos(D+90)→X ＂Y=″:B+J+CSin(D+90)→YGoto0说明：X0Y0：已知点坐标，LS：两点距离，FWJ：方位角6.万能公式＂X0=″?A:＂Y0=″?B:＂FWJ=″?C:＂1÷R-QD″?D:＂1÷R-ZD″?E:＂QDHAO″?F:＂ZDHAO″?G Lbl1＂DQHAO=″?H:＂PY=″?o IfH

5、:Abs(H-F)→Q:PQ→I:C+90Q(I+2D)÷π→J:C+45Q(I÷8+D)÷π→M:C+135Q(3I÷8+D)÷π→N:C+45Q(I÷2+2D)÷π→KA+Q(Cos(C)+4(Cos(M)+Cos(N))+2Cos(K)+Cos(J))÷12→U:B+Q(Sin(C)+4(Sin(M)+Sin(N))+2Sin(K)+Sin(J))÷12→V＂X=″:U+oCos(J+90)→X＂Y=″:V+oSin(J+90)→Y＂FWJ=″:JDMSGoto1Lbl2＂END″说明：X0Y0：起开点坐标，FWJ：起开点方位角，1÷R-QD：起开点曲率，1÷R-

6、ZD终点曲率，QDHAO：起点里程，ZDHAO终点里程，DQHAO：待求点里程，XY：待求点坐标7、标高计算＂QZHAO=″?J:＂QDHAO=″?G:＂ZDHAO=″?K:＂B—HB=″?B:＂SX=″?Q:＂I1=″?C:＂I2=″?D:＂R=″?R:＂T=″?T(D-C)÷100→W:W÷Abs(W)→A:＂T″:0.5RAbs(W)→S＂o-YIGAO=″?oJ-T→X:J+T→YLbl1＂L—DQHAO=″?L:＂PY=″?U:＂XIELV=″?VIfL

7、01C(L-J)+A(L-J+T) ÷(2R)+0.01UV+Q→Q＂HO=″:o-H→ZGoto1Lbl2LKGoto4＂HL=″:B+0.01(L-J)D+0.01UV+Q→H＂HO=:o-H→ZGoto1Lbl4:＂END″说明：QZHAO：曲中点里程（竖曲线），QDHAO：起点里程，ZDHAO：终点里程，B—HB曲中点高程，SX：上下（路面标高下多少为水稳层面），I1：第一坡度，I2：第二坡度，R：半径，T切线长，