| 最简单的坐标方位角计算子程序 一、源程序(FWJ) J=0：D=Pol(U-X, V-Y)：F=J：F<0=>F=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″) |
|【路桥隧】
( 湘ICP备16018960号-1 ) QQ群：
GMT+8, 2026-4-2 09:40
Powered by Discuz! X3.2
© 2001-2013 Comsenz Inc.
