1坐標(biāo)反算(ST)
Lb1 1：＂X1=＂？A：＂Y1=＂？B
Lb2 2：＂X2=＂？C：＂Y2=＂？D
＂S(1-2)=＂：POL(C－A,D－B)→S▲
IF J﹥0：Then J→T：Else J+360→T：If End
＂T=＂：T→DMS▲
＂K=＂？Ｋ
If K=1：Then Goto1：If End
If K=2：Then Goto2：If End
If K=3：Then C→A：D→B：Goto 2：If End 0
說明：
1、 首先輸入架站點(diǎn)坐標(biāo)X0、Y0（O點(diǎn)）。
2、 再輸入后視點(diǎn)坐標(biāo)XP、YP（P點(diǎn)）。
3、 計(jì)算出O―P的邊長(zhǎng)S和方位角J。
4、 當(dāng)K＝1時(shí)，重新輸入O、P點(diǎn)的坐標(biāo)。
5、 當(dāng)K＝2時(shí)，以原O點(diǎn)坐標(biāo)不變，重新輸入新P點(diǎn)坐，計(jì)算出邊長(zhǎng)S和方位角J。
6、 當(dāng)K＝3時(shí)，以原P點(diǎn)坐標(biāo)為架站點(diǎn)坐標(biāo)O（X0、Y0），重新輸入新的P點(diǎn)坐標(biāo)，計(jì)算出邊長(zhǎng)S和方位角J。
