立交匝道中边桩坐标放样正反算程序RAMP下

1、立交匝道中边桩坐标放样正反算程序ramp （0911改进版）下篇 六、立交匝道数据库子程序的格式及编写1. 互通匝道数据库子程序格式说明每条互通匝道建立一个数据库子程序，子程序名称格式建议为：ramp-dat1-1ramp-dat1-2ramp-dat1-3本来，笔者为了不建立太多的数据库子程序，曾将尝试将一条互通所有匝道 的数据全部写在一个子程序ramp-data1中（参照路线计算road-2程序采 用的数据库子程序的办法），后来发现：一是数据太过庞大，查找和修改数据相 当麻烦（按上、下键按得手指发酸），二來逻辑判断语句太多，影响计算速度， 因此舍弃。每一段线元写成一行数据，格式如下：if

2、p位角,纟线元计算终点桩号:then |线元起点x（n）坐标,线元起点y（e）坐标,线元起点直纟:线元起点曲率（左转为负）l |线元终点曲率（左转为负），线元起点桩号，线元终点桩号mat b： retnin： ifend2. 立交匝道参数辅助计算excel程序的使用说明前面介绍了线元的数据格式，这里小结一下，每条线元需要确定以下数据：（1）线元起点的x/y坐标；（2）线元起点的切线方位角；（3）线元起、终点的曲率（半径的倒数，左偏为负）；（4）线元起、终点的桩号。以上参数，要数第（3）种参数最难确定，因为在设计图表屮没有直接标注, 需要根据其它相关参数进行计算确定。除第（3）种参数外，其它三种

3、参数的确 定就比较简单了，因为他们基本可以在匝道的设计图表中直接获取。考虑到匝道计算的部分参数不能直接从设计图表中获取，以及计算结果的验 证等目的，笔者编制了立交匝道参数辅助计算excel程序，帮助使用者快速、 准确地确定匝道数据库参数，以提高工作效率。这里以a匝道为例，讲述立交匝道参数辅助计算excel程序的基本使用方 法。程序主界面如下图所示：a丄bce| g 丄hijl12©ba參如算|节熄桩号¥«1灶标y無345|678916111213141rh 4 h |节点casio数据参数.中桩坐标匕上其中，“节点”工作簿用于输入和计算导线节点参数；“casi0数

4、据参数” 工作簿用于计算匝道的casio数据库子程序所需的参数；“中桩坐标”工作簿 用于计算匝道中桩坐标以便与设计文件对照检查。这个程序的使用，基本与我先前发布的“立交匝道屮桩坐标计算excel程 序的使用” 一致，只是多了一个生成“casio数据参数”的功能。因此，请读 者参阅“立交匝道中桩坐标计算excel程序的使用”日志。（链接地址： 第一步：在“节点”工作簿，输入起点节点数据和以后各节点的桩号、半径、 偏移等参数，本例输入完成后的界面如下：abcl_ eghijl1匝道a桩2节点节点桩号灶标|y里标切味方位角3bpko.ooo 07325.291s916.008264045-16.6*

5、4zhk0+1s3-19405hyk0+225j942006yhk0+342.1412007hzk0-m26.64108zhk0+688.64109hyk0+799.7s29010yhko-e-939.3589027511hyk1+000.6086012yhk1-h1b4.2516013gqkl + 170,651014epk14219.223 960.55第二步：点击“参数计算”按钮，程序即可计算出各节点的xy坐标、切线 方位角、缓曲参数（若本节点与上一节点组成的线元为缓和曲线）等参数，这些 参数是与设计图表相关参数进行对照检查的重要数据，这一步，可能无法一次性 计算准确，需要多次检查、更正

6、原始输入参数（即第一步输入的参数）。_abceghil1a蜩计且!|桩fl2节点节点鉀21乜2y嘶切励位角芳舷鼻3bpko-000.07325.2915916.008264。45'166"4zhk0+153.19407311.2865763.456264°45v6.6"5hyk0+225.1942007309,0175691,595275。043.3"120.6yhk0+342-1412007351.8675584.566308°3414.5<7hzk0+426.64107413.1835526.667320°40

7、9;280"130.8zhk0+688.64107615.8555360.630320。408.0”9hyk0+799.752907712.6875310.062356。02318”100,10yhk0+939.358902.75780s.8065392j1984°55952"11hyk1 十000.608607787.797544&739133°39'335"105.12yhk1+084.251607711.245s4s7.331213°31'569"13gqk1+170.65107670.4385

