第一篇：歪哥哥版 Casio5800水準(zhǔn)儀測量高程現(xiàn)場計(jì)算小程序

Casio5800水準(zhǔn)儀測量高程現(xiàn)場計(jì)算小程序

（歪哥哥2009版）

程序功能目的：輸入水準(zhǔn)儀現(xiàn)場前視讀數(shù)快速計(jì)算出該點(diǎn)的實(shí)測高程！程序名: HC

LbI A:Cls:“HS”?X:“BM-H”?Y:X+Y→S:Cls: “SXG=”:Locate 6,1,S◢

LbI B:Cls: “QS”?D:If D≥0 :Then Goto D:Else Goto C:IfEnd↙ LbI C: M→Y:Abs（D）→X: Goto A↙

LbI D:S-D→M: Cls: “QS=”: “HC=”Locate 6,1,D: Locate 6,2,M◢

Goto B↙

符號(hào)說明：

HS?輸入水準(zhǔn)點(diǎn)上之后視讀數(shù)

BM-H?輸入水準(zhǔn)點(diǎn)之設(shè)計(jì)高程

SXG= 顯示視線高程

QS?輸入該點(diǎn)的前視讀數(shù)（注：當(dāng)有轉(zhuǎn)點(diǎn)時(shí)則轉(zhuǎn)點(diǎn)的前視讀數(shù)輸入后顯示HC為轉(zhuǎn)點(diǎn)的高程，緊接著當(dāng)再次提示QS?時(shí)將轉(zhuǎn)點(diǎn)所測的后視讀數(shù)以負(fù)值輸入連續(xù)兩次EXE即可顯示轉(zhuǎn)點(diǎn)后的視線高程，即可進(jìn)行轉(zhuǎn)點(diǎn)后的正常計(jì)算?。?/p>

QS=顯示所輸入的該點(diǎn)的前視讀數(shù)

HC=顯示計(jì)算所得的該點(diǎn)的實(shí)測高程

歪哥哥QQ：512477648