坐標(biāo)正算主程序(命名為zbzs)

1、1.坐標(biāo)正算主程序坐標(biāo)正算主程序(命名為命名為ZBZS)第1行：Lbl0:WTB:W”K=”:T”LEN=”:B第2行：Prog“A”第3行：X=DTcos(FB)◢第4行：Y=ETsin(FB)◢第5行：F=F◢第6行：Goto0K——計(jì)算點(diǎn)的里程LEN——計(jì)算點(diǎn)到中樁的距離（左負(fù)右正）B——取前右夾角為正2.坐標(biāo)反算樁號(hào)和偏距主程序坐標(biāo)反算樁號(hào)和偏距主程序(命名為命名為ZBFS)第1行：UVK:U”X1”:V”Y1”:W”K1”第2

2、行：I=0:J=0第3行：Lbl0:Prog“A”第4行：Pol(UDVE):S=Icos(FJ):W=WS第5行：Abs(S)0.0001=Goto0△第6行：T=Isin(JF)第7行：K=W◢第8行：T”LEN”=T◢X1——取樣點(diǎn)的X坐標(biāo)Y1——取樣點(diǎn)的Y坐標(biāo)K1——輸入時(shí)為計(jì)算起始點(diǎn)(在線路內(nèi)即可)，輸出時(shí)為反算點(diǎn)的樁號(hào)T——偏距（左負(fù)右正）3.計(jì)算坐標(biāo)子程序計(jì)算坐標(biāo)子程序(命名為命名為XYF)為了簡潔，本程序由數(shù)據(jù)庫直接調(diào)用

3、，上述中的正反算主程序不直接調(diào)用此程序第1行：S=WA：I=(QP)L第2行：D=D∫(cos(FX(2PXI)90π)0S4)第3行：E=E∫(sin(FX(2PXI)90π)0S4)第4行：F=FS(2PSI)90π4.道路線元參數(shù)道路線元參數(shù)(命名為命名為A)第1行：W≤175.191=GoTo2△第2行：A=175.191:D=428513.730:E=557954.037:F=9226′40″:P=0:Q=1240:L=70.

4、417:W≤AL=GoTo1△第3行：A=245.607:D=428507.298:E=558024.092:F=10050′59.4″:P=1240:Q=1240:L=72.915:W≤AL=Goto1△第4行：A=318.522:D=428482.988:E=558092.538:F=11815′25.2″:P=1240:Q=0:L=55.104:W≤AL=Goto1△第5行：A=373.627:D=428453.283:E=558

5、138.912:F=12450′4.5″0:P=0:Q=1180:L=67.222:W≤AL=Goto1△Goto2第6行：Lbl1:Prog“XYF”:Goto3第7行：Lbl2:D=0:E=0:F=0第8行：Lbl3A——曲線段起點(diǎn)的里程D——曲線段起點(diǎn)的x坐標(biāo)E——曲線段起點(diǎn)的y坐標(biāo)F——曲線段起點(diǎn)的坐標(biāo)方位角P——曲線段起點(diǎn)的曲率(左負(fù)右正)Q——曲線段終點(diǎn)的曲率(左負(fù)右正)L——曲線段長度（盡量使用長度，為計(jì)算斷鏈方便）說明：

6、（說明：（1）正算主程序可以計(jì)算一般邊樁的坐標(biāo)，如要計(jì)算類似涵洞端墻的坐標(biāo)需增加兩個(gè)變）正算主程序可以計(jì)算一般邊樁的坐標(biāo)，如要計(jì)算類似涵洞端墻的坐標(biāo)需增加兩個(gè)變量，具體方法參考本程序集中的第量，具體方法參考本程序集中的第1篇辛普生公式的坐標(biāo)計(jì)算通用程序篇辛普生公式的坐標(biāo)計(jì)算通用程序（2）程序規(guī)定，左偏曲線曲率（半徑倒數(shù)）輸入負(fù)值，右偏曲線曲率輸入正值，直線上點(diǎn)曲率）程序規(guī)定，左偏曲線曲率（半徑倒數(shù)）輸入負(fù)值，右偏曲線曲率輸入正值，直線上

7、點(diǎn)曲率輸入輸入0。（3）本程序精度極高，不受曲線半徑大小影響，即使極小半徑的螺旋曲線等誤差僅為萬分之一）本程序精度極高，不受曲線半徑大小影響，即使極小半徑的螺旋曲線等誤差僅為萬分之一（0.1mm），可以忽略。），可以忽略。（4）若是從大里程向小里程的反方向計(jì)算，則曲率取正方向時(shí)的負(fù)值，方位角減去）若是從大里程向小里程的反方向計(jì)算，則曲率取正方向時(shí)的負(fù)值，方位角減去(或加上或加上)180度。度。（5）有多個(gè)匝道的項(xiàng)目，可隨時(shí)更改正反算主程

8、序中的紅色字體部分來調(diào)用其它線路的數(shù)據(jù)）有多個(gè)匝道的項(xiàng)目，可隨時(shí)更改正反算主程序中的紅色字體部分來調(diào)用其它線路的數(shù)據(jù)（6）反算樁號(hào)偏差為）反算樁號(hào)偏差為1mm（7）可以計(jì)算任意線型的任意點(diǎn)坐標(biāo)）可以計(jì)算任意線型的任意點(diǎn)坐標(biāo)5.坐標(biāo)計(jì)算通用程序坐標(biāo)計(jì)算通用程序(命名為命名為ZB)本程序與上述中的幾個(gè)程序無關(guān)，是在計(jì)算坐標(biāo)時(shí)采用輸入曲線元參數(shù)模式下的程序，為臨時(shí)使用方便。第1行：A”K0“:D”X0“:E”Y0“:F”F0“:P”1R1“: