关于坐标正反算的应用

关于坐标正反算应用备注

1、图纸上如果单纯只注明曲线的半径，就说明这段曲线是缓和曲线；

2、如果有注明曲线的所有要素，就说明这段曲线是圆曲线；

3、如果在图纸的下方有注明曲线的各要素，而且将切线分成几段，就说明这段曲线是缓和曲线带圆曲线；

4、在同一条直线同一方向上任何点的方位角都是相同的。

5、在计算方位角时，两个坐标输入次序先后不同时，得出的方位角不同，但反算距离是一样的。

○1关于坐标正反算的应用

（先点击解析交会和工具；曲线的转角=转向角也是偏角）

一、以知两点坐标，求距离方位角？称为反算

例：

测站点坐标待定点坐标

1、点击坐标正反算→点击坐标反算→输入起点坐标X（1234.5678），Y （8765.4321）→再输入终点坐标X(1293.7422),Y(8870.2181)。

2、点击计算，得出反算方位角60.324509(即至待定点方位角60o32′45.09")。得出反算距离120.339999(即至待定点距离)。

下表是按上面算式计算的结果数据

二、已知一个点坐标，至待定点距离(120.339999)，坐标点至待定点方位角

(60.324509,即60o32′45.09")。求待定点坐标？称坐标正算

例：

已知坐标点待定点坐标

1、点击坐标正反算→点击坐标正算→输入起点坐标X（1234.5678）→

Y(8765.4321)。

2、再输入已知方位角（60.324509）,输入已知距离(120.339999)。

3、点击计算，得出待定点坐标结果：X=1293.742201

Y=8870.218099

三、已知A、B两点坐标，B、C两点间距离（45.21），求C点坐标？

例：

点点点

1、先求出A点至B点的方位角：

1）、点击坐标正反算→点击坐标反算→先输入起点坐标

即A点 X（18081.584）,Y(101832.735),再输入终点坐标

即B点X(18122.972),Y(101831.379)。

2）、点击计算：得出反算方位角（358.072454；即358o7′24.54"）

得出反算距离（41.410207；即A点至B点的距离）。

3）、退出→点击坐标正算→输入起点坐标即B点X （18122.972）,Y(101831.379)。

4）、再输入方位角（358.072454）,输入已知距离(即B点至C点45.21)。

5）、点击计算，得出C点坐标结果X=18168.157755,

Y=101829.898574

四、已知：B、C两点坐标，B点至A点距离（41.41）,求A点坐标?

例:

点点点

先求C点至B点的方位角：

1）、点击坐标正反算→点击坐标反算→先输入

C点坐标X=18168.157755,Y=101829.898574,再输入

B点坐标X=18122.972, Y=101831.379

2）、点击计算，得出反算方位角（178.072454,即178o7′24.54"）

得出反算距离 (45.21,即C点至B点距离)

3)、退出→点击坐标正算→输入起点坐标即B点X=18122.972

Y=101831.379

4)、再输入方位角（178.072454）,输入已知距离(即B点至A点41.41)。

5）、点击计算,得出A点坐标结果X=18081.584207

Y=101832.734993

五、已知A、C两点坐标，A点至B点距离（41.41），求B点坐标？

例：

点点点

先求出A点至C点的方位角

1）、点击坐标正反算→点击坐标反算→输入A点坐标即

起点X=18081.5842, Y=101832.735, 再输入C点坐标即

终点X=18168.157755, Y=101829.898574

2)、点击计算：得出反算方位角（358.072454）

反算距离 (86.620208,即A点至C点距离)

3)、退出→点击坐标正算→输入A点坐标即起点X=18081.584,

Y=101832.735

4)、再输入方位角（358.072454）,输入已知距离(即A至B点41.41)。

5）、点击计算，得出B点坐标即结果X=18122.971793

Y=101831.379007

六、已知A 、C 两点坐标，C 点至B 点距离（45.21），求B 点坐标？

例：

点点

点.584

.735

先求出C 点至A 点方位角

1、点击坐标正反算→点击坐标反算→先输入C 点坐标即起点

X=18168.157755； Y=101829.898574；再输入A 点坐标即终点

X=18081.584； Y=101832.735

2、点击计算：得出反算方位角（178.072454，即178o7′24.54"）反算距离（86.620208，即C 点至A 点距离）

3、退出→点击坐标正算→输入C 点坐标即起点X=18168.157755

Y=101829.898574

4、再输入方位角（178.072454）；输入已知距离（即C 点至B 点45.21） 5点击计算，得出B 点坐标即结果X=18122.972； Y=101831.379

注:如五、六例题的方位角计算，输入坐标时应先输入已知距离起终两个坐标点中的一个已知坐标点；如五例题已知A至B点距离，就要先输入A点坐标；

如六例题已知C至B点距离，就要先输入C点坐标。

○2关于三角形夹角应用

例:

已知：A、B、C点坐标，求∠BAC；∠ABC；∠ACB；及A— B边长；

A—C边长；B—C边长；面积？

1、点击三角形夹角→输入A点坐标X=18080.379；Y=101806.929；

B点坐标X=18122.972；Y=101831.379；

C点坐标X=18081.584；Y=101832.735；

2、点击计算，得出：∠BAC = 58o3′24.02"

∠ABC = 31o56′39.86"

∠ACB = 89o59′56.13"

AB边长=48.7999 ； AC边长=25.8198； BC边长=41.4102

面积=534.6023

注:三角形的三个角代号A、B、C须按上面以角度大小标注，C角为最大角，A角为第二大角，B角为最小角，不论三角形方面怎样摆都是这样。

○3关于圆曲线要素的部份计算范例

算例：

下图为一圆曲线，已知其交点桩号JD（3+135.12），交点前后转点的坐标如下图所示，设计的曲线半径是120M，整弧长是20M，偏角是40o20′03"。求各坐标点坐标？

一、先用程序计算主点的元素以及圆曲线细部坐标的切线长（T）、外距长（E）、圆曲线长（L）。

.320说明：上图算法时按无缓和曲线，如有缓和曲线的圆曲线，计算时注意JD至ZH，JD

至HZ均为切线段长（T）。符号说明：

R=半径 L(或Lc)=圆曲线长 a=曲线的转角 C=弦长 T=切线长 M=中央纵距 E=外距 QZ=曲线中点

ZY=直圆点（又叫曲线起点，上面图形中HY应改为ZY）

YZ=圆直点（又叫曲线终点）

Ls=缓和曲线长度（ZH至ZY距离，HZ至YZ距离都是缓和曲线）

1、计算切线长（T）：

点击圆曲线要素→在计算机切线长栏内点击第一行圆点→已知a内填偏角（即40.2003）→R内填半径（120）→点击计算→得出切线长（T）=44.0731；

2、计算外距长（E）：