8、383.423254。47976"72.14epk1+219.223960.557657.2965336.664253。20'125"216.第三步：若计算出的各节点参数无误，一般也没有问题了，但为了保险起见, 还可点击“桩号生成”按钮，批量生成桩号，并计算其坐标，与设计文件的逐桩 坐标进行对照检查。abcdei12清除轴型标y坐标切线方位角貯匚 z900t6543ak0+000.7325.2915916.008264。45口6.6"ak0+002.7325.1085914.016264。45口66"ak04-0047324.9255912.02

9、5264。45，166"ak0+006 7324.7425910.033264。45，166"ak0+008.7324.5605908.042264。45口66"ak0+010.7324.3775906.050264。45口66"ak0+012.7324.1945904.058264。45口66"ak0+014.7324.0115902.067264。45，166"ak0+016.7323.8285900.075264。45，166"ak0+018.7323.6455898.083264。45口66"ak0+020

10、.7323.4635896.092264。45，166"ak0+022.7323.2805894.100264°45z16.6wak0+024.7323.0975892.109264。45'16.6"14 !1节点zpasio数据蔘数1于桩坐标/tj第四步：若第三步检查无误，即可进入“casio数据参数”工作簿，点击“参 数计算”按钮，即可计算出数据库子程序所需的各线元参数。a一jbcftef ghi jl kl123计二量psw mat bl.lymat 8(1.2qmat b13)a mat blv4jbmat b1.5)s mat b(l6e mat

11、 b1153,1947325.291s916.008264°4sa6.6*0001s3.422254947311.2865763.456264。4556.601 壬 200153-194225.56789101112133342.1417309.017s691.59s27s°04w.3*1 2001 20022s.194342.4426.6417351.86755b4.566308°34/14.s-1 号 2000342.141426.5688.6417413.1835526.667320°40r28.0*00426.&41688.6799,75

12、2761s.8s55360.630320。4080,01 90688,641799,79393587712.6875310-062356。0231.81子90190799.752939.81000.6087805.8065392,11984°55r05.2*1 * 901+60939.3581000.91084.2517787.7975448,739133。39,33 51 + 601 601000.6081084.101170.6517711.2455457.331213°31z56.9m1壬6001084-2511170.111219.22376764385383.42

13、3254q47p7.6"0-1 寺 960.551170.6511219.h 4 h节点.casio敷据参数,中枉坐标r1 ”第五步：对照各线元参数编写该匝道的数据库子程序。立交匝道参数辅助计算程序下载：点此下载3. 互通匝道数据库子程序的编写为说明清晰起见，笔者将每条匝道的每个线元都一一进行编号，比如a匝道 的第一条线元编为，读者可结合立交匝道设计图表进行判读。本示例项目的匝道数据库子程序见下表。立交匝道中边桩坐标放样正反篡程疣一一匝道数据库子程序g匝道）：ramp-dat1-1行号程 序说明1if p153.194: thm r7325j91, 5916.008, 264

14、6; 45° 16.6° , 0, 0, 0, 153.194今 mat b: itetum: iend线元"©1”数据2if p225.194: thai (7311286, 5763456, 264° 45° 16.6° , a 1200, 153.194,225.194 matb: return: iff ndd线元52”数据3if f342.141: thai 7309.017, 5691.595, 275° 04° 043° , 1 十200, 14- 200,225.194,342.

15、141 mat b: return: ifenmd线元s3”数据4if p426.641: thai 7351.86& 5584.566, 308° 34° 15.2° , 14-200, 0, 342.141,42641 mat b: rftum: ifendd线元“亠护数据5if f688.641:ihai 1(7413.184, 5526.667, 320° 40° 28.7° , a 0, 426.64l688.641今 mat b: return: ifendv线元"a-5-数据6if p799.752:

16、thai 7615.856, 5360.631, 320 ° 40° 28.7° , 0, 19(x688.641, 799.752今 mat b: retum: ifendw线元数据7if f939.358: thai 7712.688, 5310.063, 356° 02° 32.6° , 14-90, 190, 799.752,939358j->matb: return: ifendv线元仏丁'数据8if f1000.608: thai 7805.807, 5392.120, 84° 55° 0

17、53° , 14-90, 14-60, 939358,1000.608 mat b: return: ifencx1线元"a-8-数据9if f1084251:th«i 7787.79& 5448.740,133° 39° 33.6° ,160,14-60,1000.608,10842514 mat b: ifetum: isiid线元“勺9”数据10if p1170.651: then 7711246, 5457332, 213 ° 31° 58.2° , 160, 0<1084.251,

18、1170.6511 mat b: return: ifendd线元“比10”数据11if 1219.223: ih«i 7670439, 5383.423, 254° 47° 08° , 0, -14- 960.55,117051, u19223 mat b: return: ifend线元 11”数据12cis: locate 6,2, tcp out j若输入的桩号不 在匝道范围内， 则提示警告立交匝道中边桩坐标放样正反算程庫一一匝道数据库子程序（b匝道）：ramp-dat1-2行号程序说明1iff117.416:thoi 769436, 5864)

19、56,266° 51° 114° ,1708.45,14- 3000,0,117.416 ->mat b: return: islnd线元“bi”缠2if f 207.762: thai 7695.640, 5746.696, 272 ° 43° 20.7° , 14-3000, 1一 3000,117416,207.762 > mat b: return: ifendd线元数据3if f286.629: thai 7701.289, 5656.530, 274° 26° 52° , 1300

20、0, 1 一200,207.762,286.629今 mat b: return: ifend线元“43”数据4if f344.060: thai 7713.215, 5578.724, 286° 29° 522° , 14-200, 1一 200,286.629,344.060今 mat b: return: ifendd线元数据lif p399.185: thai 7737.153, 5526.737, 302° 57° 02.4° , 1200, 0, 344.060,399.185 mat b: rum: ifendd线元對据

21、6if f457.430:thai 7771226, 5483.462,310° 50° 483° ,a -1-92.75,399.185,457430 mat b: rum: ifendd线元"46”数据7if f50x657: thai 7804367, 543575, 292° 51° 23.1° , -14-92.7s 一 1-? 92.75,457430, 502.657 -> mat b: return: ifend线元“卜7”数据scis: locate 6,2, hp out j若输入的桩号不 在匝道范

22、围内， 则提示警告立交匝道中边桩坐标放样正反算程序一一匝道数据库子程序(c匝道)：ramp-dat1-3行号程序说明1if fl 16.640: th«i 7450.147, 5504465, 320° 40° 28.7° , 0, 1三 100, 0, 116.640 9 mat b: return: iflen族线元数据2if f226235: thai 7551.37& 5450.141, 354° 05° 223° , 1100, 1三100,116.640.226235)1 今 mat b: return:

23、 ifendf1线元“c2”数据3if p291.035:thai h7645431, 54sm574, 56 ° 52° 57.6° , 1-100,1 500, 226235,291.035今 mat b: rum: ifendv线元数据斗if f359.994:thai 766619. 5555.662, 79 ° 09° 33.4° , 1-? 500,1 500, 291.035,359594 mat b: rum: ifendv线元"c-4-数据厂if p439.994: thai 7675.185, 5624.

24、070, 87° 03° 413° , 1500, 0, 359994,439.994mat b: r旳mu ifend线元"c-5-数据6cis: locate 6,2, ep out j若输入的桩号不 在匝道范围内， 则提示警告立交匝道中边桩坐标放样正反算程序.一一匝道数据库子程序(d匝道)：ramp-dat1-4行号程序说明1if f117.179: thm 7448.415, 4977.383, 58° 57° 27° ,0,0, 0, 117.179 夕 mat b: return: ifendv线元“dl”数据2

25、if p237.277: thai 7508/41, 5077.780, 58° 57° 27° , 0, 1 255, 117.179,237277今 mat b: rum: ifendv线元麴居3if p471.616:thai h7562385, 5184.951, 72 ° 26° 59.5° , 12255,12255, 237277,471.616今 mat b: rum: ifendd线元“d3”数据斗if p610219: th«i 7527.874, 5408483, 125° 06°

26、12° , 14-255, 0, 471.616, 610219 mat b: rum: else goto lsifend线元“也斗”数据厂cis: locate 6,2, kp out j若输入的桩号不 在匝道范围内， 则提示警告七、程序使用示例1. 坐标正算示例计算任务:假设在导线点(2807544.340, 475613.014)上架设全站仪，试计 算mn互通式立交c匝道以下点位的x/y坐标及极坐标放样数据：(1) k0+315.3中桩，以及该桩左侧3.5米、右侧5米的边桩；(2) k0+340 中桩。使用立交匝道中边桩坐标放样正反算程序ramp的操作流程见下表。使用ramp

27、程序计算c匝道中边桩坐标及放样数据操作流程屛慕显示屏慕说明按键操作操作说明zsc1,fsc2?zs1,fsc2j?1xs?7659.5457659.5457544.340ys?5525.5375525.5375613.014kp?5200.0005.?31vj等待输入匝道代码等待确认坐标正算还是 坐输入c匝道代码一一“3”1西输入1表示进行坐标正算等待输入测站点x坐标7544.340回输入测站点x坐标等待输入测站点y坐标5613.014回 输入测站点y坐标等待输入待计算的桩号等待输入边桩右角315.3 回输入待算的桩号ck(r315j7vj?90.000 d?0.000等待输入边距回边距现值为

28、0,由于是计算 中桩坐标，边距应为0, 1 接按执行键表示不改恋见雀8x= 7670.903y= 5579.595r= 345°12,31.48x 130.901显示计算结果:中桩xy坐标，极坐标 放样数据屈按执行键继续往下运彳亓幽9vj?90.000等待输入边桩右角回直接按执行键，不改更见確10yj?90.000 d?0.000等待输入边距-35屈输入左边足矚3.5米，罐 表示在左侧11x= 7674.368v= 5579.1054 345°23'117”0= 134.377显示计算结果：左边桩xy坐标，极坐 标放样数据回按执行键继续往下运彳亓霍12vj?90.0

29、00等待输入边桩右角直接按执行键，不改恋瓏141516171819yj?90.000 d?3.500x= 7665.952y= 5580.2%r= 344。56'3 仁 61”d= 125.936vj?阪灘90.0000kp?315.300315.300340vj?90-000yj?90.000 d?5.000x= 7673.761?= 5604.127a= 356°4,18.35?,129.725等待输入边距显示计算结果:右边桩xy坐标，极坐标放样数据等待输入边桩右角等待输入新的待算桩号等待输入边桩右角等待输入边距显示计算结果:中桩xy坐标，极坐标 放样数据蝕入右边距离5米

30、，正值叢不在右侧回按执行键继续往下运彳亍程右角输入0值（实际中右毎0屈 不会为0）,表示跳出当前桩 号的计算340叵3输入待算的桩号cko340更）直接按执行键，不改恕见僵0叵3 计算中桩坐标，边距应为0ad|ao计算结束,退出程序按两;欠清除键可2. 坐标反算示例计算任务：根据上面计算的c匝道k0+315.3中桩坐标，以及该桩左侧3.5米、 右侧5米的边桩坐标计算结果，反算对应的桩号及距中距离，并进行结果的验证。使用立交匝道屮边桩坐标放样正反算程序ramp的操作流程见下表。使用ramp程序反篡匝道中桩和距离操作流程步骏屏慕显乎屏慕说明按键操作操作说明1rflmp?l-n?等待输入匝道代码3屈

31、输入c匝道代码一一“3”2zs【1,fs ?等待确认坐标正算还是 坐标反專.2回输入2表示进行坐插題3zsc1»fsc2?2xb?7544.340等待输入駆纂的x坐 标7670.903 叵3输入c匝道ko-315.3中桩 坐标斗7544.3407670.9035613.014等待输入待反幕的y坐5579.595叵输入c匝道k(h315.3中桩、 坐标5613.0145579.595kp?340.000等待输入估计的桩号320屈输入估计的号kb320淀 计的对应桩号作为初始计籌 值，以提高反算速度.)6xb=7670.903 78=5579.595 k =315.300 d =-0.0

32、01显示计算结果: 徒反臺xy坐标(原始 数据宣见)，对应中桩桩 号,距中距离按执行键继续往下运彳亓幽ypo7670.963等待输入下一个徒反算的x坐标7674.3 68 叵3输入c匝道k3153左3.5n边桩x坐标7670.9037674.368vb?5579.595等待输入下一个往反算的y坐标5579.105更）输入c匝道k315.3左3.刃 边桩y坐标等待输入估计的桩号320叵3输入估计的桩号kq-3205579.5955579.105kp?315.30010xb=7674.368yb=5579.105 k =315.301d =-3.591显示计算结果:律反皐y坐标（原始 数据宣见），对应中桩桩 号，距中距离屈按执行键继续往下运彳亍程117674.368等待输入下