CASIOfx—4800p編程函數(shù)計(jì)算器

1、CASIO fx 4800p編程函數(shù)計(jì)算器路橋隧測(cè)設(shè)實(shí)用程序李 慶 偉編輯、整理單位：中鐵十三局集團(tuán)有限公司第二工程公司CASIOfx4800程序編輯：李慶偉2019-4-251:27:37 AM目錄第一部分：線路設(shè)計(jì)實(shí)用程序一、單交點(diǎn)平曲線設(shè)計(jì)1、外距控制單交點(diǎn)平曲線設(shè)計(jì) 52、切線長(zhǎng)控制單交點(diǎn)平曲線設(shè)計(jì) 53、設(shè)置不對(duì)稱緩和曲線單交點(diǎn)平曲線設(shè)計(jì) 64、單交點(diǎn)雙圓曲線設(shè)計(jì)7二、多交點(diǎn)平曲線設(shè)計(jì)1、不與基線相切的雙交點(diǎn)單圓曲線設(shè)計(jì) 82、與基線相切的雙交點(diǎn)單圓曲線設(shè)計(jì) 93、基線轉(zhuǎn)向相反雙交點(diǎn)單圓曲線設(shè)計(jì) 104、三點(diǎn)虛交單圓曲線設(shè)計(jì)115、公路平曲線及主點(diǎn)樁號(hào)設(shè)計(jì) 126、公路選線設(shè)計(jì) 15

2、7、與基線相切的雙交點(diǎn)復(fù)曲線設(shè)計(jì) 178、設(shè)置對(duì)稱緩和曲線雙交點(diǎn)基本平曲線設(shè)計(jì) 189、兩端設(shè)置緩和曲線公切點(diǎn)不在基線上雙交點(diǎn)雙圓平曲線的設(shè)計(jì)10、兩端設(shè)置緩和曲線公切點(diǎn)在基線上雙交點(diǎn)雙圓平曲線的設(shè)計(jì)11、卵形曲線與復(fù)曲線設(shè)計(jì) 21三、回頭曲線設(shè)計(jì) 23四、道路縱斷面設(shè)計(jì)1、縱斷面設(shè)計(jì) 252、豎向圓曲線的設(shè)計(jì) 293、復(fù)豎曲線的設(shè)計(jì) 294、三次樣條豎曲線設(shè)計(jì) 30五、道路橫斷面設(shè)計(jì) 31第二部分：道路測(cè)設(shè)實(shí)用程序1、水準(zhǔn)路線平差計(jì)算（附和、閉合、支水準(zhǔn)） 332、導(dǎo)線測(cè)量平差計(jì)算（附和、閉合、無定向） 363、“緩+圓+緩”型單交點(diǎn)平曲線坐標(biāo)計(jì)算 544、曲線元法單交點(diǎn)平曲線計(jì)算 575、

3、復(fù)化辛卜生公式計(jì)算（卵形曲線及各種曲線元） 606、路線交點(diǎn)坐標(biāo)及方位角計(jì)算 677、切線支距計(jì)算 688、極坐標(biāo)計(jì)算 859、坐標(biāo)換帶計(jì)算 9010、匝道楔形端部設(shè)計(jì) 9511、交叉口豎向設(shè)計(jì) 10512、用回旋線插入法加寬平曲線的計(jì)算 11113、用切線插入法加寬平曲線的計(jì)算 11414、水準(zhǔn)測(cè)量前視法測(cè)高計(jì)算 11815、交會(huì)點(diǎn)坐標(biāo)計(jì)算 11916、中線偏位計(jì)算 12417、道路曲線超高計(jì)算 12618、豎曲線（直、豎結(jié)合）計(jì)算 13219、不規(guī)則圖形面積計(jì)算 13720、橫斷面體積計(jì)算 13821、鐵路曲線坐標(biāo)計(jì)算 13922、線路標(biāo)準(zhǔn)線形曲線要素計(jì)算 14123、坐標(biāo)（方位角、增量、

4、正算、反算）計(jì)算 14224、鐵路曲線外軌超高設(shè)計(jì)及計(jì)算 14425、公路路面放樣計(jì)算 150第三部分：橋梁測(cè)設(shè)實(shí)用程序1、曲線橋超高計(jì)算 1522、匝道橋超高計(jì)算 1533、橋梁導(dǎo)線網(wǎng)近似平差計(jì)算（等權(quán)代替法） 154第四部分：隧道測(cè)設(shè)實(shí)用程序1、測(cè)量坐標(biāo)與施工坐標(biāo)的換算 1582、隧道進(jìn)洞關(guān)系數(shù)據(jù)計(jì)算3、洞內(nèi)、外控制網(wǎng)平差計(jì)算4、場(chǎng)地平整土方填挖及高程計(jì)算第五部分：其它綜合程序1、橋?qū)?、涵長(zhǎng)及標(biāo)高計(jì)算2、圓弧拱放樣計(jì)算3、三心圓放樣計(jì)算4、二次拋物線拱放樣計(jì)算5、懸鏈線拱放樣計(jì)算6、預(yù)應(yīng)力鋼束曲線坐標(biāo)及長(zhǎng)度計(jì)算7、錐體護(hù)坡放樣計(jì)算8、錐體護(hù)坡工程數(shù)量計(jì)算9、側(cè)墻、護(hù)拱及拱圈工程數(shù)量計(jì)算一1

5、0、八字翼墻工程數(shù)量計(jì)算11、鉆孔灌注樁、柱的計(jì)算12、螺旋箍筋長(zhǎng)度計(jì)算13、人行道板的計(jì)算14、仰斜式石砌擋土墻的計(jì)算15、鋼筋混凝土扶壁式擋土墻的計(jì)算16、公路工程單位造價(jià)計(jì)算 第六部分；參考文獻(xiàn)1、鐵路勘測(cè)設(shè)計(jì)郝瀛2、公路勘測(cè)設(shè)計(jì)張雨化3、單位：中鐵十三局集團(tuán)有限公司李慶偉3CASIOfx4800程序編輯：李慶偉2019-4-251:27:37 AM第一部分：線路設(shè)計(jì)實(shí)用程序一、單交點(diǎn)平曲線設(shè)計(jì)1、外距控制單交點(diǎn)平曲線設(shè)計(jì)程序名：WJYQXLbl 1 : A “JA”： E "EH': L "LS"： N=1+cos (0. 5A):M=E±

