9860线元法坐标计算说明

9860线元法坐标计算

线元法坐标计算是根据网上的4800坐标中边桩计算及反算里程桩号改变而成的。作者未对软件进行任何可能使用环境下的测试，不保证计算结果的精度及可靠性，对于软件潜在的错误所导致的计算错误作者不承担任何责任。使用说明如下。

Zhi Jing X=？测站点X坐标

Zhi Jing Y=？测站点Y坐标

Hou Shi X=? 后视点X坐标

Hou Shi Y=? 后视点Y坐标

以上是计算后视点方位角。坐标不能全部输0，全部输0会出现程序错误。

Qi Dian X=? 起点X坐标

Qi Dian Y=? 起点Y坐标

Qi Dian Li Cheng=? 起算点里程

Zhong Dian Li Cheng=? 终点里程

Fang wei Jiao=? 起点方位角输入方位角时123度39分40秒输入123.3940即可R1=？起点半径

R2=？终点半径

左转时半径输负右转正常输当是直线时输0

1.SZ=>XY：

2.XY=>SZ? 当输入1时输入距离计算坐标，当输入2时根据坐标计算里程和距离

Fang Yang Li Cheng=? 放样里程

Ju Li=？放样里程距离左负右正

Xie Jiao Jiao Du =? 斜交角度（输入图纸右侧角度）

当放样里程输入-1时程序重新计算，放样里程输入-2时计算坐标反算里程桩号和距离。当测量点X输入0测量点Y也输入0时得新选择计算方式。

由于时间仓促只能想到这么多希望能对同行的你有一点帮助。希望多提你宝贵意见。

线元法线路坐标正反算程序

经苦心钻研，奋战多日，终于编写出了代码短，速度快，精度高，功能全的线路坐标正反算程序，欢迎试用并提出宝贵意见。功能简介及特点： 1、选用高斯-勒让德公式作计算内核，保证精度，模块化设计，便于扩充功能。 2、线元数据可自动从数据库调用，也可手工输入。 3、可管理多条线路，如里程不在线路或线元范围，将警告里程偏大、偏小。 4、边桩计算设计为导线式递推方式，可用于由一个中桩推出结构物所有角点坐标。 5、反算实现了智能化操作，只需输入线路号（或手工输线元资料）、坐标，不需近似里程，即可自动从起点向后开始试算出里程、位置，如对算出里程、位置表示怀疑，还可以让计算器从终点起再向前试算下一个可能的位置（匝道、回头曲线同一坐标可能会有一个以上结果）。第三次及以后试算才要求输入近似里程。 6、程序代码规范简洁，便于阅读、理解。完整程序清单: ZFS %正反算主程序 B=.1739274226:C=.5-B: Lbl 1:U"0 ZS 1 FS"=0=>Prog "ZS": ≠>U=1=>Prog"FS":≠>Goto 1

ZS %正算子程序 {K}:Prog"ZZ":I=0:{I}:I"L"≠0=>"Prog"WY":≠>Prog"ZB" FS %反算子程序 {KVW}:V"XC"W"YC":Lbl 2:Prog "ZZ":I=V-S:J=W-T:Pol(I,J: J=J-F:K=K+Rec(I,J:AbsI<1m=>Prog"WZ":≠>Goto 2Δ M=0:{M}:M"0 NEXT"=0=>U=U+1:Goto 2:≠>U=1 ZZ %高斯法中桩子程序(4节点) Prog"XL":M=K-L:O=(P-R)÷2PQR: D=.0694318442:E=.3300094782:F=1:G=1-E:H=1-D: I=5:Lbl 1:C[I]=A+MrC[I](1÷P+OMC[I]:Dsz I:Goto 1: S=X+M(BcosD+CcosE+CcosG+BcosH: T=Y+M(BsinD+CsinE+CsinG+BsinH WY %外移点计算子程序 Lbl 1:J=90:{J}:J=F+J"<":F=J:S=S+Rec(I,J:T=T+J: Prog"ZB":I=0:{I}:I"L"≠0=>Goto 1 WZ %位置显示子程序 "KJ":K:Pause 1:J◢ ZB %坐标显示子程序 "XY":S:Pause 1:T◢ YC %异常处理子程序 U=1=>K=L:U=2Δ U=3=>K=M:U=4Δ

线元法简介

