计算器程序及使用说明

《计算器程序及使用说明》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、1．公路铁路任意线型单元路线中桩边桩坐标及放样极坐标的通用计算程序(ZHYDLDYZBJS)作者：琚新涛QQ：25425579一、线路中线的线型分析公路铁路线路按照线型分类，可分为直线、圆曲线线路和曲线线路。一般情况下，缓和曲线是连接直线与圆曲线的过渡性曲线，该缓和曲线称为完全的缓和曲线。在特殊的情况下（公路立交匝道），截取完全缓和曲线上的一段，其两端外连接两个不等半径的圆曲线，即将一个半径逐渐过渡到另一半径，这种缓和曲线称为不完全缓和曲线。所以，缓和曲线分为完全的缓和曲线和不完全的缓和曲线两种。那么，一条很长的公路铁路线路可划分为一个一个单一线型的线路

2、单元。即直线单元，圆曲线单元，完全缓和曲线单元和不完全缓和曲线单元。各类线型线路单元具有各自不同的几何性质，直线单元式半径无穷大而曲率为零且始终保持不变的线型。圆曲线单元是始终保持某一半径和相应曲率不变的线型。缓和曲线单元是半径和曲率都处处不等且均匀渐变的线型，即半径和曲率随线路中线点位呈线性变化。完全缓和曲线单元是将直线的零曲率均匀渐变到另一半径圆曲线曲率的线型，不完全缓和曲线单元是将某一半径圆曲线曲率均匀渐变到另一半径圆曲线曲率的线型。于此可见，不完全缓和曲线路线是所有线型线路单元中最一般的线型单元。LbID:Fix3:Deg:“GTLZHYZBZF

3、YJS”:”CZDZB第21页共21页N(X)=”?R:”CZDZBE(Y)=”?S:”DYQDZBN(X)=”?A:”DYQDZBE(Y)=”?B:”DYQDBJ(R1)=”?T:”DYQDLC(L1)=”?D:”DYQDQXFWJ=”?E:”DYZDBJ(R2)=”?U:”DYZDLC(L2)=”?G:”DYQD—ZDQXZX(Z=-1,Y=+1)=”?WWT→C:WU→F:0→I:0→J:(C-F)÷(2CF(G-D))→HLbIA:”FYDDYZZLC=”?O：IFO=-1:ThenGotoC:IfEnd:IfO＜D:ThenGotoB:IfEn

4、dIFO＞G:ThenGotoB:IfEnd“ZZ-BZFXJ(Z-,Y+)=”?P:”ZZ-BZPJ=”?Q:E+((O-D)÷C+H(O-D)2)r→V:IfV＜0:ThenV+360→V:IfEndIfV≥360:ThenV-360→V:IfEnd“ZZDQXFWJ=”:V▶DMS◢Rad:A+∫(cos(E。+(X-D)÷C+H(X-D)2),D,O)→ZB+∫(Sin(E。+(X-D)÷C+H(X-D)2),D,O)→Y“FYDZBN(X)=”:Z+I→Z:Z◢“FYDZBE(Y)=”:Y+J→Y:Y◢Pol(Z-R,Y-S)IfJ＜0:The

5、nJ+360→J:IfEndIfJ≥360:ThenJ-360→J:IfEnd“CZD-FYDFWJ=”:J▶DMS◢“CZD-FYDPJ=”:I◢第21页共21页“＋－×÷END＋－×÷”:GotoA:LbiB:”CHAOCHUDANYUANFANWEI”:GotoA:LbiC:”DANYUANFANGYANGJIESHU”:GotoD三，注意事项：上面程序适用于直线、圆曲线、完全缓和曲线和不完全缓和曲线的各类型的计算。所以，该程序适用于铁路、公路任何线型线路单元的中桩切线方位角和中、边桩坐标计算的通用公式。实际使用上述程序时，还应注意一下几点：1.若

6、计算直线单元时，则起终点的半径均为正的无穷大（取Ra=Rb=1×1010）;2.若计算圆曲线单元时，则起、终点的半径均等于其圆曲线的半径（Ra=Rb=R）;3.若计算完全缓和曲线单元时，则与直线相连接的一端，其半径为无穷大（取R=1×1010）；与圆曲线相连接的一端，其半径为所连接的圆曲线半径；4.若计算不完全缓和曲线单元时，则起终点半径分别为其两端所连接的圆曲线半径；5.若用于曲线单元的计算，则由线路单元的起点向终点方向确定曲线的左、右转向6.一般情况下，线路单元的起终点是顺里程方向确定的，即起点里程小于终点里程，其起终点和单元任一待求中桩点的里程均为

7、正数（LA、LB、第21页共21页Li均为正）。若线路单元的起终点是???绿里程方向确定的，即起点里程大于终点大于终点里程，则其起、终点和单元上任一待求中桩点的里程均为负数（LA、LB、Li均为负），且起点切线方位角，线路的左、右转向及线路的左、右边均与上述相反。四，计算器屏幕字符提示说明1.输入已知数据的提示GTLZHYZBZFYJS(提示公路铁路直缓圆中边桩放样计算的程序已启动)CZDZBN(X)=?(提示输入测站点坐标N(X))CZDZBN(X)=?(提示输入测站点坐标E(Y))DYQDZBN(X)=?(提示输入单元起点坐标N(X))DYQDZBE

8、(Y)=?(提示输入单元起点坐标E(Y))DYQDBJ(R1)=?(提示输入单元