公路超高加宽计算小程序

手算超高加宽相关公式及程序超高渐变段内的单侧横坡值计算已知条件：起点桩号终点桩号字母含义：A(起点桩号)B(终点桩号)E﹙所求桩号占超高段总长比例﹚Ab（（K－A）÷（B－A））=EC－(C－D）某E=F以下讲解两种超高形式计算公式起点%横坡值（正负区分）C(起点±%横坡值)K（所求桩号）终点%横坡值（正负区分）D(终点±%横坡值)F(所求桩号的超高横坡值)1.线性超高方式任意桩号横坡值公式2.三次抛物线性超高方式任意桩号横坡值公式Ab（（K－A）÷（B－A））=EC－(C－D）某（3某E－2E）=F通过以上公式编写到卡西欧5800计算器"？P:Goto1←┚/某模式选择（1）线性超高（2）三次抛物线性超高某/"﹙1﹚某某CG﹙2﹚SCPW某CGSCPW某CG"LbI1←┚/某条件语句开始某/Cl←┚/某清屏命令某//某分别输入起终点桩号、起终横坡度某/^2^3"KQ"？A:"KZ"？B:"HPQ%"？C:"HPZ%"？DLbI2Cl←┚"K"？K←┚/某清屏命令某//某输入所求点横坡值桩号某/Ab（（K－A）÷（B－A））→E←┚/某所求桩号占超高段总长比例某/IfP=1:ThenC－(C－D）某E→F:IfEnd←┚/某如果P=1进入线性超高横坡值计算某/IfP=2:ThenC－(C－D）某（3某E－2E）→F:IfEnd←┚/某如果P=2进入线性超高横坡值计算某/Cl←┚/某清屏命令某//某显示所求点桩号横坡值结果某/^2^3"HP%(K)=":Locate8，1，F◢Goto2←┚/某条件转移某/使用说明就不用写了,我想上面的注解已经足够了!不明之处请与我交流加宽渐变段内路基加宽值计算以下讲解两种加宽形式计算公式已知条件：起点桩号终点桩号起点宽度值终点宽度值字母含义：G(起点桩号)H(终点桩号)I(起点宽度值)J(终点宽度值)L(所求桩号）M(所求桩号占加宽段总长比例)N（线性加宽方式所求桩号加宽后的宽度值）O（高次抛物线性加宽方式所求桩号的加宽后的宽度值）1.线性加宽方式任意桩号加宽值后的宽度值公式Ab（（L－G）÷（H－G））=MM某(J-I)=N2.高次抛物线性加宽方式所求桩号加宽后的宽度值公式Ab（（L－G）÷（H－G））=MI+（4某M－3某M)某(J-I)=N通过以上公式编写到卡西欧5800计算器"﹙1﹚某某JK﹙2﹚GCPWSJK"？V:Goto1←┚/某模式选择（1）线性加宽（2）高抛物线性加宽某/GCPWSJK"LbI1←┚/某条件语句开始某/Cl←┚/某清屏命令某/^3^4"KQ"？G:"KZ"？H:"QDKD"？I:"ZDKD"？J←┚/某分别输入起终点桩号、起终宽度值某/QDKD"LbI2←┚/某条件语句开始某/Cl←┚/某清屏命令某//某输入所求点横坡值桩号某/"K"？L←┚Ab（（L－G）÷（H－G）→M←┚/某所求桩号占超高段总长比例某/IfV=1:M某(J-I)→N:IfEnd←┚/某进入线性加宽方式任意桩号加宽值后的宽度值计算某/IfV=2:I+（4某M－3某M)某(J-I)→N:IfEnd←┚/某进入高次抛物线性加宽方式所求桩号加宽后的宽度值计算某/^3^4Cl←┚/某清屏命令某//某显示所求点桩号加宽后的宽度值的结果某/"B="Locate6，1，N◢使用说明就不用写了,我想上面的注解已经足够了!不明之处请与我交流。

CASIO fx—5800计算器工程测量与公路测量程序1、坐标正算〝X0=〞?X:〝Y0=〞?Y:〝I=〞?I:〝J=〞?JX+ICos(J)→U:Y+ISin(J)→V〝X=〞:U （待求点的X坐标）〝Y=〞:V （待求点的Y坐标）说明：X0 Y0：已知点坐标I：两点的距离J：方位角２、坐标反算Lbl 0〝X1=〞?X:〝Y1=〞?Y:〝X2=〞?U:〝Y2=〞?VPol(U-X,V-Y):J<0 J+360→J〝I=〞:I〝J=〞:J DMSGOTO 0说明：X1Y1：第一点的坐标，X2Y2第二点的坐标，I：两点的距离，J：方位角３、圆曲线〝X0=〞?X: 〝Y0=〞?Y:〝FWJ=〞?D:〝QDHAO=〞?G: 〝ZDHAO=〞?C: 〝R=〞?R Lbl 1〝DQHAO=〞?LL<G Or L﹥C GOTO 2〝PY=〞?K180(L-G)÷(πR) →E2RSin(0.5E) →FReC(Abs(F),D+0.5E)：Cls〝X=〞:X+I+KCos(D+E+90) →A〝Y=〞:Y+J+KSin(D+E+90) →BD+E→o:o<0 360+o→0o〝FWJ=〞:o DMSGoto 1Lbl 2〝END〞说明：X0Y0：起始点的坐标，FWJ：起始点的方位角，QDHAO：起点里程，ZDHAO 终点里程，R：半径，DQHAO：待求点里程，PY：偏移量４、竖曲线〝QZHAO =〞?J: 〝H+B〞=?B:〝I1=〞?C:〝I2=〞?D:〝R=〞?R:〝T=〞?T: ((D-C)÷100) ÷Abs((D-C) ÷100)→A:Abs(0.5R(D-C) ÷100)→S〝T〞:SJ-T→XJ＋T→YLbl 0〝DQ=〞?LIf L<X:Then Goto 1:Else If L﹥Y:Then Goto 1:If End:If End〝GC=〞:B+C(L-J) ÷100+A(L-J+T) ÷(2R) →HGoto 0Lbl 1〝END〞说明：QZHAO：曲中点里程，H+B：曲中点高程，I1：第一坡度，I2：第二坡度，R：半径，T：切线长，DQ：待求点里程。

第6 卷第3 期2 0 0 4 年9 月辽宁省交通高等专科学校学报J OU RNAL OF L IAON IN G PROV INCIAL COLL EGE OF COMMUN ICA TIONSVol. 6 No . 3Sep . 2 0 0 4文章编号:1008 - 3812 (2004) 03 - 0030 - 03高速公路超高与加宽设计计算方法王功礼1 姚丽2 翁振军1(1. 辽宁省高速公路管理局,辽宁沈阳,110003 ;2. 辽宁省交通高等专科学校,辽宁沈阳,110122)摘要本文通过以两车道为主的高速公路超高和加宽的设计方法的实践,建立了一种简便的超高与加宽的计算模型,并介绍其计算方法。

关键词高速公路超高加宽计算方法中图分类号:U412 文献标识码:B1 前言表 1在现代公路设计中,不同等级公路的超高和加宽设计计地形计算行车速度( km/ h) 不设超高最小半径( m)算方法不尽相同,虽然基本原理比较相似,但计算方法复杂、繁琐。

近几年来,我们在辽宁省丹本高速公路( 山区高速公路) 的施工和管理过程中,仔细分析了设计方案及施工工艺, 总结一套简易而实用的超高和加宽设计方案。

此方案更适用一般平原高速公路(四车道) 及一至四级普通公路建设。

平原微丘重丘山岭2. 2 超高的形成120100806055004000250015002 超高设计2. 1 超高的作用及设计条件2. 1. 1 超高的作用超高是将公路曲线部分的路面设计成向曲线内侧倾斜的单向横坡,使得汽车在曲线上行驶时能够获取一个指向曲线内侧的横向分力,以克服或削弱离心力对行车的影响。

2. 1. 2 超高设置条件《公路工程技术标准》规定,当平曲线半径小于不设超高的半径时,应在曲线上设置超高。

其超高横坡度可由下式求得:i b = V2/ 127R - μV —行车速度R —平曲线半径μ—横向力系数不设超高的圆曲线最小半径见表 1 。

收稿日期:2004 - 04 - 10同迎来一个更加辉煌的前景。

圆曲线超高加宽计算程序平曲线加宽类别分为：四级公路不设缓和曲线而用超高加宽缓和段代替及平曲线半径R≤250M时两种情形。

程序说明：能计算双圆复曲线ZY点与YZ点的加宽值，单圆曲线是双圆复曲线在R1=R2时的特例,”r”的输入：FUNCTION—5--2程序名：YQXJK（圆曲线加宽）Deg:Fix 3:FreqOff←┚“NEW(0),OLD(≠0)DATA=”?→O←┚O≠0=》Goto 0:ClrStat←┚“ZY K=”?Z:”YZ K=”?Y←┚“R1=”?U:”R2=”?V←┚“L=”?L←┚“W=”?W:”+W=”?B←┚100→DimZ←┚U-0.5W-B→Z[1]:U-0.5W→Z[2] ←┚厂（Z[2]2+L2-Z[1]2）→Z[3] ←┚tan-1((Z[2]Z[3]-Z[1]L)÷（Z[1]Z[2]+Z[3]L）)→Z[4] ←┚πZ[4]U÷180→Z[5] ←┚V-0.5W-B→Z[11]:V-0.5W→Z[12] ←┚厂（Z[12]2+L2-Z[11]2）→Z[13] ←┚tan-1((Z[12]Z[13]-Z[11]L)÷（Z[11]Z[12]+Z[13]L）)→Z[14] ←┚πZ[14]V÷180→Z[15] ←┚Z-L→List X[1] ←┚Z→List X[2]:Ltan(Z[4])→List Y[2] ←┚Z+Z[5]→List X[3]:B→List Y[3] ←┚Y-Z[15]→List X[4]:B→List Y[4] ←┚Y→List X[5]:Ltan(Z[14])→List Y[5] ←┚Y+L→List X[6] ←┚“CAN SHU YES(1),NO(≠1)=”?C←┚C≠1=>Goto 0←┚“t1(DMS)=”:Z[4]▲DMS⊿“t2(DMS)=”:Z[14]▲DMS⊿“LJ1=”:Z[5]⊿“LJ2=”:Z[15]⊿“ZY+JIA KUAN=”:List Y[2]⊿“YZ+JIA KUAN=”:List Y[5]⊿Lbi 0:6→K←┚Do:”+K,<0=>END=”?→F←┚F<List X[1]=>Break←┚F>List X[6]=>Break←┚F>List X[3] And F<List X[4]=>Break←┚If F≥List X[1]And F≤List X[2] ←┚Then F-List X[1]→Q←┚Qtan(Z[4])→G：Goto 1:IfEnd←┚If F>List X[2]And F≤List X[3] ←┚Then List X[3]-F→Q←┚（Q÷U）r→A：Z[12]-Z[11]÷cos(A)→G←┚Goto 1:IfEnd←┚If F>List X[5]And F≤List X[6] ←┚Then List X[6]-F→Q←┚Qtan(Z[14])→G:”IfEnd←┚Lbi 1:”+JIA KUAN=”:G⊿LpWhile F>0←┚“YQXJK=>END”程序输入方法如下：NEW(0),OLD(≠0)DATA=? 输入0为重新输入数据ZY K=? 直圆点桩号YZ K=? 圆直点桩号R1=？输入第一圆曲线半径R2=？输入第二圆曲线半径L=？输入超高加宽缓和段长W=？输入路宽+W=？输入加宽值CAN SHU YES(1),NO(≠1)=? 输入1或者其它显示参数t1(DMS)= 显示参数1t2(DMS)= 显示参数2LJ1= 显示参数3LJ2= 显示参数4ZY+JIA KUAN= 显示ZY点的加宽值YZ+JIA KUAN= 显示YZ点的加宽值+K,<0=>END=? 输入加桩号（负数结束程序运行）+JIA KUAN= 显示第一个加宽值。

5800计算器公路测量常用程序一、程序功能本程序由6个主程序、5个次子程序及5个参数子程序组成。

主要用于公路测量中坐标正反算，设计任意点高程及横坡计算,桥涵放样，路基开挖口及填方坡脚线放样。

程序坐标计算适应于任何线型.二、源程序1.主程序1：一般放样反算程序(①正算坐标、放样点至置仪点方位角及距离；②反算桩号及距中距离)程序名:1ZD-XYLb1 0:Norm 2F=1：(正反算判别，F=1正算，F=2反算,也可以改F前加？，改F为变量)Z[1]=90（与路线右边夹角）Prog＂THB＂：F=1=>Goto 1:F=2=>Goto 2Lb1 1:Ｆix 3:＂Ｘ=＂：Locate 6,4,Ｘ◢＂Ｙ＝＂：Locate 6,4,Ｙ◢Ｐrog＂3JS”:Goto 0:Lb1 2:Fix 3:＂ＫＭ＝＂：Locate 6,4,Ｚ◢＂Ｄ＝＂：Locate 6,4,Ｄ◢Ｇoto 0２．主程序２：高程序横坡程序(设计任意点高程及横坡)程序名：2GCLbI 0:Norm 2“KM”?Z:?D:Prog”H”:Fix 3:”H=”:Locate 6,4,H◢“I=”: Locate 6,4,I◢Goto 03.主程序3：极坐放样计算程序(计算放样点至置仪点方位角及距离)程序名：3JSX：Y：1268．123→K(置仪点X坐标)2243．545→L（置仪点Y坐标，都是手工输入,也可以建导线点数据库子程序,个人认为太麻烦）Y-L→E：X-K→F：Pol(F,E):IF J<0:Then J+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:(不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢(不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢来直接显示)Fix 3:”S=”:Locate 6,4,I◢4．主程序4：涵洞放样程序（由涵中心桩号计算出各涵角坐标、在主程序3中输入置仪点坐标后计算放样点至置仪点方位角及距离)程序名：4JH-XYLbI 0:Norm 290→Z[1](涵洞中心桩与右边夹角，手工输入，也可以修改成前面加？后变为变量)1→F:Prog”THB”:?L:Z[2]-Z[1] →E:X+Lcos(E) →X:Y+Lsin(E) →Y:Fix 3: ＂Ｘ=＂：Locate 6,4,Ｘ◢＂Ｙ＝＂：Locate 6,4,Ｙ◢Ｐrog＂3JS”:Goto 0:5．主程序5:路基开挖边线及填方坡脚线放样程序（输入大概桩号及测量坐标、地面标高计算出偏移距离、桩号、距中距离、填挖高度）程序名：5FBXLbI 0:Norm 2: 18→DimZ:2→F:90→Z[1]:Prog “THB”:Z:D:”M0”?M:M→Z[4]:D→Z[3]:Prog”6GD”:L→Z[6]:If D<0:Then 0.75-L→D:Goto H:Else L-0.75→D:Goto H:IfEndLbI H:Prog”H”:H-0.03-Z[4] →Z[5]:Z[6] →L:If Z[5]<0:Then –z[5] →G:Goto W:Else Z[5] →G:Goto T:LbI W:Prog “W0”:Z[10]+Z[11] →A: If G>A:Then Goto 1:Else If G>Z[10]:Then Goto 2:Else Goto 3:IfEnd:LbI 1:L+Z[12]+Z[13]+Z[14]+(G-A)×Z[9]+Z[11]×Z[8]+Z[10]×Z[7]:Goto Z:LbI 2:L+Z[12]+Z[13]+(G-Z[10])×Z[8]+Z[10]×Z[7]:Goto Z:LbI 3:L+Z[12]+G×Z[7]:Goto z:LbI T:L+0.5→N:If G>Z[17]:Then (N+Z[18]+(G-Z[17])×Z[16]+Z[17]×Z[15])→S:Goto Z:Else (N+G×Z[15])→S:Goto z:LbI Z:Z[3]→D:Fix 2:Abs(D)-S→T:”L0=”:L Locate 6,4,T◢＂ＫＭ＝＂：Locate 6,4,Ｚ◢＂Ｄ＝＂：Locate 6,4,Ｄ◢“TW=”: Locate 6,4,Z[5]◢Goto 06．主程序6：路基标准半幅宽度计算程序(对于设计有加宽渐变的有用，如路基宽度无变化，则把此程序直接输入半幅宽度值至L)程序名：6GDProg “G0”Z-C→E:(B-A)×E/S+A→L:L:7．坐标计算次程序（ＴＨＢ）程序名：THB18→DimZ：＂ＫＭ＂?Z：Prog ＂Ｘ０＂1÷P→Ｃ：(P-R)÷(2HPR) →Ｓ：180÷π→Ｅ：Ｆ=1=>Goto 1：Ｆ=2=>Goto 2←┘Lbl 1：?Ｄ：Abs(Ｚ－O) →W：Prog "Ａ"：X：Ｙ：Ｇoto 3LbI 2:Ｘ：Ｙ：Ｘ→I：Ｙ→J：Prog ＂Ｂ＂：Ｏ＋Ｗ→Z：Ｄ→Ｄ：Ｇoto 3LbI 3:IF Ｆ＝１Then Ｘ：Ｙ：Else Ｚ：Ｄ8. 正算子程序(Ａ)程序名：A0.1184634425→A：0.2393143352→B：0.2844444444→N 0.046910077→K：0.2307653449→L：0.5→M：U+W(Acos(G+QEKW(C+KWＳ))+Bcos(G+QELW(C+LW Ｓ))+Ncos(G+QEMW(C+MWＳ))+Bcos(G+QE(1-L)W(C+(1-L)WS))+Acos(G+QE(1-K)W(C+(1-K)WS))) →X：V+W(Asin(G+QEKW(C+KWＳ))+Bsin(G+QELW(C+LWＳ))+Nsin(G+QEMW(C+MWS))+Bsin(G+QE(1-L)W(C+(1-L)WS))+Asin(G+QE(1-K)W(C+( 1-K)WＳ))) →Y：G+QEW(C+WＳ)+Ｚ［１］→Ｚ［２］：X+Ｄcos（Ｚ［２］）→Ｘ：Y+Ｄsin（Ｚ［２］）→Ｙ9. 反算子程序(Ｂ)程序名：BG-90→Ｔ：Abs((Y-V)cos(T)-(X-U)sin(T)) →Ｗ：0→Ｄ：Lbl 0：Prog "Ａ"：T+QEW(C+W Ｓ) →Ｌ：(J-Y)cos(L)-(I-X)sin(L)→Ｄ：IF Abs(Ｄ)<0.01:Then Goto1：Else W+Ｄ→W:Goto 0←┘Lbl 1:0→D：Prog "Ａ"：(J-Y)÷sin(Ｚ［２］) →D:10．高程计算子程序（H）程序名：HProg “S0”:R:T:C:G:I:C-T→F:Z-F→L:C+T→E:G-TI→Q:If T=O:Then Q+LI→H:Goto 0:Else If Z<F:Then Q+LI→H:Goto 0:Else If Z≤E:Then Q+LI+L2÷2÷R→H:Goto 0:LbI 0:H:If D=0:Then Goto I:Else Prog “I”:H+V→H:Goto I:LbI I:H:I:11.高程超高计算程序（I）程序名：IProg”I0”:W=1=> Goto 0:W=2=>Goto 1:LbI 0:If L=0:Then Abs(D)×M→V:Goto 2:Else Abs(D)×((N-M)×(Z-C)÷L+M)→V:Goto2:IfEnd:LbI 1:If L=0:Then Abs(D)×M→V:Goto 2:Else Abs(D)×(((3((Z-C)÷L)2-2((Z-C)÷L)∧(3))×(N-M))+M)→V:Goto 2:IfEnd:LbI 2:Abs(D)→E:V÷E→I:I(E-K)→V:12．数据子程序(附后示例)①程序名：X0（坐标计算要素程序）If Z≥25900 And Z≤26615.555:Then 25900→O:11587.421→U:1847.983→V:101。

9860公路测量实用程序6.0正式版使用说明QQ258062902 编程群2429110686.0版本和5.0版本比较：5.0版本自动根据缓和曲线长进行超高和加宽分配计算，操作简单，但是对于两圆公用一段缓和曲线的情况就无法处理。

6.0版本和其他新出的程序一样，根据前后特征桩号的加宽和超高值进行线性或者抛物线过渡，可以计算异坡，同坡或者反坡过渡。

但是数据输入比较麻烦，如果没有出现两圆公用一段缓和曲线的情况建议使用5.0版本。

一：免责声明程序仅供参考，任何因使用本程序造成的损失本人概不负责。

因本程序较为复杂，使用者需要一定的CASIO编程经验才能理解，对于初学者建议使其它软件。

参考了其它优秀的程序后，目前程序包含交点法，万能坐标转换程序以及线元法坐标计算程序，已经可以满足C型，卵形等复杂曲线的测量工作。

因本人没有做过高等级公路，所以目前专为低等级公路考虑，使用者掌握了使用方法后由能够快速，灵活，全面的完成测量作业，挡墙和涵洞可以在根据现场情况快速完成设计和测量作业，为测量工作节约了时间。

因程序中止容易误删代码，所以重要程序上锁敬请谅解。

在使用第一次使用本程序时请将list和listfile 文件一起拷贝到计算器，否则程序无法运行。

因本程序是由分段程序整合而来，所以和真正的全线程序在反算时有一定差别，在跨越不同交点段时用户应至少进行一次正算复核。

本程序所有输入和输出角度均为度分秒形式。

二：主程序符号说明普通的等完整过度曲线用户可以直接采用交点法计算,交点法操作简单直观，非常适合低等级公路的测量。

如果选遇到C型，卵形等非完整过度曲线时需要运行T程序进行交点参数修正，也可以直接运行线元法进行坐标计算。

但是线元法坐标计算参数输入太繁琐，且可计算范围仅为交点法的1/5，小半径曲线反算需要经常正算复核，否则极易出错，所以不建议采用，只是作为一种独立的复核程序使用。

A【交点法主程序】1-ZS,2-FS,3-CS (正算-1，反算-2)用户在第一次运行程序时必须先运行一次3-CS选中正确的项目，否则不能正确计算。

5800计算器公路三维全能程序5800计算器公路三维全能程序.(丢掉图纸轻松测量)说明清晰！请大家不要因为我的程序去买5800计算器了,建议买9860,我有时间了,就把这个程序改成9 860本程序比较复杂.测量原理不是很明白的朋友慎用请大家经常关注程序B-H的更新2009,5,10日修改见超高子程序B-H黄色部分,另超高数据库增加在超高缓和段输入超高为公路外侧超高说明2009，5，8日正反算选择程序：ZS-FS 更改小错，详见紫色修改内容2009,4,30日更改如下：把原来的４个子程序分解成５个子程序，解决了一个大的竖曲线不能包含几个超高变化段，另外程序内也有两处改变请看红色区域．本程序经过综合考虑５８００的设计缺陷，计算速度较慢故只使用高斯四节点法为计算内核．支持多条线路正反算,中桩,边桩高程计算,超高计算,超高缓和计算,加宽计算,加宽缓和计算,边坡开口线计算,挡土墙坡脚线计算，考虑了中间绿化带的影响，适用与国家高速公路至乡村四级公路计算和放样，路基路面工程可以直接得出中边桩的设计三维坐标，去掉加宽和超高影响的计算困难，边坡和坡脚线计算可直接在边坡上提取坐标带入程序，经过所有设计因素的综合，得出更改边距并显示修改偏差后的坐标．反算速度明显提高,只需要3秒.程序无错，可放心输入，另本程序可以增加隧道超欠挖计算子程序,非常方便,因为每个隧道的断面数据不一样,所以在此没有明确写出,有需要的可以联系我.本人QQ76805071,只为交友. 计算器主程序：ZHU-CHENG-XULbi0:“1，ZS=FS，2ZS，3FS，4XY＝＞SG，5。

”？U:U=1＝＞Prog”ZS-FS”:进入公路三维程序U=2＝＞Porg”ZS”:进入坐标正算程序U=3＝＞Porg”FS”:进入坐标反算程序U=4＝＞Porg”XY ＝＞SG”:进入大地坐标转施工坐标程序…………Goto0:说明：计算器总的主程序，进入选择各种分支计算程序。

fx-5800p平曲线超高、加宽计算程序主程序文件名：CGJK（意思：超高加宽）程序输入内容如下：Lbl 0:Cls:“ZH=”?C:“HZ=”?E: “(B÷2)=”？A: “i1=”？B: “iC=”？P:“JK=”?X: “Z-1,Y+1”?Z: “LS1=”?G: “LS2=”?N←┘Lbl 1:Cls:Do: “CD,＜0＝＞Return”?S:“SJBG=”?Y:If S＜0 Or S＞E:Then Goto 0:IfEnd←┘G=0＝＞Goto 5←┘N=0＝＞Goto 5←┘S＜C＝＞Goto 5←┘S＞E＝＞Goto 5←┘S＞C+G＝＞Goto 2←┘C+0.04G÷（B+P）→H：（S-C）÷G→L：L（B+P）-B→I：A+LX→J←┘If S＜H:Then -BJ→D:AI→F:Else -IJ→D:AI→F:IfEnd←┘Goto 4←┘Lbl 2:S＞E-N＝＞Goto 3←┘A+X→J:-P(A+X)→D:AP→F: Goto 4←┘Lbl 3:÷（B+P）→K:(E-S) ÷N→L:A+LX→J:L(B+P)-B→I←┘If S＜K:Then -IJ→D:AI→F:Else -BJ→D:AI→F:IfEnd←┘Goto 4←┘Lbl 4:If Z＜0:Then J→H:A→K:D→L:F→M: Goto 6: IfEnd←┘If Z＞0:Then A→H:J→K:F→L:D→M: Goto 6: IfEnd←┘Lbl 6: Cls←┘“ZK=”:Locate 4,1,H◢“YK=”:Locate 4,2,K◢“hZ=”:Locate 5,3,L◢“hY=”:Locate 5,4,M◢“HL=”:Y+L◢“HP=”:Y◢“HR=”:Y+M◢“iZ(%)=”:L÷H×100◢“iY(%)=”:M÷K×100◢Goto 1←┘说明：本程序适用于绕中轴旋转的一、二级公路，绕边轴旋转不适用，在三、四级公路上，有的设计也采纳Ⅱ类加宽，采纳Ⅱ类加宽可直接利用本程序计算加宽值，有的那么采纳Ⅰ类加宽，采纳Ⅰ类加宽的只需将Lbl 3中的A+LX→J改成A+（4L＾（3）-3L＾（4））X→J即可。

fx-4800公路超高及加宽计算一、平曲线加宽、超高程序符号A—路肩宽度 B—路面宽度 I0—路肩坡度 I1—路拱坡度IB—超高横坡 IX—路线纵坡，上坡为正，下坡为负 BJ—路面加宽值BJX—X距离处路面加宽值 W—未加宽前路面宽度 WS—待求定的路面加宽值M—加宽缓和段起点桩号 N—加宽缓和段终点桩号 HN—路基内缘与设计高之高差HW—路基外缘与设计高之高差超高及加宽计算⑴.功能及适用范围①.绕中轴旋转的超高及加宽计算。

②.绕中轴旋转的超高及加宽计算。

⑵.有关规定①.当线形设计须采用较长的回旋线时，横坡坡度由2%（或1.5%）过渡到0%路段的超高渐变率不小于1/330。

超高过渡应在回旋线全长范围内进行。

当超高渐变率太小时，超高的过渡可设在回旋线的某一区段范围之内。

②.路肩横坡：A、直线路段的路肩横坡可与行车道横坡相同。

B、曲线段的路肩横坡：当硬路肩宽度≥2.25米时，曲线外侧路肩横坡的方向及其坡度值见表1。

路肩横坡方向及其坡度值当硬路肩宽度＜2.25米时，曲线外侧路肩横坡的方向及其坡度值与行车道相同。

路肩横坡方向与坡度变化处应设过渡段，过渡段的渐变率规定见表2。

2路肩的横坡改变倾斜方向的旋转轴为路缘带外侧边缘。

⑶.程序清单：①.中轴旋转ZHONGK“I1”Z=0Goto 1：Goto 2Lb1 1I“I0”H“HP”=-（AI/100+BK/200Goto 9Lb1 2C“ZH”：J“IB”：S“LS”X=Abs（Q-C）F=0Goto 3：Goto 4Lb1 3D=-K/100+（K+J）*X/100*XH“HW”=D（A+B/2Goto 9Lb1 4W“BJ”L=2KS/100（（K+J）/100）M=0Goto 5：Goto 6Lb1 5G“BJX”X＜L Goto 7：Goto 8Lb1 6P=X/SG“BJX”=（4P^3-3P^4）X＜L Goto 7：Goto 8Lb1 7H“HN”=-（A+B/2+G）Goto 9Lb1 8H“HN”=-（A+B/2+G）Lb1 9符号意义操作符号及意义表3HP—直线、ZH（HZ）、ZY（YZ）点路基边缘与设计高之高差。