面积计算程序：按顺时针方向输入
“MJJS” 程序清单
D:M=0：N=0：LB1 0：N=N+1◢
{XY}：N=1 C=X：E=Y：A=X：B=Y：≠ Prog”Z”:A=X:B=YΔ N=D X=C:Y=E:Prog “Z”: ≠ Goto 0 ΔM=AbsM÷2◢
“END”
子程序：
“Z”
Prog“F”：S=I◢
M=M+AY-BX
方位角计算程序：
“F”程序清单：POL(X-A,Y-B:J
≤0＝＞J=J+360
- 本文固定链接: https://www.chtfs.com/1718/
- 转载请注明: dawang 于 测绘途夫 发表
这个作者貌似有点懒，什么都没有留下。