坐标方位角计算_范文大全网

Excel 中求方位角

度分秒格式：

=INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/PI())

&"-"& INT( ((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180

/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/

PI()))*60)&"-"&INT( (((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-

$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-

$b$1)))*180/PI()))*60-INT(((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /

(B3-$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /

(B3-$b$1)))*180/PI()))*60))*600)/10

其中：A1,B1

上面计算出来的是度分

下面这个简单一点：

=INT((PI()*(1-SIGN(C6-C4)/2)-ATAN((B6-B4)/(C6-C4)))*180/PI())*10000+INT(((PI()*(1-SIGN(C6-C4)/2)-ATAN((B6-B4)/(C6-C4)))*180/PI()-INT((PI()*(1-SIGN(C6-C4)/2)-ATAN((B6-B4)/(C6-C4)))*180/PI()))*60)*100+(((PI()*(1-SIGN(C6-C4)/2)-ATAN((B6-B4)/(C6-C4)))*180/PI()-INT((PI()*(1-SIGN(C6-C4)/2)-ATAN((B6-B4)/(C6-C4)))*180/PI()))-(INT(((PI()*(1-SIGN(C6-C4)/

2)-ATAN((B6-B4)/(C6-C4)))*180/PI()-INT((PI()*(1-SIGN(C6-C4)/2)-ATAN((B6-B4)/(C6-C4)))*1

80/PI()))*60))/60)*3600

Excel 中求方位角

求距离公式:

=Round(SQRT(POWER((A3-$A$1),2)+POWER((B3-$B$1),2)),3)

原计算公式为：

S12=sqr( (x2-x1)2+(y2-y1)2)= sqr(△x221+△y221)

A12=arcsin((y2-y1)/S12)

S12为测

A12为测站

x1，y1为测站点坐标；

x2，y2为放样点坐标。

按公A12=arcsin((y2-y1)/S12)计算出的方位角都要进行

真正的方位角。

新计算公式为：

A12=arccos(△x21/S12)*sgn(△y21)+360°

式中sgn()为取符号函数，公式

可以计算出坐

电子表

度格式：

=(PI()*(1 - SIGN(B3-$B$1) / 2) - ATAN((A3-$A$1) /(B3-$B$1)))*180/PI() Excel 中求方位角公

度分秒格式：

=INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1)

/(B3-$b$1)))*180/PI())

&"-"& INT( ((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1)

/(B3-$b$1)))*180

/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1)

/(B3-$b$1)))*180/

PI()))*60)&"-"&INT( (((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-

$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-

$b$1)))*180/PI()))*60-INT(((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /

(B3-$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /

(B3-$b$1)))*180/PI()))*60))*600)/10

其中：A1,B1

上面计算出来的是度分秒格式，也就

=(PI()*(1 - SIGN(B3-B1) / 2) - ATAN((A3-A1) /(B3-B1)))*180/PI() Excel 中求方位角公式：a1,b1放起始点坐标 a3,b3放终点坐标。

求距离公式:

=Round(SQRT(POWER((A3-$A$1),2)+POWER((B3-$B$1),2)),3)

这里excel的表格计算法，会用了，就用，不会用，就按照上面的公

电子表

度格式：

=(PI()*(1 - SIGN(B3-$B$1) / 2) - ATAN((A3-$A$1) /(B3-$B$1)))*180/PI() Excel 中求方位角公式：a1,b1放起始点坐标 a3,b3放终点坐标。

度分秒格式：

=INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/PI()) &"-"& INT( ((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180 /PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/ PI()))*60)&"-"&INT( (((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3- $b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3- $b$1)))*180/PI()))*60-INT(((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) / (B3-$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) / (B3-$b$1)))*180/PI()))*60))*600)/10

其中：A1,B1

上面计算出来的是度分秒格式，也就

=(PI()*(1 - SIGN(B3-B1) / 2) - ATAN((A3-A1) /(B3-B1)))*180/PI()

Excel 中求方位角

求距离公式:

=Round(SQRT(POWER((A3-$A$1),2)+POWER((B3-$B$1),2)),3)

电子表

度格式：

=(PI()*(1 - SIGN(B3-$B$1) / 2) - ATAN((A3-$A$1) /(B3-$B$1)))*180/PI()

Excel 中求方位角

度分秒格式：

其中：A1,B1

上面计算出来的是度分秒格式，也就