线元法万能曲线正反算简介我的线元法是把线形分为直线和曲线，直线就不用说了，起止点桩号，坐标和方位角就可以算了；曲线最基本的组合：是由一段缓和曲线+一段圆曲线组成，任意复杂的曲线都可以分解成缓和曲线+圆曲线或者其中之一就可以。分析最复杂的曲线可以看到: 一般复杂线形由Ls1 ,R1,Ls2, R2组成，相邻的Ls1+R1,一般满足A*A=Ls1*R1,这就是一个线元法单元，即使不满足也可以作为一个线元：当Ls1= Ls2，且R1= R2时，为单曲线当Ls1≠ Ls2，或者R1≠R2时，为复合曲线当Ls1= Ls2=0时，线性为圆曲线，当圆曲线长度为0时，线性为缓和曲线+缓和曲线，当A*A≠Ls1*R1时，为卵形曲线，需要计算虚拟起点坐标综合以上线形，本程序正反算计算全部可以处理。结合目前流行的线元法，本程序也可以，分为缓和曲线和圆曲线录入，方法是一样的，所不同的是起点要注意，复杂曲线，是两边向中间定义数据库，缓和曲线永远是ZH点或HZ点为起点。曲线要素说明（有9个）： 1、起点桩号：（一般为ZH点或HZ点，或ZY点或YZ点，或者卵形公切点GQ） 2~3、起点坐标：（X，Y） 4、起点方位角：FWJ 114°15′24.33″写成：114.152433 5、线性特征：直线，左偏，右偏；三个选一个 6、终点桩号：如果起点为ZH点，终点一边为YH点，QZ点，HY点，都可以，一般为YH点，缓和曲线+圆曲线。如果缓和曲线Ls=0，就是YZ点；大小不一定按路线顺序，如果起点为HZ点，终点根据缓和曲线+圆曲线的特点，和上个线元对接上就可以了。 7、缓和曲线长度Ls： 8、圆曲线半径R: 9、回旋参数A: 一般满足A*A=Ls1*R1，不满足条件的是卵形曲线。可以处理任意数量断链。操作流程：1、先编辑线元数据，保存后推出。 2、如果有线元断链的输以下线元断链数据 3、打开线元万能曲线计算单点计算就可以了。目前，已有一个例子文件在里面，在安装文件目录下“ \dmfx4.0\demo\左线”，有个CAD文件，里面有校核数据，可以看到本软件处理的逐桩表和要素表，可以验证软件的数据，任意数据坐标反算可以得到桩号和距中，任意输入桩号和距中可以正算得坐标。授权版用户，可以通过运行交点文件编辑，保存后，退出；打开线元法数据编辑，浏览正在使用的主项目文件，就可以看到一个线元数据，点击这个文件确定，保存退出。就完成交点法数据转换线元法数据过程。

线元法万能坐标计算程序

线元法万能坐标计算程序(适用于CASIO fx-9750GⅡ计算器) 论文https://www.360docs.net/doc/e614360477.html,/：本论文仅供学习交流使用，本站仅作合理转载，原作者可来邮要求删除论文。摘要：我国公路建设事业正处于一个高速发展的时期，在公路工程施工过程中，施工技术人员经常要使用全站仪、水准仪进行施工放样、高程测量，在测量过程中，手工计算速度慢，失误率高，工作效率极低。利用CASIO fx-9750GⅡ编程函数计算器强大的内存（可诸存63000个字符）和编程功能，编写各种计算程序，能够在2秒钟内计算出施工放样、桩点坐标等施工过程中的各项数据资料，同时也使我们有更多的时间去挑战更富有创造性的工作。关键词：坐标放线线元测量程序 1、前言本程序采用Gauss-Legendre（高斯-勒让德）五节点公式作内核,计算速度（太约2秒）适中，计算精度很高。在此之前，本人曾用过以下公式作内核：①积分公式simpson法②双重循环复化高斯2节点③高斯-勒让德3节点④求和公式复化simpson法⑤双重循环复化simpson法⑥高斯-勒让德4节点，⑦高斯-勒让德5节点，经过测试③计算最快，⑦代码稍长但计算速度只比③⑥稍慢，精度最高，可满足线元长小于1/2πD 的所有线形的精度要求。⑦作内核分别计算圆曲线长1/4πD、1/2πD、3/4πD、πD处的精度,1/4πD时偏差为0.001mm,1/2πD时偏差为0.55m m,3/4πD时偏差为31.63mm，πD时偏差为968mm，偏差按半径倍数增大，如线元长大于1/2πD（1/2圆周长）时，可将其拆分二个或多个线元单位，以确计算保精度。 2、程序特点事先将所有的平曲线交点的线元要素诸存到计算器内，测量时只输桩号、边距等程序会自动寻找各类要素，一气呵成地完成施工测量任务，中途不需人工转换各类要素数据，本程序可诸存几百条线路的要素数据，计算时可按需选择线路编号进行测量。测量时不需查阅及携带图纸，仅一台CASIO fx-9750GⅡ编程函数计算器即可。本程序含一个主程序:3XYF，五个子程序:GL（公式内核）、QD（线路选择）、XL（线路要素判断）、GF（坐标反算）、File 1 （要素存放的串列工作簿）。可以根据曲线段——直线、圆曲线、缓和曲线（完整或非完整型）的线元要素（起点坐标、起点里程、起点切线方位角、终点里程、起点曲率半径、止点曲率半径）及里程边距或坐标，对该线元段范围内任意里程中边桩坐标进行正反算。 3、计算公式及原理如图：BC 间为一曲线元，曲线元上任一点的曲率随至B 点的弧长作线性变化。设起点B 的曲率为KA ，终点C 的曲率为KB ，R 为曲线半径。±表示曲线元的偏向，当曲线元左偏时取负号，当曲线元右偏时取正号,直线段以1的45次方代替（即半径无穷大）。式中：αΑ＝起始方位角l ＝p 点到B的距离lS=曲线总长αp＝p 点切线方位角 R1=R5=0.118463442528095 ,R2 = R4 = 0.239314335249683 , R3 = 0.28444444444444 V1=1-V5= 0.046910070 ,V 2= 1-V4 = 1 0.2307653449 V3= 0.5 利用上面公式及CASIO fx-9750GⅡ编程函数计算器可编写下列计算程序。 4、程序清单（1）、3XYF（主程序） "1→XY2→FS"?→V:V=1=>Goto 1:V=2=>Goto 2↙（选择计算功能） Lbl 1:File 1:”XLn”?→S:Prog “QD”↙（选择线路）

交点法线元法坐标计算