点击圆曲线要素→在计算外距栏内点击第一行圆点→已知 a 内填偏角（即40.2003）→R内填半径(120)→点击计算→得出外距长(E)=7.8376；

3、计算圆曲线长（L）：

点击圆曲线要素→在计算曲线长栏内点击第一行圆点→已知a内填偏角（即40.2003）→R内填半径（120）→点击计算→得出圆曲线长（L）=84.4557；

即：T=44.0731 E=7.838 L=84.4757

二、已知JD、ZD2两点坐标，求YZ坐标点：

1、先求出JD至ZD2两点坐标的方位角

1）、点击坐标正反算→点击坐标反算→输入起点即JD坐标X（6848.320）；Y（5634.240）→再输入终点即ZD2坐标X(6845.232)；Y（5702.005）。

2）、点击计算，得出反算方位角:92.363283(即: 92o36′32.83")

得出反算距离:67.835322(即JD至ZD2距离)

2、再求YZ坐标

1）、点击坐标正反算→点击坐标正算→输入起点即JD坐标X（6848.320)；Y（5634.240）

2）、再输入方位角（92.363283）；输入已知距离即切线长（44.0731）；

3）、点击计算，得出YZ坐标结果X=6846.313705

Y=5678.267411

三、已知JD、ZD1两点坐标，求ZY坐标点：

1、先求出JD至ZD1两点坐标的方位角

1）、点击坐标正反算→点击坐标反算→输入起点即JD坐标X（6848.320）；Y（5634.240）→再输入终点即ZD1坐标X（6795.454）；Y（5565.901）

2）点击计算，得出反算方位角:232.163005(即: 232o16′30.05")

得出反算距离:86.400422（即JD至ZD1距离）

2、再求ZY坐标：

1）、点击坐标正反算→点击坐标正算→输入起点即JD坐标X（6848.320)；Y（5634.240）。

2）、再输入方位角（232.163005）,输入已知距离即切线长(44.0731)； 3）、点击计算，得出ZY坐标结果X=6821.352903

Y=5599.380083

四、求圆曲线起点切线段ZY至JD的方位角：

1、点击坐标正反算→点击坐标反算→输入ZY坐标起点X（6821.352903）；Y(5599.380083)→再输入JD坐标起点X（6848.320）；Y（5634.240）。

2、点击计算，得出反算方位角:52.163005

得出反算距离:44.073100

五、下列表中的圆曲线坐标法计算数据，如下面例题的计算方式进行验算

例1、已知桩号ZY坐标X=6821.353；Y=5599.380；

P1坐标X=6826.562；Y=5606.659；求ZY至P1的弘长（C）

1、先求出ZY至P1两点坐标的方位角

1）、点击坐标正反算→点击坐标反算→输入起点即ZY坐标X=6821.353；Y=5599.380→再输入终点即P1坐标X=6826.562；Y=5606.659；

2）、点击计算，得出反算方位角：54.24422；

得出反算距离：8.950839；

即：ZY至P1两点的距离也即弘长（C）=8.950839；

例2、已知桩号ZY坐标X=6821.353；Y=5599.380；ZY、P1两点的方位

角54.24422；距离即弘长8.950839；求P1坐标点？

1）、点击坐标正反算→点击坐标正算→输入起点即ZY坐标X=6821.353； Y=5599.380； 2）再输入方位角54.24422，输入已知距离即弘长8.950839；

3）、点击计算，得出P1坐标结果X=6826.562

Y=5606.659

例3、已知桩号已知桩号P1坐标X=6826.562；Y=5606.659；

ZY坐标X=6821.353；Y=5599.380；求P1至ZY的弘长（C）？

1）、点击坐标正反算→点击坐标反算→输入起点即P1坐标X=6826.562；Y=5606.659→再输入终点即ZY坐标X=6821.353；Y=5599.380；

2）、点击计算，得出反算方位角：234.24422；

得出反算距离：8.950839；

即：P1至ZY两点距离也即弘长（C）=8.950839

(注:如已知P1坐标,P1至ZY两点方位角及两点距离即弘长,求ZY坐标的算式按例2题) 例4、已知桩号ZY坐标X=6821.353；Y=5599.380；

YZ坐标X=6846.314；Y=5678.267；求ZY至YZ的弘长（C）？

1、先求ZY至YZ两点坐标的方位角：

1）、点击坐标正反算→点击坐标反算→输入起点即ZY坐标X=6821.353；Y=5599.380→再输入终点即YZ坐标X=6846.314；Y=5678.267；

2）、点击计算，得出反算方位角：72.263072；

得出反算距离：82.741829；

即：ZY至YZ两点距离也即弘长（C）=82.741829；

(注:如已知ZY坐标,ZY至YZ两点方位角及两点距离即弘长,求YZ坐标的算式按例2题)

五、已知ZY坐标X=6821.352903 Y=5599.380083

P1坐标X=6826.562 Y=5606.659

求: ZY至P1圆曲线长( L )?

1、先求出ZY至P1两点坐标的距离即弘长（ C ）

1）、点击坐标正反算→点击坐标反算→输入ZY坐标X=6821.352903；

Y=5599.380083；再输入P1坐标X=6826.562 ；Y=5606.659

2）、点击计算，得出反算方位角=54.243927；

得出反算距离=8.950828,即8.950828为ZY至P1的距离也即弘长( C )；

2、再求出ZY至P1的转角（ a ）

1）、点击圆曲线要素→在计算转向角（a）栏内填入已知半径（R）=120；弘长（C）=8.950828；→点击计算，得出转向角（a）=4°16′28.91"(即4.162891)； 2）、在计算曲线长（L）栏内填入已知（a）=4.162891；R=120；点击计算，得出曲线长（L）=8.9529（即ZY至P1两点圆线长=8.9529）

○4关于圆曲线要素的部份计算范例

下图为一具有缓和曲线的圆曲线，已知其交点JD坐标及ZD1、ZD2坐标，设计半径R=400，缓和曲线长度Ls=60，偏角N=61o47′24"；

主点桩号：ZH=977.313； ZY=1037.313； QZ=1223.001； YZ=1408.689

HZ=1468.689；求各坐标点坐标？

.977

.696

（缓和曲线）

～，～为缓和曲线段

注：上图为有缓和曲线的圆曲线，计算时注意JD至ZH，JD至HZ均为切线段（T）

一、先按○3、一、程序计算得出曲线元素分别为T=269.567 E=66.578 L=371.376；

二、求ZH坐标？

1、先求出JD、ZD1两点坐标的方位角

1）、点击坐标正反算→点击坐标反算→输入起点即JD坐标X=1602.568；Y=2601.784→再输入终点即ZD1坐标X=1766.376；Y=2353.099；

2）、点击计算，得出反算方位角：303.222196

得出反算距离:297.787324(即JD至ZD1距离)