=(PI()*(1 - SIGN(B3-B1) / 2) - ATAN((A3-A1) /(B3-B1)))*180/PI()

Excel 中求方位角

求距离公式:

=Round(SQRT(POWER((A3-$A$1),2)+POWER((B3-$B$1),2)),3)

准确

=INT((PI()*(1-SIGN(BB)/2)-ATAN((AA)/(BB)))*180/PI()) &"-"& INT( ((PI()*(1-SIGN(BB) / 2)-ATAN((AA) /(BB)))*180 /PI()-INT((PI()*(1-SIGN(BB) / 2)-ATAN((AA) /(BB)))*180/ PI()))*60)&"-"&INT( (((PI()*(1-SIGN(BB) / 2)-ATAN((AA) /(BB)))*180/PI()-INT((PI()*(1-SIGN(BB) / 2) -ATAN((AA) /(BB)))*180/PI()))*60-INT(((PI()*(1-SIGN(BB) / 2)-ATAN((A

A) /

(BB)))*180/PI()-INT((PI()*(1-SIGN(BB) / 2)-ATAN((AA) / (BB)))*180/PI()))*60))*600)/10

坐标方位角计算

坐标方位

用极标法放样必须计算测站

原计算公式为：

S12=sqr( (x2-x1)2+(y2-y1)2)= sqr(△x221+△y221)

A12=arcsin((y2-y1)/S12)

S12为测

A12为测站

x1，y1为测站点坐标；

x2，y2为放样点坐标。

按公A12=arcsin((y2-y1)/S12)计算出的方位角

加常数

新计算公式为：

A12=arccos(△x21/S12)*sgn(△y21)+360°

式中sgn()为取号函数，改公式只需加上条件（A12>360°, A12= A12-360°）就可以计算出坐标方角，不需要进行象限判断。我这个要更好一些，计算结

坐标方位角计算

如图示，已知 A( x A , y A ) ， B( xB , yB ) ，计

αAB

A(x A , y A)

A、B 点坐标关系标

y A ? yB O x A ? xB y A ? y B y A ? yB y A ? yB x A ? xB y A ? y B

90?

任意值

y y 轴正半轴上

原点 O 上，即 A、 B 点重合 y 轴负半轴上第Ⅰ 象

270?

arctan

yB ? y A xB ? x A yB ? y A xB ? x A yB ? y A xB ? x A yB ? y A xB ? x A

? y A ? yB 360 ? arctan

第Ⅳ 象限第Ⅱ

? y A ? yB 180 ? arctan

x A ? xB y A ? y B

180?

? y A ? yB 180 ? arctan

注： EXCLE 中，可

Excel计算坐标方位角

EXCEL中计算方位角距离公式

1楼

电子表

度格式：

=(PI()*(1 - SIGN(B3-$B$1) / 2) - ATAN((A3-$A$1) /(B3-$B$1)))*180/PI()

Excel 中求方位角

度分秒格式：

=INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/PI())

&"-"& INT( ((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180

/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-$b$1)))*180/

PI()))*60)&"-"&INT( (((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-

$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /(B3-

$b$1)))*180/PI()))*60-INT(((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /

(B3-$b$1)))*180/PI()-INT((PI()*(1 - SIGN(B3-$b$1) / 2) - ATAN((A3-$a$1) /

(B3-$b$1)))*180/PI()))*60))*600)/10

其中：A1,B1

上面计算出来的是度分秒格式，也就

=(PI()*(1 - SIGN(B3-B1) / 2) - ATAN((A3-A1) /(B3-B1)))*180/PI()

Excel 中求方位角

求距离公式:

=Round(SQRT(POWER((A3-$A$1),2)+POWER((B3-$B$1),2)),3)

坐标方位角计算程序

置镜点

后视点

方位角：W

两点间距离: S

Lb1 0←

｛A, B, C, D｝←

A〝ZX=〞:B〝ZY=〞:C〝HX=〞:D

〝HY=〞:W=tg1((D-B)÷(C-A)):(D-B)>0=>(C-A)>0=>W=W:∟∟(D-B)>0=>(C-A)W=W+180:∟∟(D-B)

0=>(C-A)W=W+180:∟∟(D-B)(C-A)>0=>W=360+W∟∟W=W◢

S=√((D-B)2+(C-A)2) ◢

Goto 0←

4850线路计算程序

作者：lq52搜

1：已知线