3、交点法、线元法坐标计算坐标计算是根据图纸中“直线及曲线转角一览表”提供的数据计算道路中桩坐标，然后和图纸提供的“逐桩坐标表”比对，如果一样则说明输入平曲线参数输入正确，可以计算边桩坐标和其他结构物坐标了；如果中桩坐标不一样，一般是平曲线参数输入有误，需要重新检查输入，另一种结果是图纸有错，这种情况少见，但不代表没有。“直线及曲线转角一览表”和“逐桩坐标表”见附件1、附件2。线元法是以路线的起点坐标、方位角、起终点桩号等节点元素来计算出要求的坐标；交点法是以路线的交点要素和路线的主要要素来求得坐标。 ①交点法交点：路线的转折点，路线改变方向是相邻两直线的延长线相交的点。用JD表示，有些图纸上用 IP表示。看下图：交点是针对曲线的（包含圆曲线和缓和曲线），一段曲线就有一个交点。交点参数有：坐标（X,Y）、交点桩号、转角值、圆曲线半径R、缓和曲线长度。教学提供软件（轻松测量、双心软件、测量工具）交点法曲线要素输入说明： 1、QD起点坐标：起点坐标必须在直线段上，或填写前一交点的坐标。

2、JD交点曲线要素：（1）交点桩号（2）交点坐标（X,Y）（3）曲线半径R 始点的话，起始里程有时候需要校正，当然，并不是每个图纸给出的起点里程都需要校正，大多数图纸的起点里程已经被设计院校正过，我们输入平曲线的时候需要验证一下。如果我们按照图纸给出的起点里程输入，发现后面的交点里程都和图纸相差一个相同的值，这就表明我们输入的起点里程需要校正。起始点里程正常输入，第二、三个交点输入完成后，检查第二个交点的切线长和交点

里程是否和图纸一样，如果切线长正确，交点里程不正确，说明起点里程需要校正，将第二个交点的里程与正确里程的差值，应用到起点里程中，从而使第二个交点里程和后面交点的里程与图纸吻合。注意：交点法计算坐标适用的平曲线为对称或不对称缓和曲线、圆曲线。对于非普通的三单元曲线，交点法不适用。非普通的三单曲线例如下页的JD18及JD19处的平曲线，的输入是否正确，有的图纸给的方位角数据较少，需要每隔几个线元才能检验方位角。

公路坐标计算公式

一、缓和曲线上的点坐标计算已知：①缓和曲线上任一点离ZH点的长度：l ②圆曲线的半径：R ③缓和曲线的长度：l0 ④转向角系数：K(1或－1) ⑤过ZH点的切线方位角：α ⑥点ZH的坐标：x Z，y Z 计算过程：说明：当曲线为左转向时，K=1，为右转向时，K=-1，公式中n的取值如下：当计算第二缓和曲线上的点坐标时，则： l为到点HZ的长度

α为过点HZ的切线方位角再加上180°K值与计算第一缓和曲线时相反 x Z，y Z为点HZ的坐标切线角计算公式：二、圆曲线上的点坐标计算已知：①圆曲线上任一点离ZH点的长度：l ②圆曲线的半径：R ③缓和曲线的长度：l0 ④转向角系数：K(1或－1) ⑤过ZH点的切线方位角：α ⑥点ZH的坐标：x Z，y Z 计算过程：

说明：当曲线为左转向时，K=1，为右转向时，K=-1，公式中n的取值如下：当只知道HZ点的坐标时，则： l为到点HZ的长度 α为过点HZ的切线方位角再加上180° K值与知道ZH点坐标时相反 x Z，y Z为点HZ的坐标三、曲线要素计算公式

公式中各符号说明： l——任意点到起点的曲线长度（或缓曲上任意点到缓曲起点的长度）l1——第一缓和曲线长度 l2——第二缓和曲线长度 l0——对应的缓和曲线长度 R——圆曲线半径 R1——曲线起点处的半径 R2——曲线终点处的半径

P1——曲线起点处的曲率 P2——曲线终点处的曲率 α——曲线转角值四、竖曲线上高程计算已知：①第一坡度：i1(上坡为“＋”，下坡为“－”) ②第二坡度：i2(上坡为“＋”，下坡为“－”) ③变坡点桩号：S Z ④变坡点高程：H Z ⑤竖曲线的切线长度：T ⑥待求点桩号：S 计算过程：五、超高缓和过渡段的横坡计算

曲线道路坐标计算(Excel)

曲线道路坐标计算 §1 曲线要素计算缓和曲线是在不改变直线段方向和保持圆曲线半径不变的条件下，插入到直线段和圆曲线之间的。其曲率半径ρ从直线的曲率半径∞（无穷大）逐渐变化到圆曲线的半径R ，在缓和曲线上任意一点的曲率半径ρ与缓和曲线的长度l 成反比，以公式表示为：l 1 ∝ρ 或 C l =?ρ（C 为常数，称曲线半径变更率）。当o l l =时，R =ρ，应有o l R l C ?=?=ρ 以上几式是缓和曲线必要的前提条件。在实际应用中，可采取符合这一前提条件的曲线作为缓和曲线。常用的有辐射螺旋线及三次抛物线，我国采用辐射螺旋线。为了在圆曲线与直线之间加入一段缓和曲线o l ，原来的圆曲线需要在垂直于其切线的方向移动一段距离p ，因而圆心就由'O 移到O ，而原来的半径R 保持不变，如图。由图中可看出，缓和曲线约有一半的长度是靠近原来的直线部分，而另一半是靠近原来的圆曲线部分，原来圆曲线的两端其圆心角o β相对应的那部分圆弧，现在由缓和曲线所代替，因而圆曲线只剩下缓圆点(HY )到圆缓点(YH )这段长度即y l 。 o β为缓和曲线的切线角，即缓圆点或圆缓点切线与直缓点或缓直点切线的交角，亦即圆曲线HY→YH 两端各延长 2 o l 部分所对应的圆心角。 γ为缓和曲线总偏角，即从直缓点(ZH )测设缓圆点(HY )或从缓直点(HZ )测设圆缓点(YH )的偏角。 q 为切线增量(切垂距)，即ZH (或HZ )到从圆心O 向ZH (或HZ )的切线作垂线垂足的距离。 p 为圆曲线内移值，即垂线(从圆心O 向ZH (或HZ )的切线作垂线)长与圆曲线半径R 之差。

