开发工具:
文件大小: 12kb
下载次数: 0
上传时间: 2015-11-17
详细说明： 本套程序含核心程序：要素数据库处理，要素计算，坐标计算，高程计算。扩展程序：坐标反算，边仰放样。 01、RESET 初始化程序 (独立运行) 02、DATLOCK 要素保护密码确定认程序 (被SET调用，可被任何需要密码保护的程序调用) 03、SHELL 外壳程序，各种功能调用 04、ZBJS 坐标计算程序 (被SET、TURNZH调用 05、TURNZH 坐标反算程序 (被SHELL、HXBYP、ZXBYP调用) 06、HXBYP 横向边仰坡放样程序 (被SHELL调用) 07、ZXBYP 纵向仰坡放样程序<隧道进口使用> (被SHELL调用) 08、SET 设置程序，平竖曲线交点要素设置 09、SETPFDYS 交点要素=>分段要素 (可独立运行,被SET调用) 10、READDAT 平曲线要素读取主程序 (被ZBJS调用) 11、READDAT1 内置数据库要素读取程序 (被READDAT调用，可直接ZBJS调用) 12、READDAT2 文件数据库要素读取程序 (被READDAT调用，可直接ZBJS调用) 13、READDAT3 实时输入要素及当前要素查看程序 (被READDAT调用，可直接ZBJS调用) 14、GCJS 高程计算程序 (被SHELL调用) 原程序见“5800道路工程程序终极版.txt" 1、编写RESET，编写完即运行，其它程序全部都先建立空文件请严格按本说明编写顺序编写程序。 2、编写READDAT及READDAT3,READDAT2 READDAT2 文件请输入内容为以下内容以便测试结果与本文一致。 π÷180→J Goto 1 Lbi 1 If G<30008.396:Then Cls:Stop:IfEnd↙ ;判断待求桩号是否小于本要素起点，如小于就停止运行程序 If G<30661.038:Then 2851422.090→N:513896.440→E:30008.396→M:213°32′52″J→H:0→A:0→R:652.642→L:Goto E:IfEnd↙ If G<30921.038:Then 2850878.162→N:513535.768→E:30661.038→M:213°32′52″J→H:0→A:1÷1300→R:260→L:Goto E:IfEnd↙ If G<31426.367:Then 2850666.478→N:513385.004→E:30921.038→M:219°16′39″J→H:1÷1300→A:1÷1300→R:505.328→L:Goto E:IfEnd↙ If G<31686.367:Then 2850346.483→N:512998.015→E:31426.367→M:241°32′56″J→H:1÷1300→A:0→R:260→L:Goto E:IfEnd↙ If G>31686.367:Then Cls:Stop:IfEnd↙ ;判断待求桩号是否大于本要素终点，如大于就停止运行程序 Lbi E N→Z[C+23] E→Z[C+24] M→Z[C+25] H→[C+26] A→Z[C+27] R→Z[C+28] L→Z[C+29] ...展开收缩
(系统自动生成,下载前可以参看下载内容)
下载文件列表
相关说明
- 本站资源为会员上传分享交流与学习,如有侵犯您的权益,请联系我们删除.
- 本站是交换下载平台，提供交流渠道，下载内容来自于网络，除下载问题外，其它问题请自行百度。
- 本站已设置防盗链，请勿用迅雷、QQ旋风等多线程下载软件下载资源，下载后用WinRAR最新版进行解压.
- 如果您发现内容无法下载，请稍后再次尝试；或者到消费记录里找到下载记录反馈给我们.
- 下载后发现下载的内容跟说明不相乎，请到消费记录里找到下载记录反馈给我们，经确认后退回积分.
- 如下载前有疑问，可以通过点击"提供者"的名字，查看对方的联系方式，联系对方咨询.