在缓和曲线，要算任意里程的法方向及任意宽度的边线标，非常简单。但要计算任意一个已知坐标点，是对应哪一个里程法线向上的点，就有些困难。很难推导一个这样的计算公式。一的方法“渐进”，果手工计这不是一个好方法。但在有CASIO系列可编程计算，如：FX-4500的情况下就变的非常简单了。亦用于

首先在缓和曲上任一点A为始点，计该点的坐标和切线方位角，通过坐标反算求起始点A与计算点B的方位角和距离，B点肯定对应A点切线方向有一个垂足C点，三点看成一个直角三角形，通过解直角三角计算AC的距离，当该距离大某一数值，如0。001m，A点里程加AC的距离等于C点的里程，回到开重新进入新轮的算，如果AC的距离小于某一规定值，则计C点的程与BC的

求对应

主程序QLC (已知坐标求里程)

Lb1 0：｛LＤE｝：Prog XH：Goto 0

子程序：XH (循环)

L1 Lb1 1

L2 Norm： Prog LYYD：

1656

L3 PO1(D-X,E-Y)：W≤0=> W=W+360⊿

L4 Z=W-I： A=V×cos Z：L=L+A

L5 Abs A≥0.001=>Goto 1：≠=>B=V×sinZ：Fix 3：“FXJL=” ◢

L6 L:Fix3:“DYLC=” ◢

程序中字母代表

D 意点X坐标， E 任意Y坐

使方法：只需输入计点

2：逐桩坐标计算

2.1编制方：线路标程序是按平曲线为元，直线部分归属在曲线两的方法，把整段路线分段装进数据库，根据桩号判断采用据通过共用程序，进行任意点的标计算，在坐标转换意土，第一直线段，是通过方位角和距离直接算大地标，第一缓和曲线和圆曲段，是先计任意切线支距和方位角然后转换大地坐标，第二缓和曲线段和直线段是计算任意点切支距方位角。然后转换为ZH坐标系的坐标，通过ZH坐标系坐标再转

2.2使用方法

2.2.1准备工作：室内把已知曲

2.2.2现场使用：根据

K 公里桩号

L 部里程桩号如 518.采用进只出现一次，否则逐桩输入。过千米桩时

Y 断链条件，执行输0不

D 边

V W 输出的边线1的大地坐标

X Y 输

2.3

主程序：XLZB(线路坐标)

L1 Lbl 0：L≥1000=>P=P+1：L=L-1000⊿

L2 O=0 => prog FJJ⊿ L=L+O： prog LYYD：

progXSZB： E≠0 => progBX ⊿Goto 0

子程序：FJJ (非渐进)

{L}：L=L

子程序：LYYD (路由引导)

N=（P“K”+L/1000）×1000：【X=0：Y=6】

N≥***.*** =>prog 1： prog PQX： prog ZJ⊿

N≤***.*** =>prog 2： prog PQX： prog YJ⊿

N≥***.*** =>prog 3： prog PQX： prog ZJ⊿

N≥***.*** =>prog 4： prog PQX： prog YJ⊿

N≤***.***=> prog 5： prog PQX： prog YJ⊿

N≥*** ……

……progZB

子程序：PQX（

L1 B=Z+Q-S：H=Z+Q：A=S/2-S3/240 R2： T=A+（R+ S2/24 R）tan（F/2）

L2 N≤Z =>V=N-Z：W=0：I=0：Goto 1⊿

L3 U=N-Z：N≤(Z+S)=>V=U-U5/40R2S2：W=U7/336 R3S3-U3/6RS：I=90U2/πRS：Goto 1⊿

【L*{Y}：Y=0=>U=U+X⊿】

L4 N≤B =>I=90（2U-S）/πR：V=RsinI+A：W=RcosI-R- S2/24R：Goto 1⊿

L5 N≤H =>U=H-N：C= U-U5/40R2S2：G= U3/6RS-U7/336 R3S3：

V=（T-C）cosF-GsinF+T：W=（C-T）sinF-GcosF：I=F-90U2/πRS：Goto 1⊿

L6 N≥H =>V=T+（T+N-H）cosF：W=（H-T-N）sinF：I=F：Goto 1⊿

L7 Lbl 1

子程序：YJ（右角）

W=-W： I=K+I

子程序：ZJ（左角）

I=K-I

子程序：ZB（坐标）

X=J+VcosK-WsinK : Y=M+VsinK+WcosK

子程序：XSZB（显示坐标）