曲线桥坐标计算方法

武九项目部测量室2014年在岗培训 ——《平分中矢架梁线偏法》摘要:在铁路桥梁施工前,其各部位坐标计算工作至关重要。现施工应用中曲线桥坐标计算方法纷繁复杂,精准程度也参差不齐。本文介绍得方法依据为平分中矢法,适用于梁按平分中矢法架设得曲线桥计算,主要就是根据设计已给出梁工作线交点与线路中线偏移距及梁作业线转角等要素来计算曲线桥梁各部位坐标。关键词:铁路;曲线桥;坐标计算;平分中矢一.概述桥梁设计图纸通常就是给定了曲线桥桥位要素:ZH(HZ)点、HY(YH)点里程;交点坐标;曲线要素;梁缝里程;偏移距;梁工作线转角等。因此在施工前,需要详细得计算出墩位平面控制坐标,以此结合现场导线点控制点进行放样。曲线桥施工平面控制要素主要就是承台墩台中心坐标及轴线得坐标方位角,以此为依据确定桩位及架梁支座预留孔等位置。kMNiK。主体思路为: 1．计算线路中线处梁工作线交点对应里程点得坐标; 2．计算梁工作线交点坐标; 3．确定墩(承台)轴向方位角; 4．确定墩(承台)中心坐标; 5．确定桩位坐标。

二. 计算公式介绍 (一) 直线部分计算公式 (二) 曲线部分计算公式带有缓与曲线得圆曲线上各点坐标计算思路:根据设计给定得交点坐标及坐标方位角可按公式1计算出ZH(HZ)点坐标;然后计算曲线各点相对ZH(HZ)点得坐标;根据相对得角度与距离计算曲线上点得大地坐标。YtEzS 。 1. 切线支距法计算相对坐标

2.偏角法计算绝对坐标 (一)设计资料 XX单线大桥(15×32m)曲线要素(曲线示意如图4所示):

(二)计算步骤 1.线路中桩坐标计算

5800线元法程序

1. 主程序 Lbl 4："1.SZ => XY"："2.XY => SZ"：？N：？S：Prog“SUB0”↙ 1÷P→C: (P-R)÷(2HPR) →D:180÷∏→E:N=1 => Goto1：Goto2↙ Lbl 1:? Z：Abs(S-O) →W：Prog "SUB1"："XS="：X◢ "YS="：Y◢F-90→F：“FS=”：F▲DMS◢：Goto4↙ Lbl 2：？X：？Y：X→I：Y→J：Prog“SUB2”：O+W→S：“S=”：S◢“Z=”：Z◢Goto4↙ 2. 正算子程序(SUB1) 0.1739274226→A：0.3260725774→B：0.0694318442→K：0.3300094782→L：1-L→F：1-K→M：U+W(Acos(G+QEKW(C+KWD))+Bcos(G+QELW(C+LWD))+Bcos(G+QEFW (C+FWD))+Acos(G+QEMW(C+MWD))) →X： V+W(Asin(G+QEKW(C+KWD))+Bsin(G+QELW(C+LWD))+Bsin(G+QEFW(C+FWD))+Asin(G+QEMW(C +MWD))) →Y： G+QEW(C+WD)+90→F：X+Zcos（F）→X：Y+Zsin（F）→Y 2. 反算子程序(SUB2) G-90→T：Abs((Y-V)cosT-(X-U)sinT) →W：0→Z：Lbl 0：Prog "SUB1"： T+QEW(C+WD) →L：(J-Y)cos（L）-(I-X)sin（L）→Z：Abs（Z）<1E-6=>Goto1：W=W+Z：Goto 0←┘Lbl 1：Z=0：Prog "SUB1"：(J-Y)÷sin（F）→Z SUB0 数据库子程序 Goto1↙同时保存多个曲线时的指针 Lbl 1：IF S<***（线元终点里程）:Then***→G（线元起点方位角）:***→O（线元起点里程）:***→U（线元起点X）:***→V（线元起点Y）:***→P（线元起点曲率半径）:***→R（线元终点曲率半径）: ***→H（线元起点至终点长度）：0或1、-1→Q：Return:IfEnd↙ Lbl 1：IF S<***（线元终点里程）:Then***→G（线元起点方位角）:***→O（线元起点里程）:***→U（线元起点X）:***→V（线元起点Y）:***→P（线元起点曲率半径）:***→R（线元终点曲率半径）: ***→H（线元起点至终点长度）：0或1、-1→Q：Return:IfEnd ……………………….. 为了便于解读，每增加一个线元增加一行语句，每增加一条曲线增加一个Lbl，每增加一个工程增加一个文件。三、使用说明 1、规定 (1) 以道路中线的前进方向（即里程增大的方向）区分左右；当线元往左偏时，

