本程序为道路中边桩高程程序（全线通),带数据库
行号GAOCH 注解说明
1 〝DK=〞?P:Prog〝GSO〞: DK为桩号GS0高程数据库。
2 〝ZP〞?W: 变边坡点桩号（可以去掉，在主程序中不显示)
3 〝HP〞?G: 变边坡点高程（可以去掉，在主程序中不显示)
4 R*Abs（J-I)÷100÷2→T：竖曲线切线长
5 W-T→Z: 竖曲线起点桩号
6 W+T→K: 竖曲线终点桩号
7 -Abs（J-I)÷（J-I）→M↓判断是凸曲线=1、凹曲线=-1
8 ?B:〝DL=〞?D:?U↓B设计到各层高度、变量DL-偏距U-横坡度
9 IF P≤Z;
10 Then G+(P-W)I÷100→H:Goto1:IfEnd↓前段直线段高程计算
11 IF P≤W：Then
12 G+(P-W)I÷100-M(P-Z)2÷（2R）→H:Goto1:IfEnd↓凸曲线段高程计算
13 IF P≤K：Then
14 G-(W-P)J÷100-M(P-K)2÷（2R）→H:Goto1;IfEnd↓凹曲线段高程计算
15 G+(W-P)J÷100→H:[b]1: 后段直线段高程计算
16 Int（H*1000+0.5）÷1000+B-D*U/100→H↓边桩高程计算
17 〝H=〞:H◢显示高程
18 〝H1=〞？F:H-F→Q↓H1是实测高程
19 〝Q=〞:Q◢Q值为+是超，-为欠
20 判别凸凹曲线J>I时M为1,J 21 I-J<0是凸曲线、I-J>0是凹曲线 行号高程GS0数据库 1 Goto1↓ 2 [b]1;P>1889200:0→R:-1.304→I:3→J:1889975→W:4235.757→G:Return：IfEnd↓ P→桩号、R→半径、I→大里程坡度：程序中以除100（上坡为正下坡为负）、J→小里程坡度：程序中以除100（上坡为正下坡为负）、W→变坡点桩号、G→变坡点高程。 例题:双柱式桥墩钻孔灌注桩计算示例（单排桩） 1. 设计资料 1.1 地质与水文资料 最大冲刷线位于河床线下 2.8m ；地基土上层为硬塑黏性土，地基土比例系数m=150004kN m ；桩周土摩阻力标准值60k q kPa =。 下层为中密细砂夹砾石；桩周土摩阻力标准值50k q kPa =；地基承载力基本容许值 0[]220a f kPa =，地基土比例系数m=180004kN m 地基土平均有效重度28.0kN m γ'=（已考虑浮力） 一般冲刷线高程为342.00m ，常水位高程为344.00m ，局部冲刷线高程为339.20m 1.2桩、墩尺寸与材料 墩帽顶高程350.00m ，桩顶高程为344.00m ，墩柱顶高程为348.80m 。 墩柱直径为 1.30m ，混凝土强度等级为C25，钢筋为HRB335，混凝土弹性模量 722.810C E kN m =? 桩身直径为1.50m ，混凝土强度等级为C25，混凝土弹性模量722.810C E kN m =? 1.3荷载情况 桥墩为双柱式桥墩，桥面净宽7m ，附0.75m 人行道，人群荷载为23.0kN m ，设计荷载为公路-Ⅱ级，结构重要性系数为1.0. 上部为30m 预应力混凝土梁，每一根桩承受荷载为： ①两跨恒载反力 1834.53N kN = ②盖梁自重反力2183.10N kN = ③系梁自重反力348.00N kN = ④一根墩柱自重力4187.30N kN = ⑤桩每延米自重力2 1.5(2510)26.5()q kN m π=??-=（已扣除浮力） ⑥活载反力 Ⅰ）两跨活载（汽车+人群）反力：5536.68N kN = Ⅱ）单跨汽车荷载反力：6389.21N kN =，顺桥向弯矩1119.84M kN m =? 单跨人群荷载反力：720N kN =，顺桥向弯矩2 6.16M kN m =? 车辆荷载反力已按偏心受压原理考虑横向分布的分配影响。 Ⅲ）制动力90.00T kN = （作用点在支座中心，距桩顶距离为6.197m ） Ⅳ）纵向风力： 盖梁部分1 2.65W kN =，对桩顶力臂为5.45m 。 墩身部分2 2.35W kN =，对桩顶力臂为2.45m 。 采用旋转钻孔灌注桩基础，摩擦桩。 2. 桩长计算 该地基土层由两层组成，根据《公桥基规》中确定单桩轴向受压承载力容许值的经验公式初步反算桩长。设该灌注桩局部冲刷线以下的桩长为h ，一般冲刷线以下的深度为h3=h+2.8，则由轴向受压承载力要求得： []R a N R γ= 2.1 N 为一根桩受到的全部竖向荷载，包括桩身自重与置换土重（当自重计入浮力时，置换土重也计入浮力）的差值作为荷载考虑。采用正常使用极限状态的短期效应组合，各系数均取1.0. 当两跨活载时（此时为轴力最不利状况） 1234502() 834.53183.1048187.30536.6826.5(4.8)8.0 1.54 1916.8112.36N N N N N N q l h hA h h h γπ '=++++++-=+++++?+-???=+ 2.2 R γ为单桩轴向受压容许承载力的抗力系数，按《公桥基规》中表5.3.7选用。因计 算使用阶段、短期效应组合，荷载仅包括结构自重、汽车和人群荷载，所以， 1.0R γ=。 2.3 []a R 为摩擦桩—钻孔灌注桩的单桩轴向受压承载力容许值 [] 002231 []2 [](3)a ik i p r r a R u q l A q q m f k h λγ=+=+-∑ 道路中边桩的计算程序 【摘要】本文通过介绍南通市开发区七号路工程中边桩计算的原理，编写一套实用的中边桩计算程序 Abstract: The article compiles a practical calculation programme by the introduction of the middle and side piles in the projects in No 7 road development area in Nan tong city. 【关键词】放样计算数学模型 Key Words: Layout, calculation, mathematics modeling 引言 我公司承建了南通市开发区七号路的道路、桥梁、雨污水的建设工程。本人担任项目的工程测量工作，七号路总长4.6Km，与老路交叉改造段长0.9Km。七号路距与老路交叉口20米处有一条通运输船的大河，设计有一座桥梁。设计老路交叉改造段加高三米，与七号路形成平面交叉口，道路拐弯弧度有大有小，形成斜坡，设计采用石驳加固。真实的开挖和坡脚桩长需在放样时根据实地高程作一些调整。设计图只提供了道路曲线元素表，交点、起终点的坐标，直、圆曲线的中边桩坐标的手工计算量特别大，因此，编写了一套中边桩的计算程序。 道路中边桩计算的原理 根据设计提供的曲线元素表，虚拟其道路设计线型，然后根据所输入的任意一点里程桩及左右边桩坐标。 2.1 直线上的中边桩坐标计算 根据直线的起终点坐标计算其方位角a，根据输入的直线上里程桩，求取相对于直线起点的距离L（I）,根据下列公式求取中桩坐标： X（I）= X0 + L（I）* cos a（1） Y（I）= Y0 + L（I）* sin a（2） 其中（X0、Y0）为直线起点坐标，X（I）、Y（I）为任意一点坐标。 直线段左右边桩计算公式如下： X（I）左= X（I）+ S左* cos（a + 3*л/2）（3） 整桩点高程计算表 中平测量记录表 前视高程（m) 高程（m) 桩号后视中视前视 BM1 1.3995 401.4038 400.0043 k0+000 1.4038 400 k0+020 1.4635 399.9403 k0+040 1.3675 400.0363 ZY1 1.3495 400.0543 k0+060 1.3725 400.0313 BM2 1.3825 1.2578 401.5285 400.1460 k0+080 0.9835 400.5450 k0+100 1.0035 400.5250 QZ1 1.1135 400.4150 k0+120 1.1168 400.4117 k0+140 1.0345 400.4940 YZ1 ZY2 0.9835 400.5450 k0+160 0.8545 400.6740 BM3 1.4945 0.8385 401.4845 399.9900 k0+180 1.3625 400.1220 k0+200 1.4245 400.0600 QZ2 1.3453 400.1390 k0+220 1.3453 400.3670 k0+240 1.1175 400.4150 YZ2 1.0695 400.3520 k0+260 1.1325 400.2220 BM4 1.3953 1.2628 401.6170 400.1510 k0+280 1.4663 400.0140 k0+300 1.6028 400.0490 k0+320 1.5685 400.0630 k0+340 1.5545 400.0684 k0+360 1.5486 400.0672 k0+380 1.5498 400.0672 k0+400 1.5512 400.0658 fx-4800P计算器 公路竖曲线高程计算程序 （程序名：GAO CHENG-HP） Lb1 0︰｛CDAB｝︰C“K1=”︰D“H1=”︰A“PV-K0=”︰B “PV-H0=”↙ Lb1 1 ︰｛REF ｝︰R“R=”︰E“K2=”︰F“H2=”↙Lb1 2︰U =（B－D）÷（A－C）︰V =（F－B）÷（E－A）︰U ＞V =＞N = 0︰T = R ( U－V ) ÷2︰≠＞N = 1︰T = R ( V－U ) ÷2 ︰⊿G = A －T ︰Q = A ＋T ︰W = T 2÷（2 R）↙ Lb1 3︰｛K｝︰K “I.T.E.ZY-K.YZ-K=0,1”︰ K =0 =＞Goto 4 ︰⊿U “I 1”= U ▲V “I 2”= V ▲T = T ▲W “E”= W ▲G “ZY-K”= G ▲Q “YZ-K”= Q▲↙ Lb1 4︰｛M｝︰M“PK=”︰M ≤A =＞Goto 5︰⊿Goto 6 ↙Lb1 5︰M ≤G =＞H = B－U ( A－M ) ︰Goto 7 ︰≠＞Prog “H1 ”︰N = 1 =＞H = B＋X－Y ︰Goto 7︰≠＞N = 0 =＞H = B－X －Y ︰Goto 7↙ Lb1 6︰M ≥Q =＞H = B＋V ( M－A ) ︰Goto 7 ︰≠＞Prog “H2 ”︰N = 1 =＞H = B＋X＋Y ︰Goto 7︰≠＞N = 0 =＞H = B－X ＋Y ↙ Lb1 7︰H “HP”= H ▲｛L｝︰L“BZ-T=0,L”︰L = 0 =＞Goto 8 ︰⊿｛S｝︰S “IL=”︰H “HL”= H ＋S L ▲↙ 道路逐桩坐标计算[可读数据库文件(.mdb)，或读文本文件(.txt或.dat) 附件(点击下载)： ;;; by yshf ;;;道路逐桩坐标计算[可读数据库文件(.mdb)，或读文本文件(.txt或.dat)] ;;;1. 根据“道路设计参数文件”[.txt或.dat(文本文件)， ;;; 或者.mdb(Access 2000 数据库)] ”中的平面曲线线元参数、 ;;; 道路纵断面参数成批地计算所求点坐标和相应中线点的设计高程， ;;; 并在Auto CAD中绘制出逐桩坐标表。 ;;; ;;;2. 必须将下载的文件“zbjgchjsb1.fas”存到“E:\\算例文件夹”中， ;;; 如存入其它地方，则程序不会进行计算。 ;;; ;;;3. 运行环境为：Auto CAD 2000以上版，Access 2000以上版数据库。 ;;; ;;;4. 计算前，先准备数据： ;;; (一)平面曲线 ;;; 平面曲线按线元法将各线元要素录入到Access 2000以上版数据 ;;; 库的“道路平面曲线线元参数表”中，或者录入到文本文件(.txt或 ;;; .dat)。当曲线左偏时，其线元长度输入负值；右偏及直线时其线元 ;;; 长度输入正值。 ;;; 起点切线方位是以度.分分秒秒的形式录入的，例如57°09′13.32″ ;;; 录入为57.091332。 ;;; ;;; (二)平曲线曲率半径约定如下： ;;; (1).当线元为直线时，其起点、止点的曲率半径为无穷大，以10的45次;;; 代替。 ;;; (2).当线元为圆曲线时，无论其起点、止点与什么线元相接，其曲率半;;; 径均等于圆弧的半径。 ;;; (3).当线元为完整缓和曲线时，起点与直线相接时，曲率半径为无穷大，;;; 以10的45次代替；与圆曲线相接时，曲率半径等于圆曲线的半径。止点与直;;; 线相接时，曲率半径为无穷大，以10的45次代替；与圆曲线相接时，曲率半;;; 径等于圆曲线的半径。 ;;; (4) 当线元为非完整缓和曲线时，起点与直线相接时，曲率半径等于设计;;; 规定的值；与圆曲线相接时，曲率半径等于圆曲线的半径。止点与直线相接;;; 时，曲率半径等于设计规定的值；与圆曲线相接时，曲率半径等于圆曲线的;;; 半径。 ;;; ;;; (三)竖曲线 ;;; 竖曲线按变坡点里程、变坡点高程、竖曲线半径的方式录入到 ;;; “道路纵断面参数表”中，在变坡点未设有竖曲线的，其竖曲线半径 ;;; 输入0。 ;;; ;;; (四)注意事项 本程序为道路中边桩高程程序（全线通),带数据库 行号GAOCH 注解说明 1 〝DK=〞?P:Prog〝GSO〞: DK为桩号GS0高程数据库。 2 〝ZP〞?W: 变边坡点桩号（可以去掉，在主程序中不显示) 3 〝HP〞?G: 变边坡点高程（可以去掉，在主程序中不显示) 4 R*Abs（J-I)÷100÷2→T：竖曲线切线长 5 W-T→Z: 竖曲线起点桩号 6 W+T→K: 竖曲线终点桩号 7 -Abs（J-I)÷（J-I）→M↓判断是凸曲线=1、凹曲线=-1 8 ?B:〝DL=〞?D:?U↓B设计到各层高度、变量DL-偏距U-横坡度 9 IF P≤Z; 10 Then G+(P-W)I÷100→H:Goto1:IfEnd↓前段直线段高程计算 11 IF P≤W：Then 12 G+(P-W)I÷100-M(P-Z)2÷（2R）→H:Goto1:IfEnd↓凸曲线段高程计算 13 IF P≤K：Then 14 G-(W-P)J÷100-M(P-K)2÷（2R）→H:Goto1;IfEnd↓凹曲线段高程计算 15 G+(W-P)J÷100→H:[b]1: 后段直线段高程计算 16 Int（H*1000+0.5）÷1000+B-D*U/100→H↓边桩高程计算 17 〝H=〞:H◢显示高程 18 〝H1=〞？F:H-F→Q↓H1是实测高程 19 〝Q=〞:Q◢Q值为+是超，-为欠 20 判别凸凹曲线J>I时M为1,J 用EXCEL进行中桩坐标、高程计算 （铜汤高速第一合同段） 测量计算、平差软件种类繁多，但无论什么软件都不能包罗万象，无法满足众多数据处理的需要，即使某种计算软件的功能非常齐全，但此类软件一般都是针对性开发的，而像小件坐标计算，例如承台坐标，则显得非常烦琐。本文结合本项目介绍了应用EXCEL进行测量计算的方法和思路，并提供了一些常用的计算公式。 1、 EXCEL基本计算方法 打开EXCEL后显示的表格，将相关数据依次输入到相应的表格上中。当原始数据输入完毕后，再在需要显示结果的相应单元格内输入计算公式，EXCEL则会按照公式自动计算出结果，下面以两点坐标计算距离为例，简单说明下： 第一步：在相应位置输入表头、序号、坐标后，图示1所示。第二步在显示距离格内输入计算公式=SQRT((B4-D4)^2+(C4-E4)^2)并按回车，距离的结算结果就显示出来。 2、在测量计算中，最常见的是三角函数的处理。EXCEL中备用的三角函数很齐全，但计算中是以弧度为单位来处理的，在计算中角度（度、分、秒） 需要转换成弧度后，即可进行三角函数的计算了。 3、结合本项目分别介绍了直线、圆曲线、竖曲线的计算事例 铜汤高速公路第一合同段，起点里程K78+060.618,终点里程K82+825,全长4764.4米，其中包括朱家畈大桥，水桥湖一桥、二桥三座桥梁。 全线平面首尾为直线段，中间由三段圆曲线连接，（后附全线平面图），计算原始数据取自设计文件第一册《直线、曲线及转角表》(图号为S3-4);全线包括6段竖曲线，其中凹、凸曲线各3段，计算原始数据采用设计文件第一册《路线纵断面图》（图号为S3-3）。 在表格中，桩号栏中的ZJF8、SQA7、SQB6分别代表朱家畈大桥8号墩中心，水桥湖一桥7号墩中心和水桥湖二桥6号墩中心。坐标和高程的单位均为m，角度单位为弧度。 一、坐标计算方法： a、直线段：坐标增量法 例如：第一段直线范围K78+060.618~K78+773.787坐标计算 已知：BP点里程为K78+060.618，坐标（3412768.816，484851.623） 起始方位角a＝140°45′46.1″＝2.456774421（弧度） 计算直线范围内的K78+200坐标如下： 在EXCEL表格中输入相应的表头和需要计算的里程后 在C36格内输入公式=3412768.816+（B21-78060.618）* COS（2.456774421） 在D36格内输入公式=484851.623+（B21-78060.618）* SIN（2.456774421） X=3412768.816+(78200-78060.618)×COS2.456774421＝3412660.860 CASIO 9860G SD线元法隧道三维（坐标正反计算、高程）计算程序 悬赏分：+62 作者：刘工 2010-4-3 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 ： 通过逐桩坐标表推算曲线要素（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”的“交点法正算”表格中，效果图如下： 逐桩坐标表见（本文附件）下载地址附后！ 岳屏明珠苑排桩(地下连续墙)规范计算书 一、计算基本数据本计算依据《建筑基坑支护技术规程》(JGJ120-99)。 1.地质勘探数据如下: 序号h(m) (kN/m3) C(kPa) (°) m(kN/m4) 计算方法土类型 1 8.00 19.00 10.00 15.00 35000 水土合 算填土 2 , 16.00 17.00 27.30 23.70 3500 粉土 表中：h为土层厚度(m), 为土重度(kN/m3),C为内聚力(kPa), 为内摩擦角(°)。 基坑外侧水标高-1.10m，基坑内侧水标高-12.30m。 2.基本计算参数：地面标高0.00m，基坑坑底标高-12.30m，支撑分别设置在标高-2.00m、-5.00m处，计算标高分别为-2.50m、-5.50m、-12.30m处。侧壁重要性系数0.90。桩墙顶标高0.00m，桩墙嵌入深度5.70m，桩墙计算宽度1.18m。桩墙顶标高以上放坡级数为0级坡。序号坡高m 坡宽m 坡角°平台宽m 3.地面超载：————————序号布置方式作用区域标高m 荷载值kPa 距基坑边线m 作用宽度m 1 均布荷载基坑外侧 0.00 10.00 -- -- ——— 二、计算结果——————————————————————计算方法 最大正弯矩kN.m位置(m) 最大负弯矩kN.m位置(m) 剪力(kN) 位置(m) 经典法458.36 -8.11 423.04 -15.15 243.67 -12.30 支撑道号标高(m) 支撑内力(kN) 第1道-2.00 81.42 第2道-5.00 261.01 —————————————————————————————————— ———RichTextBox1_ CASIO fx5800p全线高程计算程序 GAOCHEN 主程序 Lbl 1 “KM=，<0,Stop”:?K：K<0=>Stop:“PY=”？L：Prog”GK” C-D→E:Abs(RE/2)→T：R(Abs(E)/E)→R If K≤B-T:Then 0→H:Else:If K≥B+T Then 0→H:D→C:Else K-B+T→H:Ifend:Ifend A-(B-K)C-H2/(2R)→G：Cls “KM=”：Locate 4，1，K：Locate 10，1，“PY=”：Locate 13，1，L：Fix 3 “H=”：Locate 4，2，G Prog “PODU”：（E-B）/（D-A）（K-A）+B→I：(F-C)/（D-A）（K-A）+C→J “HL=”：G+IL→X：Locate 4，3，X：Locate 11，3，“I=”：Locate 13，3，I*100 “HR=”：G+JL→Y：Locate 4，4，Y：Locate 11，4，“I=”：Locate 13，4，J*100◢Cls：Norm 2：“BM+HS≤0,Goto 1”？Z：Z≤0=> Goto 1：Cls (输入视线高) “KM=”：Locate 4，1，K：Locate 10，1，“PY=”：Locate 13，1，L：Fix 3 “QSM=”: Locate 6，2，Z-G (显示中桩读数) “QSL=”: Locate 6，3，Z-X (显示左桩读数) “QSR=”: Locate 6，4，Z-Y◢(显示右桩读数) Norm 2：Cls：Goto1 （后面可加已知视线高计算读数部分，不想计算读数则视线高输入0或负数如不想显示麻烦，可将Locate语句去掉） 以下两个子程序不需运行，只是两个独立的数据库赋值程序，字母重复不影响计算结果 GK 数据库子程序 If K≤第二曲线起点桩号：Then 第一曲线交点高程→A：第一曲线交点桩号→B：第一曲线前坡→C：第一曲线后坡→D：第一曲线半径→R：Return：Ifend …………….（有几个变坡点编几个If语句） PODU 计算坡度子程序 If K≤第一变（非变）坡段终点：Then 第一曲线起点桩号→A：第一曲线起点左坡→B：第一曲线起点右坡→C：第一曲终点桩号→D：第一曲终点左坡→E：第一曲终点右坡→F：Return：Ifend ………………（每一个超高变化线元一个If语句） 结果显示： KM=0000.000 PY=0.000 H= 00.000 HL=00.000 I=-1.5 HR=00.000 I=-1.5 KM=0000.000 PY=0.000 QSM= 00.000 QSL= 00.000 QSR= 00.000 FX5800计算器测量程序集版 一、程序功能 主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括C型，S型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。 新版本优化：1、优化程序语句、2、以复数形式输入变量及做数据库，取消原矩阵数据库;3、修改隧道超欠挖程序为通用形，不受圆心个数限制、4、新增测量资料表计算 二、源程序（绿色为程序名；蓝色为输入计算器内容）紫色为新版改动处（可以根据自己标段情况用相关主程序及子程序，再在0程序中汇总）0.汇总程序（1、坐标计算放样程序(1XY、A、AB、HX、JS、DX、QX、F、XY、X1)；2、坐标反算程序（2ZD、A、B、AB、HX、QX、F、ZD、X1)；3、高程计算查阅程序（3GC、H、I、QX、S1、I1）；4、路基半幅标准宽度查阅程序（4GD、C、QX、G1）；5、路基边坡及开挖口放样程序（5BP、 A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1）； 6、路基标准距离放样（6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1)； 7、桥梁锥坡计算放样程序（7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1)； 8、极坐标计算程序（8JS、JS、DS）； 9、隧道超欠挖计算程序（A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1）运行后按1~9数子约半秒，则选择1至9的程序，返回时，在桩号输入-1,返回选择计算类型。输入-2,返回选择线路。 程序名：0（数子0） ClrMat:ClrVar:12→DimZ：Norm 2:Do:＂(XY=1，ZD=2 ，GC=3，GD=4，BP=5，FM=6，ZP=7，JS=8，SD=9)===>QING AN 1-9＂：Getkey→Z[3]:While Z[3]=35:Prog＂1XY＂:WhileEnd:While Z[3]=36:Prog＂2ZD＂：WhileEnd: While Z[3]=37:Prog＂3GC＂：WhileEnd: While Z[3]=21:Prog＂4GD＂：WhileEnd: While Z[3]=22:Prog＂5BP＂：WhileEnd: While Z[3]=23:Prog＂6FM＂：WhileEnd: While Z[3]=31:Prog＂7ZP＂：WhileEnd: While Z[3]=32:Prog＂8JS＂： 带有缓和曲线的圆曲线逐桩坐标计算 例题：某山岭区二级公路，已知交点的坐标分别为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）第一缓和段坐标计算 ° 73822 12 160 48 03 桩号 弧长 l i 桩点里程-ZY 里程 偏角 2 1 l i i 3 LS 方位角 C i 12 i （左转） 弦长 c I 丄 90R 2L 2 Xi X i X ZH qCOS C i Yi Y Y ZH C i sin c i ZH: K2+048.562 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 （3）圆曲线段坐标计算 切线 ZYJD - o 153 09 41 桩号 弧长 l i 桩点里程 -HY 里程 偏角 1 90 i i R 方位角（左转） 弦长 C i 2Rsi n i X X X HY C i cos c Y Y Y HY c ；sin c c i ZY JD - 0 - i HY: K2+088.562 切线 153 ZY JD 0 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 CASIO5800计算器 公路测量计算程序 程序设计:魏加训 2009.2.28 Casio 5800计算器数据库型万能坐标正反算计算程序 一、主程序：1XY Lbl 0:“1.ZS 2.FS”?→V↙ If V=1: Then “CZ X” ?H: “CZ Y” ?T:Goto 1: Else If V=2: Then Goto 2 :IfEnd: IfEnd ↙ Lbl 1: “K××+×××”?D:?Z: “RJ”?G↙ Prog “P.Z”↙(注:计算另一线路时修改替换此处和FS子程序中的P.Z为对应线路的数据库名称即可) Prog “ZS” ↙ If Z<0: Then Cls:“X（L）=”: “Y（L）=”: Locate 6，1，X : Locate 6，2，Y◢ Pol（X-H，Y-T）: Cls: “S（L）=”: Locate 6，1，I : "F（L）="：360Frac（（J+360）÷360▼DMS◢ Goto 1:IfEnd↙ If Z=0: Then Cls:“X（Z）=”: “Y（Z）=”: Locate 6，1，X : Locate 6，2，Y : “QXFWJ （Z）=”: 360Frac（（J+360）÷360▼DMS◢ Pol（X-H，Y-T）: Cls: “S（Z）=”: Locate 6，1，I : "F（Z）="：360Frac（（J+360）÷360▼DMS◢ Goto 1:IfEnd↙ If Z >0: Then Cls:“X（R）=”: “Y（R）=”: Locate 6，1，X : Locate 6,2，Y◢ Pol（X-H，Y-T）: Cls: “S（R）=”: Locate 6，1，I : "F（R）="：360Frac（（J+360）÷360▼DMS◢ Goto 1:IfEnd↙ Lbl 2: 0→Z:0→G:”X” ?M:”Y” ?I:Prog “FS”: Cls:“K=”：“Z=”：Locate 4，1，D : Locate 4，2，Z◢ Goto 2↙ 二、正算子程序：ZS 5→N: U(E-1-R-1)÷Abs（K-F）→P: Abs（D-F）÷N→Q: 90Q÷π→S: (注:此处5→N是控制计算精度可修改的,一般取值为4～6即可) C+(NPQ+2UR-1)NS→J:1→L↙ A+Q÷6×(Cos (C)+Cos (J) +4∑（Cos (C+((L+0.5)PQ+2UR-1)×(L+0.5)S),L,0,(N-1)）+2∑（Cos (C+((LPQ+2UR-1)LS,L,1,(N-1))）+ZCos（J+G) →X : B+Q÷6×(Sin(C)+Sin( J) +4∑（Sin (C+((L+0.5)PQ+2UR-1)×(L+0.5)S),L,0,(N-1)）+2∑（Sin (C+((LPQ+2UR-1)LS,L,1,(N-1))）+Z Sin（J+G)→Y ↙ 三、反算子程序：FS Lbl 0:Prog “P.Z”:Prog “ZS”↙ (注:计算另一线路时修改替换此处和1XY主程序中的P.Z为对应线路的数据库名称即可) (I-Y)sin(J)+(M-X) cos(J)→ P :D+P→ D ↙ If Abs(P)≥0.001:Then Goto 0 : Else Goto 1 : IfEnd↙ Lbl 1: (I-Y)cos(J)-(M-X) sin(J) →Z 通过逐桩坐标计算曲线 要素 HEN system office room 【HEN16H-HENS2AHENS8Q8-HENH1688】 通过逐桩坐标表推算曲线要素（CAD篇） 摘要：现在从事工程行业的都流行使用AutoCAD进行绘制图形，为了更好的利用这个绘图工具来绘制线路曲线要素，本文将讲解如何通过设计院提供的逐桩坐标表推算未知曲线要素。 关键词：AutoCAD技巧曲线要素 说明：AutoCAD已经成为国际上广为流行的绘图工具。具有良好的用户界面，通过交互菜单或命令行方式便可以进行各种操作。它的多文档设计环境，让非计算机专业人员也能很快地学会使用。在不断实践的过程中更好地掌握它的各种应用和开发技巧，从而不断提高工作效率。 如何提高CAD速率？ 通常在开始绘图的时候一些人由于对工具命令不熟悉直接使用工具栏等查找命令，这样对制图的效率会大打折扣从而导致绘图的速率缓慢，提高制图的方法需要掌握CAD的快捷命令，孰能生巧的记住，然后择优选用其中的一些常用的绘图命令，把繁琐的长命令转化为简单的命令使用，其次需要多练习绘图的方式与方法才会提高绘图水平。 推算原理： 通过逐桩坐标表（含曲线五大桩）然后利用生成展点命令在AutoCAD中进行坐标展点，再通过工具或命令绘制进行查询曲线长、切线长、外失距、交点坐标、交点里程、曲线半径、方位角、转角等。 准备工作： 1、逐桩坐标表X、Y（含曲线五大桩） 2、AutoCAD绘图软件 演示版本为：AutoCAD 2007 示例文件：某高速铁路逐桩坐标表 演示范围：DK07+~DK12+（由于该交点属于大转角则演示明显） 操作流程：坐标展点→绘制半径→绘制切线长→查询→查询转角→查询交点坐标→查询交点里程→查询外失距→绘制缓和曲线。（请注意逐桩坐标表中所提供的ZH、HY、QZ、YH、HZ等说明） 准备操作如下： 1、打开“逐桩坐标表”并复制（里程桩号、坐标X、坐标Y）数据到“曲线坐标计算程序VBA ”的“交点法正算”表格中，效果图如下： 逐桩坐标表见（本文附件）下载地址附后！ 2、在“曲线坐标计算程序VBA ”的“交点法正算”表中“点击生成展点”然后点击“复制数据”按钮，再打开AutoCAD在命令行中输入pline按回车键，并在命令行上点击鼠标右键选择“粘贴”，图示如下： 3、展点完毕后删除起始点那根长线段（该线段属于展点命令的起始端位置，该线段无用可以直接删除），然后在命令行中输入zoom按回车键再选择E按回车键，图示如下： 绘图操作准备： 1、基本设置：点击AutoCAD顶部工具栏中的“格式”→“标注样式”（或 输入命令d）→“修改”→主单位精度选择“”→角度标注：单位格式选择“度/分/秒”，精度选择“0d’””→确定→设为当前。 2、在命令行中输入：se按回车键，然后弹出草图设置面板→选择“全部清除”→在“圆心”上面打勾→确定。 绘制曲线半径： 半径：在圆中，连接圆心和圆上任意一点的线段叫做圆的半径。 先找到HY 位置，点击顶部工具栏中的“绘图”→“圆弧”→“三点”然后在HY 圆心位置单击鼠标左键，图示如下： 小白自学ExcelVBA道路坐标高程计算程序流程 1声明 1.1 本人是个工作时间不长测量施工员。 1.2听说想轻松愉快的干好测量得学门编程，又听说ExcelVBA是个简单的可视化的常用的…… 1.3 本人很懒，面对厚厚的全是“昏天暗地”代码的ExcelVBA教科书籍，实在是没心没力。其实俺还是懂点儿VB编程的（学校学过“=”是赋值，if、while、end的意思，嘿嘿，还有画窗体图框，其他的就都还给老师了）。 1.4 谷歌、度娘，是咱的好帮手。 1.5 仰望的存在，神一般的存在，无私的化身！ 道路中边桩坐标计算程序120424.xls（王中伟”教授”QQ：595077） 曲线坐标计算程序VBA 4.6.xls（陈超”中铁”QQ：295188316） 陈师傅的VBA代码乍一看感觉比王老师的让人头痛，怎么说咱们也是个有理想有目标的人，要啃就啃硬骨头！就选~~~嘿嘿~~~王老师的程序吧！ 1.6 道路中边桩坐标计算程序120424.xls代码获取。 王老师、陈师傅担心不懂编程的人，不小心修改代码导致程序错误，设置了vba密码（个人认为），其次我跟他们不熟，没有正大光明的要的密码，于是求助谷歌度娘，这个关于VBA 密码破解，于是很不厚道的得到了密码，为了方便本次学习，又很不厚道的把道路中边桩坐标计算程序120424.xls的密码贴出来（df750726），神人勿怪呀！ 2 代码理解ing… 我们通过密码打开vba代码窗口，大家可以先把每个表格打开浏览一下代码，是不是感觉很短呀，感觉应该是超级链接的意思，嘿嘿，主要的代码在模块“lx”里，打开下，代码多吧，这就是咱们要肯的骨头。现在咱们冲呀！ 对于跨度不小于4m的现浇钢筋混凝土梁、板，其模板要按设计要求起拱；当设计无具体要求时， 起拱高度宜为跨度的0.1%-0.3%! 起拱是为了防止梁在浇筑过程中模板下垂过大（挠度过大），是梁达到水平的作用！ 桩基础的基础埋深一般是算到承台底部的，也就是说基础埋深6.8M实际上指的是地 面至承台底的高度。 桩长是一般是从承台底部算至桩尖。 6.8m应该是包含了地下室高度的埋深吧。桩长一般从低于承台顶标高100mm处起 计，至持力层表面标高止。 因为桩顶标高没有标，所以数据没什么问题，基础埋深当然不能全是承台了，要按 图纸和实际情况而定了。 桩长是从承台向下开始算起，不过还要加一个桩头伸入承台的长度，一般有两种情 况：一是看你的桩径，500的应要伸入承台100，400的应要伸入承台50。 本工艺标准适用于工业和民用建筑中粘土、粉质粘土及含少量砂、石粘土层，且地下水位低的人工成孔灌注桩工程. 2.1 材料及主要机具： 2.1.1 水泥：宜采用325号～425号普通硅酸盐水泥或矿渣硅酸盐水泥。 2.1.2 砂：中砂或粗砂，含泥量不大于5%。 2.1.3 石子：粒径为0.5～ 3.2cm的卵石或碎石；桩身混凝土也可用粒径不大于5cm的石子，且含泥量不大于2%。 2.1.4 水：应用自来水或不含有害物质的洁净水。 2.1.5 外加早强剂应通过试验选用，粉煤灰掺合料按试验室的规定确定。 2.1.6 钢筋：钢筋的级别、直径必须符合设计要求，有出厂证明书及复试报告。 2.1.7 一般应备有三木搭、卷扬机组或电动葫芦、手推车或翻斗车、镐、锹、手铲、钎、线坠、定滑轮组、导向滑轮组、混凝土搅拌机、吊桶、溜槽、导管、振捣棒、插钎、粗麻绳、钢丝绳、安全活动盖板、防水照明灯（低压36V、100W），电焊机、通风及供氧设备、扬程水泵、木辘轳、活动爬梯、安全帽、安全带等。 2.1.8 模板：组合式钢模，弧形工具式钢模四块（或八块）拼装。卡具、挂钩和零配件。木板、 在测量岗位工作已经有三个月到时间了，三个月的时间学习和收获了许多，现对这三个月的工作学习做一下总结。 测量工作内容主要有以下两个方面：测量放线（坐标计算），高程控制。 一、测量放线 测量放线到主要技术包括坐标计算和仪器使用。坐标计算包括直线段坐标计算和曲线段坐标计算。 1、直线段坐标计算。直线坐标计算分为中桩坐标计算和边桩坐标计算。 1）中桩坐标计算。根据公式 ααsin ,cos d Y Y d X X +=+=起中起中 d — 所求点到起点距离； α— 该直线坐标方位角。在此顺带详细介绍一下坐标方位角到计算方法： （1）坐标方位角的计算 AB AB A B A B AB x y x x y y ??=--=arctan arctan α当 R y x R y x R y x R y x -360,0,0180,0,0-180,0,0;,0,0?=?+?=??>?αααα；； （2）坐标方位角的推算 ， ， 218021*********βαβααβαβαα-?+=-=+?+=+=B B AB BA B 由此推出：βαα±?+=180后前（“左”→“+”， “右”→“-”），计算中，若α值大于360°，应减去360°；若小于0°，则加上360°。 2）边桩坐标计算 应用公式 )90sin(90cos(?±+=?±+=ααl y y l x x 中边中边）， 进行边桩坐标到计算。北客站为直线车站，坐标计算较简单，现以位于机场线第二段底板的变电所夹层东北角C 点为例进行计算： 以机场线右线为基准来计算中、边桩坐标。已知起点坐标A （22264.4009，11553.2031），终点坐标B （22180.2655，11279.0739），起点里程为YDK0+255.275,C 点里程为YDK0+286.075,偏距为15.33m ，则由以上公式计算C 点坐标： α=arctan(（11279.0739-11553.2031）/（22180.2655-22264.4009）)+180°=252.938°， =中x 22264.4009+（286.075-255.275）*cos252.938°=22255.3640 =中y 11553.2031+（286.075-255.275）*sin252.938°=11523.7586 =c x +15.33*cos （252.938°+90°）=22270.0193 = c y +15.33*sin （252.938°+90°）=11519.2606，则可求出C （22270.0193，11519.2606）。 2、曲线段坐标计算 1）不带缓和曲线的圆曲线中、边桩坐标计算 北 中 x 中 y单排桩基础计算算例
道路中边桩的计算程序
4整桩点高程计算表
公路竖曲线高程计算程序
道路逐桩坐标计算
本程序为道路中边桩高程程序
EXCEL进行中桩坐标、高程计算
[整理]9860G线元法隧道(坐标正反计算、高程)计算程序
通过逐桩坐标计算曲线要素
排桩计算参数
CASIO fx5800p全线高程计算程序
Fx5800计算器公路测量程序设计
带有缓和曲线的圆曲线逐桩坐标计算例题
5800坐标高程计算程序
通过逐桩坐标计算曲线要素完整版
小白自学ExcelVBA道路坐标高程计算程序流程
桩深计算
测量坐标计算及高程计算
相关主题
文本预览