《5800P公路路线坐标正反算及高程计算程序》由会员分享，可在线阅读，更多相关《5800P公路路线坐标正反算及高程计算程序（3页珍藏版）》请在金锄头文库上搜索。
1、公路路线座标正反算及高程计算程序Fx-5800 计算机程序1.FYJS 主程序Fix 3: “1.SZ=NE:2.NE=SZ :3.S=H”:?Q:Q=1 = Goto1:Q=2 = Goto2: Q=3 = Goto3Lbl 1: K?S: -B,0,+B ?Z: “PJ”?M:Prog“5.DAT-SJK”: Prog“2.SUB1”: N+Zcos(F+M ) N:E+Zsin(F+ M ) EProg“4.FY” ：Prog“5.1 GCJSCX ” ： -如无需算中桩高程则删除此步骤Goto 1 Lbl 2: “X”?B: “Y”?C: K?S: Pro g“3.SUB2 ”: “K
2、=”:S“-B,0,+B=”:ZGoto 2 Lbl 3: K?S ： Prog“5.1 GCJSCX”: Goto 3 K?S: 所计算点桩号-B,0,+B ?Z: 计算点左右边距左- 右+ 中 0 “PJ”?M 所计算点斜距的右夹角“X”?B: 反算实测 X坐标“Y”?C:反算实测 Y坐标K?S: 反算点附近大概桩号2.SUB1 正算子程序0.5 （1R-1P）LD:S- O(字母 ) XU+ (cos(A+(X P+DX(2) )180,0,X) N V+(sin(A+(X P+DX(2) )180,0,X) EA+(XP+DX( 2) 180 F3.SUB2 反算子程序Lbl 1:0
3、Z：1Q ：Prog“ 5.DAT-SJK”: Prog “2.SUB1” : Pol(N-B+10(-46), E-C+10(-46):Isin(F-90-J) W:S+W S : Abs(W)0.0001 = Goto1 Lbl 2: 0Z：Prog“ 2.SUB1 ”:(C - E) sin(F+90) Z4.FY 放样子程序“HS:X“?N:“HS:Y“?E :“CE:X“?G:“CE:Y“?H: Pol(N-G,E-H): JJ+360J: “ FWJ= “: J ? DMS “JL=“: I“HS:X“?N: 后视点（计算点） X坐标“HS:Y“?E : 后视点（计算点） Y坐标“
4、CE:X“?G: 测站点 X坐标“CE:Y“?H: 测站点 Y坐标5.1 高程计算子程序（ 5.1GCJSCX ）Prog“ 6.SQX-DAT”: Z6 Abs(Z2- Z1) 2Z3: if Z2- Z1 :Then 1 Z4:Else -1Z4:ifend if S:Then Z7+T Z5Z8: “HS= ”：Z8 Else Z7+T Z5+ Z4 (Z3- Z5)22Z6 Z8: “HS= ”：Z8 ifend 5.DAT-SJK 数据库子程序Goto1同时保存多个曲线时的指针Lbl 1 IF SMA：GOTO0: =H=M+A -BV=S-H 注： M 为水准点高程， A为后视读数， B为前视读数， H为测点高程， S为设计标高， V为填 挖高度。该程序只需输入水准点高程和后视读数后，在输入前视读数就可的到所测点标高， 将所测点的设计标高输入，便可的到该点的填挖高度，非常方便用于公路测量，该程序还有 个特点：在重新架仪器后想改变水准点高程和后视时，不用退出程序，只要将前视B输成 0， 程序将会重新提示输入M和 A。
