fx5800计算器在曲线中应用.docVIP

fx-5800计算器在曲线放样中的应用 郭庆新 张俊峰 （内蒙古自治区公路工程局 呼和浩特 010010） 摘 要 概述在公路测量中利用fx-5800计算器所编写曲线放样计算程序的功能，源程序及操作过程。 关键词 fx-5800计算器；公路曲线放样；应用 一、引言 随着测绘科技的进步，全站仪已在公路建设中普遍使用，这样利用坐标放样成为了可能，从而大大加快了放样的速度，提高了放样的精度。高速公路大部分线路坐标已给出，但实际放样中有些段落需要加几个点，如果该段落为直线段，则很容易算出它们的坐标，如果该段是曲线段，计算就复杂了，为了解决这一问题，我们利用fx-5800计算器具有的编程功能编写了以下程序与测绘同仁共勉。 二、源程序 曲线要素计算及用交点计算曲线点上坐标 源程序 说明 LbI 1 L—缓和曲线长度,R—圆曲线半径 “L=”?L: “R=”?R: “A=”?A A—线路转向角、左正右负 “X=”:L－L^ (3)÷40÷R2+ L^( 5)÷3456÷R^( 4)X▲ X—缓和曲线终点（HY）的横坐标 “Y=” :L2÷6÷R－L^ (4)÷336÷R^ (3 )Y▲ Y—缓和曲线终点（HY）的纵坐标 “B=”:L×90÷R÷πB▲ B—缓和曲线角 “G=”:B÷3G▲ G—缓和曲线偏角 “M=”:X－R×sin(B)M▲ M—A附和切距 “P=”:Y－R×(1-cos(B))P▲ P—圆曲线移动量 “T=”:（R+P）×tan（Abs(A)÷2）+MT▲ T—切线长 “S=”:π×R×（Abs(A)－2×B）÷180+2×LS▲ S—曲线长 “E=”:（R+P）÷cos （Abs(A)÷2）－R E▲ E—外矢距 “Q=”:2T－SQ▲ Q—切曲长 “V=”?V:“C=”?C=V:“D=”?D V—JD(交点)到ZH(直缓点)的方位角 LbI 0 C—JD的横坐标，D—JD的纵坐标 “I=”?I I—曲线上任一给定点A0~ZH点长度 II If I＞S:Then GOTO l：ElseII=I:Ifend If I＜S÷2:Then II:VH：Else S－II: V+180－(A )H :Ifend If I≤L:Then I-I^(5)÷40÷R2÷L2＋I^(9)÷3456÷R^(4)÷L^(4) X：I ^(3)÷6÷R÷L－I ^ (7)÷366÷R ^( 3)÷L ^ (3 ) Y: I2÷R÷L×90÷π O:Else R×sin(（I－L）×180÷R÷π＋B) +MX: R×（1－cos(（I－L）×180÷R÷π ＋B）)+PY: B+（I－L）×180÷R÷πO: Ifend XX： YY tan－1（Y÷（T－X））K K—ZH、JD、A0之间的夹角 （（T－X）2+Y2）N N—JD到A0距离 If A0:Then 1J:Else (-1)J: Ifend If H=V:Then V+K×JW:Else V+180－(A)－K×JW:Ifend If W0:Then W+360W:Else WW:Ifend If W360:Then W－360W:Else WW:Ifend WW “U=”:C+N×cos(W )▲ U—A0的横坐标 “Z=”:D+N×sin(W )▲ Z—A0的纵坐标 If H=VThen H－O×J－180 O:Else H+O×JO: O—A0的切线方位角 Ifend If O＜0:Then O+360O：Else OO: Ifend If O360:Then O－360O：Else OO: Ifend “O=”: OO▲ GOTO 0 GOTO 1 三、程序功能简介 本程序需给出：缓和曲线长L（无缓和曲线时L=0），圆曲线半径R，线路转向角A，JD（交点）坐标，JD到ZH（直缓点）的方位角，曲线上任一给定点A0到ZH点的长度，可求出表达式中所列各值。对于圆曲线的线路，只要把缓和曲线长的值输入0就可以了。所以它是线路测量中曲线计算的通用程序。在计算曲线上坐标点时，可连续进行，直到输入长度大于曲线长，程序自动回到曲线要素计算为计算下一条曲线作好准备。 四、采用的模型 如图所示（图1）：先以ZH点为坐标原点，过ZH点的缓和曲线切线（ZH－JD）为X轴，ZH点上缓和曲线的半径为Y轴建立坐标系，可得出以下计算公式： X0=L－ + B= · M= X0 －RsinB T=（R+P）t