注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

高望晴岚

明天会更好!

 
 
 

日志

 
 

最简单的单交点高程CASIO5800程序  

2014-09-11 14:26:48|  分类: 测绘 测量 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

最简单的单交点高程CASIO5800程序

支持步长自动增加,支持扣除结构层路面

2?DimZ:Fix4 :"K(JD)"?C:"H(JD)"?G:

"R"?R:"I1"?I:"I2"?N:N-I?A:A÷Abs(A)?W:

R*Abs(A÷2)?T:"KM=>TEP"?U:U?Z[1]:Do:

Z[1]+Z[2]?Z:"KP"?Z:Z=-1=>Stop:Z?Z[2]:

If Z≦C-T:Then G-I(C-Z)?H:Goto 2:IfEnd:

If Z≦C+T:Then G-I(C-Z)+(C-Z-T)2÷(2RW)?H:

Goto 2:IfEnd:

If Z>C+T:Then G-N(C-Z)?H:Goto 2:IfEnd:

Lbl 2:0.6?Q:"=>LOW"?Q:

Fix 3: "H=":H-Q?H◢

Lpwhile Z≠-1

算例如下:

K(JD)? EXE:2897(交点桩号)

H(JD)? EXE:21.441(交点高程)

R? EXE:2000(纵曲线半径)

I1? EXE:0.0322(前纵坡)

I2? EXE:-0.0336(后纵坡)

KM=>TEP? EXE:20(叠加桩号步长)

KP? EXE:2840(待求桩号高程)

=>LOW? EXE:0(扣除结构层)

EXE H= 19.588 (待求点高程)

KP? EXE:2860(待求桩号高程)

=>LOW? EXE:0(扣除结构层)

EXE H= 20.044 (待求点高程)

KP? EXE:2880(待求桩号高程)

=>LOW? EXE:0.6(扣除结构层)

EXE H= 19.7 (待求点高程)

结构层路面输入0时为设计中桩路面高程,桩号叠加步长即为以后每次默认在最初的桩号上面叠加步长值。

  评论这张
 
阅读(209)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017