缓和曲线上任意点坐标计算程序
第一缓和曲线加圆曲线上任意点坐标计算程序：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进行循环操作。
坐标反算
L1：Lb1 0
L2：｛A｝: A"X1":｛B｝:B "XO":｛D｝:D "Y1":｛K｝:K "YO" L3：X=A-B
L4：Y=D-K
L5：POI（X，Y）◢
=>W=W+3600◢
L6：Y＞0=>W=W
L7：GOtO 0
注：①X1坐标EXE ③Y1坐标EXE
②X0坐标EXE ④Y0坐标EXE
求A点到B点方位角时A点为X0
1、该程序计算时可从切线起点ZH或ZY 算到圆曲线终点而另一半缓和
曲线需重新倒转计算。
2、○9中左-90右+90可计算任意角值（与切线相交的任意角值）
竖曲线高程计算程序
H:I:R:E:Q“（=1）=-1
LbI 1:｛X｝:Y=H+XI+Q（T-X）2÷（2XR）◢Z=Y+BE◢GOtO 1◢
注：H？、—变坡点高程（未考虑竖曲线引响的高程）
T？、—切线长度
I？、坡度（以变坡点与竖曲线起点或终点处比较，竖曲线起、终点处高为“+”低为“-”）
R？、—竖曲线半径
B？、—左或右距中线的距离，分隔带宽度除外，不需要时左右为“0”
E？、—横向坡度
Q？、—凸曲线为“-1”凹曲线为“+1”
X？、—计算点到变坡点长度、以米计
Y？、—中线高程
Z？、—边线高程
I？、E？—坡度输入时化成每米I？，E倒32％化成0.032进行输入
(完整word版)缓和曲线计算原理
1.2道路线形的基本介绍 道路运输在整个国民经济生活中起着重要作用。道路的新建和改建，测量工作必须先行，所以公路施工测量所承担的任务也是非常大的，为了更好的进行道路施工工作，下面就道路线形进行一下简单的介绍。 一般所说的路线，是指道路中线的空间位置。中线在水平面上的投影称作路线的平面；沿中线竖直剖切再行展开则是路线的纵断面；中线上任一点法向切面是道路在该点的横断面。 无论是铁路、公路还是地铁隧道和轻轨，由于受到地形、地物、地质及其他因素的限制，经常要改变线路前进的方向。当线路方向改变时，在转向处需用曲线将两直线连接起来。因此，线路工程总是由直线和曲线所组成。曲线按其线形可分为：圆曲线、缓和曲线、复曲线和竖曲线等。 公路中线应满足的几何条件是：线形连续平滑；线形曲率连续（中线上任一点不出现两个曲率值）；线形曲率变化率连续（中线上任一点不出现两个曲率变化值）。考虑上述几何条件，顾及计算与敷设方便，现代公路平面线形要素由直线、圆曲线和缓和曲线构成，称之为平面线形三要素。其中缓和曲线的曲率半径是从∞逐渐变到圆曲线半径R 的变量。在与直线连接处半径为∞，与圆曲线连接处半径为R ，曲线上任一点的曲率半径与该点至起点的曲线长成反比。 目前公路线形设计已开始使用非对称线形（成为非对称平曲线）设计，特别是在互通立交匝道和山区高速高速公路线形设计中，这种线形设计使用得较多。非对称线形分为完全非对称线形和非对称非完整线形两种，所谓“完全非对称曲线”的含义就是第一缓和曲线和第二缓和曲线起点处（ZH 或HZ ）的半径为∞，圆半径为R ，第一缓和曲线长1s l ，第二缓和曲线长为2s l ，12s s l l ≠。所谓“非完整”的含义是第一缓和曲线和第二缓和曲线的半径不是∞，而是1 R 、2 R 。而坐标法成为高速公路放样的主要方法，坐标法放样 线路中线的这个操作过程中，最重要的一部就是计算线路放样点的坐标。 2 路线中桩坐标计算原理 在实际工程中，线路的设计由专门的设计方完成，在线路完成设计得到审批后设计方便把所设计线路的线路要素（或者称为曲线要素）提供给施工方。所提供的曲线要素一般包括：线路中各曲线段的起点坐标、起点里程、起点半径、终点坐标、终点里程、终点半径、交点坐标、曲线参数、转角（包括用一定的符号表示左右转）、两条切线长（起点与终点各所对应的两条切线）、曲线长。当然不同的工程项目所提供的曲线要素也不一样，以上所述的要素是大多数设计方会提供的，有的设计方在提供上述要素的前提下，还提供曲线段的外距、中点坐标、弦长或者走向方位角等要素，供施工方在计算
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)
FX-4850计算器曲线计算程序2011.721
ZHY程序FX5800 辛普森计算器公路测量常用程序修改版一、程序功能 LbI 0:＂X=＂?A: ＂Y=＂?B：＂Z=＂?C：＂1/（R1）＂?D：＂1/（R2）＂?E：＂QT=＂?F: ＂QT=＂?G: ＂V＂?V：＂W＂?W LbI 1：＂L＂?L：＂O＂?O：＂H＂?H：IF L>G：Then Goto 1：IFEnd （E-D）/（G-F）→P：L-F→Q：P*Q→I C+（I+2*D）*Q*（90/∏）→J C+（I/4 +2*D）*Q*（45/（2*∏））→M C+（3/4*I+2*D）*Q*（135/（2*∏））→N C+(I÷2+2*D)*Q*(45÷∏) →K ＂X=＂:A+Q÷12*(COS（C）+4*（COS（M）+C0S（N））+2*COS （K）+COS（J）)+O*COS（J+H）→X◢ ＂Y=＂:B+Q÷12*(SIN（C）+4*（SIN（M）+SIS（N））+2*SIN （K）+SIN（J）)+O*SIN（J+H）→Y◢ X-V→I：Y-W→J PoL（I，J） ”J=”:J▲DMS▲ If J <0:Then “J=”:J+360°→J:J▲DMS ▲ if End Goto1
F5800计算器曲线计算JD程序（ZH~HZ）坐标计算放样公式 主程序： 30→Dim Z: "XJD="?B: "YJD="?D: "KJD="?M: "A="?A: "ZJ="? Q: "R="?R: "LS1="?C: "LS2="?T: "F="?F:prog "A":Lb1 0: "XO="?G: "YO="?H: "LC="?L: "JJ="?Z: "PJ="?S:If L≤M-Z[11]+C:Then M- Z[11]COS(F) →N:D- Z[11]Sin(F) →E:Prog "ZHHY":Prog "FWJ": Goto 0:Else If L≤M-Z[11]+ Z[13]-T: Then M- Z[11] →K:B- Z[11] COS(F) →N:D- Z[11]Sin(F) →E: Prog "HYYH":Prog "FWJ": Goto 0: Else If L≤M-Z[11]+ Z[13]:Then M- Z[11]+ Z[13] →K:F+AQ+180→V:B-Z[12] COS(V) →N:D- Z[12] Sin(V) →E: Prog "YHHZ":Prog "FWJ": Goto 0: Else "End" ▲ If End: If End: If End 说明：以上主程序需要四个副程序，缺少任何一个副程序不能运行！ "XJD="?: "YJD="?: "KJD="?为曲线交点坐标及桩号 "A="?为曲线左转取-1；右转取1 "ZJ="?为曲线转角值；"R="?为曲线半径 "LS1="?： "LS2="?为前后段缓和曲线长度 "F="?曲线起始方位角； " X0="?、" Y0="?:全站仪测站点坐标 " LC="?为曲线ZH-HZ段内所求任意点桩号； "JJ="?为切线顺时针夹角；"PJ="?为左右侧所求点距设计线距离；
通过逐桩坐标计算曲线要素
通过逐桩坐标表推算曲线要素（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.wendangku.net/doc/3416443205.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”↙（选择线路）
曲线拨正计算程序说明
曲线拨正计算程序 一、概述 曲线方向整正常用的方法有矢距法、偏角法和绳正法。前两种多应用于新建或改建的铁路上。在既有线上，由于行车的干扰，置镜困难，绳正法得以普遍应用。绳正法基本上是以一种试算性质的、称之为流水拨道的为主。过去，由于条件的限制，现场人员计算一条曲线要费好大的劲，因为数据量较大，一遍一遍的要算好几张纸，搞的头疼。现在，电脑得以广泛应用，为做好线路养护维修奠定了良好基础。根据绳正法整正曲线基本原理、公式，在Windows平台上编写了这个计算程序。希望给我的同行带来方便，节约时间，又快又好的把铁路曲线拨正，拨圆，让火车跑的稳，跑的快，适应提速的需要。同时，也借此机会交流经验，向专家，老师学习。 二、适用范围与主要功能 本程序适用于直线型超高顺坡的缓和曲线，不能计算复心曲线，不适用于曲线型超高顺坡的缓和曲线拨正计算；对无头、无尾、无资料的“三无”曲线可自动初步判别曲线半径及缓和曲线长度，通过试算找到较小的拨道量，曲线计算完毕后将结果输出到Word文档，同时输出缓和曲线两种检查表，一是以2m弦线测量，在缓和曲线上每1m量一处正矢的；二是以10m弦线测量，在缓和曲线上每5m一点的。等同于缓和曲线加设副矢检查点，主要是为了适应提速的需要，把缓和曲线做好。 三、操作过程
1、程序运行后开始出现的是登录画面，如下图：要求输入口令。 初始口令为“000000”，即6个0。以后你可以根据自己的习惯，修改呢称、口令。 2．主画面。上面的图就是主画面一角，共有5个主菜单：分别是：[计算]，[输出]，[设置]，[退出]，[说明]。其中后二项没有子菜单，前三项的子菜单如下三幅图。 [计算]项下一共是5个子菜单，分别是[填入现场正矢]、[确定半径、缓和线长]、[计算半拨量]、[修正、计算拨量]及[退出]。现在看到，填入正矢菜单是灰色的，表示里面已有曲线数据在计算，现场正矢、控制点和备注的内容都填好了，不能改了。只有点击[设置]里面的[计算新曲线开关]，这个菜单才变得可操作，但同时也清空了现有的数据。 3．计算一条曲线的过程：
非对称缓和曲线坐标计算程序
非对称缓和曲线坐标计算程序 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.wendangku.net/doc/3416443205.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 计算过程： 五、超高缓和过渡段的横坡计算
5800计算器公路坐标计算程序(全线)直缓和圆曲线程序
5800计算器公路坐标计算程序(全线) 原４８５０程序改编 Lb1 1 ”K”?K:”W”?W:”O”?O:”I”?I IF K<41490.879:Then 40776.825→A: 41490.879→ B: 3761346.715→ M: 505279.147→N：166°45′36.3″→F： 1/1045→D：1/1045→E ：Goto 0 :Return:Ifend IF K<41690.879:Then 41490.879→A: 41690.879→ B: 3760651.641→ M: 505442.686→N：166°45′36.3″→F： 1/1045→D：1/1000→E ：Goto 0 :Return:Ifend IF K<42242.154:Then 41690.879→A: 42242.154→ B: 3760455.626→ M: 505481.961→N：172°29′22.78″→F： 1000→ R：Goto 2: Return:Ifend IF K<42442.154:Then 42242.154→A: 42442.154→ B: 3759916.982→ M: 505403.549→N：204°04′31.62″→F： 1/1000→D： 1/1045→E： Goto 0 : Return:Ifend IF K<42673.884:Then 42442.154→A: 42673.884→ B: 3759740.299→ M: 505310.019→N ：209°48′18.1″→F： 1/1045→D： =1/1045→E ：Goto 0 : Return:Ifend IF K<42863.884:Then 42673.884→A: 42863.884→ B:3759539.223→ M:505194.838→N：209°48′18.1″→F：-1/1045→D:-1/800→E：Goto 0 : Return:Ifend IF K<43636.692:Then 42863.884→A: 43636.692→ B:3759370.853→ M:505107.051→N：203°00′04.15″→F：R=-800：Goto2 : Return:Ifend IF K<43826.692:Then 43636.692→A: 43826.692→ B:3758630.216→ M: 505167.591→N：147°39′10.35″→F： -1/800→D：E=-1/1045→E :Goto 0 : Return:Ifend IF K<44825.092:Then 43826.692→A: 44825.092→ B:3758478.338→ M: 505281.555→N：140°50′56.4″→F：-1/1045→D：-1/1045→E: Goto 0 : Return:Ifend IF K<45025.092:Then 44825.092→A: 45025.092→ B:3757704.093→ M: 505911.911→N：140°50′56.4″→F： 1/1045→D：1/1000→E：Goto 0 : Return:Ifend IF K<45300.109:Then 45025.092→A: 45300.109→ B:3757544.945→ M: 506032.892→N：146°34′42.88″→F：R=1000：Goto 2 : Return:Ifend IF K<45500.109:Then 45300.109→A: 45500.109→ B:3757297.588→ M: 506151.102→N：162°20′09.32″→F： 1/1000→D： 1/1045→E ：Goto 0 : Return:Ifend IF K<45805.835:Then 45500.109→A: 45805.835→ B:3757103.485→ M: 506198.937→N：168°03′55.8″→F： 1/1045→D：1/1045→E： Goto 0 : Return:Ifend IF K<45980.835:Then 45805.835→A: 45980.835→ B:3756804.367→ M: 506262.160→N：168°03′55.8″→F： -1/1045→D： -1/1000→E：Goto 0 : Return:Ifend IF K<46136.333:Then 45980.835→A: 46136.333→ B:3756634.336→ M: 506303.312→N：163°03′07.63″→F：R=-1000：Goto 2 : Return:Ifend Lb1 0 (E-D)÷(Abs(B-A)) →P： Abs(K-A) →Q： F+(PQ+2D)Q×90÷∏→J F+(PQ÷4+2D)Q×45÷(2∏) →G F+(3PQ÷4+2D)Q×135÷(2∏) →H F+(PQ÷2+2D)Q×45÷∏→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
卡西欧fx-5800P直线圆曲线坐标正反算程序
[精] fx 5800 直线圆曲线坐标正反算程序 (2010-07-01 21:50:11) 标签： 杂谈 直线计算程序 0→I:0→J:”X 0”?D:”Y0”?E:”X1”?B:”Y1”?C:Pol(B-D,C-E):J→A:If A<0: Then A+360→A:Else A→A:IfEnd:Lbl 0:?O:?S:If O≠0:Then Goto 1:IfEnd: D+Scos(A) →X:”X=”:X◢ E+Ssin(A) →Y:”Y=”:Y◢ Goto 0:Lbl 1:D+Scos(A)+Ocos(A+90) →X:”X=”:X◢ E+Ssin(A)+Osin(A+90) →Y:”Y=”:Y◢ Goto 0 输入程序时注意区别字母O与数字0 程序运行时符号说明 X0? Y0?分别输入直线起点的XY坐标值 X1? Y1?分别输入直线终点的XY坐标值 O? 输入边桩与中桩的距离(左边桩为负值,右边桩为正值),如计算中桩坐标输入0 S? 输入所求点到直线起点的距离 圆曲线计算程序 0→I:0→J: ”X0”?C:”Y0”?D:”X1”?E:”Y1”?F:?R:”L:-1 R:1”?N:”ZY”?W:Lbl 0:”LN”?T: T-W→O:Pol(E-C,F-D):I→S:J→A: If A<0:Then A+360→A:Else A→A:IfEnd: sin-1(S÷(2R)) →K:2∏RK÷180→L:180O÷(2∏R) →G:(2R)sin(G) →H:C+Hcos(A-KN+GN) →X:”X=”:X◢ D+Hsin(A-KN+GN) →Y:”Y=”:Y◢ R-0.5√(4R2-H2) →Q:”Q=”:Q◢ “S=”?V:If V=0:Then Goto 0:IfEnd:”L:-90 R:90”?U:X+Vcos(A-KN+2GN+U) →X:”X=”:X◢ Y+Vsin(A-KN+2GN+U) →Y:”Y=”:Y◢ Goto 0 输入程序时注意区别字母O与数字0 程序运行时符号说明 X0? Y0?分别输入直线起点的XY坐标值 X1? Y1?分别输入直线终点的XY坐标值 R? 输入圆曲线半径 L:-1 R:1?圆曲线向左转弯时输入-1,向右转弯时输入1 ZY? 输入起点桩号
卡西欧fx-5800p计算器”单圆曲线计算“程序以及程序说明
单圆曲线(YQXJS) “KO”?O: “X0”?A:“Y0”?B：“JDX”?X：“JDY”？Y：“FWJ”？J：“FO”？F：?N：?R：6→DimZ←┘（K0为输入起算点桩号），（X0为输入起算点X坐标），（Y0为输入起算点Y坐标），（JDX输入曲线所在交点X坐标，无输入0），（JDY为输入曲线所在的Y坐标，无输入0），（FWJ为输入起算点的方位角），（F0为输入交点处的转角，带正负号，当左转时在转角前加-；右转时在转角前加+），（N为转角方向，正输入+1，负输入-1），（R为输入曲线半径）Abs(F)÷2→G◢“T=”：Rtan(G)→T◢（计算切线长） “L=”：GRπ÷90→L◢（计算圆曲线长） “E=”：R÷cos(G)-R→E◢（计算外距，即交点到QZ点的距离） LbI 1←┘ ?K：180N（K-O）÷(πR)→V：2Rsin(0.5NV)→M←┘（K为输入待求点的桩号）V为带求点与起算点间的弦长说对应的圆心角 “XZ=”:A+Mcos(J+0.5V)→Z[1]◢（计算出的中桩X坐标） “YZ=”:B+Msin(J+0.5V)→Z[2]◢（计算出的中桩Y坐标） tan-1（（Z[2]-Y）÷（Z[1]-X））→U←┘ If U＜0:Then U+360→U:Else U→U:If End←┘ “FW=”?U :U DMS◢（计算出的中桩与交点的方位角） ?W:“XL=”：Z[1]-NWcos（J+V+90）→Z[3]◢（W为输入路半宽，计算出的左边桩X坐标）“YL=”：Z[2]-NWsin（J+V+90）→Z[4]◢（计算出的左边桩Y坐标） “XR=”: Z [1]+NWcos（J+V+90）→Z[5]◢（计算出的右边桩X坐标） “YR=”：Z[2]+NWsin（J+V+90）→Z[6]◢（计算出的右边桩Y坐标） 特别注意： 1.进行反向计算（大桩号往小桩号计算）时，起算点桩号应设为0；待求桩号与起算点距离多远桩号就为多少； 3.起算点方位角应与起算点之前的线形所对应的方位角一致。
圆曲线和缓和曲线坐标推算公式(附带例题)
圆曲线和缓和曲线坐标推算公式 一、直线上的坐标推算 ???++0i m i 0i m i sina L Y Y cosa L X X ＝＝ 式中：Xm 、Ym ——直线段起点M 坐标 Li ——直线段上任意点i 到线路起点M 的距离 a 0——直线段起点M 到JD1的方位角 二、圆曲线上任一点的坐标推算 ①、圆曲线上任一点i 相对应的圆心角：i i L R 180π?? ＝ 式中：Li ——圆曲线上任一点i 离开ZY 或YZ 点的弧长 ②、圆曲线上任一点i 的直角坐标：???-）（＝＝i i i i cos 1R Y Rsin X ??（可不计算）.
③、圆曲线ZY 或YZ 点到任一点i 的偏角：i i i L R 902 π?? ?＝ ＝ ④、圆曲线ZY 或YZ 点到任一点i 的弦长：)sin(2)2 sin( 2C i i i R R ?=?＝ ⑤、圆曲线ZY 或YZ 点到任一点i 的弦长的方位角：i jd y z jd zy i a a ?±→→或＝ ⑥、所以圆曲线上任意点i 的坐标为：???++i i YZ ZY i i i YZ ZY i sina C Y Y cosa C X X 或或＝＝ 例题： 已知一段圆曲线,R=3500m ，Ls ＝553.1m ，交点里程K50+154.734，ZY 点到JD 方向方位角为A=129°23′18.3″，右偏9°3′15.8″，ZY 点里程K49+877.607，YZ 点里程K50+430.707，起点坐标为x ＝389823.196，y ＝507787.251，求K50+200处中点坐标及左右各偏12.5m 的坐标。 解：K50+200处的曲线长度为Li ＝322.393m K50+200相对应的方位角："'?????52.39165393.3223500 180L R 180i ＝＝＝ππa K50+200相对应的偏角："'???? ??76.19382393.3223500 90L R 902 i i i ＝＝＝ ＝ ππ? K50+200到zy 点的弦长：m 279.32276.19382sin 35002Rsin 2C i i ＝＝＝"'???? zy 点到K50+200中桩的方位角： "'?"'?+"'??+→06.38113276.193823.1823129a a i jd zy i ＝＝＝ K50+200左、右偏12.5m 的方位角： "'??-"'??-+82.5739449082.573913490a a ＝＝＝左i A "'??+"'??++82.57391349082.573913490a a ＝＝＝右i A 所以K50+200处的坐标为： ?? ?"'??++"'??++6484 .50802606.381132sin 279.322251.507787sina C Y Y 4354 .38960706.381132cos 279.322196.389823cosa C X X i i ZY i i i ZY i ＝＝＝＝＝＝