韩版女装货源网:CASIO4850 公路高程计算程序修改
来源:百度文库 编辑:九乡新闻网 时间:2024/03/29 06:20:25
5 Lbl A
6 {L}:L"DKI" (待放样点的桩号)
8 Prog “S”
9 Prog “SQX”
10 Prog“P”
11 Prog“PQX”
12 “HO=”:Z◢ (显示纵断中桩设计值)
13 "HZ="O:◢ (显示横断左边桩设计值)
15 "HY="P:◢ (显示横断右边桩设计值)
16 Lbl B:{KM}:K=0=>Goto A⊿Y"HSGC":V"HSDS":M"QSDS"≤0=>{YV}:Goto B ⊿ 17 "Hn=":N=Y+V-M◢ (测量点的实际高程) 18 D≤0.75=>"E(HO=":W=Z-N◢ (中桩设计与实际高程之差,负挖正填,下同) 18 Goto A⊿K=-1=>"E(HZ=":W=O-N◢ (左边桩设计与实际高程之差)
19 Goto A⊿K=1=>"E(HY=":W=P-N◢ (右边桩设计与实际高程之差) 20 Goto A ⊿
SQX(主程序2)
1 T=Abs((I-J)R÷2):R=R((I-J)÷Abs(I-J)):N=A-T
2 W=A+T
3 U=Abs (A-L)
4 L≤N=>Z=H-JU-X"H0":Goto 1 ⊿ (H0表示一个合适的值,如路面到路基顶部的高度等,下同)
5 L≤A=>Z=H-JU+(L-N)2÷(2R)-X"H0":Goto 1 ⊿
6 L≤W=>Z=H+IU+(W-L)2÷(2R)-X"H0":Goto 1 ⊿
7 L>W=>Z=H+IU -X"H0"⊿
8 Lbl 1
1 L≤S=>E=0.02:G=E:Goto 1 ⊿
2 L≤(S+B)=>E=0.02-(L-S)÷B×(0.02+C):G= -E:Abs (E) ≤0.02=>G=0.02: ⊿Goto 1:⊿
3 L≤(S+Q-B)=>E= -C:G= -E:Goto 1 ⊿
4 L≤(S+Q)=>E=0.02-(S+Q-L)÷B×(0.02+C):G= -E:Abs (E) ≤0.02=>G=0.02: ⊿Goto 1:⊿
5 L>(S+Q)=>E=0.02:G=E⊿
6 Lbl 1
7 {D} :T=D-0.75:F=1=>"EZ="E ◢ "EY=":G ◢ (0.75表示中央分隔带为0.75*2=1.5米,D为输入边桩距中桩距离) 8 O=Z-TE:P=Z-TG:≠>F=-1=>"EZ="G◢ G:"EY=":E◢ 9 O=Z-TG:P=Z-TE⊿⊿
S(子程序1,竖曲线引导程序)
1 L ≤145788.038(竖曲线终点桩号)=>R=40000(竖曲线半径):A=145600(竖曲线中心桩号):H=411.313(变坡点高程):J=0.0049(变坡点前纵坡):I=-0.0045(变坡点后纵坡):Goto 1: ⊿
***************
n L ≤145788.038(公路终点桩号)=>R=40000(竖曲线半径):A=145600(竖曲线中心桩号):H=411.313(变坡点高程):J=0.0049(变坡点前纵坡):I=-0.0045(变坡点后纵坡):Goto 1: ⊿
2 Lbl 1
P(子程序2 ,平曲线引导程序)
1 L ≤146999.541(平曲线超高终点桩号)=>B=120(超高缓和曲线长度):Q=612.094(超高曲线全长度):C=0.03(超高值):F=1(平曲线参数,左转=-1,右转=1):S=146387.447(超高缓和起点桩号):Goto 1: ⊿
***************
n L ≤146999.541(平曲线公路终点桩号)=>B=120(超高缓和曲线长度):Q=612.094(超高曲线全长度):C=0.03(超高值):F=1(平曲线参数,左转=-1,右转=1):S=146387.447(超高缓和起点桩号):Goto 1: ⊿
2 Lbl 1 -----------------------------------------------------------------------------------------------------
(一):三次抛物线超高公式: 前缓和曲线:K=(L-S)÷B 后缓和曲线:K=(S+Q-L)÷B E=e-(e+c)(3K2-2K3) 其中:E为待求断面横坡值; L为待放样点的桩号; S为超高起点桩号; Q为超高曲线总长; B为超高缓和曲线长度; e为超高起点横坡值; c为超高终点横坡值. --------------------------------------------------------------------------------------------------- (二):线性超高公式: 前段缓和曲线超高公式:E=0.02-(L-S)÷B×(0.02+C): 后段缓和曲线超高公式:E=0.02-(S+Q-L)÷B×(0.02+C): C为最大超高值. ------------------------------------------------------------