卡西欧4800P计算器测量程序集.doc

PAGE  PAGE 13 福建林业职业技术学院 工程系土木工程室 高 国 兴 CASIO fx-4500PA计算中桩、边桩坐标程序  直线、圆曲线中桩及左、右边桩计算程序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=置镜点至前视点水平距离。 转点坐标计算程序fx-4800p A“XZ”B“YZ”C“XH”D“YH”：{RL}← I=1???J=1：Pol（（C－A），（D－B））：F=R＋J← Rec（L，F）← X“X”=I＋A◢ Y“Y”=J＋B◢ 注： XZ、YZ—置镜点坐标； XH、YH—后视点坐标； R—水平角； L—转点至置镜点水平距离。 放样程序fx-4800p ABCDXY← I=1：J=1：Pol（（C－A），（D－B））：F=J← Pol（（X－A），（Y－B））：R=J－F← R36θ== R=R－36θ：≠= Rθ== R=R＋36θ⊿R“R=”◢ I“L=”◢ 注： A、B—置镜点坐标； C、D—后视点坐标； X、Y—前视点坐标； 输出R—水平角，L—置镜点至前视点水平距离。 方位角计算程序fx-4800p X“X1”：Y “Y1”：A“XZ”：B“YZ”：Fixm：Pol（X－A， Y－B）：I“L=”◢ Jθ== J=J＋36θ⊿J“J0=” 注： X1、Y1—前视（后视）点坐标； XZ、YZ—置镜点坐标； L—置镜点至前视（后视）点距离； J0—方位角。 直、圆、缓线计算程序fx-4800p 复化辛普森公式 A“QDLC”B“ZDLC”R“QDR”V“ZDR”C“XA”D“YA”E“ALFA”：Lb1θ：{L}：L“Li”：T=（1÷V－1÷R）÷（B－A）：H=（L－A）÷N：P=TNH+1÷R：S=9θH÷π：W=E+（P+1÷R）NS◢ G=1：X“Xi”=C+H÷6×（cosE+cosW+4×∑（cos（E+（（G+0.5）HT+2÷R）（G+0.5）S），G，θ，（N－1））+2∑（cos（E+（THG+2÷R）GS），G，1，（N－1）））◢ Y“Yi”=D+H÷6×（sinE+sinW+4×∑（s