下载此文档

5800高程程序,中桩、左右边桩高程显示在同一屏,支持超高,可以减去结构层厚度.docx

文档分类：建筑/环境 | 页数：约4页举报非法文档有奖

1/4

下载提示

1.该资料是网友上传的，本站提供全文预览，预览什么样，下载就什么样。
2.下载该文档所得收入归上传者、原创者。
3.下载的文档，不会出现我们的网址水印。

同意并开始全文预览

(约 1-6 秒)

1/4 下载此文档

文档列表 文档介绍

卡西欧5800--高程计算程序
I三
1=1
本人根据王中伟程序修改，加进了计算边桩功能，加了计算超高功能，加了
减去结构层厚度功能）
1•主程序(ZDM)
第 1 行：ClsStat : ClrMemory : FWF : Then变坡点桩号〜C:变坡点标高 -D:纵坡-I:下一个竖曲线的纵坡-J:凸（凹）曲线半径fR : Return : IfEnd/
F-S :下一个竖曲线的起点桩号-F : If K > S And KWF : Then变坡点桩号-C :变坡点标高 -D :纵坡-I :下一个竖曲线的纵坡-J :凸（凹）曲线半径-R : Return : IfEnd/
第 1 行：O — S: — F: If K^S And K^F:Then — C: — D: 0— I: 1. 4545
J: 5500- R:Return:IfEnd /
第 2 行：F — S : — F: If K > S And KWF:Then — C: — D: — I: -- J: - R:Return:IfEnd /
第 3 行：F — S : — F: If K > S And KWF:Then — C: — D: - — I: — J: — R:Return:IfEnd/
第 4 行：F — S : 1050 — F: If K > S And KWF:Then — C: — D: — I: -— J: 3000— R:Return:IfEnd /
第 5 行：F — S : — F: If K > S And KWF:Then 1155 — C: — — D: — — I: — J: 3000— R:Return:IfEnd /
第 5 行：F — S : — F: If K > S And KWF:Then — C: — D: — I: —— J: 3000— R:Return:IfEnd /
第 5 行：F — S : — F: If K > S And KWF:Then — C: — D: —
I: — J: — R:Return:IfEnd /
第 5 行：F — S : — F: If K > S And KWF:Then — C: — D: 1. 6364 — I: —— J: — R:Return:IfEnd /
第 5 行：F — S : — F: If K > S And K^F:Then — C: — D: — — I: 0— J: — R:Return:IfEnd /
第 6 行：If K < O Or K > F:Then Cls:Locate 5,2, “KP

5800高程程序,中桩、左右边桩高程显示在同一屏,支持超高,可以减去结构层厚度来自淘豆网www.taodocs.com转载请标明出处.