casio5800隧道断面放样程序全线型

casio5800隧道断面放样程序全线型

ID:8928217

大小:31.50 KB

页数:3页

时间:2018-04-12

casio5800隧道断面放样程序全线型_第1页
casio5800隧道断面放样程序全线型_第2页
casio5800隧道断面放样程序全线型_第3页
资源描述:

《casio5800隧道断面放样程序全线型》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、CASIO5800隧道断面放样程序ZS(正算)Lb11:fix4:?S:?Z:prog“PM-SJ”:Abs(S-O)→W:Prog“SUB3”:“XS=”:X◢“YS=”:Y◢F-90→F:“F=”:F▶DMS◢Goto1FS(反算)Lb11:fix4:?S:?X:?Y:prog“PM-SJ”:X→I:Y→J:Prog“SUB4”:“S=”:O+W→S◢“Z=”:Z◢Prog“GCJS”:?R:“H=”?F:Prog“SD3XY”◢Goto1SD3XY(断面放样)IFF≤H+1.5:Then“W1=”:√((H+1.5-F)

2、^2+(Z+4.3)^2)-R◢IFEND:IFF>H+1.5:Then“W2=”:√((F-H-1.5)^2+(Z+4.3)^2)-R◢SUB31÷P→C:(P-R)÷(2HPR)→D:180÷π→E:0.1739274226→A:0.3260725774→B:0.0694318442→K:0.3300094782→L:1-L→F:1-K→M:U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW(C+FWD))+Acos(G+QEMW(C+MWD)))→X:V+W(A

3、sin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD))+Asin(G+QEMW(C+MWD)))→Y:G+QEW(C+WD)+90→F:X+ZcosF→X:Y+Zsin(F)→YSUB4G-90→T:Abs((Y-V)cos(T)-(X-U)sin(T))→W:0→Z:Lb10:Prog“SUB3”:T+QEW(C+WD)→L:(J-Y)cosL-(I-X)sinL→Z:ifAbsZ<1E-6:thenGoto1:ElssW+Z→W:Goto0:IfendLb11:

4、0→Z:Prog“SUB3”:(J-Y)÷sinF→ZPM-SJ(平面数据库)IfS≧500(线元起点里程)AndS<769.256(线元止点里程):Then19942.837→U(线元起点X坐标):28343.561→V(线元起点Y坐标):500→O(线元起点里程):125°16′31″→G(线元起点方位角):269.265→H(线元长度):10^45→P(线元起点半径):1000→R(线元止点半径):-1→Q(线元左右偏:左偏-1;右偏+1;直线0):ifendIfS≧769.256(线元起点里程)AndS<902.457

5、(线元止点里程):Then19946.866→U(线元起点X坐标):28349.009→V(线元起点Y坐标):769.256→O(线元起点里程):125°16′31″→G(线元起点方位角):133.201→H(线元长度):1000→P(线元起点半径):10^45→R(线元止点半径):-1→Q(线元左右偏:左偏-1;右偏+1;直线0):ifendGCJS(左线高程计算)?S:S→K:“H=”:K≤49800AndK>49572.5=>760.720-(49800-K)*0.03-(227.5-(49800-K))^2÷(2*35

6、000)→H◢K>49800AndK≦50027.5=>760.720+(K-49800)*0.017-(227.5-(K-49800))^2÷(2*35000)→H◢三、使用说明“SD3XY”程序中1.5为线路纵面设计高至圆心高度,4.3为线路平面设计线至隧道中线的距离,本程序为单心圆计算程序,如为多心圆可按语句格式添加语句即可。“GCJS”程序中的计算原理为将竖曲线分为前后两部分,按照数学公式计算。1、规定        (1)以道路中线的前进方向(即里程增大的方向)区分左右;当线元往左偏时,Q=-1;当线元往右偏时,Q=

7、1;当线元为直线时,Q=0。        (2)当所求点位于中线时,Z=0;当位于中线左铡时,Z取负值;当位于中线中线右侧时,Z取正值。        (3)当线元为直线时,其起点、止点的曲率半径为无穷大,以10的45次代替。        (4)当线元为圆曲线时,无论其起点、止点与什么线元相接,其曲率半径均等于圆弧的半径。        (5)当线元为完整缓和曲线时,起点与直线相接时,曲率半径为无穷大,以10的45次代替;与圆曲线相接时,曲率半径等于圆曲线的半径。止点与直线相接时,曲率半径为无穷大,以10的45次代替;与圆

8、曲线相接时,曲率半径等于圆曲线的半径。        (6)当线元为非完整缓和曲线时,起点与直线相接时,曲率半径等于设计规定的值;与圆曲线相接时,曲率半径等于圆曲线的半径。止点与直线相接时,曲率半径等于设计规定的值;与圆曲线相接时,曲率半径等于圆曲线的半径。2、输入与显示说明

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。