O≠0=> L=L：pause 5⊿ X=X ◢Y=Y◢

子程序：BX（边线）

{DE}：I=I+E：V=X+DcosI ◢ W=Y+DsinI ◢

{DE}：I=I+E：X=V+DcosI ◢ Y=W+DsinI ◢

2.4数据库：( 每一组曲线占用一个子程序)

1 K=***：F=***：R=***：J=***：M=***：Z=***： Q=***：S= ***：

2 K=***：F=***：R=***：J=***：M=***：Z=***： Q=***：S= ***：【N≥***.*** =>X=*.**】

2.5注解：

程序XLZB：路

程序：FJJ (非渐进) O≠0时，只需输入起始点桩号如计算为每20米一点时,取O=20，此后则自动进，公里桩号自动渐进。起始桩号应输入第一个算点桩号减渐进长。如K36+700输入36+680即可。否则取O=0。每一点需输入细部点桩号。当公里桩号生

25+910---K26+110，每20米一点。K25+990完了便是K26+010，此时无需重新输入公桩号，只需输入一个大于等1000的桩号，此后则按

例：K25 +970 K25+990 K25+1000 K26+010 K26+050 ……

程序LYYD：由引导，段数根据曲线量确定增。L≥＊＊＊·＊＊＊是曲线间分界点桩号。用?≥?选ZH点或ZY点以前的桩号。用?≤?选HZ点或YZ点以后的桩。为了做QLC (已知坐标求里)的子程序，故于XLZB：(线路坐标)分为两个序。否可和二为一。P显示K，为公桩号，为输方便，可省略里桩号中的相同之处，如K315+200--- K395+800，输入公里桩号，可略百位的3，只输十位和个位的15---95 即可。L为细

程序PQX：（单

第一行，计算曲线要素，

第二行，计

第三行，计

L* 断链；建议不采用

第四行，计

第五行，计

第六行，计

程序ＹJ：线偏角为右时，进入该程序W=-W，转换偏角F为左角，执行程序ＺＢ，ZH坐标系统的坐标（V，W）转换成地坐标（X，Y），I为曲线上任意点到ZH坐标系统中X的夹角， K+I是该点切线沿线路

程序ＺJ：曲线偏

程序ＺＢ：是坐标转换程。计

程序XSZB： O=0时显示坐标，O≠0时显桩号和坐，为了做为QLC (已知坐标求里程)子程序，故于ZB：(坐标转)分为两个程序。

程序ＢＸ：求路外任意点的坐标（V，W）其中E为角，有正负之分，顺时针为正，逆时针为负，线路法线为正、负90。D为线路中点到计算点间的距离， (X ，Y) 路外第二任意点的标，如交桥、涵的坐标计算，（V，W）为涵口边墙或桥台坐，(X ，Y)为八字墙端部坐标。输E=0计算边的过

程序１．２．３……：数据程序，用数字１、２、３表示，根据曲线数量确

线总；F：偏角；R：半径；S：缓

地坐标；K：ZH点至JD点的起始方位角。N﹥***=>X=***计算点桩和断链长度，(下文详述) 程序中分字符以标出，有字符在不同位置意义不同，循环使，不标。只要把需输入和输

2.6

是通过ZY点标计算心的坐标，通过圆心坐标计算曲线上任意点坐标（X，Y），B：中线到边线的距离分正、负值。除S转向为左角输+1转向角为右角输-1以外。数据库和PQX（单圆曲线及带缓和曲线的平曲线）基本相，它代替除数据库和路径引导序外的所有程，未编第二直线段部分，因为本曲线第二直线段部分也就是下一个线的第一直线部分。未考虑与其它程序的配合和对断链的处理。可据所管程线型情

主程序：XLZB(线路坐标)

Lbl 0：{L}： L=L+O：N=（P“K”+L/1000）×1000：N≥***.*** =>prog 1： prog PQXY： Goto 0

子程序：PQXY (单圆曲线的平曲线)

L1 U=N-Z：N≤Z =>X=J+UcosK◢Y=M+UsinK◢X=X+Bcos(K+90)◢Y=Y+Bsin(K+90)◢Goto 1

L2 ≠=>V=J+Rcos(K+90S)：W=M+Rsin(K+90S)：E=180U/π/R

L3 I=K-90S：I＜0 =>I=I+360⊿I=I+SE

L4 {B}：X=V+(R+B)cosI◢ Y=W+(R+B)sinI◢Goto 1

