任意主线.doc

任意主线、匝道中边桩坐标及高程（4800、4850）正反算计算程序附件(点击下载)：任意主线、匝道中边桩坐标及高程（4800、4850）正反算计算程序1.主程序TYQXJSDefm10：Lbl 0:“1.LC=XY”: “2.XY=LC”: V:V=1=GOTO 1: GOTO 2 Lbl 1: DZG:D:Z”JL=”:G”J=”:Z=0=G=0：Prog “QXYS”: Prog “ZSZB” : ”X=”：X ”Y=”：YJ360=J=J-360:JJ=J+360:FWJ=：JDMSHU：H“XC”：U“YC”：I=0：J=0：Pol（X-H，Y-U）：J GOTO 0 : GOTO 1 Lbl 1: Z= (I-Y)cosJ-(M-X) sinJ: 4. SQX高程计算子程序Prog“SB”：W=Z1Z2:W0=Z61：Z61Z3：T“T”Abs(Z3W/2) ：E“E”=T22Z3：C=D-Z4：DZ4=Z7=Z1：Z7=Z2Z5：AbsCT= “H0”: Z8=Z5+CZ7+Z6(T- Abs C)22Z3 “H0”: Z8=Z5+CZ7 5、曲线元要素数据库：QXYSDF=DK= F=*:A=*:B=*:C=*:R=*:K=*E=*DF=DK= F=*:A=*:B=*:C=*:R=*:K=*E=*DF=DK= F=*:A=*:B=*:C=*:R=*:K=*E=*DF=DK= F=*:A=*:B=*:C=*:R=*:K=*E=*DF=DK= F=*:A=*:B=*:C=*:R=*:K=*E=* DF=DK= F=*:A=*:B=*:C=*:R=*:K=*E=* (注：如有多个曲线元要素继续添加入数据库QXYS中)6、SB竖曲线数据库D竖曲线起点里程=Z1=？：Z2=？：Z3=？：Z4=？：Z5=？D？=Z1=？：Z2=？：Z3=？：附注： 1、D所求的桩号：Z1=坡度1:Z2=坡度2：Z3=半径：Z4=交点桩号：Z5=变坡点控制高程： 2、注意Z1、Z2的正负。 3、本程序可以计算上百公里的路线中桩高程。 4、若只有一个竖曲线时，则把竖曲线起点前一直线视为一段竖曲线，则半径输入10的45次方，竖曲线起点里程为直线上的起点里程，交点里程为直线中点里程。变量说明：F.起点里程 A.起点X坐标 B.起点Y坐标 C.起点方位角R.起点半径 K.终点里程 E.终点半径 D.计算点里程G输入左右（左-，零，右+）角度 Z.中桩到边桩的距离注意：1:计算中桩坐标 J,JL 等于零。 2：这里的方位角从C是指 线元起点的方位角例如：（ZY , YZ , ZH , HY , YZ）每个点都是 起点 所以特别注意1、规定(1) 以道路中线的前进方向（即里程增大的方向）区分左右；当线元往左偏时，半径负半径；当线元往右偏时,半径=半径；当线元为直线时，半径=以10的45次代替。(2) 当所求点位于中线时，Z,J=0；当位于中线左侧时，J取负值；当位于中线右侧时，J取正值。(3) 当线元为直线时，其起点、止点的曲率半径为无穷大，以10的45次代替。(4) 当线元为圆曲线时，无论其起点、止点与什么线元相接，其曲率半径均等于圆弧的半径。(5) 当线元为完整缓和曲线时，起点与直线相接时，曲率半径为无穷大，以10的45次代替；与圆曲线相接时，曲率半径等于圆曲线的半径。止点与直线相接时，曲率半径为无穷大，以10的45次代替；与圆曲线相接时，曲率半径等于圆曲线的半径。(6) 当线元为非完整缓和曲线时，起点与直线相接时，曲率半径等于设计规定的值；与圆曲线相接时，曲率半径等于圆曲线的半径。止点与直线相接时，曲率半径等于设计规定的值；与圆曲线相接时，曲率半径等于圆曲线的半径。2、输入与显示说明 V=1的时候JL ？正算时所求点距中线的边距(在中线上取零)J？ 边桩时左右边桩连线与线路前进中线的交角线元左右偏标志 (左偏J= -1*角度，右偏J=角度，直线段J=0) 角度 X=正算时，计算得出的所求点的X坐标 Y=正算时，计算得出的所求点的Y坐标FWJ=* 计算得出所求点的切线方位角 FW=*计算得出置镜点到测点方位角 H0=*计算得出所求点的线路中线设计标高V=2的时候XO=所求点的X坐标 YO=所求点的Y坐标D=* 求点所对应的里程JL=*求点到所对应的里程的距离：负就是左边，正就是右边 若果采用4800则把程序中Lbl 1: DZG:D:Z”JL=”:G”J=”:Z=0=G=0：Prog “QXYS”;Prog “ZSZB” : ”X=”：X ”Y=”：YFWJ=：JDMSHU：H“XC”：U“YC”：I=0：J=0：Pol（X-H，Y-U）：JZ61：Z61Z3：T“T”Abs(Z3W/2) ：E“E”=T22Z3：C=D-Z4：DZ4=Z7=Z1：Z7=Z2Z5：AbsCT= “H0”: Z8=Z5+CZ7+Z6(T- Abs C)22Z3 “H0”: Z8=Z5+CZ7 上面红色部分修改为Lbl 1: DZG:D:Z”JL=”:G”J=”:Z=0=G=0：Prog “QXYS”;Prog “ZSZB” :X ”X=”Y ”Y=”JFWJ=HU：H“XC”：U“YC”：I=0：J=0：Pol（X-H，Y-U）：JZ61：Z61Z3：T“T”Abs(Z3W/2) ：E“E”=T22Z3：C=D-Z4：DZ4=Z7=Z1：Z7=Z2Z5：AbsCT= Z8 “H0” =Z5+CZ7+Z6(T- Abs C)22Z3 Z8 “H0”=Z5+CZ7 后附数据库设置实例：QD0+000(X=14542.335,Y=76706.272)方位角2724452.1ZD0+980(X=14197.34,Y=75947.109) JD1 0+356.172(X=14559.41,Y=76350.51) 左转角234737.65R=400 方位角2485714.45ZH k0+231.774X=14553.446,Y=76474.764 方向角2724452.10 HY K0+311.774X=14554.616,Y=76394.808 方向角26715.62YH K0+397.886X=14540.95 ,Y=76309.956 方向角2544100.93HZ K0+477.886X=14514.736,Y=76234.410 方向角2485714.45JD2 K0+713.762(X=14430.03,Y=76014.27) 左转角211342.58R=280 方位2274331.87ZY K0+661.289X=14448.873,Y=76063.241 方向角2485714.45YZ K0+765.031X=14394.732,Y=75975.443方向角2274331.87JD3 K0+838.814(X=14345.1,Y=75920.85) 左转角574809.65R=85 方位角1695522.22ZH K0+771.493X=14390.385,Y=75970.662 方向角2274331.87HY K0+811.493X=14361.314,Y=75943.330 方向角2141438.97YH K0+857.245X=14318.53, Y=75928.745 方向角1832415.12HZ K0+897.245X=14278.818,Y=75932.629方向角1695522.22QXYSD0=D231.774= F=0:A=14542.335:B=76706.272:C=2724452.10:R=1045:K=231.774:E= 1045D231.774=D311.774= F=231.774:A=14553.446:B=76474.765: C=2724452.10:R= 1045:K=311.774：E=-400D311.774=D397.886= F=311.774:A=14554.616:B=76394.809: C=26715.62:R=-400:K=397.886：E=-400D397.886=D477.886= F=397.886:A=14540.95:B=76309.956:C=2544100.93:R=-400:K=477.886：E= 1045D477.886=D661.289= F=477.886:A=14514.737:B=76234.411:C=2485714.45:R= 1045:K=661.289：E=1045D661.289=D765.031= F=616.289:A=14448.874:B=76063.243:C=2485714.45:R=-280:K=765.031：E=-280D765.031=D771.493= F=765.031:A=14394.732:B=75975.444:C=2274331.87:R= 1045:K=771.493：E= 1045D771.493=D811.493= F=771.493:A=14390.385:B=75970.662:C=2274331.87:R=1045:K=811.493：E=-85D811.493=D857.245= F=811.493:A=14361.315:B=75943.331:C=2141438.97:R=-85:K=857.245：E=-85D857.245=D897.245= F=857.245:A=14318.53:B=75928.746:C=1832415.12:R=-85:K=897.245:E= 1045D897.245=D980= F=897.245:A=14278.818:B=75932.63:C=1695522.22:R= 1045:K=980:E= 1045竖曲线数据变坡点K0+160控制点高程29.6R=10000 T=45.624E=0.104 上坡0.944% 上坡0.031%变坡点K0+480控制点高程29.7R=10000 T=56.918E=0.162 上坡0.031% 下坡1.107% 变坡点K0+620控制点高程28.15R=18000 T=53.877E=0.0.081 下坡1.107% 下坡0.508%变坡点K0+797控制点高程27.25R=8000 T=71.485E=0.319 下坡0.508% 上坡1.279%SBD0=Z1=0.00944：Z2=0.00944：Z3=1045：Z4=57.188：Z