预览加载中,请您耐心等待几秒...
1/5
2/5
3/5
4/5
5/5

在线预览结束,喜欢就下载吧,查找使用更方便

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

CASIOfx-5800P不对称基本曲线交点法正反算程序 CASIOfx-5800 摘要:在铁路、公路、隧道、市政等工程设计和施工中,常常涉及到曲线线路坐标的计算,竖曲线高程计算,在现场测量一般方法是借助于CASIOfx-4500p、CASIOfx-4800p、CASIOfx-5800p计算器或更先进一些的SHARPPC-E500计算机等工具进行计算。本文作者通过不断摸索和实践,利用CASIOfx-5800p采用交点法编程,不对称基本曲线正反算、及高程全线贯通、缓和曲线加宽、缓和曲线超高、线路法向方位角、曲线左右边桩坐标的计算,而且具非常简洁直观、易于掌握使用、计算过程快速、计算结果准确无误等特点。目前我国计算器已得到普及,计算器已广泛应用于工程设计、施工的各个环节甚至于外业工作,所以本程序具有较大的推广意义。 1、概述:随着科学技术的不断进步,人们的思维方式和工作方法发生着巨大的变化。笔者在从事多年的铁路、桥梁、隧道、高速公路、市政桥梁等类型工程施工技术工作中,总是尝试将先进的科学工具运用于工程施工技术及工程计算中以提高工作效率和质量。笔者先后采用过CASIOfx-4500p、CASIOfx-4800p、CASIOfx-4850p、CASIOfx-5800p、编写程序用于曲线坐标计算,应该说逐渐走向完善和先进,一个复杂程序编写工作量相当大,还需要经过较长时间的测试和调试方能使用,在施工测量过程中为提高工作效益,避免在测量施工过程中发生错误,根据工程项目设计名称将该工程桥墩里程、路基断面里程、涵洞里程、以及工程项目所有的工程创建多个数据库,测量施工采用数据库文件进行测量施工,减少在测量施工发生的错误。怎样才能从繁琐、枯燥的数学计算中解脱出来?笔者想到了借助于、CASIOfx-5800p进行此项工作,相比较而言,较为简单实用。采用、CASIOfx-5800p计算方法很好地解决了以上问题,及操作简单的特点,不需要进行繁杂的程序编写工作,仅仅利用计算器引用及本身强大的计算器功能和简单数学公式就完全满足各种使用要求。利用其简单的编程操作,可方便地进行原始数据的计算结果及测量施工使用,即使对计算器及应用了解不多的人员也能很快理解和使用。 文件名QDSJK Lb10 S:?S IfS=1:Then66690.14→S:2.2→Z:90→E:IfEnd IfS=2:Then66730.74→S:2.2→Z:90→E:IfEnd IfS=3:Then66786.74→S:2.2→Z:90→E:IfEnd IfS=4:Then66827.34→S:2.2→Z:90→E:IfEnd IfS=5:Then66860.15→S:2.2→Z:90→E:IfEnd IfS=6:Then66892.87→S:2.2→Z:90→E:IfEnd Prog‖XLZB-ZS‖ 2、根据线路设计创建曲线要素数据库,可以进全线贯通,在线路设计时有可能存在长短链,入有长短链时,请注意在输入P时要输入断链里程 文件名:曲线参数QXCS IfS>63700:Then2800→R:17°39′30″→W:200→C:200→V:249°11′43.6″→G:495095.43→A:456338.51→B:65860.2307→T:-1→F:IfEnd IfP>66600:Then2200→R:11°58′49″→W:260→C:260→V:231°32′14.0″→G:495879.32→A:457325.31→B:67113.4157→T:-1→F:IfEnd IfS>67500:Then2200→R:27°27′03″→W:250→C:250→V:219°33′25.0″→G:494120.62→A:455533.31→B:67375.8519→T:-1→F:IfEnd IfS>69200:Then2200→R:15°50′37″→W:250→C:250→V:192°06′21,8″→G:492650.54→A:455217.99→B:69858.1700→T:-1→F:IfEnd 参数说明: R曲线半径、 W曲线转角、 C第一段缓和线长、 V第二段缓和曲长、 G曲线起点至交点的方位角、 A交点X坐标、 B交点Y坐标、 T交点里程、 F判定曲线转向左转-1、右转1。 主程序文件名:圆曲线坐标-正算-反算 YQXZB-ZS-FS ″1=ZS,2=FS,3=CG″?N输入1进行坐标正算,输入2进行里程反算 IfN=1:ThenProg″XLZB-ZS″:IfEnd IfN=2:ThenProg″XLLC-FS″:IfEnd IfN=3:ThenR:?R:W:?W:C:?C:V:?V:G:?G:A:?A:B:?B:T:?T:F:?F:Prog″XLZB-ZS″:IfEn