线元法

5800 计算程序主程序 QXJS Fix 3:Deg:Lbl 4:“1.SZ=>XY”:“2.XY=>SZ”:? Q Lbl 4: “LICHENG= ” ?S:Prog“SUB0” ↙ Lbl 0:If Q=1:Then Goto1:IfEnd IfQ=2:ThenGoto2:IfEnd ↙ Lbl 1:”-B,0,B=”? Z: “J J右交角=”?G:Prog“SUB1”: Fix 4:Cls “X=”:N →N ◢“X=”: Locate3,1,N◢ “Y=”:E →E ◢“Y=”: Locate3,1,E◢ Prog“JI”:Goto4 “QXFWJ=”:F →F:F ▲ DMS ◢ Goto4 ↙ Lbl 2: “X=”? B: “Y=”? C:B→N: C→E:Prog“SUB2”: “LICHENG=”:S◢ “OUT JL=”:Z◢ Goto4 ↙ 说明： Q: 代表正反算，其中 1 为正算， 2 为反算； S: 代表里程； Z ：代表偏移距离； G ：代表偏移角度（以线路前进方向为 X 方向，顺时针转为正； N ： X 坐标； E ： Y 坐标； F ：切线方位角； JI Clstat Pol(N-G,-E-H):Cls If S<0:Then J+360→Y:Ease J→Y:Ifend “F W J=”:Y▲ DMS ◢黄色为计算机程序

