坐标反算程序Lbi0:{XY}:N“JDX”:E“JDY”:A“PZJ”:R:C“LS”:T:G“ZH”:M“HZ”:F“FWJ”
G﹤M=>P=1:U=F: ≠=>P=-1:U=F+A◣(空心)
A>0(数字)=>Z=1:≠=>Z=-1◣(空心)
POl(X-N,Y-E)
S=G+PT+Rec(I,J-U):D=J
G>M=>Goto3◣(空心)
S≤G=>K=S◢
Q=ZD◢
Goto0
≠=>Goto4◣(空心)
Lbi3
S≥G=>K=S◢
Q=ZD◢
Goto0
Lbi4
W=C2/24/R-C4/2688/R3:...
Lbi0:{XY}:N“JDX”:E“JDY”:A“PZJ”:R:C“LS”:T:G“ZH”:M“HZ”:F“FWJ”
G﹤M=>P=1:U=F: ≠=>P=-1:U=F+A◣(空心)
A>0(数字)=>Z=1:≠=>Z=-1◣(空心)
POl(X-N,Y-E)
S=G+PT+Rec(I,J-U):D=J
G>M=>Goto3◣(空心)
S≤G=>K=S◢
Q=ZD◢
Goto0
≠=>Goto4◣(空心)
Lbi3
S≥G=>K=S◢
Q=ZD◢
Goto0
Lbi4
W=C2/24/R-C4/2688/R3:V=C/2-C3/240/R2:B=90C/R/π
POl(P(S-G)-V,ZD-R-W)
J≥B-90=> Goto5◣(空心)
Z=P(S-G)+P(S-G)5/40/R2/C2
H=Z3/(6RC)
A>0(数字)=>W=D-H:≠=>W=-D-H◣(空心)
RC≤2WC=>Z=RC/W:≠=>Z=((RC-
(R2C2-2RCWZ))/W◣(空心)
K=G+PZ◢
V=K-PZ5/(40R2C2):H=Z3/(6RC)
A<0(数字)=>Z=-1:≠=>Z=1◣(空心)
W=
((S-V)2+(ZD-H)2)
ZD≥H=>Q=W◢
≠=>Q=-W◢
◣(空心)
Goto0
Lbi5
J=(90+J)π/180-C/2R
RJ≥P(M-G)-2C=>Goto6◣(空心)
K=G+P(C+JR)◢
Q=R-I◢
Goto0
Lbi6
POl(P(S-G)-T,ZD)
O=M-P(T-Rec(I,J-AbsA))
G>M=>Goto7◣(空心)
O>M=>K=0◢
O=J◢
Goto0
≠=>Goto8◣(空心)
Lbi7
O≤M=>K=O◢
Q=J◢
◣(空心)
Goto0
Lbi8
Z=P(M-o)+P(M-o)5/(40R2C2)
H=Z3/(6RC)
W=J-H
RC≤2WZ=>Z=RC/W:≠=>Z=(RC-
(R2C2-2RCWZ))/W◣(空心)
K=M-PZ◢
V=K+PZ5/(40R2C2):H=Z3/(6RC):W=
((O-V)2+(J-H)2)
J≥H=>Q=W◢
≠=>Q=-W◢
◣(空心)
Goto0
说明JDX,JDY___交点坐标;R_半径;PZJ_转角值(左-右+);LS_缓和曲线长;T_切线长;ZH-直缓点里程;FWJ_第一缓和曲线方位角;X,Y_所观测点坐标;I,J_不需处理;K-所测点里程; Q_中边距,转角左时,正为左偏,负为右偏;转角右时,正为右偏,负为左偏.
本文档为【坐标反算程序】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑,
图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。