求卡西欧5800计算器坐标正反算程序

Question

主要用于公路放样、测距，希望有大神帮忙，十分感谢，要能用的，4416620

Answer 1

"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——待算点中桩距离，顺直线前进方向，左＋右－
XA=”?X:”YA=”?Y:“XB=”?U:”YB=”?V
Pol((U-X),(V-Y)):J<0=>J+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

每行句末回车追问

能解释一下输入和显示吗