2、再求ZH坐标：

1）、点击坐标正反算→点击坐标正算→输入起点即JD坐标X=1602.568；Y=2601.784；

2）、再输入方位角：303.222196，输入已知距离即切线长：269.56；

3）、点击计算：得出ZH坐标结果X=1750.852457

Y=2376.666059

三、求HZ坐标

1、先求出JD至ZD2两点坐标的方位角

计算方式同二、1；得出方位角：61.345776；

得出反算距离：330.767872(即JD至ZD2两点距离)

2、再求HZ坐标：

计算方式同二、2；得出HZ坐标结果X=1730.852137；

Y=2838.869528；

四、下列表中的缓和曲线坐标法计算数据，按○4、一、二、三、方式进行

验算:

○5关于长方形坐标的计算

例：一、已知A、B两点坐标，A至C、B至D距离是25.82m,求:C、D坐标？

（注：计算输入方位角时为B、A两点方位角减去90o后的方位角，同例题四）

1、先求B、A两点的方位角：

1）、点击坐标反算→点击坐标反算→先输入起点坐标即B点X=18122.126；

Y=101805.572→再输入终点坐标即A点X=18080.739；Y=101806.902；

2）、点击计算，得出反算方位角：178.072(即178o7′20")

得出反算距离:41.41(即B至A距离)

2、求C点坐标？

1）、点击坐正算→输入起点坐标即A点X=18080.739； Y=101806.929；

2）、输入已知方位角：178.072-90o=88.072(即输入减去90o后的方位角88.072)；输入已知距离：25.82；

3）、点击计算，得出C点坐标结果X=18081.585； Y=101832.735；

3、求D点坐标？

1）、点击坐正算→输入起点坐标即B点X=18122.126； Y=101805.572；

2）、输入已知方位角：178.072-90o=88.072(即输入减去90o后的方位角88.072)；输入已知距离：25.82；

3）、点击计算，得出D点坐标结果X=18122.972；

Y=101831.379；

例：二、已知C、D两点坐标，C至A、D至B距离是25.82m,求:A、B坐标？

（注：计算输入方位角时为D、C两点方位角加90o后的方位角，同例题三）

1、先求D、C两点的方位角：

1）、点击坐标反算→点击坐标反算→先输入起点坐标即D点X=18122.972；

Y=101831.379→再输入终点坐标即C点X=18081.584；Y=101832.735；

2）、点击计算，得出反算方位角：178.072(即178o7′20")

得出反算距离:41.41(即D至C距离)

2、求A点坐标？

1）、点击坐正算→输入起点坐标即C点X=18081.584； Y=101832.735；

2）、输入已知方位角：178.072+90o=268.072(即输入加90o后的方位角268.072)；输入已知距离：25.82；

3）、点击计算，得出A点坐标结果X=18080.739； Y=101806.929；

3、求B点坐标？

1）、点击坐正算→输入起点坐标即D点X=18122.972； Y=101831.379；

2）、输入已知方位角：178.072+90o=268.072(即输入加90o后的方位角268.072)；输入已知距离：25.82；

3）、点击计算，得出B点坐标结果X=18122.126；

Y=101805.572；

例：三、已知A、C两点坐标，A至B、C至D距离是41.41m,求:B、D坐标？

（注：计算输入方位角时为C、A两点方位角加90o后的方位角，同例题二）

.739

1、先求C、A两点的方位角：

1）、点击坐标反算→点击坐标反算→先输入起点坐标即C点X=18081.584；

Y=101832.735→再输入终点坐标即A点X=18080.739；Y=101806.929；

2）、点击计算，得出反算方位角：268.072(即268o7′20")

得出反算距离:25.82(即C至A距离)

FX5800P计算器坐标正反算程序Word文档

(以下程序是专业人士编写，本店铺不对程序负责，仅供您参考使用。) 卡西欧fx5800p计算器坐标正反算程序

一、程序功能本程序由 6 个主程序、 5 个次子程序及 5 个参数子程序组成。主要用于公路测量中坐标正反算，设计任意点高程及横坡计算 , 桥涵放样，路基开挖口及填方坡脚线放样。程序坐标计算适应于任何线型 . 二、源程序 1. 主程序 1 ：一般放样反算程序(① 正算坐标、放样点至置仪点方位角及距离；② 反算桩号及距中距离 ) 程序名 :1ZD-XY Lb1 0:Norm 2 F=1 ： ( 正反算判别， F=1 正算， F=2 反算 , 也可以改 F 前加？，改 F 为变量 ) Z[1]=90 （与路线右边夹角） Prog ＂ THB ＂： F=1=>Goto 1:F=2=>Goto 2 Lb1 1: Ｆ ix 3: ＂Ｘ = ＂： Locate 6,4, Ｘ◢ ＂Ｙ＝＂： Locate 6,4, Ｙ◢ Ｐ rog ＂3JS”:Goto 0: Lb1 2:Fix 3: ＂ＫＭ＝＂： Locate 6,4, Ｚ◢ ＂Ｄ＝＂： Locate 6,4, Ｄ◢ Ｇ oto 0 ２．主程序２：高程序横坡程序 ( 设计任意点高程及横坡 ) 程序名： 2GC LbI 0:Norm 2 “KM”?Z:?D: Prog”H”:Fix 3:” H=”:Locate 6,4,H◢ “ I=”: Locate 6,4,I◢ Goto 0 3. 主程序 3 ：极坐放样计算程序 ( 计算放样点至置仪点方位角及距离 ) 程序名： 3JS X ： Y ： 1268 ．123→K( 置仪点 X 坐标 ) 2243 ．545→L （置仪点 Y 坐标，都是手工输入 , 也可以建导线点数据库子程序 , 个人认为太麻烦） Y-L→E ： X-K→F ： Pol(F,E):IF J<0:Then J+360→J:Int(J)+0.01Int(60Frac(J))+0.006Frac(60Frac(J)) →J:( 不习惯小数点后四位为角度显示的，也可以用命令J◢DMS◢ 来直接显示) Fix 4:” FWJ=”: Locate 6,4,J◢( 不习惯小数点后四位为角度显示的，也可以用命令 J◢DMS◢ 来直接显示 ) Fix 3:” S=”:Locate 6,4,I◢ 4 ．主程序 4 ：涵洞放样程序（由涵中心桩号计算出各涵角坐标、在主程序 3 中输入置仪点坐标后计算放样点至置仪点方位角及距离 ) 程序名： 4JH-XY LbI 0:Norm 2 90→Z[1]( 涵洞中心桩与右边夹角，手工输入，也可以修改成前面加？后变为变量 )

坐标正反算

一、坐标正算与坐标反算 1、坐标正算已知点的坐标、边的方位角、两点间的水平距离，计算待定点的坐标，称为坐标正算。如图 6-6 所示，点的坐标可由下式计算：
式中、为两导线点坐标之差，称为坐标增量，即：
【例题 6-1】已知点 A 坐标， =1000 、 =1000 、方位角 =35°17＇36.5"，两点水平距离 =200.416 ，计算点的坐标？
35o17＇36.5"=1163.580 35o17＇36.5"=1115.793 2、坐标反算已知两点的坐标，计算两点的水平距离与坐标方位角，称为坐标反算。如图 6-6 可知，由下式计算水平距离与坐标方位角。
（6-3）（6-4）式中反正切函数的值域是-90°～+90°，而坐标方位角为 0°～ 360°，因此坐标方位角的值，可根据、的正负号所在象限，将反正切角值换算为坐标方位角。

【例题 6-2】 =3712232.528 、 =523620.436 、 =3712227.860 、 =523611.598 ，计算坐标方位角计算坐标方位角
、水平距离。
=62°09＇29.4"+180°=242°09＇29.4"
注意：一直线有两个方向，存在两个方位角，式中：
、
的计算是过 A 点坐标纵轴至直线的坐标方位角，若所求坐标方位角为
，则应是 A 点坐标减点坐标。
坐标正算与反算，可以利用普通科学电子计算器的极坐标和直角坐
标相互转换功能计算，普通科学电子计算器的类型比较多，操作方法不
相同，下面介绍一种方法。
【例题 6-3】坐标反算，已知 =2365.16 、 =1181.77 、
=1771.03 、 =1719.24 ，试计算坐标方位角、水平距离。
键入 1771.03-2365.16 按等号键［=］等于纵坐标增量，按储存键
［］，
键入 1719.24-1181.77 按等号键［=］等于横坐标增量，按［］键
输入，按［］显示横坐标增量，按［］键输入，按第二功能键［2ndF］，

坐标正反算程序计算器

一、 Lbl 3:"1→ZS,2→FS"?Q Q=1=>Goto 1:Q=2=>Goto 2 Lbl 1:"CE:X"?M:"CE:Y"?F:"JL"?L:"FWJ"?A:Rec(L,A):M+I→C:F+J→D Cls "X=":Locate 3,1,C:"Y=":Locate 3,2,D◢ Goto 3 Lbl 2::"CE:X"?G:"CE:Y"?H:"(HOU)FY:X"?N:"(HOU)FY:Y"?E Pol(N-G,E-H) If J<0:Then J+360→Y:Else J→Y:IfEnd Cls "FY JL=":Locate 10,1,I:"FY FWJ=":Y◆DMS◢ Goto 3 进入程序运行如下: 1→ZS,2→FS? 输入1为正算,2为反算. 以输入1为例: CE:X? 测站点X(5796.717) CE:Y? 测站点Y(5212.569) JL? 仪器测得的距离(321.889) FWJ? 仪器测得的方位角(193-41-07) 得到:X=5483.966 Y=5136.414 再按EXE,输2为例: CE:X? 测站点X(5796.717) CE:Y? 测站点Y(5212.569) (HOU)FY:X? 后视或放样的X(5483.966) (HOU)FY:Y? 后视或放样的Y(5136.414) 得到:FY JL=321.889 FY FWJ=193-41-6.79 二、 Deg : Fix 3 : “XZ→0:YZ→1”？A : If A = 1: Then Goto 1 : IfEnd ↙ If A = 0 : Then “BS→0:XY→1:AND→2:DK→3:L(I)→4 ”？O : IfEnd ↙ If O = 4: Then Goto 1 : IfEnd ↙ If O = 3: Then Prog “F.2 ”: If X= 0 : Then Goto 1 : IfEnd : IfEnd ↙ If O≠1: Then “X1 ”？X : “Y1”？Y : X→Z［11］: Y→Z［12］: “X2 ”？P : “Y2”？Q : Pol( P－X , Q－Y) : If J﹤0 : Then J + 360→J : IfEnd : Cls : “S12= ”: Locate 6 ,1, I : “B12= ”: J ?DMS◣

高斯投影坐标正反算VB程序

高斯投影坐标正反算 V B程序文件编码（GHTU-UITID-GGBKT-POIU-WUUI-8968）

高斯投影坐标正反算学院：班级：学号：姓名：课程名称: 指导老师：

实验目的： 1.了解高斯投影坐标正反算的基本思想； 2.学会编写高斯正反算程序，加深了解。实验原理：高斯投影正算公式中应满足的三个条件： 1. 中央子午线投影后为直线； 2. 中央子午线投影后长度不变； 3. 投影具有正形性质，即正形投影条件。高斯投影反算公式中应满足的三个条件： 1. x坐标轴投影成中央子午线，是投影的对称轴； 2. x轴上的长度投影保持不变； 3. 正形投影条件，即高斯面上的角度投影到椭球面上后角度没有变形，仍然相等。操作工具：计算机中的代码： Dim a As Double, b As Double, x As Double, y As Double, y_#

Dim l_ As Double, b_ As Double, a0#, a2#, a4#, a6#, a8#, m2#, m4#, m6#, m8#, m0#, l0#, e#, e1# Dim deg1 As Double, min1 As Double, sec1 As Double, deg2 As Double, min2 As Double, sec2 As Double Private Sub Command1_Click() Dim x_ As Double, t#, eta#, N#, W#, k1#, k2#, ik1%, ik2%, dh% deg1 = Val min1 = Val sec1 = Val deg2 = Val min2 = Val sec2 = Val l_ = (deg1 * 3600 + min1 * 60 + sec1) / 206265 b_ = (deg2 * 3600 + min2 * 60 + sec2) / 206265 dh = Val k1 = ((l_ * 180 / + 3) / 6) k2 = (l_ * 180 / / 3) ik1 = Round(k1, 0) ik2 = Round(k2, 0) If dh = 6 Then l0 = 6 * ik1 - 3 Else

关于坐标正反算的应用

关于坐标正反算应用备注 1、图纸上如果单纯只注明曲线的半径，就说明这段曲线是缓和曲线； 2、如果有注明曲线的所有要素，就说明这段曲线是圆曲线； 3、如果在图纸的下方有注明曲线的各要素，而且将切线分成几段，就说明这段曲线是缓和曲线带圆曲线； 4、在同一条直线同一方向上任何点的方位角都是相同的。 5、在计算方位角时，两个坐标输入次序先后不同时，得出的方位角不同，但反算距离是一样的。

○1关于坐标正反算的应用（先点击解析交会和工具；曲线的转角=转向角也是偏角）一、以知两点坐标，求距离方位角？称为反算例：测站点坐标待定点坐标 1、点击坐标正反算→点击坐标反算→输入起点坐标X（1234.5678），Y （8765.4321）→再输入终点坐标X(1293.7422),Y(8870.2181)。 2、点击计算，得出反算方位角60.324509(即至待定点方位角60o32′45.09")。得出反算距离120.339999(即至待定点距离)。下表是按上面算式计算的结果数据

二、已知一个点坐标，至待定点距离(120.339999)，坐标点至待定点方位角 (60.324509,即60o32′45.09")。求待定点坐标？称坐标正算例：已知坐标点待定点坐标 1、点击坐标正反算→点击坐标正算→输入起点坐标X（1234.5678）→ Y(8765.4321)。 2、再输入已知方位角（60.324509）,输入已知距离(120.339999)。 3、点击计算，得出待定点坐标结果：X=1293.742201 Y=8870.218099

卡西欧9750坐标正反算及程序常用键使用说明

坐标反算 ST(主程序名) “A”？→ A:“B”？→ B:LbI 0:“C”？→ C:“D”？→ D:√((C-A)2+(D-B)2))→S：D-B→M：Mcos-1((C-A）÷S）÷Abs M→T：If T＜0:Then T+360 →T：Goto 1:IfEnd :T →T：Goto 1:LbI 1: “T=”:T▲DMS ◢“S=”:S◢Goto 0 程序运行示例及说明运行主程序“ST” 第一步：A? 742589.425(输入起点或测站点的“X”坐标). 第二步：B? 463404.387(输入起点或测站点的“Y”坐标). 第三步：C? 742669.0657 (输入放样点的“X”坐标) 第四步: D? 463435.9536 (输入放样点的“Y”坐标). 第五步：T= 21°37′17.49″(显示放样点的计算方位角). 第六步：S= 85.6685(显示放样点的计算边长). 第171页

坐标正算 XY(主程序名) “A”？→ A:“B”？→ B: “C”？→ C:“F”？→ F:ABCF:LbI 0:“H”？→ H:“S”？→ S: HS:“X=”:A+(H-F)cosC-SsinC→ X◢“Y=”: B+(H-F) sin C+ScosC→ Y◢Goto 0 程序运行示例及说明运行主程序“XY” 第一步：A? 742589.425(输入起点或测站点的“X”坐标). 第二步：B? 463404.387(输入起点或测站点的“Y”坐标). 第三步：C? 21°37′17.49″(输入直线段的方位角或测站点至测点的边长方位角) 第四步: F? 0(输入直线段起点桩号或测站点的桩号F=0) 第五步：H? 85.6685 (输入直线段上待求点桩号或测站点至测点的边长长度). 第六步：S? 0 (输入直线段上待求点的边距【左“-”，右“+”】或为测站时S=0). 第七步：X=742669.0657 (显示计算坐标). 第八步：Y=463435.9536 (显示计算坐标).

坐标正反算计算公式

坐标正反算公式

一、GPS数据处理相关术语 1、三维无约束平差三维无约束平差是以基线解算所得到的三维静态基线向量为观测值，待定参数主要为GPS 网中点的坐标；同时，利用基线解算时随基线向量一同输出的基线向量的方差阵，形成平差的随机模型，最终形成平差完整的数学模型。随后对所形成的数学模型进行求解，根据平差结果来确定观测值中是否存在粗差，数学模型是否有需要改进的部分，若存在问题，则采用相应的方法进行处理并重新进行求解；若未发现问题，则输出最终结果，并进行后续的数据处理。 2、三维约束平差三维约束平差是以基线解算所得到的三维静态基线向量为观测值，在平差过程中引入会使GPS 网的尺度、方向和位置发生变化的外部起算数据，从而实现GPS 网成果由基线解算时GPS 卫星星历所采用的参照系（WGS84 ）到特定参照系的转换，得到在特定参照系下的经过用户约束条件约束的点三维空间坐标。二、南方GPS数据处理软件的平差方式

如果在某些控制测量中,需要得到精确的WGS84经纬度或空间坐标时,让系统自动识取显然是不行的,此时我们只要为参与平差的已知点的WGS84空间坐标输入后再进行三维平差即可在这里,我们加入了两个已知点的WGS84空间坐标,三维平差后,列表中会显示两个"固定"字样的点,说明,在进行三维平差中,我们把这两个点做为起算点,进行平差别的未知点。

工程测量坐标正反算通用程序(终极篇)

第五篇坐标正反算通用程序(终极篇) 1. 坐标正算主程序(命名为ZBZS) 第1行：Lbl 0:”K=”?K:”BIAN=”? Z:”α=”?B 第2行：Prog “A” 第3行：”X=”:N+Zcos(F+B)◢ 第4行：”Y=”:E+Zsin(F+B)◢ 第5行：”F=”:F?DMS◢ 第6行：Goto 0 K——计算点的里程 BIAN——计算点到中桩的距离（左负右正） α——取前右夹角为正 2. 坐标反算桩号和偏距主程序(命名为ZBFS) 第1行：”X1=”? C:”Y1=”?D: ”K1=”?K 第2行：Lbl 0:Prog “A” 第3行：Pol(C-N,D-E):Icos(F-J)→S:K+S→K 第4行：Abs(S)>0.0001=>Goto 0 第5行：”K1=”:K◢ 第6行：”BIAN=”:Isin(J-F)→Z◢ X1——取样点的X坐标 Y1——取样点的Y坐标 K1——输入时为计算起始点(在线路内即可)，输出时为反算点的桩号 Z——偏距（左负右正）注：在9860或9960中需将第3行替换为Pol(C-N,D-E): List Ans[1]→I ：List Ans[2]→J：Icos(J-F)→S:K+S→K，正反算主程序所有输入赋值多加一赋值符号（→），其他所有除数据库外的程序均保持不变 3. 计算坐标子程序(命名为XYF) 为了简洁，本程序由数据库直接调用，上述中的正反算主程序不直接调用此程序第1行：K-A→S：(Q-P)÷L→I 第2行：N+∫(cos(F+X(2P+XI)×90÷π),0,S)→N 第3行：E+∫(sin(F+X(2P+XI)×90÷π),0,S)→E 第4行：F+S(2P+S I)×90÷π→F 第5行：F<0=>F+360→F: F>360=>F-360→F 4. 数据库（命名为A）第1行：K≤175.191=>Stop（超出后显示Done）第2行：175.191→A:428513.730→N:557954.037→E:92°26′40″→F:0→P:1/240→Q:70.417→L: K≤A+L =>GoTo 1（第一缓和曲线）第3行：245.607→A: 428507.298→N:558024.092→E: 100°50′59.4″→F: 1/240→P:1/240→Q: 72.915→L: K≤A+L =>Goto 1（圆曲线）

坐标正反算定义及公式

坐标正反算定义及公式 Corporation standardization office #QS8QHH-HHGX8Q8-GNHHJ8

第六章→第三节→导线测量内业计算导线计算的目的是要计算出导线点的坐标，计算导线测量的精度是否满足要求。首先要查实起算点的坐标、起始边的方位角，校核外业观测资料，确保外业资料的计算正确、合格无误。一、坐标正算与坐标反算 1、坐标正算已知点的坐标、边的方位角、两点间的水平距离，计算待定点的坐标，称为坐标正算。如图6-6 所示，点的坐标可由下式计算：式中、为两导线点坐标之差，称为坐标增量，即：【例题6-1】已知点A坐标，=1000、=1000、方位角=35°17＇36.5"，两点水平距离=200.416，计算点的坐标？

35o17＇36.5"=1163.580 35o17＇36.5"=1115.793 2、坐标反算已知两点的坐标，计算两点的水平距离与坐标方位角，称为坐标反算。可知，由下式计算水平距离与坐标方位角。（6-3）（6-4）式中反正切函数的值域是-90°～+90°，而坐标方位角为0°～360°，因此坐标方位角的值，可根据、的正负号所在象限，将反正切角值换算为坐标方位角。【例题6-2】=3712232.528、=523620.436、=3712227.860、=523611.598，计算坐标方位角计算坐标方位角、水平距离。

=62°09＇29.4"+180°=242°09＇29.4" 注意：一直线有两个方向，存在两个方位角，式中：、的计算是过A点坐标纵轴至直线的坐标方位角，若所求坐标方位角为，则应是A点坐标减点坐标。坐标正算与反算，可以利用普通科学电子计算器的极坐标和直角坐标相互转换功能计算，普通科学电子计算器的类型比较多，操作方法不相同，下面介绍一种方法。【例题6-3】坐标反算，已知=2365.16、=1181.77、 =1771.03、=1719.24，试计算坐标方位角、水平距离。键入1771.03-2365.16按等号键［=］等于纵坐标增量，按储存键［］，键入1719.24-1181.77按等号键［=］等于横坐标增量，按［］键输入，按［］显示横坐标增量，按［］键输入，按第二功能键［2ndF］，再按［］键，屏显为距离，再按［］键，屏显为方位角。【例题6-4】坐标正算，已知坐标方位角=294°42＇51"， =200.40，试计算纵坐标增量横坐标增量。

5800-9860计算器坐标正反算通用程序

5800-9860计算器坐标正反算通用程序 1. 坐标正算主程序(命名为ZBZS) 第1行：Lbl 0:”K=”?K:”BIAN=”? Z:”α=”?B 第2行：Prog “A” 第3行：”X=”:N+Zcos(F+B)◢ 第4行：”Y=”:E+Zsin(F+B)◢ 第5行：”F=”:F◢ 第6行：Goto 0 K——计算点的里程 BIAN——计算点到中桩的距离（左负右正） α——取前右夹角为正 2. 坐标反算桩号和偏距主程序(命名为ZBFS) 第1行：”X1=”? C:”Y1=”?D: ”K1=”?K 第2行：Lbl 0:Prog “A” 第3行：Pol(C-N,D-E) 第4行：List Ans[1]→I 第5行：List Ans[2]→J 第6行：Icos(F-J)→S:K+S→K 第7行：Abs(S)>0.0001=>Goto 0 第8行：”K1=”:K◢ 第9行：”BIAN=”:Isin(J-F)→Z◢ X1——取样点的X坐标 Y1——取样点的Y坐标 K1——输入时为计算起始点(在线路内即可)，输出时为反算点的桩号 Z——偏距（左负右正） 3. 计算坐标子程序(命名为XYF) 为了简洁，本程序由数据库直接调用，上述中的正反算主程序不直接调用此程序第1行：K-A→S：(Q-P)÷L→I 第2行：N+∫(cos(F+X(2P+XI)×90÷π),0,S)→N 第3行：E+∫(sin(F+X(2P+XI)×90÷π),0,S)→E 第4行：F+S(2P+SI)×90÷π→F 4. 数据库（命名为A）

第1行：K≤175.191=>Stop 第2行： 175.191→A:428513.730→N:557954.037→E:92°26′40″→F:0→P:1/240→Q:70.417→L: K≤A+L =>GoTo 1（第一缓和曲线，圆半径为240）第3行：245.607→A: 428507.298→N:558024.092→E: 100°50′59.4″→F: 1/240→P:1/240→Q: 72.915→L: K≤A+L =>Goto 1（第圆曲线，半径为240）第4行：318.522→A: 428482.988→N:558092.538→E: 118°15′25.2″→F: 1/240→P: 0→Q: 55.104 →L: K≤A+L =>Goto 1（第二缓和曲线，圆半径为240）第5行：373.627→A:428453.283→N:558138.912→E:124°50′4.5″→F:0→P:- 1/180→Q:67.222→L: K≤A+L=>Goto 1:Stop（第一缓和曲线，圆半径为180）第6行：Lbl 1:Prog “XYF” A——曲线段起点的里程 N——曲线段起点的x坐标 E——曲线段起点的y坐标 F——曲线段起点的坐标方位角 P——曲线段起点的曲率(左负右正) Q——曲线段终点的曲率(左负右正) L——曲线段长度（尽量使用长度，为计算断链方便）说明：（1）在9860中，程序中所有公式和部分函数结果均存储在List Ans列表数组中，要想多次调用最好随公式取出结果，并赋给变量。（2）正算主程序可以计算一般边桩的坐标，如要计算类似涵洞端墙的坐标需增加第二偏距和转角两个变量。（3）程序规定，左偏曲线曲率（半径倒数）输入负值，右偏曲线曲率输入正值，直线上点曲率输入0，例如直线段，线元起点和终点均输入0，第一缓和曲线分别输入0和圆半径的倒数，圆曲线均输入半径倒数，第二缓和曲线分别输入圆半径倒数和0，卵形曲线分别输入对应圆半径的倒数（4）若是从大里程向小里程的反方向计算，则曲率取正方向时的负值，方位角减去(或加上)180度。（5）有多个匝道的项目，可随时更改正反算主程序中的红色字体部分来调用其它线路的数据（6）反算桩号偏差为1mm （7）可以计算任意线型的任意点坐标

坐标正反算定义附公式

【例题6-1】已知点A坐标，=1000、=1000、方位角 =35°17＇36.5"，两点水平距离=200.416，计算点的坐标？ 35o17＇36.5"=1163.580 35o17＇36.5"=1115.793 2、坐标反算已知两点的坐标，计算两点的水平距离与坐标方位角，称为坐标反算。如图6-6可知，由下式计算水平距离与坐标方位角。（6-3）（6-4）式中反正切函数的值域是-90°～+90°，而坐标方位角为0°～360°，因此坐标方位角的值，可根据、的正负号所在象限，将反正切角值换算为坐标方位角。【例题6-2】=3712232.528、=523620.436、 =3712227.860、=523611.598，计算坐标方位角计算坐标方位角、水平距离。

高斯投影坐标正反算VB程序

高斯投影坐标正反算学院：班级：学号：姓名：课程名称: 指导老师：

实验目的： 1.了解高斯投影坐标正反算的基本思想； 2.学会编写高斯正反算程序，加深了解。实验原理：高斯投影正算公式中应满足的三个条件： 1. 中央子午线投影后为直线； 2. 中央子午线投影后长度不变； 3. 投影具有正形性质，即正形投影条件。高斯投影反算公式中应满足的三个条件： 1. x坐标轴投影成中央子午线，是投影的对称轴； 2. x轴上的长度投影保持不变； 3. 正形投影条件，即高斯面上的角度投影到椭球面上后角度没有变形，仍然相等。操作工具：计算机中的VB6.0 代码： Dim a As Double, b As Double, x As Double, y As Double, y_# Dim l_ As Double, b_ As Double, a0#, a2#, a4#, a6#, a8#, m2#,

m4#, m6#, m8#, m0#, l0#, e#, e1# Dim deg1 As Double, min1 As Double, sec1 As Double, deg2 As Double, min2 As Double, sec2 As Double Private Sub Command1_Click() Dim x_ As Double, t#, eta#, N#, W#, k1#, k2#, ik1%, ik2%, dh% deg1 = Val(Text1.Text) min1 = Val(Text2.Text) sec1 = Val(Text3.Text) deg2 = Val(Text4.Text) min2 = Val(Text5.Text) sec2 = Val(Text6.Text) l_ = (deg1 * 3600 + min1 * 60 + sec1) / 206265 b_ = (deg2 * 3600 + min2 * 60 + sec2) / 206265 dh = Val(Text9.Text) k1 = ((l_ * 180 / 3.14159 + 3) / 6) k2 = (l_ * 180 / 3.14159 / 3) ik1 = Round(k1, 0) ik2 = Round(k2, 0) If dh = 6 Then l0 = 6 * ik1 - 3 Else If dh = 3 Then

2021年坐标正反算计算公式

坐标正反算公式欧阳光明（2021.03.07）一、GPS数据处理相关术语 1、三维无约束平差三维无约束平差是以基线解算所得到的三维静态基线向量为观测值，待定参数主要为 GPS 网中点的坐标；同时，利用基线解算时随基线向量一同输出的基线向量的方差阵，形成平差的随机模型，最终形成平差完整的数学模型。随后对所形成的数学模型进行求解，根据平差结果来确定观测值中是否存在粗差，数学模型是否有需要改进的部分，若存在问题，则采用相应的方法进行处理并重新进行求解；若未发现问题，则输出最终结果，并进行后续的数据处理。 2、三维约束平差三维约束平差是以基线解算所得到的三维静态基线向量为观测值，在平差过程中引入会使 GPS 网的尺度、方向和位置发生变化的外部起算数据，从而实现 GPS 网成果由基线解算时 GPS 卫星星历所采用的参照系（ WGS84 ）到特定参照系的转换，得到在特定参照系下的经过用户约束条件约束的点三维空间坐标。二、南方GPS数据处理软件的平差方式

三维约束平差是指在基线解算后，WGS84坐标系下的三维平差，在三维平差中是不需要当地平面直角坐标系下的已知点坐标，当需要用到WGS84经纬度或空间直角坐标的用户可加载已知点的WGS84空间坐标（如果只有经纬度时，可采用 COORD4.1软件进行转换，本站免费提供）进行三维约束平差，即可得到与已知点相匹配的WGS84坐标。一般情况下，在“已知点坐标录入”窗口中，我们都没有输入WGS8坐标，而只输入当地坐标系下的已知坐标，此时GPS处理软件会自动识取一个坐标点的WGS84坐标进行约束平差。如下图：如果在某些控制测量中,需要得到精确的WGS84经纬度或空间坐标时,让系统自动识取显然是不行的,此时我们只要为参与平差的已知点的WGS84空间坐标输入后再进行三维平差即可在这里,我们加入了两个已知点的WGS84空间坐标,三维平差后,列表中会显示两个"固定"字样的点,说明,在进行三维平差中,我们把这两个点做为起算点,进行平差别的未知点。

卡西欧5800公路坐标正反算程序

一、坐标正算基本公式 (02) 二、坐标反算原理 (04) 三、高程数据库录入变换 (05) 四、计算器程序 (07) 01、ZBZS （坐标正算） (07) 02、ZBFS （坐标反算） (08) 03、GCJF （高程积分） (09) 04、PJFY （坡脚放样） (10) 05、JFCX （积分程序） (11) 06、ZBFY （坐标放样） (11) 07、DT （递推） (12) 08、HP （横坡） (13) 09、LK （路宽） (14) 10、SJKl （平面数据库） (14) IK SJK2 （纵面数据库） (14) 12、SJK3 （左路宽度数据库） (15) 13、SJK4 （右路宽度数据库） (15) 14、SJK5 （横坡数据库） (16) 15、SJK6 （下边坡数据库） (16) 16、SJK7 （左上边坡数据库） (17) 17、SJK8 （右上边坡数据库） (18)

五、后记 (19) CASIO 5800计算器公路工程测量程序 4 一、正算所涉及的计算公式图表1 在图1中，A点为回旋曲线起点，B点为回旋曲线止点，I点为所求坐标点。设： A点的X坐标为XA , Y坐标为Y A, A点的切线方位角为α, A点的曲率为P A点的里程为L A, B点的曲率为p 8, B点的里程为L B, I点的曲率为p∣, I点的里A, 程为L I O I点的切线角为B o 由于回旋线上各点曲率半径Ri和该点至曲线起点的距离L成反比。故此任意点的曲率为； Q =丄=土（C为常数）（1 ） R i C 由式（1）可知，回旋曲线任意点的曲率按线性变化，由此回旋曲线上里程为 L 点的曲率为； i

坐标正反算

一、坐标正算与坐标反算 1、坐标正算已知点的坐标、边的方位角、两点间的水平距离，计算待定点的坐标，称为坐标正算。如图6-6 所示，点的坐标可由下式计算：式中、为两导线点坐标之差，称为坐标增量，即：【例题6-1】已知点A坐标，=1000、=1000、方位角 =35°17＇36.5"，两点水平距离=200.416，计算点的坐标？ 35o17＇36.5"=1163.580 35o17＇36.5"=1115.793 2、坐标反算已知两点的坐标，计算两点的水平距离与坐标方位角，称为坐标反算。如图6-6可知，由下式计算水平距离与坐标方位角。（6-3）（6-4）式中反正切函数的值域是-90°～+90°，而坐标方位角为0°～360°，因此坐标方位角的值，可根据、的正负号所在象限，将反正切角值换算为坐标方位角。

【例题6-2】=3712232.528、=523620.436、 =3712227.860、=523611.598，计算坐标方位角计算坐标方位角、水平距离。 =62°09＇29.4"+180°=242°09＇29.4" 注意：一直线有两个方向，存在两个方位角，式中：、的计算是过A点坐标纵轴至直线的坐标方位角，若所求坐标方位角为，则应是A点坐标减点坐标。坐标正算与反算，可以利用普通科学电子计算器的极坐标和直角坐标相互转换功能计算，普通科学电子计算器的类型比较多，操作方法不相同，下面介绍一种方法。【例题6-3】坐标反算，已知=2365.16、=1181.77、 =1771.03、=1719.24，试计算坐标方位角、水平距离。键入1771.03-2365.16按等号键［=］等于纵坐标增量，按储存键［］，键入1719.24-1181.77按等号键［=］等于横坐标增量，按［］键输入，按［］显示横坐标增量，按［］键输入，按第二功能键［2ndF］，

卡西欧计算器坐标的正反算

可以算任意斜交涵洞轴线的坐标，增加T为斜交角度，规定T为涵轴右侧方向与“线路前进方向切线”之间的夹角，当涵轴与线路正交时，T=90,其他操作与原程序一样； 1. 正算子程序(SUB1) [color=Red]A=0.26：B=0.74：K=0.02：L=0.82：F=1-L： M=1-K：X=U+W(Acos(G+57.2958QKW(1/P+KWD))+Bcos(G+57.2958QLW(1/P+LW D))+Bcos(G+57.2958QFW (1/P+FWD))+Acos(G+57.2958QMW(1/P+MWD)))：Y=V+W(Asin(G+57.2958QKW(1/ P+KWD))+Bsin(G+ 57.2958QLW(1/P+LWD))+Bsin(G+57.2958QFW(1/P+FWD))+Asin(G+57.2958QMW (1/P+MWD)))：F=G+57.2958QW(1/P+ WD)+90：X=X+Zcos(F-90+T)：Y=Y+Zsin(F-90+T) 2. 反算子程序(SUB2) W=Abs((Y-V)cos(G-90)-(X-U)sin(G-90))：Z=0：Lbl 0：Prog "SUB1"：L=(G-90)+5 7.2958QW(1/P+ WD)：Z=(J-Y)cosL-(I-X)sinL：AbsZ<1E-6=>Goto1：≠>W=W+Z：Goto 0Δ←┘ Lbl 1：Z=0：Prog "SUB1"：Z=(J-Y)÷sinF 二.增设数据库程序（ＳＪＫ主程序） Lb1 4："1.SZ => XY"："2.XY => SZ"：｛NS｝：S∠下一线元起点里程＝＞O =本线元起点里程：U=本线元起点X：V=本线元起点Y：G=本线元起算方位角：H =本线元长度：P=起点曲率半径：R=终点曲率半径：Q=0或1、-1：Prog“TYQXJS”：Goto0Δ←┘(第一线元数据要素) S∠下一线元起点里程＝＞O=本线元起点里程：U=本线元起点X：V=本线元起点Y：G=本线元起算方位角：H=本线元长度：P=起点曲率半径：R=终点曲率半径：Q=0或1、-1：Goto0Δ←┘(第二线元数据要素)

线路坐标正算及反算程序

一.程序清单: 1.主程序(TYQXJS) "K0="？O："X0="？U："Y0="？V："FWJ="？G："LS="？H："+1，0，-1="？Q：If 0= Q：Then 1e45→P：1e45→R：Goto 0：Else "R1="？P："R2="？R：Goto 0：←┘ Lbl 0：(P-R)÷(2HPR) →D："Z=1,F=2"? N：If 1=N：Then Goto 1：Else Goto 2：←┘ Lbl 1："SK="？S："JZ="？Z：Abs(S-O) →W：Prog "SUB1"：F-90→F："X="：X◢"Y="：Y◢"FWJ="：F◢Goto 1◢ Lbl 2："CX="？X："CY="？X→I：Y→J：Prog "SUB2"："O+W→S：Cls：Locate 1，1，"SK"←┘Locate 6，1，S←┘Locate 1，3，"JZ" ←┘Locate 6，3，Z←┘Goto 2◢ 2. 正算子程序(SUB1) 0.1739274226→A：0.3260725774→B：0.0694318442→K：0.3300094782→L：1-L→F：1-K→M： U+W(Acos(G+57.29577951QKW(1/P+KWD))+Bcos(G+57.29577951QLW(1/P+LWD))+Bco s(G+57.29577951QFW(1/P+FWD))+Acos(G+57.29577951QMW(1/P+MWD))) →X： V+W(Asin(G+57.29577951QKW(1/P+KWD))+Bsin(G+57.29577951QLW(1/P+LWD))+Bsin (G+57.29577951QFW(1/P+FWD))+Asin(G+57.29577951QMW(1/P+MWD))) →Y： G+57.29577951QW(1/P+WD)+90→F：X+ZcosF→X：Y+ZsinF→Y：Return 3. 反算子程序(SUB2) G-90→T：Abs((Y-V)cosT-(X-U)sinT)→W：0→Z：Lbl 0：Prog "SUB1"：T+Q57.295779 51W(1/P+WD) →L：(J-Y)cosL-(I-X)sinL→Z：If AbsZ<1E-6：Then Goto1：Else W+Z→W：Goto 0←┘ Lbl 1：0→Z：Prog "SUB1"：(J-Y)÷sinF→Z：Return 二.增设数据库程序（ＳＪＫ） Lbo0：｛S｝：If S∠下一线元起点里程Then O=起点里程：U=起点X：V=起点Y：G=起算方位角：H=元长度：P=起点半径：R=终点半径：Q=0或1、-1：Prog“TYQX

卡西欧5800公路坐标正反算程序文件

0年11月 14日目录一、坐标正算基本公式...............................................................02 二、坐标反算原理...............................................................04 三、高程数据库录入变换.........................................................05 四、计算器程序...............................................................07 01、ZBZS(坐标正算)...............................................................07 02、ZBFS （坐标反算）...............................................................08 03、GCJF(高程积分)...............................................................09 04、PJFY （坡脚放样）...............................................................10 05、JFCX （积分程序）...............................................................11 06、ZBFY （坐标放样）...............................................................11 07、DT （递推）...............................................................12 08、HP （横坡）...............................................................13 09、LK （路宽）...............................................................14 10、SJK1（平面数据库）......................................................14 11、SJK2（纵面数据库）......................................................14 12、SJK3（左路宽度数据库）......................................................15 13、SJK4（右路宽度数据库）......................................................15 14、SJK5（横坡数据库） (16) 15、SJK6（下边坡数据库）......................................................16 16、SJK7（左上边坡数据库）......................................................17 17、SJK8（右上边坡数据库）......................................................18 五、后记 (19)