关于内外分点坐标计算程序
对于很多测量朋友而言,想必很多人都遇到过这样一个情况,比方说已经放出点A,而还需要放出S点的坐标,但是因为视线原因看不到S点,此时实属无奈,只好在AS的直线上选一个点B并把坐标记下来,用尺量出S点距离B点的距离就可以把S点坐标算出来,而这个点S可以在AB之间,也可以在AB的延长线上。当S点在AB内部,BS取负值,S在AB延长线上,BS取正直,主程序如下:
Fix 3: Lbl 1: “XA”?X:“YA”?Y:“XB”?U:“YB”?V:Pol(U-X,V-Y): “BS”?S:“XS=”:Locate 6,4,U+Scos(J): “YS=”:Locate 6,4,V+Ssin(J):Goto 1 计算实例如下:
XA? 501.707 YA? 484.856 XB? 894.081 YB? 676.757 BS?330 EXE XS=1190.526 YS=821.741 XA? 525.014 YA? 590.592 XB? 1291.076 YB? 623.943
BS? -330 EXE XS=961.388 YS=609.59
程序示意图请参见程序相册内外分点坐标计算程序示意图
关于两点后方交会的简易程序
就是交汇点的坐标,再把它转到测站,就哦啦,但是一定要注意交汇点的顺序APB(即P点一定要在AB前进方向的右边:并且要记下距离,方可转入程序计算,OK
HFJH
Fix 3:Lbl 1:“XA”?X:“YA”?Y:“XB”?U:“YB”?V:Pol(U-X,V-Y) :J<0=>J+360J: “AP”?M:“PB”?N:(M2
+I2
-N2
) ÷(2I)E: √(M2
-E2
)F:“a=”:Locate 4,4,J º:“AB=”:Locate6,4,I:
“XP=”:Locate 6,4,X+Ecos(J)+Fsin(J):“YP=”:Locate 6,4,Y+Esin(J)-Fcos(J)◢Goto 1 计算过程如下:
XA? 580.097 YA? 644.080 XB? 1436.772 YB?662.287
AP? 515.216 PB? 592.868 EXE а=1º13’3.11”(AB的方位角) AB=856.868 XP=965.671 YP=302.348
因篇幅问题不能全部显示,请点此查看更多更全内容