编程计算器测量程序

编程计算器测量程序集

编写: 王劲松

第一部分：CASIO fx-4800P 编程计算器测量程序集

一．SHI JU CE TU （视距测图）

1．用途：该程序用于“经纬仪视距法碎部测量”时，计算测站点至碎部点间的平距及碎部点的高程。

2．程序清单：

C“H0”：I：A“UP”：B“DOWN”：V“MIDDLE”：L：E=90-L ↙

D=100Abs（A-B）（cosE）2◢H=（C+I）+DtanE-V

3．程序说明：

H0——测站点高程；I——测站仪器高；UP——塔尺上丝读数；DOWN——塔尺下丝读数；MIDDLE——塔尺中丝读数；L——经纬仪竖盘读数盘左读数；D——测站点至碎部点间平距；H——碎部点的高程。

5．该程序若在fx-3950中的程序清单为：

？→M：？→A：？→B：？→C：？→D：100（A-B）（cos(90-D)）2→X◢M+Xtan(90-D)-C →Y

说明：M——将测站高程H0+仪器高I；A——上丝读数；B——下丝读数；C——中丝读数；D——竖盘盘左读数L。X——测站点至碎部点的平距；Y——碎部点的高程。

二．FAN SUAN （反算）

1．用途：该程序是“坐标反算公式”程序，用于根据两点1、2的平面坐标（X1，Y1）、（X2，Y2），计算两点间的距离D12及坐标方位角A12。

2．程序清单：

G“X1”：B“Y1”：C“X2”：H“Y2”：E=C-G：F=H-B ↙

Pol（E，F）：I“D12”◢J“A12”

3．程序说明：

X1，Y1——点1的平面坐标；X2，Y2——点2的平面坐标；D12——点1至点2间平距；A12——点1至点2坐标方位角。

由于编程时用到了极坐标函数POL（），故在程序运行中，会出现I=？XXX（数字）及J=？XXX（数字）这是函数POL计算出的两个量，不能改变，直接回车默认即可。三．ZHENG SUAN （正算）

1．用途：该程序是“坐标正算公式”程序，用于根据点1的平面坐标（X1，Y1），及点1至点2的平距D12、坐标方位角A12，来计算点2的平面坐标（X2，Y2）。

2．程序清单：

B“X1”：C“Y1”：D“D12”：A“A12”↙

X“X2”=B+DcosA ◢Y“Y2”=C+DsinA

2．程序说明：

X1，Y1——点1的平面坐标；X2，Y2——点2的平面坐标；

D12——点1至点2间平距；A12——点1至点2坐标方位角；X2，Y2——点2的平面坐标。另外在输入A12时，可直接输入“度分秒”。

四．YUAN ZHU （圆主）

1．用途：该程序是“单圆曲线主点测设元素及里程计算”程序。

2．程序清单：

A“TURNING ANGLE”：R：B“JD”↙

T=Rtan(A÷2)◢L=RAπ÷180◢E=R÷cos(A÷2)-R◢D=2T-L◢C“ZY”=B-T◢F“YZ”=C+L◢

G“QZ”=F-L÷2

3．程序说明：

TURNING ANGLE——交点JD处的转角；R——圆曲线半径；JD——交点。

T——切线长；L——圆曲线长；E——外矢距；D——切曲差；ZY——ZY点里程；YZ——YZ点里程；QZ——QZ点里程。

五．YUAN XIANG （圆详）

1．用途：该程序是“单圆曲线切线支距法及长弦偏角法详细测设”程序。

2．程序清单：

A“ZY OR YZ”：R：Lbl 1 ↙

{L}：B=180Abs(L-A) ÷R÷π：X=RsinB◢Y=R-RcosB◢D“ANGLE”=B÷2◢C “DISTANCE”=2RsinD◢Goto 1

3．程序说明：

ZY OR YZ——ZY点或YZ点里程（桩号）；R——圆曲线半径；

L——某桩的里程（桩号）；X——切线支距法的X值；Y——切线支距法的Y值；ANGLE ——偏角法的偏角值，单位为“度”。若要查看其“度分秒”，可在程序运行显示时先后按“SHIFT”、“度分秒”这2个键；DISTANCE——长弦偏角法的弦长。

六．HUAN ZHU （缓主）

1．用途：该程序是“完整对称带缓和曲线的圆曲线”的主点测设元素及里程计算程序。2．程序清单：

A“TURNING ANGLE”：R：S“LS”：H“JD”↙

B=180S÷（2 Rπ）↙

P=S2÷24÷R-S^4÷(2688 R ^3) ↙

Q=S÷2-S^3÷(240R2) ↙

T=(R+P)tan(A÷2)+Q◢M=R(A-2B)π÷180↙

L=M+2S◢E=(R+P)÷cos(A÷2)-R◢D=2T-L ◢N“ZH”=H-T◢O“HY”=N+S◢U“QZ”=O+M÷2◢V“YH”=O+M◢W“HZ”=V+S

3．程序说明：

TURNING

ANGLE——交点JD处的转角；R——圆曲线半径；LS——缓和曲线长；JD——交点里程（桩号）。T——切线长；L——曲线长；E——外矢距；D——切曲差；ZH——ZH点里程；HY ——HY点里程；QZ——QZ点里程；YH——YH点里程；HZ——HZ点里程。

七．HUAN QIE （缓切）

1．用途：该程序是“完整对称带缓和曲线的圆曲线”的切线支距法详细测设坐标计算程序。2．程序清单：

A“ZH”：R：S“LS”：Lbl 1 ↙

{L，B}↙

：↙

Lbl 2↙

C=Abs(L-A)：D=RS：X=C-C^5÷40D2+C^9÷3456D^4-C^13÷599040D^6+C^17÷17542600D^8◢