卡西欧fx-4800测量计算程序

CASIO fx-4500PA计算中桩、边桩坐标程序

O→X N Y N

●L1

X“ZX”Y“ZY”ZKA “ZH”B “XZH”S“YZH”O“EJ”：R“R （L-，R+）”=θ→Goto E⊿I “LS”L：Lbl E：Q=θ：J“HX”U“HY”：Goto 6：Lblθ

●L2

G：“→E”◢Lbl 1：{N}：N“→L”：W=Abs（A-AbsN：N=θ→Gotoθ⊿E=O：F=θ：P=θ：R≠θ→Q=90/πR：Goto2⊿Rec（W，18θ+O：Goto4⊿Lbl 2

●L3

I≤W→E=Q（W-I：Goto 3⊿P=QW2/I：Rec（W-Wx y5/9θR2I2，P/3+O：Goto4⊿Lbl 3

●L4

W＞L-I→Goto 1⊿F=2RsinE：P=E+O+IQ：FcosP+Rec（I－Ix y3/9θR2，IQ/3+O：Lbl 4

●L5

Q=B+Ans：J=Q：F=S+W+FsinP：U=Ans：N＞θ→Goto 6⊿Lbl 5 ●L6

{D}：D=θ→Goto 1⊿D=1→Goto 8⊿H=P+E－9θAbsD/D：J=Q+Rec （Abs D，P+E-9θAbsD/D：U=F+W Lbl 6

●L7

Pol（J-X，U-Y：W＜θ→W+36θ：≠→W⊿Q=θ→G=Ans：Goto θ⊿“E=”◢V：“S=”◢Lbl 7

●L8

{CMTH}：M=θ→Goto 5⊿M=1→Goto 8⊿C Abs sinM：“→D=”◢V－Ans：“⊿S=”◢Z=θ→Goto 7⊿T=θ→Goto 7⊿K-T+H+Z+CcosM：“→H”◢Goto 5⊿Lb1 8

●L9

J：“XD=”◢U：“YD=”◢Goto 1 计算：

ZX？输入置镜点X坐标ZY？输入置镜点Y坐标

Z？输入置镜点高程

K？输入仪器高度

ZH？输入直缓点里程XZH？输入直缓点X坐标YZH？输入直缓点Y坐标EJ？输入直缓点方位角

R（L－，R +）？输入圆曲线半径，左偏为负，右偏为正

LS？输入直缓点至缓圆点长度

L？输入完整曲线长度，即两倍LS加圆曲线长

HX？输入后视点X坐标HY？输入后视点Y坐标

→E 显示后视方位角

→L？输入计算里程

E＝显示视方位角

S＝显示前视距离

M？输入1进入①中桩计算模式，输入θ进入②边桩计算模式，输入竖直角度进入③测距仪计算模式

①中桩计算模式：

XD＝显示计算里程中桩X坐标YD＝显示计算里程中桩Y坐标→L？输入下一计算里程

②边桩计算模式

D？输入边桩距离，左侧输正值，右侧输负值

E＝显示前视方位角

S＝显示前视距离

M？输入1显示边桩坐标

→L？输入下一计算里程

③测距仪计算模式

C？输入斜距

→D＝显示平距

⊿S＝显示距离仪器？m

说明：“θ”为零，O为英文字母

直线、圆曲线中心及左、右边桩计算程序fx-4800p

C“Xθ=”：D“Yθ=”：E“Wθ=”：N=Ans：R“R=”：L“Lμo=”：K“D=”：M“Jμo=”：Q=9θL÷（πR）：S=2RsinQ ：O =C＋Scos（N-Q）◢P=D+Ssin（N-Q）◢

W=E-2Q◢

X=O+Kcos（N-2Q-M）◢

Y=P+Ksin（N-2Q-M）◢

注：

Xθ=起算点坐标

Yθ=起算点坐标

Wθ=起算点方位角

R=曲线半径，线路前进方向，左+，右－

直线R为无穷大

Lμo=置镜点到待求点距离

D左、右边距离

Jμo=前进方向左（+90），右（－90）

O=中桩坐标

P=中桩坐标

W=待求点方位角

X=左、右边桩坐标

Y=左、右边桩坐标

缓和曲线中心及左、右边桩计算程序fx-4800p

C“Xθ=”：D“Yθ=”：E“Wθ=”：N=Ans：R“R=”：F“Lθ=”：L“Lμo=”：K“D=”：M“Jμo=”←

U=L－L^5÷（40R2F2）：V=L^3÷（6RF）－L^7÷（336R^3F^3）：Q=tan－1

（V÷U）：S=√（U2+V2）←

B=9θL2÷（πRF）：O=C+Scos（N－Q）◢

P=D+Ssin（N－Q）◢

W=E－B◢

X=O+Kcos（N－B－M）◢

Y=P+Ksin（N－B－M）◢

注：

Xθ=起算点坐标

Yθ=起算点坐标

Wθ=起算点方位角

R=曲线半径，线路前进方向，左+，右－

Lθ=缓和曲线长

Lμo=置镜点到待求点距离

D左、右待求距离

Jμo=前进方向左（+90），右（－90）

O=中桩坐标

P=中桩坐标

W=待求点方位角

X=左、右边桩坐标

Y=左、右边桩坐标

放样程序fx-4800p

RL

I“XZ”：W：“YZ”：G“XH”：H“YH”←

B=H－W ←

C=G－I ←

Prog“P”：U=A←

K=√（B2＋C2）←

C=X“X－”－I←

B=Y“Y－”－W←

Prog“P”←

L“L”=√（B2＋C2）◢

V=A－U：V<θ==>V=V＋36θ⊿V “V=”◢

P

A=tan－1（B÷C）←

B≥θ==>C≥θ==>A=A：≠=>C<θ==>A=A＋18θ⊿⊿≠=>B<θ==> C≥θ==>A=A＋36θ: ≠=>C<θ==>A= A＋18θ⊿⊿⊿←

XZ、YZ—置镜点X、Y坐标；XH、YH—后视点坐标；

X-、Y-—前视点坐标；

输出：R=水平角、L=置镜点至前视点水平距离。