资源描述：
《5800坐正反算程序》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、FX5800计算器交点法正反算程序输入图纸中的整个标段交点要素,输入桩号及距中桩距离正算本标段任意点坐标，及极坐标放样的方位角及距离；由输入大概桩号及实测坐标，反算准确桩号及距中桩距离。(绿色为程序名，蓝色为输入计算器里的内容)1、主程序程序名：1XY-KMLbl0：7-DimZ：Norm2:1-A：HA:X,Y=l,KM,D=2H?A:A=l=>Gotol:A=2=>Goto2:Lbl1:Z[4]-K:Z[5]->L:“XZ”?K:”YZ”?L:K->Z[4]:L—Z[5]:LbIA:Prog
2、nQXn:90->B:’’PJ’’？B:B->Z[1]:LblB:”KM’’？Z:Z=—l=〉Goto0:Z=-2=>GotoA:Prog’’XI”:?D:Prog〃Z":I+DXCOS(Z[2]+Z[1]一X:J+DXSin(Z[2]+Z[l]->Y:Fix3:”X=H:Locate6,4,X:”Y=’’：Locate6,4,Y：Prog”JS”:GotoB:Lbl2：PrognQXn”KM"?Z:LblC:Prog”XIn:”XOn?X:X=-l=>Goto0:X=-2=>Goto2:"Y0
3、"?Y:Prog"ZX":Fix3:’•KM=’•：Locate6,4，Z:”D=’’：Locate6,4,D:GotoC2.交点法正算子程序(Z)程序名：ZH2^R^24-Ha(4)+2688+R八(3)—A:H+2-Ha(3)+240+R2->B:((H2-N2)4-244-R4-Sin(Abs(P))-((Ha(4)-NA(4))4-26884-RA(3))+Sin(Abs(P-E:(R+A)tan(Abs(P)+2)+B-E—T:P+Abs(P(R+N24-R4-24-Na(4)4-26
4、884-RA(3))tan(Abs(P)+2)+N+2-N八(3)+240+R2+E一Z[6]:O-T+riRXAbs(P)+180+H+2-N+2一Z[7]:IfZ彡O-T:ThenZ-0->S:G->Z[2]:Goto1:IfEnd:IfZ彡O-T+H:ThenZ_0+T->S:Prog“HX”：G+WK—Z[2]:A-T一A:G一E:Goto2:IfEnd:IfZ^Z[7]:Then180(Z-0+T-0.5H)4-R4-n->S:A+R(l—Cos(S))->B:H+2-HA(3)+24
5、0+R2+Rsin(S)->A:R->M:G+WS->Z[2]:A-T一A:G一E:Goto2:IfEnd:IfZ彡Z[7]+N:ThenZ[7]+N-Z—S:Z[6]—T:N—H:Prog“HX”：G+P—E:E-WK^Z[2]:T-A^A:C-H:Goto2:IfEnd:Z-Z[7]-N+Z[6]—S:G+P—Z[2]:Lbl1:U+Scos(Z[2]卜I:V+Ssin(Z[2]-J:Return:LbI2:U+Acos(E)-WBsin(E—I:V+ASin(E)+WBcos(E->J3.
6、交点法缓和段子程序(HX)程序名：HXS-S八(5)+40+R2+H2+SA(9)+3456+RA(4)+HA(4—A:SA(3)+6+R+H-S八(7)+336+R八(3)+H八(3)+S八(11)+42240+R八(5)+H八(5->B:90S2+n+R+H一K:RH+S->M3.交点法反算子程序(ZX)程序名：zx0一D:Do:Z+D一Z:Prog“Z”:Pol(X-I，Y-J+.000000001:J-Z[2]-J:Isin(J-S:Icos(J-D:IfM^0:ThenPol(M—WS
7、，D:+180-D:IfEnd:LpWhileAbs(D)>0.001:Z+D-Z:S-D4.线路选择子程序(线路选择输0时。则输曲线参数(QX)程序名：QX卜A:”QX:?=0,X1=1，X2=2”?A:A-Z[3]:IfA=0:Then”JDKM”？0:”XJ”？U:”YJ”？V:”FW”？G:”LSI”？H:“LS2”？N:“JDZJ”？P:?R:IfEnd5.坐标计算参数矩阵调出子程序(F)程序名：FMatF[l，l]->0:MatF[1，2]->U:MatF[1，3]->V:MatF[
8、l，4]一G:MatF[l，5]一H:MatF[l，6]一N:MatF[l,7]-P:MatF[1,8]-R7：极坐放样计算程序(计算放样点至置仪点方位角及距离)程序名：JSZ[4]->K：Z[5]->L：Pol(X-K,Y-L+.0000000001):J〈0:〉J+360一J:Int(J)+0.Ollnt(60Frac(J))+0.006Frac(60Frac(J))Fix4:”FWJ=”：Locate6,4,J：Fix3:”S=”:Locate6,4,I8.数据子程序(根据自己标段设计数据
