5800P竖曲线计算程序

来源：爱go旅游网

5800P竖曲线主程序

1、竖曲线主程序: 1-E.BGLbl 1：Fix3:？K:Prog\"Z.EBG\":RIf D-C>θ:Then1→W:Else-1→W:IfendIf

KI:IfendAbs (A-K)→L

If L-T>θ:ThenZ+IL→H:\"BZ=\":H◢

Goto1:ElseZ+IL+W(T-L)2/2/R→

H:\"HS=\":H◢

Lbl 0：\"H\"?O:\"ZHONG=﹥

B\"?N:\"HP\"?J:H-O+(N-0.75)J-﹥

B:\"HB=\"

Goto 1

2.曲线数据库:Z.EBG

K<332.599:Then0.02793→C:-0.03309→

D:1800→R:235→

A:32.7→Z:If

K<734.085:Then-0.03309→C:-0.00485→

D:6000→R:460→

A:25.25----Lbl 1

C—前坡:D—后坡:R—半径：A—变坡点:Z—变坡点设计高程O—从设计高程点处垂直向下的距离:N—距设计高程处的平距(若你的设计高程线是路中线的话，请把0.75改为0):J—所求桩号处的横坡.

2016,9,28

因篇幅问题不能全部显示，请点此查看更多更全内容

查看全文