FX5800計算器的積分程序(正反算、全線路、新線路)終極版

相關(guān)搜索：計算器，正反，線路，積分，程序

FX5800計算器的積分程序(正反算、全線路、新線路)終極版

ZHUCHENGXU 主程序

〃1. ZS, 2. FS〃 ？一Q輸入1正算，輸入2反算

“NEW二0, OLD HO” ?Z

If Z=0:Then“X0二” ?A: “Y0二” ?B: “CO二” ？C: “1/R0二” ?D: “1/RI二” ?E: “SP二” ?F: “EP二” ?G:

Ifend:Q二2二〉Goto 2

Lbl 1 : UKM=, <0 Stop” ？H:H〈0二〉Stop: “PJ二” ？0: "PY二” ?L

Lbl Z:Z=1=> Prog “01” : Z二2二〉Prog “02”選擇數(shù)據(jù)庫文件，可增加

H- F-X: 0. 5 (E-D) 4- (G-F) ->N

C+(XD+NX2)*180—兀-P： P<0二〉P+360-P： P>360=>P-360->P

A+ f (cos(C+ (XD+NX2)*1804- n ),0, X) +Lcos(P+0)->U

B+f (sin(C+(XD+NX2)*180一 兀)，0, X)+Lsin(P+0)T

Q二2二〉Goto4： Cis： Fix 3

〃Xn二〃：Locate4, 1, U： 〃Yn=〃： Locate 5, 2, V： “FWJ二” :1>DMSA

Norm 2： Cis： Goto 1

Lbl 2: “XD二，〈0,STOP” ? R： R〈0二〉Stop: “YD二” ? S

“KMDG二” ? H : 90->0:0->L： Goto Z(H線路范圍內(nèi)的任意樁號)

Lbl 4:Pol (R-U, S-V) : J<0 => J+360-J

While abs (Icos (J-P) ) W0. 001 :P-J>180二〉J+360-J： P-J0:thcn-I-*L:else I-*L ifend

Goto 3: Whileend： H+Icos (J-P) -*H:Goto Z

Lbl 3:Cls： Fix 3

“KM二” :Locate 4, 1, II： “PY二” :Locate 4, 2, L,

Norm 2： Cis： Goto 2

01 (數(shù)據(jù)庫子程序)

If HU第一曲線終點樁號：then 第一曲線起點X->A：第一曲線起點Y->B：第一曲線起點方位角一C：起點曲率一D：終點曲率一E：起點樁號一F：終點樁號一G： return： ifend

程序說明：

1、該程序可以計算任意線形(直線、圓曲線、緩和曲線、不完整曲線)任意樁號的坐標(biāo)(正算，輸入1),

也可根據(jù)坐標(biāo)計算該點到線路的距離及垂足樁號(反算，輸入2):

2、(NEW=0, 0LDH0) ?如果要計算的點為數(shù)據(jù)庫線路中的點，則輸入數(shù)據(jù)庫編號(以整數(shù)1、2、3…代

替輸入)；如果在數(shù)據(jù)庫中沒有要汁算線路的數(shù)據(jù)，則輸入曲線要素

X0：曲線起點X坐標(biāo)；

Y0：曲線起點Y坐標(biāo)；

CO:曲線起點方位角；

ROT、RT-1:曲線起點、終點曲率，直線為0,曲線左偏輸入負(fù)值，右偏輸入正值；

SI\ EP：曲線起點樁號，終點樁號；

KM：待求點樁號；

PJ：正斜交的設(shè)定；

PY：偏中距離，線路上的點輸入0,右偏輸入+值，左偏輸入-值；

3、正算顯示坐標(biāo)及切線方位角；反算輸入線路的任意樁號(此樁號越接近真實值計算速度越快)、待求

點坐標(biāo)，顯示待求點樁號及偏屮距離；

4、正算子程序為積分公式編寫而成；反算子程序為角度趨近的方法編寫，計算速度有點慢。

5、此程序顯示較直觀，結(jié)果在同一屏幕顯示。注* :程序中乘號用*標(biāo)示，其余為X。

卡西歐FX5800計算器公路測量全線中邊樁正反算交點法程序修改版

(2011-08-08 21:50:08)

轉(zhuǎn)載

標(biāo)簽：

5800全線匸反算

雜談

本程序是本人在承秦高速8標(biāo)施工中根據(jù)藍(lán)星程序2?3更改結(jié)果，修正了一些錯誤，去除一些功能，可以 計算路基任意點坐標(biāo)，設(shè)計高程.隧道欠超挖放樣計算。支持?jǐn)噫?#xff0c;隧道超欠挖，支持N條線路輸入， 計算精度lmm?與原程序主要功能(采用交點法方式計算多條線路坐標(biāo)正反算，要計算SZ雜線型及立交 匝道，包括C型，S型、卵型、冋頭曲線等；請使用線元法2-XYo歡迎廣大朋友提出建議共同學(xué)習(xí)。 本程序經(jīng)作者實踐證明真情奉獻(xiàn)，如需轉(zhuǎn)載請注明出處！作者：張濤

1 ?主程序：一般坐標(biāo)計算及放樣程序一“交點法

程序名:1?JD

Clrmat： Clrvar:

Lal 0:10^DimZ:Norm 2:1—A: ” A: XY=1,KMD=2 n ? A:A=l=>Goto 1:A=2=>Goto 2

總結(jié)

以上是生活随笔為你收集整理的缓和曲线计算机编程,fx5800缓和曲线计算程序.docx的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。