距离后方交会计算(CASIO fx–4800P计算器)程序
一、程序功能
本程序适用于在一个未知点上设测站，观测两到个已知点的
距离后，解算该未知坐标。

本程序也可以在CASIO fx-4500P计算器及CASIO fx-4850P计算器上运行。

注意：这种观测两到个已知点的距离后解算该未知坐标的方法，缺少多余观测值，也就缺少检核条件。

二、源程序
Lbl 1：{ABCDEFQ}：A"XA"：B” YA”：C"XB"：D"YB"：E"D1"：F"D2"：Q：J=0：G=Pol(C-A, D-B) ：H=J+QCos-1((GG+EE-FF)÷2÷G ÷E)：
X"XP"=A+ECosH◢
Y"YP"=B+ESinH◢
Goto 1←┘
注：CASIO fx-4850改如下
Lbl 1：{ABCDEFQ}：A"XA"：B” YA”：C"XB"：D"YB"：E"D1"：F"D2"：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程序变换而来。

经过试运行，这两个改编过来的程序完全正确。