式由一段直线段→缓和曲线段→圆曲线段→缓和曲线段→缓和曲线段→圆曲线段连接起来的。值得注意的是,在位于K0+248.491处,是两段反向的缓和曲线连接点,在编写数据程序文件时,分三段编写,第一段从K0+000到K0+203.366,第二段从K0+203.366到K0+248.919,第三段从K0+248.919到线路终点K0+331.13。具体文件如下:(文件名“EZD”)Р3→DimZ:X0”?A:”Y0”?B:“Ln”?L:Abs(L)-Int(Abs(1000L))/1000→Z[3]:Lbl 0:If Z[3]≠0.0001: Then ?L: Else “Xp”?X:”Yp”?Y:X→Z[1]:Y→Z[2]:IfEnd:Lbl 1:If L≥0 :Then 494381.6316→X:477847.870→Y:200→R:90°08°44.6°→W:120→P:60.07→I: 143.296→J:IfEnd: If L≥203.366:Then 494372.527→X:477948.932→Y:200→R:107°21°16.3°→W:-95→P:60.07→I: 203.366→J:IfEnd: If L≥248.491:Then 494337.373→X:478010.658→Y:86.75→R:92°24°19°→W:75→P:17.8→I: 313.333→J:IfEnd: Prog”FDCH”: Prog“XLJS”:If Z[3]≠0.0001:Then Goto 0:Else (Z[1]-X)cos(O)+(Z[2]¬-Y)sin(O)→N:L+N→L:Int(1000L)÷1000+0.0001→L:-(Z[1]-X)sin(O)+(Z[2]-Y)cos(O)→K:If Abs(N)≥0.001:Then Goto 1:Else “L=“:L◢
全文预览