6、; (N-1): O =NL2+ (24N-24): Q=M 2-4 >O :Q<0=> Goto 1 : = > R=0. 5 (M+VQ )，/程序說明：“JA”曲線轉(zhuǎn)向角，“EH”外矢距，“LS”緩和曲 線長(zhǎng)，“R”曲線半徑。2、切線長(zhǎng)控制單交點(diǎn)平曲線設(shè)計(jì)程序名：QXYQXA “JA”： T “TH”： L "LS? J "JINGDU"： N=tan (A+2): 2_3_八 _M= NL 我4: O =-L 攵40: Q=L+ 2-T : S=-QTM : Lbl 1 : U=NS3+QS2+MS+ O: V=3N S2+2QS+

7、M : R=S-U +V : Abs (R-S ) > J = > S=R : Goto 1 : w= > R "R=' / / 程序說明：“JA”曲線轉(zhuǎn)向角，“TH”切線長(zhǎng)，“LS”緩和曲 線長(zhǎng)，“JINGDU ”取值精度(取0. 001), “R”曲線半徑。3、設(shè)置不對(duì)稱緩和曲線單交點(diǎn)平曲線設(shè)計(jì)程序名：NCJSTAKEK “JA”： R “R"： J “JDZH”： N “LSI”： M “LS2”：Q=N +2-N3+240R2，S=M + 2-M 3+240R2， P=N2+24R-N4 - 2384R3，U= M 2+24R-M 4-23

8、84R3，B=180 + 2+ 兀 X N + R， V=180+2+ 兀 XM + R，T= (R+U) tan (K + 2) +Q+ (P-U) +tanK，W= (R+U) tan (K + 2) +S+ (P-U) +tanK，Y=0. 0174533R (K-B-V ) /L=Y+N+M / A "ZH” =J-T，C “HY” =A+N /D “QZ” =C+Y+2，F(xiàn) "YH” =D+ 丫+2，G “HZ” =F+M程序說明：“JA”轉(zhuǎn)向角，“R”半徑，“JDZH”交點(diǎn)里程，“LS1” 第一緩和曲線長(zhǎng)，“LS2”第二緩和曲線長(zhǎng)，“Q”第一切線增 長(zhǎng)值，“S”

9、第二切線增長(zhǎng)值，“P”第一內(nèi)移值，“U” 第二內(nèi)移值，“B”第一緩和曲線角，“V”第二緩和曲線角，“T”第一切線長(zhǎng)，“W”第二切線長(zhǎng)，“Y”圓曲線長(zhǎng)，“L”曲線長(zhǎng)，“ZH”直緩點(diǎn)里程，“HY”緩圓點(diǎn)里程，“QZ” 曲中點(diǎn)里程，“YH”圓緩點(diǎn)里程，“HZ”緩直點(diǎn)里程。4、單交點(diǎn)半徑不等的雙圓曲線設(shè)計(jì)程序名：SJDYSTAKEK “JA1: M “JA2”： R “R1”： S “R2”： J “JDZH”:D=Rtan (K + 2): E=S tan (M+2):T “T1” =D+ (D+E) sinM - sin (K+M ) /W “T2” =E+ (D+E) sinK - sin (K

10、+M) /U=ttRK + 180: V=ttRM+180: L=U+V，A “ZY” =J-T，B “GQ” =A+U / C "YZ” =B+V，程序說明：“JA1”第一切線與基線轉(zhuǎn)向角，“JA2”第二切線 與基線轉(zhuǎn)向角，“R1”第一圓曲線半徑，“R2”第二圓曲線半 徑，“JDZH”交點(diǎn)里程，“T1”第一切線長(zhǎng)，“T2”第二切線 長(zhǎng)，“U”第一圓曲線長(zhǎng)，“V”第二圓曲線長(zhǎng)，“L”曲線總 長(zhǎng)，“ZY”直圓點(diǎn)里程，“GQ”公切點(diǎn)里程，“YZ”圓直點(diǎn) 里程。單位：中鐵十三局集團(tuán)有限公司李慶偉37二、多交點(diǎn)平曲線設(shè)計(jì)1、不與基線相切雙交點(diǎn)單元曲線設(shè)計(jì)程序名：XJDYQXLbl 1 : R

11、: K “AB ”： C “A1 ”： D “A2”： J“JA”： E “ZHUANJ '=C+D，A=KsinC -sinE: B= KsinD -sinE:T=Rtan （E+2），Q “T1” =T-B，S “T2” =T-A，L=0 . 0174533RE，U "ZY” =J-Q，V “QZ” =U+L +2,Y “YZ” =U+L / Goto 1程序說明：“AB'基線長(zhǎng)，“A1”第一切線（ZY到JD）與基線的轉(zhuǎn)向角，“A2”第二切線（YZ到JD）與基線的轉(zhuǎn)向角，“JDA” A點(diǎn)在第一切線的里程，“ZHUANJ主交點(diǎn)轉(zhuǎn)向角，“T”主切線長(zhǎng)，“T1"

