求一个卡西欧5800的程序,用于直线坐标计算。

已知直线上两点坐标,和未知点与起点的距离,求直线上未知的第三点
再知道第三点偏移直线的距离,求到偏移后的坐标更好。
谢谢各位大神了

"XA=”?X:”YA=”?Y:“FWJ=”?J:”K0=“?K 回车
Lbl 0 回车
"KP=“?L: ”BJ=“?M 回车
A+(L-K)cos(J)+Mcos(J-90)→X 回车
B+(L-K)sin(J)+Msin(J-90) →Y 回车
“XP=“:X◢
“YP=“:Y◢
Goto 0 回车

Xa、Ya ——直线上已知里程的坐标(X,Y)
FWJ ——直线方位角
K0——A点桩号(即里程)
K1——待算点桩号,即待算点在已知直线上距离点A的距离
BJ——待算点中桩距离,顺直线前进方向,左+右-追问

方位角要先反算下。有没有能直接输入2个坐标求第三个坐标的 我这边给的都是坐标 没给方位角的

追答

“XA=”?X:”YA=”?Y:“XB=”?U:”YB=”?V
Pol((U-X),(V-Y)):JJ+360→J: ”K0=“?K
Lbl 0
“KP=“?L: ”BJ=“?M
A+(L-K)cos(J)+Mcos(J-90)→X
B+(L-K)sin(J)+Msin(J-90) →Y
“XP=“:X◢
“YP=“:Y◢
Goto 0

每行句末回车

追问

再请问下 程序中 KP 和 BJ所代表的意思是什么

追答

KP,即点P的桩号
BJ,即边距
请及时选为满意回答

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-08-18
这个简单。要是能折现就好!
相似回答