一、源程序(FWJ)
J=0:D=Pol(U-X,V-Y):F=J:FF=F+360△
二、说明
1、该子程序适用于CASIO fx-4800计算器及CASIO fx-4850计算器.
对于CASIO fx-4500计算器,注意调整Pol()计算结果之储存变量结果即可.
2、该子程序入口参数X、Y为直线起点(或测站点)之坐标,U、V
为直线止点(或后视点)之坐标,返回值D为起点至止点间之平距、F为起
点至止点之方位角.
使用计算器自带之坐标变换函数Pol()快速准确地反算任意两点间之平距和坐标方位向角,可避免方位角所在象限之复杂判断.至于tandeyong所给之程序是坐标计算,与坐标方位角计算题意不相符.
1.调用坐标方位计算之主程序示例(ZCX)
Lbl 1:{XYUV}:X"X1":Y"Y1":U"X2":V"Y2"←┘ 输入两点之坐标(x1,y1)、(x2,y2)
Prog "FWJ"←┘ 调用坐标方位角计算子程序“FWJ”
D"D"=D◢ 显示两点(x1,y1)、(x2,y2)间之平距
F""F"=F◢ 显示点(x1,y1)至(x2,y2)之坐标方位角
Goto 1←┘
2.算例
已知两点P1(19827.336,28506.838)、P2(19742.686,28652.914)间之距离和方位角.
(1)选择程序"ZCX"并启动它
(2)输入 X1?19827.336 ↙ (↙代表蓝色之[EXE]键)
Y1?28506.838 ↙
X2?19742.686 ↙
Y2?28652.914 ↙
(3)显示
D=168.8307445
F=120.0919859(以度为单位,即120°05′31.15〃)
使用全站仪放样程序,只要全站仪中有acd三点的坐标,全站仪就可以通过坐标自动计算出方位角的。在c点建站,后视a点定向,就会显示出ca的坐标返算方位角,之后进入放样程序,输入点号d,全站仪就提示ca方位角与cd方位角的差值,就可以将水平角旋转到cd的方位角上,放出d点的。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)