后方交会计算计算)程序.docVIP

距离后方交会计算(CASIO fx–4800P计算器)程序 一、程序功能 本程序适用于在一个未知点上设测站，观测两到个已知点的 距离后，解算该未知坐标。本程序也可以在CASIO?fx-4500P计算器及CASIO?fx-4850P计算器上运行。 注意：这种观测两到个已知点的距离后解算该未知坐标的方法，缺少多余观测值，也就缺少检核条件。 二、源程序 Lbl?1：{ABCDEFQ}：AXA：B”?YA”：CXB：DYB：ED1：FD2：Q：J=0：G=Pol(C-A,?D-B)?：H=J+QCos-1((GG+EE-FF)÷2÷G÷E)： XXP=A+ECosH◢? YYP=B+ESinH◢? Goto?1←┘ 注：CASIO?fx-4850改如下 Lbl?1：{ABCDEFQ}：AXA：B”?YA”：CXB：DYB：ED1：FD2：Q：J=0：G=Pol(C-A,?D-B)?：H=J+QCos-1((GG+EE-FF)÷2÷G÷E)：XP： X=A+ECosH◢ YP：Y=B+ESinH◢? Goto?1←┘ 三、使用说明 1、规定 (1)?未知点为P点，已知点分别为A点、B点； (2)?P点至A点的距离为D1，P点至B点的距离为D2； (3)?当A、B、P三点逆时针排列时，Q=-1；当A、B、P三点顺时针排列时，Q=1。 2、输入与显示说明 输入部分： XA????输入A点的X坐标? YA?？输入A点的Y坐标? XB?????输入B点的X坐标 YB?？输入B点的Y坐标 D1?？输入P点至A点的距离为D1? D2?？输入P点至B点的距离为D2? Q？输入A、B、P三点排列方式（逆时针时，Q=-1；顺时针时，Q=1）???????????? 显示部分： XP=××× 所求点P的X坐标 YP=××× 所求点P的Y坐标 四、算例 已知XA=539.3551，YB=602.9159，Xb=433.0034，YB=1087.4213，D1=380.7996，D2=245.8664，A、B、P三点排列方式为逆时针（Q=-1），求P点的坐标。? 输入数据后，经计算得 XP=647.8773101 YP=967.9244825 5800后方交会程序 HFJH（后方交会） ”X1”??A: ”Y1”?B:?“X2”?C:?“Y2”?D:?“S1”??S:?“S2”??F:?“O”??O:?Rec(F,O):?POI(S-I,-J)?:I→N:?-J→E:?POI(C-A,D-B):J→T:?I÷N→K:?“K=”:K▲?K×S→S:Rec(S,T+E):?POI(A+I,B+J):Rec(I,J) 注解：? X1、Y1：已知点1坐标 X2、Y2：已知点2坐标 S1：自由设站点到已知点1距离 S2：自由设站点到已知点2距离 O：已知点1至自由设站点至已知点2的夹角 K：衡量交会点的精度，如若显示0.99999···或1.00000···即为交会坐标的精度很高? 最后程序显示交会点的坐标 说明：ZXZB和HFJH程序从4800程序变换而来。经过试运行，这两个改编过来的程序完全正确。