L5 Lbl 1

3：逐桩高程计算

3.1制方法：纵断高程程序是按照竖曲线为单，同坡部归属在曲线两端，把整段路线分段装进数据，根据桩号判断采用数据通过程序，进行任意

3.2使用方法

3.2.1准备工作：室内把已知曲

3.2.2现场使用：根据计算机提示输相关数即可。提示与输入情况如下：提K、L、O、 Y 同逐

3.3：逐桩高程计算程序

主程序 ZDGC (纵断高程)

Lbl 0：{L}：L=L+C“O”：N=（K+L/1000）×1000： prog LJYD： Goto 0

子程序：LJYD(路径引导)

L1 【V=0：X=0： Y=9】

L2 N≥***.*** =>prog A：⊿

N≤***.*** =>prog B：⊿

N≥***.*** =>prog C：⊿

N≥***.*** =>prog D：⊿

N≤***.***=> prog E：⊿

N≤ ProgSQX

子程序 SQX (竖曲线)

L1 【｛Y｝：Y=0=>V=X⊿】 M=A-T【-V】：W=A+T【+V】： U=Abs(A-N) 【-V】：

N≤M=>Z=H-JU◢ Goto 1 ⊿

N≤A=>Z=H-JU+F(N -M)2/2R◢ Goto 1⊿

N≤W=>Z=H+IU+F(W- N)2/2R◢ Goto1⊿

N≥W=>Z=H+IU◢ Lb1 1

3.4数据库：( 每一组曲线占用一个子程序)

A： R=＊＊＊：T=＊＊＊：A=＊＊＊：H=＊＊＊：J=-＊＊＊：I=-＊＊＊： F=1：【N﹥***=>X=-*** 】

B： R=＊＊＊：T=＊＊＊：A=＊＊＊：H=＊＊＊：J=-＊＊＊： I=-＊＊＊： F= -1

3.5注解：

主程 ZDGC (纵断高程)了于三坐标段落法隧道断面测量程序配合，于LJYD(路径引导)

程序：LJYD(路径引导) 是路径引导程序，段数根曲线数量定增减。L≥＊＊＊·＊＊＊是曲线间的分界点号。用?≥?选曲线起点以的桩。用?≤?选曲线终

程序 SQX (竖曲线)第一段计算曲起点以前高程，第二段计算曲线起点以后的高程，三段计算曲线终点以前的高程，四段计算曲线

程序Ａ．Ｂ．Ｃ……：数库

程序中字母代表

R表竖曲线半径， T表示

F=-1表示凸曲线， F=1表示凹曲线， J表示前一竖曲线坡度，

I表后一竖曲线坡度，坡

4.对

高速公路中坐标法控线路的平位，断链较少。设计上以考虑工计算方便的问题。平曲线内一般不出现断链，尽可能也不设在竖曲线内，一般会将断链推到直线同坡段。直线部分归和划分，考虑到断链，依断桩号为划分线。有时能躲的开曲线但躲不竖曲，程序ZDGC (纵断高程)以考虑到竖曲线内出现断的情况，理方法是：数据库中赋值，当计算点大或小于某一桩时，修算点切点和变坡点的曲线长度，程序如下：N≥***.*** =>X=*.**，N：为计算点桩号，***·***断链点桩号，X：为断链距离。分正、负值。无断链时，程序自动值X=0，

变坡

*+530=>X=50

变坡

当遇短链如：K***+480 =K***+530 ，+480至+530之间没有距离，输Y=0即可，当遇长链如：K***+530=K***+480 ，+480至+530之有二倍的距离，两个完全一的里程，输Y=0只算了后一+480至+530，若计算前一个+480至+530，取Y为任意。偶遇平曲线内出现断链，要有就在曲线上，肯定会在缓线上。处理方法类似竖曲线。程序中【】符号并非计算机运算符，没有断链时，【】号内的程序不输入算机。路中断链不多的情况下，为了提高运算速度，建议不采用【】内的程序理断链。对断链

5坐标反算

主程序：ZBFS

L1 Lb1 0：｛DE｝：Norm： PO1(D-X,E-Y)： Fix 3：“S=” ◢

L2 W≤0=> W=W+360⊿IntW + Int (frac W×60) / 100 + frac

( fracW×60 )×0.006：Fix 4：“AV=” ◢ Goto 0

程序中字母代表

转载请注明出处范文大全网 » 坐标方位角计算