公路測(cè)量中的萬(wàn)能計(jì)算程序
使用卡西歐（CASIO—fx4850P）計(jì)算器進(jìn)行編制：
文件名：ZHY
程序式：Lbl 0:A“X0” :B“Y0” :C“A0” :D“1÷R0” :E“1÷R1” :F“DK0” :G“DK1”： Lbl 1:{P}:P“DKP” :I=(E-D)÷Abs(G-F):Q= Abs(P-F): “J=” :J= Abs(C+90Q(IQ+2D÷π) ▲S“X”= A +∫（COS（Cπ÷180+(2D+IX)X÷2）г,0,Q）:C＞0=＞Goto 2:≠＝＞Goto 3△: Lbl 2:T“Y”=B+∫(Sin(Cπ÷180+(2D+IX)X÷2）г,0,Q）: Goto 4: Lbl 4:Lbl 3:T“Y”=B-∫(Sin(Cπ÷180+(2D+IX)X÷2）г,0,Q）: Goto 4: Lbl 4:{Z}:Z“BZ” :M=J+R“Q” : “XP=” :V=S+Z COS M▲“YP=” :N=T+Z Sin M▲Goto 1
說(shuō)明: X0.Y0.A0---起點(diǎn)坐標(biāo)和起點(diǎn)方位角
R0---------起點(diǎn)半徑(直線(xiàn)為0)
R1---------終點(diǎn)半徑(直線(xiàn)為0)
1----------線(xiàn)路轉(zhuǎn)向:-1為線(xiàn)路左偏,1為線(xiàn)路右派偏
DK0--------起點(diǎn)樁號(hào)
DK1--------終點(diǎn)樁號(hào)
DKP--------計(jì)算點(diǎn)樁號(hào)
J----------計(jì)算點(diǎn)方位角
Q----------所計(jì)算邊距坐標(biāo)與線(xiàn)路的任意夾角(右角).法線(xiàn)角度為90度
BZ---------中樁到邊樁的水平距離,負(fù)為左邊距,正為右邊距.
XP.YP------計(jì)算點(diǎn)樁號(hào)的坐標(biāo).