歡迎來到http://www.tljciu.live !
當前位置:六六工程資料網建筑課堂工程資料工程測量曲線上任意點中邊樁坐標計算程序(CASIO fx-4800P可全線計算)

曲線上任意點中邊樁坐標計算程序(CASIO fx-4800P可全線計算)

08-22 13:58:46  瀏覽次數:701次  欄目:工程測量
標簽:工程測量規范,工程測量技術, 曲線上任意點中邊樁坐標計算程序(CASIO fx-4800P可全線計算),http://www.tljciu.live
主:PQX
Lbi 0:prog“TAD”Goto 1↙
Lbi 1:Z[1]“ZH-X”=M+Tcos(F+180):Z[2]“ZH-Y”=N+Tsin(F+180):V[1]“HZ-X”=M+Tcos(F+Z):V[2]“HZ-Y”=N+Tsin(F+Z):H=0=>Goto 2:≠>D=H:prog“QXY”:A“HY-X”= Z[1]+I cos(F+SZ÷AbsZ) :C“HY-Y”= Z[2]+I sin(F+SZ÷AbsZ):Q“YH-X”= V[1]+I cos(F+Z+180-SZ÷AbsZ ) :E“YH-Y”= V[2]+ Isin(F+Z+180-SZ÷AbsZ )↙
Lbi 2:K≤G=>D=Abs(G-K):O=M:P=N:I=D+T:J=F+180:W=F:Goto 4⊿↙
H=0→Goto 3⊿↙
K≤G+H=>D=Abs(K-G):O=Z[1]:P=Z[2]:prog“QXY” :J=F+SZ÷AbsZ:W=F+3SZ÷AbsZ: Goto 4⊿↙
Lbi 3:K≤G+L-H=>D=Abs(K-G-H):H=0=>H=1:O=Z[1]:P=Z[2]:≠>H=H:O=A:P=C:prog“QXY”H=1=>Q=0⊿I=D:J=F+(Q+E)Z÷AbsZ:W=F+(Q+2E)Z÷AbsZ: Goto 4⊿↙
K≤V=>D=Abs(V-K):O=V[1]:P=V[2]:prog“QXY”:F=F+Z+180: :J=F-SZ÷AbsZ:W=F-3SZ÷AbsZ:U=180+U: Goto 4⊿↙
Lbi 4:X=O+IcosJ+Bcos(W+U)▲
Y=P+IsinJ+Bsin(W+U)▲
I=0:J=0:I=POL(X-x0,Y-y0:J<0→J=J+360△J“FWJ”=J▲I“r”=I▲    (x0、y0為置儀點坐標)
子:QXY
A=D-D^5/40R²H²+ D^9/3456R^4H^4- D^13/599040R^6H^6+ D^17/17542600R^8H^8+1E-99:C=D³/6RH-D^7/336R³H³+D^11/42240R^5H^5-D^15/976800R^7H^7+ D^19/3530097000R^9H^9: S=tan¯1(C÷A):I=√(A²+C²):Q=90H÷лR:E=90D÷лR:D=2RsinE
子:TAD
Lbi 0:{KBU}:KBU↙
K≤xxx=>M=xxx:N=xxx: F=xxx: Z=xxx: R=xxx: H=xxx: T=xxx: L=xxx: G=xxx: V=xxx:≠>K≤xxx=>M=xxx:N=xxx: F=xxx: Z=xxx: R=xxx: H=xxx: T=xxx: L=xxx: G=xxx: V=xxx:≠>K≤xxx=>M=xxx
… … … … … ⊿
注:
K?輸入計算點樁號;
B?輸入距中樁距離,左-,右+;
U?輸入與前進方向偏角
計算中樁坐標時B、U輸入0,M-交點X坐標;N-交點Y坐標;F-路線前進方向方位角;Z-轉角,左轉時連同“-”號輸入; R-半徑;H-緩和曲線長,無緩和曲線時為0;T-切線長;L-曲線總長;G-直緩點樁號;V-緩直的樁號
在Lbi1行處,把各主點后的“:”改為“▲”,如Z[1]“ZH-X”=M+Tcos(F+180):改成Z[1]“ZH-X”=M+Tcos(F+180)▲可直接顯示主點樁號坐標,在子程“TAD”內可輸入全線角樁資料,K≤本轉角緩直點樁號時輸入本轉角曲線要素。
程序有些繁鎖,重復語句多,對于它的準確性和可靠性望大家給予驗證,修正[email protected]
,曲線上任意點中邊樁坐標計算程序(CASIO fx-4800P可全線計算)

++《曲線上任意點中邊樁坐標計算程序(CASIO fx-4800P可全線計算)》相關文章

22选五的开奖公告