SUB0 ( 数据库 ) Goto1 ↙ Lbl 1 IF S<157687.528:THEN 2884169.2517→U:471475.6573→V:157547.528→O:98 ° 32 ′ 43.08 ″ →A:140→L:10^45→P:10000→R: Return:IfEnd ↙ IF S<163781.879:THEN 2883008.7030→U:477458.2815→V:163641.879→O:101 ° 6 ′ 4.08 ″ →A:140→L:10^45→P:10000→R: Return:IfEnd ↙ IF S<164195.661:THEN 2882981.4268→U:477595.5984→V:163781.879→O:101 ° 30 ′ 7.93 ″ →A:413.7833→L:10000→P:10000→R: Return:IfEnd ↙ IF S<164335.661:THEN 2882890.5519→U:477999.2492→V:164195.6623→O:103 ° 52 ′ 22.82 ″ →A:140→L:10000→P:10^45→R: Return:IfEnd ↙ IF S<171831.142:THEN 2882856.3502→U:478135.0069→V:164335.6623→O:104 ° 16 ′ 26.67 ″ 说明： S ：里程；157547.528→O 为线元终点里程； 2884169.2517→U 为线元起点 X 坐标；471475.6573→V 为线元起点 Y 坐标；98 ° 32 ′ 43.08 ″ →A 线元起点切线方位角；0^45→P 线元起点半径（左转为负右转为正）；10000→R 线元终点半径（左转为负右转为正） SUB1 正算子程序 0.5 （1÷R-1÷P）÷L→D:S-O→X ↙ U+∫(cos(A+(X÷P+DX2)×180÷π,0,X)→N ↙ V+∫( sin(A+(X÷P+DX2)×180÷π,0,X)→E ↙ A+(X÷P+DX2)×180÷π→F ↙ N+Zcos(F+G) →N:E+Zsin(F+G) →E Return SUB2 反算子程序 Lbl 1:0→Z ：1→Q ：Prog“SUB0”: 0.5 （1÷R-1÷P ）÷L→D:S-O→X ↙ U+∫(cos(A+(X÷P+DX2)×180÷π,0,X)→N ↙ V+∫( sin(A+(X÷P+DX2)×180÷π,0,X)→E ↙ A+(X÷P+DX2)×180÷π→F ↙ N+Zcos(F+90) →N:E+Zsin(F+90) →E : Pol(N-B+10^(-46), E-C+10^(-46)):Isin(F-90-J) →W:S+W→S ↙

线元法曲线任意里程中边桩坐标带高程正反算(CASIO 5800P计算器)程序(改进版)

线元法曲线任意里程中边桩坐标正反算(CASIO fx-5800P计算器)程序（附带高程）一、功能及原理说明 1. 功能说明：本程序由一个主程序(1-MAIN)和七个子程序——正算子程序(1-SUB-ZS)、反算子程序(1-SUB-FS)等构成，可以根据曲线段——直线、圆曲线、缓和曲线（完整或非完整型）的线元要素（起点坐标、起点里程、起点切线方位角、线元长度、起点曲率半径、止点曲率半径）及里程边距或坐标，对该曲线段范围内任意里程中边桩坐标进行正反算。本修改版程序既可实现正算全线贯通，亦可实现反算全线贯通。本程序在CASIO FX-5800P计算器运行。 2．计算原理：利用Gauss-Legendre 5点通用公式正算线路中边桩坐标、线外测点至曲线元起点和终点的垂距的符号是否相异（即Dca×Dcb<=0=>该测点在其线元内）进行判断并利用该线元要素反算中桩里程、支距，最后计算出反算结果。 3. 程序输入计算器后，请根据统计串列List X，Y，freq[N]在程序中实际可能被使用的维数，将其统计矩阵串列改为包含相应维数的任意数据的矩阵，即在list列表中随机输入相应维数的数据，保证矩阵大小符合维数要求。 4. 本程序正算速度在1-2秒左右，反算比正算慢点，可根据需要调整精度加快速度。本程序可建立曲线要素数据库及高程变坡点数据库，一次输入整条线路数据，计算时自动调用数据库，实现全线贯通，也可临时手动输入线元计算要素进行计算。 5. 本程序由小骆在前人的基础上改进而成，经个人测试可用。学识浅薄，不足之处，在所难免，欢迎提出改进意见。交流邮箱：716118673@https://www.360docs.net/doc/e614360477.html, 二、源程序 1.主程序(1-MAIN) Deg:fix 3 20→DimZ Lbl 0:cls：“INPUT(0),ZX(1),YX(2)”?I (选择手动输入计算参数0，还是调用线路数据1,2）If I=0:Then Prog “1-DAT1”:IfEnd “SZ=>XY(1),XY=>SZ(2)”?N（正算，反算） If N=1 :Then Goto 1 Else If N=2 :Then Goto 2 Else Goto 3 IfEnd:IfEnd Lbl 1:“KP=”?S（输入待求桩号） If S<0:Then Goto 0:IfEnd “JL(m)=”?Z （输入偏距） If Z≠0:Then “ANGLE→R(Deg)=”?M:IfEnd （输入斜交右角） If I≠0:Then Prog “1-DAT2”:IfEnd S-O→W:If W<0:Then Goto 0:Else If W>H:Then cls:locate 6,2,"KP OUT"◢ Goto 0:IfEnd:IfEnd(前半条针对“DAT”情况，后半条针对“INPUT”情况。) Prog “1-SUB-ZS”:Prog “1-SUB-GC”

交点法和线元法曲线要素输入简介

测量坐标计算程序V5 输入简介本程序运用Office Excel 软件VBE标准模块编写，其功能基本全面集成了以往所更新的Excel程序，程序适用于公路、铁路等线路坐标计算，程序主要包括（交点法、线元法、直线坐标正反算，竖曲线计算，平面控制网“导线、高程”平差，隧道超欠挖，超高加宽，测量工具箱等，还可以全自动生成卡西欧5800、9750程序数据库，其中包括：隧道超欠挖、交点法、线元法、竖曲线一系列数据库），已知数据输入明确，操作简单易懂，是工程测量人员的好帮手！交点法曲线要素输入简介一、适用平曲线类型交点法计算坐标适用的平曲线为对称或不对称缓和曲线、圆曲线。注意：对于非普通的三单元曲线，本程序交点法不适用。非普通的三单元曲线体现在本程序中的《直线、曲线及转角表》内，点击“生成要素”之后，计算值与设计图纸《直线、曲线及转角表》上的切线长和曲线主点位置等不一致，此时只能采用线元法进行坐标计算。例如：下表的JD18及JD19处的平曲线，经本程序交点法计算之后发现，为非普通的三单元曲线，交点法不适用该类曲线的坐标计算，故只能采用线元法进行坐标计算。

二、交点法曲线要素输入说明本程序交点法输入的要素有7个（程序不限制输入行数）： 1、QD起点坐标：起点坐标必须在直线段上，或填写前一交点的坐标。 2、JD交点曲线要素：（1）交点桩号K，注意：当起始平曲线上的ZH点（缓和曲线）或ZY点（圆曲线）的桩号为负数时，交点桩号K统一加上100000（即增加100Km），以避免坐标正算时出现桩号计算范围错误（但是，线元法计算坐标时可以输入负坐标，坐标正算与反算都不会出现错误）。（2）交点桩号（X,Y）（3）曲线半径R （4）第一缓和曲线长度LS1,若为0,输入0,不能为空。（5）第二缓和曲线长度LS2,若为0,输入0,不能为空。 3、ZD终点坐标：终点坐标也必须在直线段上，或填写后一交点的坐标。三、操作流程： 1、根据设计图纸《直线、曲线及转角表》输入第一个交点坐标，作为QD起点坐标。 2、依次输入各交点的曲线要素。 3、输入最后一个交点坐标，作为ZD终点坐标。 4、点击“点击进入直曲表”，然后点击“生成要素”，根据计算的转角值、曲线要素、曲线主点位置、直线长度及方向与设计图纸《直线、曲线及转角表》上的设计值进行核对，看各要素输入是否正确。注意：交点法与线元法在计算坐标时，线元法可能存在mm毫米级以内的计算误差，坐标计算值与设计值也可能存在mm毫米级以内

9860线元法隧道测量(坐标正反计算、高程)计算程序

CASIO 9860G SD线元法隧道三维（坐标正反计算、高程）计算程序 1. A（此为主程序） Lbl 0：〝1.LC=>XY〝：〝2.XY=>LC〝：〝3.ZHZL=>GC〝：〝PB=>V=1,2,3〞？→V： If V=1：Then GOTO 1 ：IfEnd ：If V=2：Then GOTO 2 ：IfEnd ： If V=3：Then GOTO 3 ：Else GOTO 0 ：IfEnd：Lbl 3：〝ZH=H〝？→H ：〝SDZF=Z〝？→Z：Prog〝ZGCZCX〝：GOTO 0：Lbl 1 ：〝ZH=L〝？→L： If L>173000 And L<174661.96：Then GOTO 4 ：Else GOTO 0 ：IfEnd ： Lbl 4：L→L：〝SDZF=Q〝？→Q：〝XLZJ,-Z+Y=Q〝：Q+0.125→Q： Prog 〝ZBQXYS〝：〝JSJD=J〝：90→J▲Prog 〝ZSZB〝：〝X=〝：X ▲ 〝Y=〝：Y▲〝FWJ=O〝：O▼DMS▲ L→H：Q-0.125→Z：Prog 〝ZGCZCX〝：GOTO 0： Lbl 2：〝XO=M〝?→M：〝YO=R〝?→R：173300→L： If M>3845505.273 And M<3846506.099 And R>499371.832 And R<500352.224 ：Then GOTO 5：Else GOTO 2： IfEnd ：Lbl 5：0→Q：0→J： Prog 〝ZBFS〝：〝LC=L〝：L ▲〝JL=Q〝：Q▲ 〝SDZJ，-Z+Y=Q〝：Q-0.125→Q ▲ L→H：Q→Z：Prog 〝ZGCZCX〝：GOTO 0 2.正算坐标ZBZS ( L-S ) / 4→H：90/π→F：HHF（1/T-1/I）/（K-S）→U：2HF/ I→D：C+4D+16 U→Ｏ： O+J→P ：C+ D+ U→E：C+2D+4U→W：C+3D+9U→G： A+AbsH/3*(cosC+4(cosG+cosE)+2cosW+cosO)+Qcos P→X ： B+AbsH/3*(sinC+4(sinG+sinE)+2sinW+sinO)+Qsin P→Y 3.反算坐标：ZBFS Lbl 0：Prog 〝ZBQXYS〝：Prog 〝ZBZS〝：O-90→Z：(R-Y)cosZ-(M-X) sinZ→P ：L+P→L：If Abs P≥0.001：Then GOTO 0 ：Else GOTO 1：IfEnd ： Lbl 1： (R-Y)cosO-(M-X) sinO→Q 4. 曲线元要素数据库：ZBQXYS

线元法参数计算程序(自编)

在网上寻找计算线元法需要的参数的5800程序找了很久没找到，后来索性自己更具《详解用线元法计算公路中线坐标》中的公式自己编了个5800程序。为了区分字母O和数字0（字母O染红了的） Fix 3：14→DimZ Lbl 0 "1(YP),-1(ZP)="?→Z[14]:"QD(KM)="?A（右偏输入1，左偏输入-1）"LS="?B（线元长度） "QD(QL)="?C（起点曲率，半径的倒数，直线输入1/1045趋近于0）"ZD(QL)="?D（终点曲率） "QD(X)="?E（起点X坐标） "ZD(Y)="?F（起点Y坐标） "QD(FWJ)="?G（起点方位角） 0.1184634425→R:0.2393143352→Z[11]:0.2844444444→Z[12]:0.0469100770→S:0.2307653449→T: 0.953089923→W:0.769234655→V:0.5→U:0.2393143352→K:0.1184634425→O Z[14]=1=?Goto 1：Z[14]=-1=?Goto 3 Lbl 1 D-C→Z G+(D+C)90B÷∏→H Goto 2 Lbl 3

-D-C→Z G+(-C-D)90B÷∏→H Goto 2 Lbl 2 Rcos((G∏+180CSB+90ZBS2)÷∏)→Z[1]:Z[11]cos((G∏+180CTB+90ZBT2)÷∏)→Z[2]:Z[12]cos((G∏+180CBU+90ZBU2)÷∏)→Z[3]:Kcos((G∏+180CBV+90ZBV2)÷∏)→Z[4]:O cos((G∏+180CBW+90ZBW2)÷∏)→Z[5]:Rsin((G∏+180CBS+90ZBS2)÷∏)→Z[6]:Z[11]sin((G∏+180CBT+90ZBT2)÷∏)→Z[7]:Z[12]sin((G∏+180CBU+90ZBU2)÷∏)→Z[8]:Ksin((G∏+180CBV+90ZBV2)÷∏)→Z[9]:O sin((G∏+180CBW+90ZBW2)÷∏)→Z[10] E+B(Z[1]+ Z[2]+ Z[3]+ Z[4]+ Z[5]) →Z[13] F+B(Z[6]+ Z[7]+ Z[8]+ Z[9]+ Z[10]) →N Cls “ZDX=”:Locate 5,1,Z[13]: Locate 1,2,”ZDY=”: Locate5,2,N: Locate1,3,”F=”: Locate4,3,H o: Locate1,4,”ZDK=”: Locate5,4,(A+B)◢ Cls Goto 0 ZDX=待求点的X坐标 ZDY=待求点的Y坐标

CASIO fx-5800P线元法坐标正反算程序

CASIO fx-5800P线元法坐标正反算程序说明：本程序适用于卡西欧计算器 CASIO fx-5800P,可对全线贯通坐标正反算、竖曲线高程计算。该程序可计算任意线型，包含（直线、圆曲线、缓和曲线、卵形曲线）等,还可以能通过坐标反推该点里程和距中线距离,适用测量员专用。主程序名：ABCYT 第1步Deg：Fix 3：10→DimZ 第2步Lbl 3：＂1.DK=>XY＂：＂2.XY=>DK＂：＂Q＂?W：＂DK＂?S：Prog＂ABCYTSJ＂：If P=0：Then 10^(45)→P：IfEnd：If R=0：Then 10^(45)→R：IfEnd 第3步1÷P→C：(P-R)÷(2HPR)→D：180÷π→E：If W=1：Then Goto 1：Else Goto2：IfEnd 第4步Lbl 1：＂W＂?Z：＂α＂?N：Abs(S-O)→W：Prog＂ABCYTZ＂第5步Cls：＂F=＂：Locate 3,1,F°：＂X=＂：Locate 3,2,X：＂Y=＂：Locate 3,3,Y◢ 第6步Prog＂ABCYTSQX＂：Cls：＂H=＂：Locate 3,1,H◢ 第7步1→W：90→N：Goto 3 第8步Lbl 2：?X：?Y：X→I：Y→J：Prog＂ABCYTF＂：O+W→S 第9步Cls：＂K=＂：Locate 3,1,S：＂S=＂：Locate 3,2,Z◢ 第10步2→W：Goto 3 正算子程序名：ABCYTZ 第1步0.1739274226→A：0.3260725774→B：0.0694318442→K：0.3300094782→L 第2步1-L→F：1-K→M 第3步U+W×(A×cos(G+Q×E×K×W×(C+K×W×D))+B×cos(G+Q×E×L×W×(C+L×W× D))+B×cos(G+Q×E×F×W×(C+F×W×D))+A×cos(G+Q×E×M×W×(C+M×W×D)))→X 第4步V+W×(A×sin(G+Q×E×K×W×(C+K×W×D))+B×sin(G+Q×E×L×W×(C+L×W× D))+B×sin(G+Q×E×F×W×(C+F×W×D))+A×sin(G+Q×E×M×W×(C+M×W×D)))→Y 第5步G+Q×E×W×(C+W×D)→F：F+ N→Z[1] 第6步X+Z×cos（Z[1]）→X：Y+Z×sin（Z[1]）→Y 反算子程序名：ABCYTF 第1步Lbl 2：（S-O）→W：0→Z：Prog＂ABCYTZ＂：F-90→Z[9]：(J-Y)×cos(Z[9])-(I-X)×sin(Z[9])→Z[10]

公路施工测量坐标计算系统v5.3

公路施工测量坐标计算系统v5.3 一、程序运行平台：Win9X/ME/XP。二、程序开发平台：VC++.NET 三、软件主要功能：本系统适用于公路主线、立交匝道及铁路的施工放样工作，可根据设计给定参数精确进行公路、铁路的线路坐标计算、导线平差计算等。系统分为线元法坐标计算、交点法坐标计算、导线平差计算、交会定点计算、放样辅助计算、坐标转换程序六大模块。 (一)各模块主要功能 1、线元法及交点法坐标计算：可以对公路主线、立交匝道及铁路线路进行中线桩、边线桩施工放样工作。可计算的线形包括直线、圆曲线、缓和曲线、单交点对称型曲线、单交点非对称型曲线、S型曲线、C 型曲线、卵形曲线、凸型曲线、复曲线、回头曲线等。坐标计算时，可计算任意角度的边桩，同时系统在加桩时可一次计算多个边桩。如果给定置镜点、后视点坐标还可计算出放样角度及放样距离。 2、导线平差计算：适用于各等级各类型闭、附合单导线的严密、近似平差计算。严密平差时可以提供完整的精度评定及各种所需报表。 3、放样辅助计算：可进行两点坐标正反算、缓和曲线起点反算、桥涵放样坐标计算及竖曲线高程计算。 4、交会定点计算：可进行前方交会、后方交会、侧方交会、测边交会计算。 5、坐标转换程序：可进行高斯投影正反算、坐标换带、方向与边长改化计算。 (二)本系统主要特点 1、功能全面，包含了公路、铁路施工测量的各个方面，更新版本将根据用户需求随时完善、增强。 2、表格式的数据操作，简单、方便，所输入的历史数据均可留在系统中，每次程序启动后均可显示以前的数据，包括计算结果。本系统还可将用户输入资料保存为磁盘文件(*.stc)以便交流及随身携带，也可将原始数据或计算结果输出为EXCEL及文本文件。 3、所见即所得的报表输出功能，支持报表设计，用户可根据自已的需要设计出适合的报表，先进的数据计算引擎，计算速度极快，在预览页面可将报表保存为同式样的EXCEL或网页文件，在EXCEL中真正体现了人性化的报表界面，支持数据的直接显示、打印。报表中的“单位、制表、复核”等参数在系统菜单栏的“报表设置”项中设置。对于“逐桩坐标报表”有两种选择，根据需要可选择全部打印或只打印中桩桩号、坐标及方位角，请在菜单栏的“报表设置”项中设置。 4、导线严密平差采用条件平差，所计算数据的变量均采用双精度浮点型，计算精度极高。线路中缓和曲线的计算精度为0.05mm，由程序按精度动态选取计算项数。 5、本系统使现场施工放样的计算工作变的简单、方便，同时也使公路互通匝道复杂曲线的计算变的容易、准确，也许这才是你真正期待的施工测量软件。 6、本系统特别针对公路互通匝道的复杂曲线进行了优化设计，根据设计提供参数可选用多种方案进行计算，既可对组成匝道曲线的单个线元进行计算，也可将整条匝道的曲线参数输入进行全线计算，还可以根据匝道起点或终点坐标、方位角推算其它主点坐标及方位角，是互通匝道复杂曲线放样的最得力助手。四、输入输出说明： (一)格式化输入 1、桩号输入：桩号按米数格式输入，如K13+131.88桩号，输入时应为13131.88，单位为米； 2、角度输入：方位角、夹角按度分秒格式输入，如59°01′46.6″，输入时应为59.01466，单位为度分秒； 3、曲线转向必须为“左”或者“右”，其它字符均不能计算； 4、本系统所指方位角均为切线方位角。 (二)格式化输出程序在计算后，自动将结果转换为标准格式显示，如桩号输出格式为K13+131.88、方位角输出格式为