資源描述:
《casiofx-4850計(jì)算器測(cè)量坐標(biāo)程序》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在工程資料-天天文庫。
1、直線坐標(biāo)程序(prog“ZXY”)W二W+lMX二J+(K-D)XcosG+AbsWXcos(G+WX904-AbsW)Y=O+(K-D)XsinG+AbsWXsin(G+WX90H-AbsW)A=GFix3XAYAFix4:“FWA=”:A—DMSA△說明:1、D、K分別為線元起點(diǎn)中樁樁號(hào)與所求點(diǎn)對(duì)應(yīng)的中樁樁號(hào)。2、J、0、G分別為線元起點(diǎn)X坐標(biāo),Y坐標(biāo)與切線方位角。3、W為偏距(左偏為右偏為“+”)一一計(jì)算點(diǎn)沿橫斷面方向到中線點(diǎn)的水平距離。4、V坐標(biāo)正算與反算的識(shí)別符。曲線線元計(jì)算坐標(biāo)程序(prog“YXY”)B=((K-D)4-AbsR)r:W二
2、W+luX二J+AbsR(sinBXcosG+(1-cosB)Xcos(G+RX904-AbsR))+AbsWXcos(G+RXB4-AbsR+WX904-AbsW)Y=O+AbsR(sinBXsinG+(l-cosB)Xsin(G+RX904-AbsR))+AbsWXsin(G+RXB—AbsR+WX90—AbsW)A=G+RXBFAbsRFix3V二1-“X尹XAYAFix4:“FWA=”:A-DMSA△說明:1、D、K分別為線元起點(diǎn)屮樁樁號(hào)與所求點(diǎn)對(duì)應(yīng)的屮樁樁號(hào)。2、R為線元半徑值,左偏為右偏為“+”。3、J、0、G分別為線元起點(diǎn)X坐標(biāo),Y坐標(biāo)與
3、切線方位角。4、W為偏距(左偏為右偏為“+”)一一計(jì)算點(diǎn)沿橫斷面方向到中線點(diǎn)的水平距離。緩和曲線計(jì)算坐標(biāo)程序(prog“HXY”)S=Int(B24-AbsRX1000+0.5)一1000:W=W+1MC=S-Abs(E-D):F=C77vrG=G-R4-AbsRX(CT2一B「)Prog“HABQ=M:P二NOAbs(K-D)+F:Prog“HAB”X=J+(M-Q)XcosG+(N-P)Xcos(G+RX90一AbsR)+AbsWXcos(G+R一AbsRX(C24-24-B2)r+WX90FAbsW)Y=O+(M-Q)XsinG+(N-P)Xs
4、in(G+RX904-AbsR)+AbsWXsin(G+R4-AbsRX(C24-24-B2)r+WX90FAbsW)A二G+R一AbsRX(C?4-24-B2)rFix3說明:1、D、E、K分別為線元起點(diǎn)、終點(diǎn)樁號(hào)與所求點(diǎn)對(duì)應(yīng)的中樁樁號(hào)。2、R為緩和曲線小元半徑值,左偏為“?”右偏為“+”。3、J^0、G分別為線元起點(diǎn)X坐標(biāo),Y坐標(biāo)與切線方位角。4、W為偏距(左偏為右偏為“+”)一一計(jì)算點(diǎn)沿橫斷面方向到中線點(diǎn)的水平距離。5、V坐標(biāo)正算與反算的識(shí)別符。6、B為緩和曲線參數(shù)。第一類型緩和曲線坐標(biāo)計(jì)算程序(prog“HXY1”)Prog“HXYSV二1-“
5、X尹XAYAFix4:“FWA=”:A-DMSA△說明:1、起點(diǎn)與終點(diǎn)是相對(duì)與路線的走向而言的。2、第一緩和曲線一一沿路線走向,半徑由大變小的緩和曲線。W=-W:Prog“HXY"A=A?180:XAYAFix4:“FWA=”:A—DMSA△說明:1、第二緩和曲線一一沿路線走向相反,半徑由大變小的緩和曲線。緩和曲線坐標(biāo)程序的子程序(prog“HAB”)M=C?CA54-(40XBA4)+CA94-(3456XBA8)-CA,34-(599040XBA12)N=CA34-(6XBA2)-CA74-(336XBA6)+CA11(42240XBA10)-CA
6、15(9676800XBA14)坐標(biāo)反算子程序(prog“KW”)1=0:J=0:Pol(H-X-lu,U-Y-lM):JWO—J二J+36OAC=I:D=JCWlrn—K“POINT二K”▲W“POINT(L)W二”▲{H,U}△Rec(C,D-A):K=K+1:W=W+J高程計(jì)算子程序(prog“Hl”)H=1-*H=B+(K-D)XI△H二2—H二B+(K-D)XI-(K-D)24-24-R△Fix3:V二H▲△說明:1、B、R分別為線元的起點(diǎn)高程與豎曲線半徑,線元為直時(shí),H值為I,線元為豎曲線時(shí),H值為2。2、豎曲線為凹曲線時(shí),R值為豎曲線為凸
7、曲線時(shí),R值為“+”。坐標(biāo)計(jì)算的主程序prog“001ZX”V“V=1V=0"{T,Z}:T“P(N)”:Z“P(E)”Lbl1{K,W}:K“K”:W“W(■乙Y+)”Lbl2KW34139.073—D=33185.5:J=586494.165:0=502097.982:G=263°01’32.9":Prog“ZXY”:V=0-Goto9AAProgHCZn:Goto1AKW34472.406-D二34139.073:E=34472.406J=686378.380:0=501151.466:G=263°OP32.9":R=3000:B=1000:Pi
8、og“HXYl”:V=0-*Goto9AAProgMCZn:Goto1AKW36006.859