fx-4800P缓和曲线和圆曲线坐标正反算程序(正确版)
缓和曲线和圆曲线坐标正反算程序主程序“TYQXJS”
Lb1 0↙→（EXE）
{NUVOGHPRQ}:“1.SZ=>XY”: “2.xy=>SZ”:
N:U“QDX”:V“QDY”:O“QDLC”:G“FWJ”:
H“LS”:P“RO”:R“RN”:Q“ZP=-1,YP=+1,ZZ=0”
:C=1÷P:D=(P-R)÷(2HPR):E=180÷π:N=1=>Goto 1:≠=>Goto 2◣↙Lb1 1:{SZ}:SZ:W= Abs(S-O): Prog“1”:
X“XS”=X◢
Y“YS”=Y◢
F“FS”=F-90◢
Goto 3↙
Lb1 2:{XY}:XY:I=X:J=Y: Prog“2”:S“S”=O+W◢
Z“Z”=Z◢
Goto 3↙
Lb1 3↙
{DE}:E“QX-JJ,Z-1,Y+1”:D“BZ-JL”↙
F=F+E↙
X=X+D Cos F◢
Y=Y+D Sin F◢
{DE}:D“BZ-JJ”:E“JJ,Z-1,Y+1”↙
F=F+E↙
X=X+D Cos F◢
Y=Y+D Sin F◢
Goto 0
子程序1：“1”
A=0.1739274226:B=0.3260725774:K=0.0694318442:L=0.3300094782:F=1 -L:M=1-K:X=U+W(ACos(G+QEKW(C+KWD))+BCos(G+QELW(C+LWD))+BCos(G+Q EFW(C+FWD))+ACos(G+QEMW(C+MWD))):Y=V+W(ASin(G+QEKW(C+KWD))+BSin (G+QELW(C+LWD))+BSin(G+QEFW(C+FWD))+ASin(G+QEMW(C+MWD))):F=G+QE W(C+WD)+90:X=X+Z Cos F:Y=Y+Z Sin F
子程序2: “2”
T=G-90:W=Abs((Y-V)Cos T-(X-U)Sin T):Z=0:
Lb1 0:Prog“1”:L=T+QEW(C+WD):Z=(J-Y)Cos L-(I-X)Sin L:Abs
Z<1E-6=>Goto 1: ≠=>W=W+Z:Goto 0◣↙(E为：4800P键盘的EXE键) Lb1 1:Z=0Prog“1”:Z=(J-Y)÷Sin F◣
注：第一缓和曲线起点半径输入无穷大（10 45），终点输入圆曲线半径；第二缓和曲线起点半径输入圆曲线半径，终点半径输入无穷大（10 45）；圆曲线输入给出的起点和终点半径；直线段则都输入无穷大（10 45）。
其中起点切线方位角用此程序计算。
◣(代替空心)
坐标正算
程序“ZBZS”
Lb1 0↙
X“HSX”:Y“HSY”:U“CZX”:V“CZY”↙
X-U≥0=>Goto 1: ≠=>Goto 2◣↙
Y-V≥0=>F“FWJ”=tan-1((Y-V)÷(X-U)): ≠=>F“FWJ”=360+tan-1((Y-V)÷(X-U))◢
F“FWJ”◢
◣↙
Goto 3◣↙
Lb1 2↙
F“FWJ”=180+ tan-1((Y-V)÷(X-U))◢
Goto 3◣↙
Lb1 3↙
L“QSJL”:O“JJ”↙
N“QSX”=U+L Cos（F+O）◢
E“QSY”=V+L Sin（F+O）◢
Goto 0↙
↙
坐标反算
程序“ZBFS”
Lb1 0↙
U“CZX”:V“CZY”:X“HSX”: Y“HSY”↙
X-U≥0=>A“CZFWJ”=tan-1（（Y-V）÷(X-U)）◢
≠=>A“CZFWJ”=tan-1（（Y-V）÷(X-U)）+180◢
Goto 1◣↙
N“QSX”：E“QSY”↙
N-U≥0=>B“QSFWJ”=tan-1（（E-V）÷(N-U)）◢
≠=>B“QSFWJ”=tan-1（（E-V）÷(N-U)）+180◢
Goto 2◣↙
Lb1 2↙
O“JJ”=B“F2”-A“F1”◢
L“HSJL”=√（（Y-V）2+（X-U）2◢
L“QSJL”=√（（E-V）2+（N-U）2◢
Goto 1↙
竖曲线
程序“SQX”
A“JDK”：B“HD”：C“R”：M“I1”:D=M÷100:N“I2”：E=N÷100:H=C ÷2×Abs（D-E）：D﹥E=>F=-1：≠=> F=1：◣↙
Lb1 1：{G}：G“ZHUANG”:G﹤A-H=>I=-D：Goto 2：≠=>G≤A =>I=-D：Goto 3：≠=>G
Goto 1：↙
Lb1 3：J“HD”=B+ I×Abs（G-A）+ F×(H-Abs(G-A))2÷(2C)◢Goto 1：↙
坐标反算
在现场工作中，以往我们都是已知某点的里程及边距，来计算出该点的坐标，但有时我们如果能在测得某点坐标后，计算出该点的里程和距线路中心的距离(在这里我姑且称之为坐标反算)的话，将会帮我们大大减轻野外工作量，提高我们的工作效率。例如：路基填了几层后要精确检查一下路基是否够宽，那么按照我们以往的做法，就是要先将线路中心线放出来，然后用尺拉一下路基宽度，与其在此高程的设计宽度作比较，这样做对高填方而言极不方便。或者是先按所测高程,计算的宽度放出路基边桩，再与所填边线作比较。以上两种方法现场工作量都比较大。较为简便的方法是，我们可以测一下已填路基边线上任一点的三维坐标，然后将其反算求出该点的里程，及其距中线的距离(即所填宽度),由计算出的里程，可算出该里程的路面设计高程，再有所测高程，可计算出该点的设计宽度，两宽度作比较即可。同样在桥面铺装施工时，我们也无须再像以往那样，先放出某点再测其高程，然后与设计高程比较计，算出该点铺装厚度，而可以沿桥面外边线随意布点，测其三维坐标，计算出其里程及到中心线的距离，便可由其里程及距中心距离，计算出该点的设计高程，与其测得高程作比较得出应铺厚度。这样便大大减轻了外业工作强度(由放出点后再测其高程，变为测任意点高程)，而内业计算量与常规相当。另外在临时增加桥涵时，也常用到此方法来计算变更桥涵的中心里程(斜交或正交均可).如目前我标段就存在很多临时变更涵洞,按以往我们的方法是先估计该处大概里程,然后放出所估计里程的中心桩,再用皮尺量出所要增加涵洞处与该中心桩的距离,以此来推算出涵洞的中心里程,这一过程即繁琐又不准确。而目前我们采用的方法是用全站仪测得跨路基现有水沟两端的沟底坐标,计算出其与路基的夹角,按所测坐标及此夹角就可以准确、快速地反算出水沟中心所对应的线路中心里程了。我们在日常测量工作中的很多方面，也会用到这一方法来减轻野外工作量。在目前我标段的S334分离式立交桥的架设过程中,也同样用到了此方法.支座安装好后,对支座中心位置检及高程查无误后开始梁板架设,但是尽管测量控制放样符合规范要求,可是因为其它方面的各种原因可能会使梁板出现偏位高程也可能会出现偏差,那么对现在这种问题该如何检查呢?其实方法是一样的,首先我们可以用全站仪测得架设好后梁的边板外边缘任一点的三维坐标,由此坐标反算出该点所对应的中心里程和距中心的距离,就可以和设计图纸上的距离作比较来检查其是否存在偏位,该点的设计高程也可以由反算所得的中心里程和距中心的边距算出,与所测得的实际高程作一下比较也就可以了.那么通过以上讨论问题归结到了一点，那就是如何在测得任一点坐标后，计算出其所对应的线路中心里程，及其到线路中心的距离（或是斜交的长度）呢？解决此类问题，对目前一些测量软件来说早已不成问题，但是在现场工作中我们用的更多、更方便的还是计算器，那么能否用我们常用的4800或5800计算器编程，来计算此类问
(完整word版)缓和曲线计算原理
1.2道路线形的基本介绍 道路运输在整个国民经济生活中起着重要作用。道路的新建和改建，测量工作必须先行，所以公路施工测量所承担的任务也是非常大的，为了更好的进行道路施工工作，下面就道路线形进行一下简单的介绍。 一般所说的路线，是指道路中线的空间位置。中线在水平面上的投影称作路线的平面；沿中线竖直剖切再行展开则是路线的纵断面；中线上任一点法向切面是道路在该点的横断面。 无论是铁路、公路还是地铁隧道和轻轨，由于受到地形、地物、地质及其他因素的限制，经常要改变线路前进的方向。当线路方向改变时，在转向处需用曲线将两直线连接起来。因此，线路工程总是由直线和曲线所组成。曲线按其线形可分为：圆曲线、缓和曲线、复曲线和竖曲线等。 公路中线应满足的几何条件是：线形连续平滑；线形曲率连续（中线上任一点不出现两个曲率值）；线形曲率变化率连续（中线上任一点不出现两个曲率变化值）。考虑上述几何条件，顾及计算与敷设方便，现代公路平面线形要素由直线、圆曲线和缓和曲线构成，称之为平面线形三要素。其中缓和曲线的曲率半径是从∞逐渐变到圆曲线半径R 的变量。在与直线连接处半径为∞，与圆曲线连接处半径为R ，曲线上任一点的曲率半径与该点至起点的曲线长成反比。 目前公路线形设计已开始使用非对称线形（成为非对称平曲线）设计，特别是在互通立交匝道和山区高速高速公路线形设计中，这种线形设计使用得较多。非对称线形分为完全非对称线形和非对称非完整线形两种，所谓“完全非对称曲线”的含义就是第一缓和曲线和第二缓和曲线起点处（ZH 或HZ ）的半径为∞，圆半径为R ，第一缓和曲线长1s l ，第二缓和曲线长为2s l ，12s s l l ≠。所谓“非完整”的含义是第一缓和曲线和第二缓和曲线的半径不是∞，而是1 R 、2 R 。而坐标法成为高速公路放样的主要方法，坐标法放样 线路中线的这个操作过程中，最重要的一部就是计算线路放样点的坐标。 2 路线中桩坐标计算原理 在实际工程中，线路的设计由专门的设计方完成，在线路完成设计得到审批后设计方便把所设计线路的线路要素（或者称为曲线要素）提供给施工方。所提供的曲线要素一般包括：线路中各曲线段的起点坐标、起点里程、起点半径、终点坐标、终点里程、终点半径、交点坐标、曲线参数、转角（包括用一定的符号表示左右转）、两条切线长（起点与终点各所对应的两条切线）、曲线长。当然不同的工程项目所提供的曲线要素也不一样，以上所述的要素是大多数设计方会提供的，有的设计方在提供上述要素的前提下，还提供曲线段的外距、中点坐标、弦长或者走向方位角等要素，供施工方在计算
线元法线路坐标正反算程序
经苦心钻研，奋战多日，终于编写出了代码短，速度快，精度高，功能全的线路坐标正反算程序，欢迎试用并提出宝贵意见。 功能简介及特点： 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Δ
5800简单全线坐标计算程序
5800全线任意坐标计算程序 1. 正算主程序(ZHCX) （不运行） 8→DimZ 1÷P→Z[4 ]：(P-R)÷(2HPR)→D: 180÷π→E “Z=”?Z:”YJJ=”?A:Abs(S-O)→W 0.26→Z[1 ]: 0.74→B: 0.02→K: 0.82→Z[3 ]: 1-Z[3 ]→F:1-K→Z[2 ] U+W(Z[1 ]cos(G+QEKW(Z[4 ]+KWD))+Bcos(G+Z[3 ]QEW(Z[4 ]+ Z[3 ]WD))+Bcos(G+QEFW (Z[4 ]+FWD))+ Z[1 ]cos(G+ Z[2 ]QEW(Z[4 ]+ Z[2 ]WD)))→X: V+W(Z[1 ] sin (G+QEKW(Z[4 ]+KWD))+B sin(G+ Z[3 ]QEW(Z[4 ]+ Z[3 ]WD))+B sin(G+QEFW (Z[4 ]+FWD))+ Z[1 ] sin(G+ Z[2 ]QEW(Z[4 ]+ Z[2 ]WD)))→Y： G+QEW(Z[4 ]+WD)→F：X+Zcos(F+A)→X：Y+Zsin(F+A)→Y:If F≧360:Then F-360→F:IfEnd ”X=”:X→X◢ ”Y=”:Y→Y◢ If F﹤0:Then F+360→F:IfEnd ”QX FWJ=”:F▼DMS◢ “C=1=>XX: C=2=>XZ”: ”C=”?C: ”QHJU=”?L: If C=1：Then Goto 1:Else Goto 2: IfEnd 可以计算斜交斜做或斜交正做的桥涵坐标 Lbi 1 X+L cos(F)→X：Y+Lsin(F)→Y: Goto 3 Lbi 2 X+L cos(F+A-90)→X：Y+Lsin(F+A-90)→Y: Goto 3 Lbi 3 “QH-X=”: X →X◢ “QH-Y=”: Y →Y◢ Prog “FY” 2 . 参数子程序（直接运行） M(主线) 一条线路一个名称 “S=”?S If S≦线元终点：Then 线元起点X值→U: 线元起点Y值→V:线元起点切线方位角→G:线元起点桩号→O:线元长度→H：线元起点半径→P：线元终点半径→R：（左偏-1，或右偏 1）→Q:Goto 1:IfEnd … … If S≦线元终点：Then 线元起点X值→U: 线元起点Y值→V:线元起点切线方位角→G:线元起点桩号→O:线元长度→H：线元起点半径→P：线元终点半径→R：（左偏-1，或右偏 1）→Q:Goto 1:IfEnd Lbi 1 Prog “ZBJS” 3. 放样程序（FY）（不运行） “X0=”?M:“Y0=”？N Pol((X-M, Y-N)
卡西欧5800公路坐标正反算程序教程文件
卡西欧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、SJK1（平面数据库） (14) 11、SJK2（纵面数据库） (14) 12、SJK3（左路宽度数据库） (15) 13、SJK4（右路宽度数据库） (15) 14、SJK5（横坡数据库） (16) 15、SJK6（下边坡数据库） (16) 16、SJK7（左上边坡数据库） (17) 17、SJK8（右上边坡数据库） (18) 五、后记 (19) CASIO 5800计算器公路工程测量程序
一、正算所涉及的计算公式 X R i d X αβB d Y d l d βI 图表 1 在图1中，A 点为回旋曲线起点，B 点为回旋曲线止点，I 点为所求坐标 点。设： A 点的X 坐标为X A ，Y 坐标为Y A ，A 点的切线方位角为α，A 点的曲率为 ρA ,A 点的里程为L A ,B 点的曲率为ρB ,B 点的里程为L B ,I 点的曲率为ρI ,I 点的 里程为L I 。I 点的切线角为β。 由于回旋线上各点曲率半径R i 和该点至曲线起点的距离L 成反比。故此任 意点的曲率为; C L R i i ==1ρ (c 为常数) （1） 由式(1)可知，回旋曲线任意点的曲率按线性变化，由此回旋曲线上里程为L i 点的曲率为; A B A i A B A i L L L L --?-+=)(ρρρρ （2） 当曲线右偏时ρB 、ρA 取正值，反之取负值。设：
通过逐桩坐标计算曲线要素
通过逐桩坐标表推算曲线要素（CAD篇） 摘要：现在从事工程行业的都流行使用AutoCAD进行绘制图形，为了更好的利用这个绘图工具来绘制线路曲线要素，本文将讲解如何通过设计院提供的逐桩坐标表推算未知曲线要素。 关键词：AutoCAD 技巧曲线要素 说明：AutoCAD已经成为国际上广为流行的绘图工具。具有良好的用户界面，通过交互 菜单或命令行方式便可以进行各种操作。它的多文档设计环境，让非计算机专业人员也能很快地学会使用。在不断实践的过程中更好地掌握它的各种应用和开发技巧，从而不断提高工作效率。 如何提高CAD速率？ 通常在开始绘图的时候一些人由于对工具命令不熟悉直接使用工具栏等查找命令，这样对制图的效率会大打折扣从而导致绘图的速率缓慢，提高制图的方法需要掌握CAD的快捷命令，孰能生巧的记住，然后择优选用其中的一些常用的绘图命令，把繁琐的长命令转化为简单的命令使用，其次需要多练习绘图的方式与方法才会提高绘图水平。 推算原理： 通过逐桩坐标表（含曲线五大桩）然后利用Excel生成展点命令在AutoCAD中进行坐标展点，再通过工具或命令绘制进行查询曲线长、切线长、外失距、交点坐标、交点里程、曲线半径、方位角、转角等。 准备工作： 1、逐桩坐标表X、Y（含曲线五大桩） 2、AutoCAD绘图软件 演示版本为：AutoCAD 2007 示例文件：某高速铁路逐桩坐标表 演示范围：DK07+586.707~DK12+126.03（由于该交点属于大转角则演示明显）
操作流程：坐标展点→绘制半径→绘制切线长→查询方位角→查询转角→查询交点坐标→查询交点里程→查询外失距→绘制缓和曲线。（请注意逐桩坐标表中所提供的ZH、HY、QZ、YH、HZ等说明） 准备操作如下： 1、打开“逐桩坐标表”并复制（里程桩号、坐标X、坐标Y）数据到“曲线坐标计算程序VBA 4.6”的“交点法正算”表格中，效果图如下： 逐桩坐标表见（本文附件）下载地址附后！
线元法万能坐标计算程序
线元法万能坐标计算程序(适用于CASIO fx-9750GⅡ计算器) 论文https://www.360docs.net/doc/2a6635531.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”↙（选择线路）
关于坐标正反算的应用
关于坐标正反算的应用
关于坐标正反算应用备注 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
圆曲线、缓和曲线反推里程和偏距公式
中铁八局三公司-陈超 ——若有疑问请至Email:ceo@https://www.360docs.net/doc/2a6635531.html, 圆曲线、缓和曲线反推里程和偏距计算 已知数据：交点坐标JD(X)=3378226.731,交点坐标JD(Y)=456053.721,交点里程JD(DK)=DK10+021.359,圆曲线半径R=4500,缓和曲线长LS1=360, LS2=360,转角αy=53°12’46.1”,第一直线方位角:98°56’55.62” 方法：由线路外任意一点反推该点里程和偏距通称为坐标反算或者投影归算。 曲线上任意一点法线垂距计算公式：90)-sin()-(-)90-cos()(i i i αα**-=''x x y y d p i p P ’点距中桩距离公式：)90-sin(/)(p p p p y y D α'-= 例题：假设以DK10+500左5m 作为测点未知点位,其坐标为：xp ’=3377385.2777,yp ’=456241.6099,将通过这个坐标反推该点里程和偏距。 解： 1、假定这个坐标的近似里程为：DK10+000,计算坐标其切线方位角为x i =3377706.6675, y i =455858.5250,αi =127°23′2.26” 则p ’距DK10+000法线垂距为： ∵90) -sin()-(-)90-cos()(i i i αα**-=''x x y y d p i p ∴d1=(456241.6099-455858.525)*cos(127°23’2.26”-90)-(3377385.2777-3377706.6675) *sin(127°23’2.26”-90) =499.526359m 2、根据1计算的垂距d1,则d1+近似里程DK10+000得DK10+499.526359,计算坐标其切线方位角为xi=3377381.994, yi=456237.8102,αi=133°44’38.86” 则p ’距DK10+499.526359法线垂距为： ∵90)-sin()-(-)90-cos()(i i i αα**-=''x x y y d p i p ∴d2=(456241.6099-456237.8102)*cos(133°44’38.86”-90)-(3377385.2777-3377381.994) *sin(133°44’38.86”-90) =0.474557m 3、根据2计算的垂距d2,则d2+ DK10+499.526359得DK10+500.00092,计算坐标其切线方位角为xi=3377381.665, yi=456238.153,αi=133°45’00.61” 则p ’距DK10+500.00092法线垂距为： ∵90)-sin()-(-)90-cos()(i i i αα**-=''x x y y d p i p ∴d3=(456241.6099-456238.153)*cos(133°45’00.61”-90)-(3377385.2777-3377381.665) *sin(133°45’00.61”-90) =-0.001104m d3由于小于垂距限差3mm,故认为DK10+500.00092为p ’点对应的中桩桩号,计算坐标其切线方位角为xi=3377381.6653, yi=456238.1530,αi=133°45’00.61” 则p ’距中桩距离为： ∵) 90-sin(/)(p p p p y y D α'-= ∴(456238.1530-456241.6099)/sin(133°45’00.61”-90) =-4.999022m 因此,p ’点位置所对应在曲线上的桩号为DK10+500.00092左侧4.999022米。
非对称缓和曲线坐标计算程序
非对称缓和曲线坐标计算程序 CASIO fx-4800P QXZB曲线坐标计算 CASIO4800 QXZB可计算不等缓和曲线、圆曲线上的任意中、边桩坐标： 该程序适用于计算器 CASIO fx-4800P，可计算与线路中心成任意夹角的缓和曲线、圆曲线中、边桩坐标及待测点方位角和距离。 1、DK(JD)？输入交点桩号 2、X(JD)？输入交点坐标X 3、Y(JD)？输入交点坐标Y 4、T1？输入第一切线长(如果只有一条切线两者都输入一致) 5、T2？输入第二切线长(如果只有一条切线两者都输入一致) 6、FWJ？输入直线方位角(ZH→JD) 7、A？输入转角：左转为负，右转为正 8、R？输入圆曲线半径 9、LS1？输入第一缓和曲线长(如果只有一条缓和曲线两者都输入一致) 10、LY？输入圆曲线长(L-LS1-LS2) 11、LS2？输入第二缓和曲线长(如果只有一条缓和曲线两者都输入一致) 12、X(ZJD)？输入置镜点坐标X 13、Y(ZJD)？输入置镜点坐标Y 14、JSDK？输入前视点里程 15、PL？输入偏距 16、PA？输入偏角 程序下载地址： https://www.360docs.net/doc/2a6635531.html,/blog/post/QXZB-4800.html
评价答案 好:18 不好:1 原创:18 非原创:0 菲メ帆ぅ 回答采纳率:52.8% 2010-06-02 17:37 满意答案 好评率：57% （for Casio-fx4850） 扩展变量操作（15个）：Defm 15←┚ ( O为字母、0为数字) J-PQX (平面数据输入，自行切换到J-JSMS) Defm 15←┚ A“JD” B“JDX” C“JDY” F“FWJ” O“A0：Z-，Y+” RE“LS1” K“LS2”： E<1=>E=1E-9⊿K<1=>K=1E-9⊿Z[1]=EE÷24R-E∧4÷2688RRR:Z[2]= E÷2-EEE÷240RR:X=(EE-KK)÷24R÷sin Abs O :“T1=”:Z[3]=(R+Z[1])tan(Abs O÷2)+Z[2]-X◢“T2=”:Z[4]=(R+KK÷24R-K∧4÷2688RRR)tan(Abs O ÷2)+K÷2-KKK÷240RR+X◢ “L=”:L=Abs OπR÷180+(E+K)÷2◢ J=tan-1((R+Z[1])÷(Z[3]-Z[2]):“E=”:X=(R+Z[1])÷sin J-R◢ X=A-Z[3]:Y=X+E:E<1=>“ZY=”:X◢ ≠=> “ZH=”:X◢ “HY=”:Y◢ ⊿ “QZ=”:Y =X+(L-K-E)÷2+E◢ Y=X+L-K:X=X+L:K<1=> “YZ=”:X◢
fx-4800P缓和曲线和圆曲线坐标正反算程序(正确版)
缓和曲线和圆曲线坐标正反算程序主程序“TYQXJS” Lb1 0↙→（EXE） {NUVOGHPRQ}:“1.SZ=>XY”: “2.xy=>SZ”: N:U“QDX”:V“QDY”:O“QDLC”:G“FWJ”: H“LS”:P“RO”:R“RN”:Q“ZP=-1,YP=+1,ZZ=0” :C=1÷P:D=(P-R)÷(2HPR):E=180÷π:N=1=>Goto 1:≠=>Goto 2◣↙Lb1 1:{SZ}:SZ:W= Abs(S-O): Prog“1”: X“XS”=X◢ Y“YS”=Y◢ F“FS”=F-90◢ Goto 3↙ Lb1 2:{XY}:XY:I=X:J=Y: Prog“2”:S“S”=O+W◢ Z“Z”=Z◢ Goto 3↙ Lb1 3↙ {DE}:E“QX-JJ,Z-1,Y+1”:D“BZ-JL”↙ F=F+E↙ X=X+D Cos F◢ Y=Y+D Sin F◢ {DE}:D“BZ-JJ”:E“JJ,Z-1,Y+1”↙ F=F+E↙
X=X+D Cos F◢ Y=Y+D Sin F◢ Goto 0 子程序1：“1” A=0.1739274226:B=0.3260725774:K=0.0694318442:L=0.3300094782:F=1 -L:M=1-K:X=U+W(ACos(G+QEKW(C+KWD))+BCos(G+QELW(C+LWD))+BCos(G+Q EFW(C+FWD))+ACos(G+QEMW(C+MWD))):Y=V+W(ASin(G+QEKW(C+KWD))+BSin (G+QELW(C+LWD))+BSin(G+QEFW(C+FWD))+ASin(G+QEMW(C+MWD))):F=G+QE W(C+WD)+90:X=X+Z Cos F:Y=Y+Z Sin F 子程序2: “2” T=G-90:W=Abs((Y-V)Cos T-(X-U)Sin T):Z=0: Lb1 0:Prog“1”:L=T+QEW(C+WD):Z=(J-Y)Cos L-(I-X)Sin L:Abs Z<1E-6=>Goto 1: ≠=>W=W+Z:Goto 0◣↙(E为：4800P键盘的EXE键) Lb1 1:Z=0Prog“1”:Z=(J-Y)÷Sin F◣ 注：第一缓和曲线起点半径输入无穷大（10 45），终点输入圆曲线半径；第二缓和曲线起点半径输入圆曲线半径，终点半径输入无穷大（10 45）；圆曲线输入给出的起点和终点半径；直线段则都输入无穷大（10 45）。 其中起点切线方位角用此程序计算。 ◣(代替空心) 坐标正算 程序“ZBZS” Lb1 0↙ X“HSX”:Y“HSY”:U“CZX”:V“CZY”↙ X-U≥0=>Goto 1: ≠=>Goto 2◣↙
缓和曲线要素及计算公式
缓和曲线要素及计算公式 缓和曲线：在直线与圆曲线之间加入一段半径由无穷大逐渐变化到圆曲线半径的曲线，这种曲线称为缓和曲线。 缓和曲线的主要曲线元素 缓和曲线主要有ZH 、HY 、QZ 、YH 、HZ 5个主点。 由此可得： q P R q T T h ++=+=2 tan )(α R P R E h -+=2 sec )(α s h L R L 2180)2(0+-=πβα 180 )2(0R L y πβα-= 式中：h T －缓和曲线切线长 h E －缓和曲线外矢距 h L －缓和曲线中曲线总长 y L －缓和曲线中圆曲线长度
缓和曲线与圆曲线区别： 1. 因为缓和曲线起始端分别和直线与圆曲线顺滑的相接，因此必须将原来的圆曲线向内移动一段距离才能够接顺，故曲线发生了内移（即设置缓和曲线后有内移值P 产生） 2. 缓和曲线的一部分在直线段，另一部分插入了圆曲线，因此有切线增长值q; 3. 由于有缓和曲线的存在，因此有缓和曲线角0β。 缓和曲线角 0β的计算： R L S 2/0=β(弧度)= R L S π90 (度) 内移值P 的计算： ()m R L P S 242 = 切线增长值q 的计算： )(240223 m R L L q S S -= P －缓和曲线内移值 q －缓和曲线切线增长值 0β－缓和曲线首或尾所采用的缓和曲线段分别的总缓和曲线角。 S L －缓和曲线两端各自的缓和曲线长。 R －缓和曲线中的主圆曲线半径 α－偏转角
缓和曲线主点桩号： ZH 桩号=JD 桩号-h T HY 桩号=ZH 桩号+S L QZ 桩号=HY 桩号+2y L YH 桩号=QZ 桩号+ 2 y L HZ 桩号=ZH 桩号+h L 另外、QZ 桩号、YH 桩号、HZ 桩号还可以用以下方式推导： QZ 桩号=ZH 桩号+ 2 h L YH 桩号=HZ 桩号-S L HZ 桩号=YH 桩号+S L 切线支距法计算坐标： 缓和曲线段内坐标计算如式： 2 2540S P p L R L L -=X s P RL L Y 63 = 进入净圆曲线段内坐标计算如式： ?? ??????- ?? ???+=R L L R q X s p π1802 sin ? ??????????- ?? ? ?? -???+=R L L R P Y s p π1802cos 1
缓和曲线上任意点坐标计算程序
第一缓和曲线加圆曲线上任意点坐标计算程序：L1：U=U"Ｘ0"：V=V"Y0"：F"FANG"=F：E=E"LEFT-1"：LbI 0 L2：｛B｝：｛D｝：｛P｝ L3：L=AbS（B-A"ZHD"） L 4： L5：X=L-LX Y5/（40R2S2） L6：Y= LX Y3/（6RS）- LX Y7/（336RX Y3SX Y3）：G=90L2/（∏RS） L GOtO 2 7： L8：LbI 1 L9：L=L-S L10：O=90S/（∏R）+90L/（∏R） L11：M=2（Rsin（90L/∏/R）） L12：X=S-SX Y3/（40R2）+Mcos O L13：Y=S2/（6R）+MsinO:G=90S/（∏R）+180L/（∏R） L GOtO 2 14： L15：LbI 2 L16：W=tan-1（Y/X）:Q=√（X2+Y2） L 17： L E=1=>G=-G 18： L19：X[1]=U+Qcos（F+W）+Dcos（F+G+P）◢ L20：Y[1]=V+Qsin（W+F）+Dsin（F+G+P）◢ L21：GOtO 0
注、○1、XO—为起点X坐标 EXE ○2、YO—为起点Y坐标 EXE ○3、F？—方位角 EXE ○4、LEFT-1？—左偏取1右偏取0 EXE ○5、B？—所求坐标点里程（起点输0时为到起点长度）EXE ○6、ZHD？—为直缓点里程或直圆点里程（起点可以输0）EXE ○7、S？—缓和曲线长、圆曲线时输为0 EXE ○8、R？—半径EXE ○9、D？—中桩到边桩长度EXE ○10、P？—左右方向与中线切线交角、法线方向时左-90右+90 EXE ○11、上述每一步输完后必须确认、结果显示字后转到B进行循环操作。
坐标计算方法
已知：①缓和曲线上任一点离ZH点的长度：l ②圆曲线的半径：R ③缓和曲线的长度：l0 ④转向角系数：K(1或－1) ⑤过ZH点的切线方位角：α ⑥点ZH的坐标：xZ，yZ 计算过程： 说明：当曲线为左转向时，K=1，为右转向时，K=-1，公式中n的取值如下： 当计算第二缓和曲线上的点坐标时，则： l为到点HZ的长度 α为过点HZ的切线方位角再加上180° K值与计算第一缓和曲线时相反 xZ，yZ为点HZ的坐标 切线角计算公式：
已知：①圆曲线上任一点离ZH点的长度：l ②圆曲线的半径：R ③缓和曲线的长度：l0 ④转向角系数：K(1或－1) ⑤过ZH点的切线方位角：α ⑥点ZH的坐标：xZ，yZ 计算过程： 说明：当曲线为左转向时，K=1，为右转向时，K=-1，公式中n的取值如下： 当只知道HZ点的坐标时，则： l为到点HZ的长度 α为过点HZ的切线方位角再加上180° K值与知道ZH点坐标时相反
xZ，yZ为点HZ的坐标 三、曲线要素计算公式 公式中各符号说明： l——任意点到起点的曲线长度（或缓曲上任意点到缓曲起点的长度）l1——第一缓和曲线长度 l2——第二缓和曲线长度 l0——对应的缓和曲线长度 R——圆曲线半径 R1——曲线起点处的半径 R2——曲线终点处的半径
P1——曲线起点处的曲率 P2——曲线终点处的曲率 α——曲线转角值 四、竖曲线上高程计算 已知：①第一坡度：i1(上坡为“＋”，下坡为“－”) ②第二坡度：i2(上坡为“＋”，下坡为“－”) ③变坡点桩号：SZ ④变坡点高程：HZ ⑤竖曲线的切线长度：T ⑥待求点桩号：S 计算过程： 五、超高缓和过渡段的横坡计算
带有缓和曲线的圆曲线逐桩坐标计算例题
带有缓和曲线的圆曲线逐桩坐标计算 例题：某山岭区二级公路，已知交点的坐标分别为JD1（40961.914,91066.103）、JD2（40433.528,91250.097）、JD3（40547.416,91810.392），JD2里程为 K2+200.000，R=150m,缓和曲线长度为40m,计算带有缓和曲线的圆曲线的逐桩坐标。（《工程测量》第202页36题） 解：（1）转角、缓和曲线角、曲线常数、曲线要素、主点里程、主点坐标计算
方法一：偏角法（坐标正算） （2）第一缓和段坐标计算 228370'''= β 308416012'''= α （3）圆曲线段坐标计算 1490153-0'''==- βααJD ZY 切线 桩号 弧长 里程里程桩点ZY -=i l 偏角 02 31β??? ? ??=?S i i L l 方位角 i c i ?-=12αα (左转) 弦长 22590S i i i L R l l c -= Xi i c i ZH i c X X αcos += Yi i c i ZH i c Y Y αsin += ZH: K2+048.562 0 160 48 03 40576.543 91200.296 +060 11.438 0 12 30 160 35 33 11.438 40565.754 91204.097 +080 31.438 1 34 23 159 13 40 31.438 40547.149 92211.446 HY K2+088.562 40 2 32 47 158 15 16 39.968 40539.419 91215.104 桩号 弧长 里程里程桩点HY -=i l 偏角 π ?=?90R l i i 方位角(左转) i JD ZY c i ?=---0βαα 弦长 i i R c ?=sin 2 X i c i HY i c X X αcos += Y i c i HY i c Y Y αsin += HY: K2+088.562 0βαα-=-JD ZY 切线 153 09 41 40539.419 91215.104 +100 11.438 2 11 04 150 58 37 11.435 40529.420 91220.652 +120 31.438 6 00 15 147 09 26 31.380 40513.055 91232.122 +140 51.438 9 49 26 143 20 15 +160 71.438 13 38 37 139 31 04 QZ: K2+176.280 87.718 16 45 10 136 24 31 86.473 40476.789 91274.728 +180 91.438 +200 111.438 +220 131.438 +240 151.438 +260 171.438 YH:K2+263.99 8 175.436 33 30 21 119 39 20 165.606 40457.480 91359.018
卡西欧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)
fx-5800p全线坐标正反算带高程计算程序(线元法)
曲线任意里程中边桩坐标正反算(CASIO fx-5800P计算器)程序 一、程序功能及原理 1.功能说明：本程序由一个主程序(TYQXJS)和五个子程——正算子程序(SUB-ZS)、反算子程序(SUB-FS)等构成，可以根据曲线段——直线、圆曲线、缓和曲线（完整或非完整型）的线元要素（起点坐标、起点里程、起点切线方位角、线元长度、起点曲率半径、止点曲率半径）及里程边距或坐标，对该曲线段范围内任意里程中边桩坐标进行正反算。本修改版程序既可实现正算全线贯通，亦可实现反算全线贯通。本程序在CASIO fx-5800P计算器运行。 2．计算原理：利用Gauss-Legendre 5点通用公式正算线路中边桩坐标、线外测点至曲线元起点和终点的垂距的符号是否相异（即Dca×Dcb<0=>该测点在其线元内）进行判断并利用该线元要素反算中桩里程、支距，最后计算出放样数据。 二、源程序 1.主程序(TYQXJS)(A) Deg:fix 3 119→DimZ “INPUT(0) Or DATA(Else)”?I Lbl 0:“1.SZ=>XY,2.XY=>SZ，3.TF=>CK,4.SD=>FY，5.TW=>FY”?N If N=1 Or N=5:Then Goto 1 Else If N=2 Or N=3 Or N=4:Then Goto 2 Else Goto 3 IfEnd:IfEnd Lbl 1:“K(m)=”?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 “DAT1”:Else Prog “DAT2”:IfEnd S-O→W:If W<0:Then Goto 0:Else If W>H:Then Goto 0:IfEnd:IfEnd Prog “SUB-ZS”:Prog “SUB-GC” If Z<0:Then“XL(m)=”:X◢“YL(m)=”:Y◢ If N=5:Then Prog “SUB-TW”:IfEnd Else If Z>0:Then “XR(m)=”:X◢“YR(m)=”:Y◢ If N=5:Then Prog “SUB-TW”:IfEnd Else “X(m)=”:X◢“Y(m)=”:Y◢“Hs(m)=”:L◢“FWJ=”: F?DMS◢ IfEnd:IfEnd