距离后方交会计算

距离后方交会计算(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