fx4800p公路线路大地坐标放样程序

《fx4800p公路线路大地坐标放样程序》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、公路线路大地坐标放样程序：（FX-4800P）Fix3{ZQEF}：Z″CX″：Q″CY″：E：″DX″：F″DY″Pol0：{W}：W″KM=″W≥0Prog″JD1″⊿W≥2149.53Prog″JD2″⊿W≥5261.45Prog″JD3″⊿M=(G-H)÷Abs(G-H)：W≥(E+F)÷2Goto1⊿L=W-E：I=A：S=B：T=E：U=G：W≤EGoto3⊿W＜E+KGoto2⊿Goto6LblI：L=F-W：M=-M：I=C：S=D：U=H+180：T=F：W≥FGoto3⊿W＞F-KGoto2⊿Lbl6：O=180(L-K÷2)÷(R)

2、：X=I+Rec(RsinO+K÷-K^3÷(240R2),U)：Y=S+JX=X+Rec(R-RcosO+K2÷(24R),U-90M)◢Y=Y+J◢Prog″L.A″：N=U-MO：W≥(E+F)÷2N=N-180⊿Goto4Lbl2：O=30L2÷(RK)：N=U-MO：X=I+Rec((L-L5÷(40R2K2))÷cosO,N)◢Y=S+J◢Prog″L.A″：N=U-3MO：W＞(F-K)N=N-180⊿Goto4Lbl3：X=I+Rec(AbsL,U+180)◢Y=S+J◢Prog″L.A″：W≥FU=H⊿Goto7Lbl7：{VP}：V=

3、0Goto0⊿P≤0N=U：≠N=U+180⊿S=X+Rec(AbsP,N+90)：S″BX=″◢T=Y+J：T”BY=“◢Prog“L.B”：Goto7Lbl4：{VP}：V=0Goto0⊿P≥0W=90+N+180：≠W=90+N⊿S=X+Rec(AbsP,W)：S”BX=“◢T=Y+J：T”BY=“◢Prog“L.B”：Goto4辅助程序：1、文件名：L.AL=Pol(X-Z,Y-Q)+0◢Prog”L.E”2、文件名：L.BL=Pol(S-Z,T-Q)+0◢Prog”L.E”3、文件名：L.CFix3L=Pol(E-Z,F-Q)+0◢4、文件名：

4、L.EFix4J＞0J=IntJ+0.01Int(60FracJ)+0.006Frac(60FracJ)+0◢≠J=IntJ+0.01Int(60FracJ)+0.006Frac(60FracJ)+359.5960◢5、文件名：JD1E=1318.53：A=38809.310：B=457267.853：F=2149.53：C=38994.418：D=457497.807：G=90°19′10.77″：H=12°00′48.8″：R=180：K=851、文件名：JD2E=2854.11：A=39683.563：B=457644.459：F=3107.57：

5、C=39929.636：D=457705.038：G=12°00′48.5”：H=15°38′38.82”：R=4000：K=02、文件名：JD3E=5261.45：A=42003.728：B=458285.850：F=5492.25：C=42229.608：D=458331.672：G=15°38′38.82”：H=7°17′26.19”：R=1000：K=85程序说明：1、输入曲线要素说明：（如JD1、JD2、JD3）“E”—表示ZY或ZH点桩号。“A”和”B”—表示ZY或ZH点X和Y坐标。“F”—表示YZ或HZ点桩号。“C”和”D”—表示YZ或HZ

6、点X和Y坐标。“G”表示导线1（前进方向方位角）。“H”表示导线2（前进方向方位角）。“R”表示圆曲线半径。“K”表示缓和曲线长。2、计算区间。如主程序中划单波浪线的程式，表示路线计算范围。即：W≥0Prog”JD1”表示计算第一个转点曲线，0表示起点桩号。（即：后一曲线的终点至前一曲线起点）。W≥2149.53Prog”JD2”表示计算第二个转点曲线，2149.53表示第二个转点曲线的ZH或ZY桩号。（即：后一曲线的终点至前一曲线起点）。W≥5261.45Prog”JD3”表示计算第三个转点曲线，5261.45表示第三个转点曲线的ZH或ZY桩号。（即：

7、后一曲线的终点至前一曲线起点）。如有多个转点曲线,则以此类推。3、计算显示。“CX？”——输入测站点X坐标。“CY？”——输入测站点Y坐标。“DX？”——输入定向点X坐标。“DY？”——输入定向点Y坐标。“J=“——表示测站点至定向点的方位角（度分秒）。“J=“——表示测站点至定向点的距离。“KM”——输入计算点桩号。“X=“和”Y=“——表示本桩号的中桩X和Y坐标。“I=“和”J=“——表示测站点至本桩号的距离和方位角。“D？”——输入距离。“T=“——表示实际距离与实测距离之差。“V？”——当输入V=0时，只计算中桩坐标；输入V≠0时，计算边桩坐标。

8、“P？”——输入边桩距离：P>0时，计算左边桩（为正）；P<0时，计算右边桩（为