12、; B點(diǎn)到Y(jié)Z點(diǎn)的切線長(zhǎng)，“T2” A點(diǎn)到ZY點(diǎn)的切線長(zhǎng)，“L”曲線總長(zhǎng)，“ZY”直圓點(diǎn)里程，“QZ曲 中點(diǎn)里程，"YZ'圓直點(diǎn)里程。2、與基線相切雙交點(diǎn)單元曲線設(shè)計(jì)程序名：JQ2JYQXLbl 1 : K “AB”： C “A1”： D “A2”： J “JDA”：E “ZHUANJ " =C+D / R=K+ (tan (C+2) + tan (D + 2): T=R tan (E+2)，Q “T1” =R tan (C + 2) /S "T2” = R tan (D + 2) / L=0 . 0174533RE，U “ZY” =J-Q，V “QZ”

13、=U+L+2，Y "YZ” =U+L J Goto 1 程序說明：“AB'基線長(zhǎng)，“A1”第一切線(ZY到JD)與基 線轉(zhuǎn)向角，“A2”第二切線(YZ到JD)與基線轉(zhuǎn)向角，“JDA' A點(diǎn)里程，“E”主交點(diǎn)轉(zhuǎn)向角，“T”主切線長(zhǎng)，“T1” A點(diǎn)至 ZY點(diǎn)切線長(zhǎng)，“T2" B點(diǎn)至YZ點(diǎn)切線長(zhǎng)，“L”曲線總長(zhǎng)，“ZY”直圓點(diǎn)里程，"QZ'曲中點(diǎn)里程，"YZ'圓直點(diǎn)里程。3、基線轉(zhuǎn)向相反雙交點(diǎn)單元曲線設(shè)計(jì)程序名：JXFYQXLbl 1 : R: K “AB”： C “A1”： D “A2”： J “JDA”：E “ZHUANJ

14、" =D-C，A=KsinC -sinE: B= KsinD -sinE:T=Rtan （E+2），Q “T1” =T-B，S “T2” =T+A，L=0 . 0174533RE，U "ZY” =J-Q，V “QZ” =U+L +2，Y “YZ” =U+L / Goto 1程序說明：“AB'基線長(zhǎng)，“A1”第一切線（ZY到JD）與基 線轉(zhuǎn)向角，“A2”第二切線（YZ到JD）與基線轉(zhuǎn)向角，“JDA' A點(diǎn)里程，“ZHUANJ主交點(diǎn)轉(zhuǎn)向角，“T”主切線長(zhǎng)， “T1" B點(diǎn)到Y(jié)Z點(diǎn)的切的線長(zhǎng)，“T2" A點(diǎn)到ZY點(diǎn)的切線長(zhǎng), “L”圓曲線長(zhǎng)，“

15、ZY”直圓點(diǎn)里程，"QZ'曲中點(diǎn)里程， “YZ圓直點(diǎn)里程。4、三點(diǎn)虛交單元曲線設(shè)計(jì)程序名：TRIJDYQXLbl 1 : R: K “AB”： N “BC”： C “A1”： D “A2”： F “A3”：J “JDA”： E “ZHUANJ " =C+D+F ，A=NsinF+sin (D+F): B=NsinD + sin (D+F): G= (K+A) sin (D+F) +sinE: H= (K+A) sinC - sinE: T=tan (E + 2) /Q “T1” =T-G，S “T2” =T-H-B，L=0. 0174533RE，U “ZY” =J-

16、Q，V “QZ” =U+L+2，Y "YZ” =U+L J Goto 1程序說明：“AB'第一段基線長(zhǎng)，“BC第二段基線長(zhǎng)，“A1”主切線(ZY到JD)與基線AB轉(zhuǎn)向角，“A2”基線AB 與基線BC的轉(zhuǎn)向角，“A3”基線BC與主切線(JD到Y(jié)Z)轉(zhuǎn) 向角，“JDA' A點(diǎn)在主切線(ZY到JD)上的里程，“ZHUANJ 主切線轉(zhuǎn)向角，“T”主切線長(zhǎng)，“T1" A點(diǎn)到ZY點(diǎn)切線長(zhǎng)，“T2" C點(diǎn)到Y(jié)Z點(diǎn)切線長(zhǎng)，“L”曲線長(zhǎng)，“ZV直圓點(diǎn)里程， “QZ'曲中點(diǎn)里程，"YZ'圓直點(diǎn)里程。5、公路平曲線及主點(diǎn)樁號(hào)設(shè)計(jì)程序名：?jiǎn)吻€K

17、“JA”： H“JB”： Q"AB': F=K+H Z=0 =>Goto1: ">Z=1=>Goto2:Lbl 1: B= (180-F) +2: U=180-K-B: G=Qsin+sinF : M=QsinGsinF : X=GsinK+ sinU : Goto 3: Lbl 2: C"JC'： V"BC : D=，(d+V2+2QVcosH ： F=F+C I=arcsin (VsinH + D)： J= arcsin (QsinH+D) ： I=K+I ： B=(180-I-C-J ) +2: U=180-I-B

18、 : G=Dsin (C+J) -sinF :M=DsinI+sinF : X=GsinI+sinU : Lbl 3 : S “LS1”： O "JD：K“A1"： =a/RSJA=S2-S3 + 240+R: J=R+S+24+R: K=tan (F+ 2):C=% RF+180: P=O+G Y=0=>Goto4: ?=>Y=1=>Goto5: Lbl 4 : T “T” =A+JKJL “L” =C+SJE “E” =J+cos (F+ 2) -R，Y "LY' =L-2S，J "J” =2T-L，U “T1” =T-G，

19、N “T2” =T-MUZ "ZlH' =p-t，H "HY' =z+sjQ“QZ =Z+L+ 2，H “YH =h+yjY "HZ' =Z+LJGoto 8: Lbl 5 : W=0士Goto6: =>W=1=>Goto7: Lbl 6 : N “LS2'： Y=R+通24 + R: T "TA' =A+ (Y-JcosF) -sinF JU "TB'=N+ 2N3+240+ R2+ (J-YcosF) -sinF JV=arctan (J+ (T-A): E "E&quo

20、t; =J + sinV-R，I "LY' =JI RF+180-S + 2-N+2/L "L” =I+S+N，J “J” =T+U-LJA "A2' =，RNNJZ "ZH =P-T，H “HY =Z+SJQ“QZ =H+I + 2,Y"Y片=H+I，Y"HZ' =Y+NJGoto 8: Lbl 7: A=90S3 + 兀 R: N LS2 =(兀 RF-90S) +90/Z T1 =2S+ 3+11 S + 1260 R2，Y “T11” = S+3+ S3 + 126 R2，Q "2= N+3+

21、 N3- 126 R2，L"L" =C+ (S+N +2，B “T2” =2N+ 3+11 N3- 1260 R2，D “sin (180-F):T= (Y+Q sin (F-A) + D: U "TA” =Z+T，M “TB” =B+ (Y+Q sinA a D，E "E” =V ( T2+Y2-2TYcosA)，J "J” =U+M-S-NJA “A2” =VRNJZ "ZH' =P-U，Q "HH' =Z+S，Y "HZ' =Q+NJ Goto 9 : Lbl 8 : E "

22、E2” =E-X，Lbl 9程序說明：1、“JA、JB、JC”路線轉(zhuǎn)角，“AR BC分別是 交點(diǎn)A、B、C之間的距離，如無此值，可輸入0或按一下EXE 鍵；“LS1、LS2”分別是第一、二緩和曲線長(zhǎng)，“JD”交點(diǎn)樁號(hào)(虛交點(diǎn)、雙交點(diǎn)、三交點(diǎn)均為 A點(diǎn)樁號(hào))“A1、A2”第一、 二回旋線參數(shù)，“V切線長(zhǎng)，“L”曲線長(zhǎng)，“E”外距，“LY” 圓曲線長(zhǎng)，“J”校正值(超距)，“T1、T2" ZH到A點(diǎn)切線長(zhǎng)、 HZ到B點(diǎn)切線長(zhǎng)，“H片兩個(gè)回旋線交點(diǎn)樁號(hào)，“T11、T12” 第一、二圓曲線長(zhǎng)度，Z=0, Y=O單、雙交點(diǎn)曲線要素及主點(diǎn)樁號(hào)計(jì)算Z=1, Y=0三交點(diǎn)曲線要素及主點(diǎn)樁號(hào)計(jì)算Z=0

23、, Y=1, W=0單曲線非對(duì)稱設(shè)置緩和曲線的曲線要素及主 點(diǎn)樁號(hào)計(jì)算，Z=0, Y=1, W=1凸曲線非對(duì)稱設(shè)置緩和曲線的曲線要素及主 點(diǎn)樁號(hào)計(jì)算，“JB、JC”如無JB、JC角值，可輸入0或按一 下EXE鍵，E2當(dāng)E2=0時(shí)，稱為切基線，當(dāng)為負(fù)值時(shí)， 稱為圓內(nèi)基線，反之稱為圓外基線，屏幕顯示ZH既是ZY,HZ既是YZO6、公路選線設(shè)計(jì)程序名：FANQIUZ=0=>Goto 0: »Z=1 = >Goto 3: Lbl 0: B "R1”： K “R2”:C “J1”： D “J2”： W “LS1”： P “X0”：T= (B+Wf+ 24+B) tan (

24、C+ 2) +M 2-W3+240+B2： /2G=L-T: A= (1+24+ K) tan ( D+ 2): J=1 +240 + K:M=K tan (D+ 2): Lbl 1 : S=P: N=2: Lbl 2 :Y=AF2+P+ 2- J 3+M-G P=P+H N=N-1: N+ 0=>Z=Y: Goto 2 /丫= (Y-Z) + H: Z=S-Z+Y: Abs (Z-S) > E=> P=Z Goto 1 /S: “LS2=" J Goto A: Lbl 3: U “JA”： G “JB”： W“LS”： P “X0"： C=U+G F=0

25、=>Goto 4: +=>F=1=>Goto 7: Lbl 0: Q “E0"： A=1+cos (C+ 2): B= W2+24: Lbl 5 : S=P N=2: Lbl 6 : Y=AP+AB- P-P-Q : P=P+H N=N-1:Nw 0=>Z=Y: Goto 6/Y= (Y-Z) + H: Z=S-Z+Y:Abs (Z-S) > E=> P=Z: Goto 5/S: "R=" J Goto A: Lbl 7: A=tan (C+ 2): B= W2 + 24: D= W3+240: F= W 2-T : Lbl 8

26、S=P: N=2: Lbl 9 : Y=AP+AB- P-D+ P +F: P=P+H N=N-1: Nw 0=>Z=Y: Goto 9/Y= (Y-Z) + H: Z=S-Z+Y: Abs (Z-S) > E=> P=Z: Goto 8 /S: “R=" ，Lbl A程序說明：1、“R1、R2”第一、二圓曲線半徑，“J1、J2" S形曲線的兩個(gè)轉(zhuǎn)向角，“ LS1”已知第一緩和曲線長(zhǎng)，“ LS2” 待求第二緩和曲線長(zhǎng)，“JA、JB”路線轉(zhuǎn)角，“LS”單曲線緩 和曲線長(zhǎng)，“R”待求半徑，Z=0 S形曲線相銜接的另一個(gè)緩和曲線長(zhǎng)度計(jì)算Z=1, F=0外距長(zhǎng)度受

27、限制的圓曲線半徑計(jì)算Z=1, F=1一切線長(zhǎng)度受限制的圓曲線半徑計(jì)算2、有關(guān)參數(shù):已知反求L 、 R2LS2X0 H E110T R 10010E0 R 200103、本程序不適用于單曲線兩端緩和曲線長(zhǎng)度不等的情況由已定外距、切線長(zhǎng)度反算的圓曲線半徑，設(shè)計(jì)時(shí)應(yīng)做 適當(dāng)調(diào)整。7、與基線相切雙交點(diǎn)復(fù)曲線設(shè)計(jì)程序名：GQFQXLbl 0 : K “AB”： C “A1”： D “A2”： J "JDA': R "R1”：Q “T1” =Rtan (C+ 2) G G “R2” = (K-Q) + tan (D+ 2) / L “L1” =0. 0174533RC，F(xiàn) “L

28、1” =0. 0174533RD，U “ZY” =J-Q，V “GQ =U+LJ Y "YZ' =V+F，Goto 0程序說明：“AB'為基線長(zhǎng)，“A1、A 為第一、二交點(diǎn)轉(zhuǎn)向 角，“JDA' A點(diǎn)在ZH到JD切線上里程，“T1、T2”為待求第 一、二切線長(zhǎng)，“L1、L2”為待求第一、二圓曲線長(zhǎng)，“R1” 第一圓半徑，"R2'待求半徑。8、對(duì)稱緩和曲線雙交點(diǎn)基本平曲線設(shè)計(jì)程序名：QJTJJBQXLbl 0 : K “AJA”： H "AJB': M "LAB': N "LS”： J "J

29、DZH:E "AJD” =K+HJ A= (1-cosK) + sinK+ (1-cosH) + sinH :C=N (1 + 24 sinK+1 +24 sinH ): B=I2-4AC:Bv0=>N "REDESIGN: Goto 0 : +=>R= (MVB) + 2A， /Q=N 2-N3-240R2，P= N2-24R- N4 - 2384R2，B=28. 6479N+ RJ T "T1” = (R- (R+P)cosK) + sinK+Q， S “T2” = (R- (R+B cosH) + sinH+Q，U“LY1” =0. 017453

30、3R (K-B)，V “LY2” =0. 0174533R ( H-B) “Ly” =U+VJ L=W+2W A "ZH' =J-T，C "HY' =A+NJD “GQ =C+UJ F "YH' =D+VJ G "HZ' =F+NJGoto 0程序說明：“AJA” A點(diǎn)主切線與基線 AB的轉(zhuǎn)向角，“AJB”基 線AB與B點(diǎn)主切線的轉(zhuǎn)向角，“LS”緩和曲線長(zhǎng)，“JDZH' 交點(diǎn)里程，“AJD'曲線轉(zhuǎn)向角，“R”半徑，"Q'切線增長(zhǎng)值，“P”內(nèi)移值，“B”緩和曲線角，“T1”第一切線長(zhǎng)，“T2

31、” 第二切線長(zhǎng)，“LY1、LY2”第一、二段圓曲線長(zhǎng)、“LY”圓曲 線總長(zhǎng)，“L”曲線總長(zhǎng)，“ZH、HY GQ YH HZ'分別為個(gè) 主點(diǎn)里程。9、兩端有緩和曲線公切點(diǎn)不在基線上雙交點(diǎn)雙圓曲線設(shè)計(jì)程序名：DYDHNGQQXLbl 0 : K “AJA”： H "AJB': M "LAB': A "LH1”： R “R1”：J “JDZH: E “ZHUANJ =K+HJ Q “Q1” =A+ 2-A3+240R2，P= A2+24R-A4-2384 R3，B “HJ1” =28. 6479A+ R，U “TA” = (R+P) tan (K

32、+ 2)，T “T1” =U+QJW“LY1” =0. 0174533R (K-B)，X “L1” =W+4V “TB” =M-U ，S "R2' =V+ tan ( H+ 2) -U，C “LH2” =AV ( S+ R) / O "Q2' =C+ 2-C3+240S2，N “HJ2” =28. 6479C+ S，I “T2” =V+OJY “LY2” =0. 0174533S (H-N)，Z “L2” =Y+C ，L=X+" M "ZH' =J-T，J "HY' =M+AJ D “GQ =J+WJF &quo

33、t;YH' =D+YJG "HZ' =F+C，Goto 0程序說明：“AJA、AJB”第一、二交點(diǎn)轉(zhuǎn)向角， “LAB'基線 AB長(zhǎng)，“LH1、LH2” 第一、二緩和曲線長(zhǎng)，“R1、R2” 第一、 二半徑，"JDZH' A點(diǎn)交點(diǎn)里程，“ZHUANJ曲線轉(zhuǎn)向角，“Q1、Q2'第一、二段切線增長(zhǎng)值，“P1”內(nèi)移值，“B”緩 和曲線角，“TA" A點(diǎn)到ZH切線長(zhǎng)，"TB' B點(diǎn)到HZ切線長(zhǎng)，“T1" ZH到主JD切線長(zhǎng)，“T2" HZ到主JD切線長(zhǎng)，“LY1、 LY2”第一、二段圓曲線長(zhǎng)，“L1

34、、L2”第一、二段曲線長(zhǎng)，“L”曲線總長(zhǎng)，“ZH HY GQ YH HZ'為曲線個(gè)主點(diǎn)里程。10、兩端有緩和曲線公切點(diǎn)在基線上雙交點(diǎn)雙曲線設(shè)計(jì)程序名：DYDHGQQXK “AJA': H "AJB': M "LAB': A "LH1”： R “R1”： J "JDZH:E “ZHUANJ =K+HJ Q “Q1” =A+ 2-A3+240R2，P= A2+24R-A4-2384 R3JB “HJ1” =28. 6479A+ R，U "TA” = (R+P-RcosK) +sinK，T “T1” =Q+ (R- (

35、R+P) cosK) + sinK，W “LY1” =0. 0174533R (K-B)，X “L1” =W+AJ2D= (1-cosH) +sinH : F=U-M Lbl 0: C LH2 : G=C+24sinH : I=F2-4DG: I <0=> C 'REDESIGN: Goto 0 :片=> S “S2” =(-F+，I) +2D，/O "Q2' =C+ 2-C3+240S2，D= C2+24S-C4-2384 S3JN “HJ2” =28. 6479C+ S，V "TB' = (S+D-ScosH) +sinH，I

36、“T2” =O+ (S- (S+D)cosH) a sinH，Y “LY2” =0. 0174533S (H-N) Z Z “L2” =Y+J L=X+"M "ZH” =J-T，J "HY' =M+AJD “GQ =J+WF "YH' =D+YJG"HZ' =F+C，Goto 0程序說明；此例與 9例相同。11、復(fù)曲線與卵形曲線設(shè)計(jì)程序名：FU QU XIAN LUAN XING QU XIANK “JA”： H “JB”： S “LS1”： N “ LS2” ： R “ R1” ： D "AB': A

37、 “JDA，： X=S+ 2-S3-240R: F=S-24R: G F= (R+F) tan (K+ 2)，T “T1” =G+XJ U “L1” =S+ 2+KJI R+ 180，O “Ti2=D-G，E “E1” = (R+F) - cos (K+ 2) -R，E "A1” =，RS，E "J1” =T+G-U，B " R2” =O tan (HI- 2) JM=B-N-24B: Y=N 2-N3-240M2： J=N2-24M:E "T2” = (M+J tan (H+2) +Y，V "L2” = N+2+HJ! M 180 Z “E2

38、” = (M+J + cos (H+ 2) -M，Z “A2” =，MNJZ “J2" JQ=RM- Abs (R-M): I "DP' =Abs (F-J) /I >0. 1 = > Goto 1: + = >Goto 2: Lbl 1: P “LF” =，24QI ，J “LY1” =U-S-P + 2，W“LY2” =V-N- P+2/H "ZH =A-T dC "HY1' =H+SJB "QZ1' =C+J+ 2，Y "YH' =C+J，E “GQ =Y+ P+2，F(xiàn) &quo

39、t;HY2' =Y+P，R "QZ2' =F+VW 2，M "YH2' =F+W ，H "HZ' =M+NJGoto3: Lbl 2 : J “LY1” =U-S，W“LY2” =V-N，H "ZH' =A-T，C "HY' =H+SJB “QZ1” =C+J+ 2，Y“GQ =C+J，E"QZ2' =Y+W- 2，F(xiàn)"YH' =Y+W H "HZ' =F+NJLbl3 : L "L” =U+VJ程序說明：“JA、JB" Z

40、H點(diǎn)到A的切線與基線 AB的轉(zhuǎn)向角、HZ點(diǎn)到B點(diǎn)的切線與基線 BA的轉(zhuǎn)向角，“LSI、LS2”第一、 二緩和曲線長(zhǎng)，“R1”已知第一半徑，"AB'基線長(zhǎng)，"JDA'A點(diǎn)里程，“T1”第一圓曲線切線總長(zhǎng)，“T11”第一圓曲線 切線長(zhǎng)，“L1”第一圓曲線總長(zhǎng)，“E1”第一圓曲線外距，“ T2”第二圓曲線切線總長(zhǎng)，“ T12”第一圓曲線切線長(zhǎng)， “E2”第二圓曲線外距，“L2”第二圓曲線總長(zhǎng)，“A1、A2”第一、二回旋線參數(shù)，“J1、J2”第一、二曲線超距，“LF”卵形曲線中間緩和曲線長(zhǎng)度， “LY1、LY2”第一、二 圓曲線長(zhǎng)度，“ZH、HY1、QZ1、YH1、

41、GQ HY2、QZ2 YH2、 HZ'分別是各主點(diǎn)里程。當(dāng)“LY2”為負(fù)值時(shí),應(yīng)調(diào)整 R2或JDB的位置，重新計(jì)算。三、回頭曲線設(shè)計(jì)1、程序名：HUI TOU QU XIANK“JA”： H“JB”： Q"AB': S "LS”： F"JDA': I=K+H: B= (180-I ) + 2: U=180-K-B: G=QsinH- sinI : M= QsinK - sinI :X=G sinK - sinI : K "A” =VRSJA=S+ 2-S3-240R2: J=R+$+24R: K=tan (I+2): P=F+G

42、I v 180= > Goto 1 : w = >Goto 2: Lbl 1: T=A+JK C=IRtt+180: E "E2 ”=Jcos(I +2) -R-X G GotoA: Lbl 2 : I < 360= > Goto 3 : w = > Goto 6: Lbl 3: V=360-I : C=RVt +180: Z=0= > Goto 4: + = >Z=1 = >Goto 5: Lbl 4: T=R+ tan (180-I ) +2): GotoA: Lbl 5 : T "T” =Jtan (V+ 2) -AJG

43、otoB: Lbl 6 : I=360 = > Goto 7 : w = > Goto 8 : Lbl 7 :T "T' =A，C=2Ru : GotoB: Lbl 8 : I v 540 = > Goto 9 : w = > Goto C : Lbl 9 : V=I-360 : T "T” =Jtan (V+ 2) +A ，C= RVu +180: GotoB: Lbl A: N "T1” =T-G，N “T2” =T-M J Lbl B : L "L” =C+S，Y "LY” =L-2S，W"ZH&

44、#39; =P-T，H "HY' =W+SJQ "QZ' =W+匕 2，H "YH' =H+YJ H “HZ =W+L J Lbl C程序說明：JA、JB:ZH點(diǎn)到A的切線與基線 AB的轉(zhuǎn)向角，HZ 點(diǎn)到B點(diǎn)的切線與基線 BA的轉(zhuǎn)向角，“AB'基線長(zhǎng)，“LS” 緩和曲線長(zhǎng)，"JDA' A點(diǎn)里程，“A”緩和曲線參數(shù)，“E2” 第二曲線外距，“T”切線長(zhǎng)，“E2”外失距，“T1、T2" ZH到 A點(diǎn)的切線長(zhǎng)，HZ點(diǎn)到B點(diǎn)的切線長(zhǎng)?！癓”曲線長(zhǎng)，“LY” 圓曲線長(zhǎng)，"ZH HY QZ> YH H

45、Z'分別為各主點(diǎn)里程。Z=0無交點(diǎn)，大于180度的回頭曲線計(jì)算；Z=1有交點(diǎn),大于180度的回頭曲線計(jì)算。四、縱斷面設(shè)計(jì)1、主線(1)功能及適用范圍中心樁的設(shè)計(jì)標(biāo)高、填挖高土及豎曲線要素計(jì)算。(2)使用說明1、先計(jì)算變坡點(diǎn)標(biāo)高及豎曲線要素。2、確定豎曲線內(nèi)的個(gè)樁號(hào)。3、當(dāng)凸形豎曲線是由兩個(gè)連續(xù)下坡的縱坡所構(gòu)成而且|J |> | I | ,在求后半個(gè)豎曲線內(nèi)各樁的設(shè)計(jì)標(biāo)高， 填挖高度時(shí)， 應(yīng)以I J I值輸入。4、二、三、四級(jí)公路越嶺路線的平均縱坡應(yīng)符合以下規(guī)定：A:越嶺路段的相對(duì)高差大于 500m時(shí)，平均縱坡以接近 5% 為宜。B:相對(duì)高差為200500m時(shí)，平均縱坡以接近 5.

46、 5% 為宜。C:任一連續(xù)3000m路段范圍內(nèi)的平均縱坡不宜大于 5. 5%。5、相鄰豎曲線的銜接應(yīng)注意：A:同向豎曲線間，特別是同向凹型豎曲線之間，如直坡段 不長(zhǎng)，應(yīng)合并為單曲線或復(fù)曲線，避免由現(xiàn)斷背曲線。B反向豎曲線間宜插入直坡段，亦可直接連接。6、平、縱配合的基本要求：A平曲線與豎曲線相互重合，且平曲線應(yīng)稍長(zhǎng)于豎曲線。B合成坡度的控制應(yīng)與線形組合設(shè)計(jì)相結(jié)合。有條件時(shí)，一 般最大合成坡度不宜大于3% ,應(yīng)避免急彎與陡坡相重合的線形。7、平、縱線形設(shè)計(jì)中應(yīng)避免的組合：A計(jì)算行車速度A 40km/h的公路，凸形豎曲線的頂部或凹 形豎曲線的底部，不得插入小半徑平曲線。B:凸形豎曲線的頂部或凹形豎

47、曲線的底部，不得與反向平 曲線的拐點(diǎn)重合。C:直線上的縱面線形應(yīng)避免由現(xiàn)駝峰、暗凹、跳躍等使駕 駛者視覺中斷的線形。D:直線段內(nèi)不能插入短的豎曲線。E:小半徑豎曲線不宜與緩和曲線相互重疊。F:避免在長(zhǎng)直線上設(shè)置陡坡及長(zhǎng)度短、 半徑小的凹形豎曲線。(3)程序清單：ZONG DUAN MIANZ=0 = > Goto 1: = > Z=1 => Goto 0 : Lbl 1 : W=0 = > Goto2: = > W=1 => Goto 5: Lbl 2 : G=0 = > Goto 3: + = >G=1 = > Goto 4: Lbl 3

48、 : X=P-Q : Y "SH” =H-XI +100，GotoX: Lbl 5 : N=0= >Goto 6: + = > N=1 = > Goto 7:.2Lbl 6 : T T =RAbs (I-J) + 200/L L =2T，E E =T + 2R，Goto S : Lbl 7 : B "P1”： C “P2"： F=0= > Goto 8: w = >F=1 = >Goto 9: Lbl 8 : Y "H1”： I “IX”： H “H2” =Y+ (C-B) I+ 100，Goto S: Lbl 9 :

49、 V "T1"： L=C-B-V :r “R2” =L + Abs (I-J) + 200) G Goto S : Lbl 0 : K=0 => Goto A: + = > K=1 = > Goto D: Lbl A :U=0 = > Goto K: = > U=1 => Goto C: Lbl C : X=P+T-B :Jv0=>Goto B: + = > Goto N: Lbl B:Y “SH” =H+ (T-X) J+100 X2+2R，Goto X : Lbl D :M=0 = > Goto J: = >

50、M=1 => Goto I : Lbl J :X=A-P+T: Y "SH” =H- (T-X) I + 100+X 2+2R，Goto X : Lbl I : X=P+T-B : Y "SH” =H+ (T-X) J+100+X2+2R， Goto X: Lbl K: X=A-P+T : Y "SH” =H- (T-X) I+ 100 X2+2R，Goto X : Y "SH” =H - (T-X) J+100-X2+2R J Lbl X : Y "TW” =Y-D，Lbl S程序說明：Z=0, W=0 G=0-一變坡點(diǎn)前直坡段各樁的設(shè)

51、計(jì) 標(biāo)高、填挖高度計(jì)算；Z=0, W=0 G=1變坡點(diǎn)后直坡段各樁的設(shè)計(jì)標(biāo)高、填挖 高度計(jì)算；Z=0, W=1 N=0-一豎曲線要素計(jì)算；Z=0, W=1 N=1, F=0變坡點(diǎn)標(biāo)高計(jì)算；Z=0, W=1 N=1, F=1反求豎曲線半徑；Z=1, K=0, U=0-前半個(gè)凸形豎曲線各樁的設(shè)計(jì)標(biāo)高、填 挖高度計(jì)算；Z=1, K=0, U=1后半個(gè)凸形豎曲線各樁的設(shè)計(jì)標(biāo)高、填 挖高度計(jì)算Z=1, K=1, M=0-前半個(gè)凹形豎曲線各樁的設(shè)計(jì)標(biāo)高、填 挖高度計(jì)算；Z=1, K=1, M=1后半個(gè)凹形豎曲線各樁的設(shè)計(jì)標(biāo)高、填 挖高度計(jì)算；P變坡點(diǎn)樁號(hào)，H與 P相應(yīng)的樁號(hào)，A前半豎曲 線樁號(hào)(含P樁)，

52、B后半豎曲線樁號(hào)， DA (B, P) 樁的地面標(biāo)高，I , J 相鄰縱坡度，上坡為正(操作時(shí)“+” 號(hào)不用輸入)，下坡為負(fù)；SHA (B, P)樁的設(shè)計(jì)標(biāo)高；TW-A (B, P)樁的填挖高度，填高為正(記錄時(shí)“+”號(hào)不用書寫)，挖低為負(fù)；P1前一個(gè)變坡點(diǎn)樁號(hào)；H1與P1相應(yīng)的標(biāo)高；T1前一個(gè)豎曲線切線長(zhǎng)度；P2與P1相鄰變坡點(diǎn)樁號(hào)；H2 與P2相應(yīng)的標(biāo)高；R2-一反求與P1相鄰的豎曲線半徑。2、豎向圓曲線設(shè)計(jì)程序名：SXYQXJ “BZHAO"： B “HB”： C “I1”： D “I2"： R: W=D-C， 2A=W+AbsW: T=Abs (RW + 2)，L=

53、2T，E=T +2R，X “JDQ” =J-T，Y “JDZ” =J+T，Lbl 1 : P “PZHAO”：2H=B+C (P-J) +A (P-J+T) 2+2R/W “CONT": W=1=> Goto 1 ： w = > Goto2 : / Lbl 2程序說明：“BZHAO”交點(diǎn)里程，“HB”交點(diǎn)高程，“I1、I2” 坡度值，“R”半徑，“W”坡度差，“切線長(zhǎng)，“L”曲線 長(zhǎng)，“E”外失距，“JDQ”起點(diǎn)里程，“JDZ”終點(diǎn)里程，“PZHAO” 計(jì)算點(diǎn)里程，“H”計(jì)算點(diǎn)高程。3、復(fù)豎曲線設(shè)計(jì)程序名：SHFQXJ “BZHAO "： B “HB”： C “

54、I1”： D “I2”： E “I3”： R “R1”：S “R2"： M=E-C，A=M +AbsM : N=D-E，F(xiàn)=N + AbsN :K “L1” =AMR，L “L2” =FNS，O “XB” = (K (C+E-2D) +L (E-D) +2+ (C-D)，Q “JDQ” =J-O，G “JDQ” =J-O ，G “JDG” =O+K，Z “JDZ” =G+L，Lbl 1 : P “PZHAO”：PvQ=> Goto 1 /P>Z=> Goto 1/P>G=> Goto 3/P<G=> Goto 2/Lbl 2 : H=B+C

55、(P-Q-O) +A (P-Q) 2+2R ，W “CONT"： W=1 = > Goto 1 ： W = > Goto4: / Lbl 3 : H=B+C (K-O) +AK2 + 2R+E (P-G) +F (P-G) 2+2S， W “CONT"： W=1 = > Goto 1 : + = > Goto4: / Lbl 4程序說明：“BZHAO ”第一交點(diǎn)里程，“HB”交點(diǎn)高程，“I1、 I2、I3”坡度值，“R1、R2”第一、二圓半徑，“M” 一、三 坡度差，“N”二、三坡度差，"L1、L2”第一、二豎曲線長(zhǎng)，“XB”第一圓曲線切線

56、長(zhǎng)，“JDQ、JDG、JDZ”豎曲線起點(diǎn)、 中點(diǎn)、終點(diǎn)里程，“H”豎曲線設(shè)計(jì)高程。4、三次樣條豎曲線設(shè)計(jì)程序名：YTFQXB “BZHAO"： U “BH”： E “EZHAO"： V “EH”： C “I1”：D "I2”: M=C (E-B) +U-V : N=2 (V-U) - (C+D) (E-B): Lbl 1 : P“PZHAO"： PvB = >Goto 1 : /PvE=>Goto 1 : /Lbl 2 : LT= (P-B) + (E-B): H=U+T (V-U) +MT (1-T) +NT2 (1-T)“CONT&quo

57、t;： W=1 = > Goto 2: + = > Goto3 : /Lbl 3程序說明：BZHAO 交點(diǎn)里程BH 交點(diǎn)高程EZHAO 外失距對(duì)應(yīng)點(diǎn)的里程EH 外失距I1、I2 豎曲線坡度值PZHAO 計(jì)算點(diǎn)里程H豎曲線設(shè)計(jì)高程備注：需要校核。五、道路橫斷面設(shè)計(jì)程序名：RARCHLbl 0 : B: I: Lbl 1 : Z : Z=1 = > Goto 2 : / Z=21 = > Goto 3: /Z=22 = >N "POWER"： Goto4: /Z=23 = >Goto 5: / Z=24 = > Goto 6 : / Z

58、=25 = > Goto 7 : / Z=5 = > R=B + 6I: U “X1 ” =B+6，： Goto 8: /Z=4 = > N "POWER”： U “X1 ” =B + 2NN-1-1，： Goto 9: /Z=3 = >F:S "X1 " ： U=B+2-S: C= (2BI-4F) + ( B-2S) 2： D= (4F-BI-2SI) + ( B-2S): Goto 10: + = > Goto 1/Lbl 2: X: Y=XI，W “CONT”： W=1 = > Goto 2:豐=> Goto 11

59、 : /Lbl 3 : X: Y=2IX 2+ B2 ，W “CONT"： LW=1 = > Goto 3: + = >Goto 11 : /Lbl 4 : LX : Y=IX (2X + B) N-1，W “CONV: W=1 = > Goto 4 : w = > Goto 11 : / Lbl 5 : X: Y=2X3+B+IX +2，W“CONT”： W=1 = > Goto 5: + = > Goto 11: / Lbl 6: X: Y=BI (2X + B) A 1. 5，W “CONT"： W=1 = > Goto 6:

60、 + = > Goto 11 : /Lbl 7 : X : Y=IX A2+B+IX +2，W=1 = > Goto 7:豐=> Goto 11 : / Lbl 8 : X: XvU = >Y= (U-X ) A2+2R+IX-U A2+2R，w = > Y=IX-U A2+2R/W “CONT”：W=1 = > Goto 8: W = > Goto 11: /Lbl 9: X: XvU = >Y=IX (2X+B) A (N-1)，片=> Y=IU (2U + B) A (N-1 ) +I (X-U ) /W “CONT": W=1 = > Goto 9: + = > Goto 11 : / Lbl 10: X : X v U = > Y=CX A 2+DX 豐=> Y=CU A2+DU+I (X-U) AAW=1 = > Goto 10: + = > Goto 11 : /Lbl 11程序說明：第二部分：道路測(cè)設(shè)實(shí)用程序1、水準(zhǔn)路線平差計(jì)算程序清單：SHUI