[转帖]关于CASIO系列可编程计算器在公路施工测量中的应用
<P>来源:<A class=k href="http://www.studa.net/" target="_blank" >中国论文下载中心</A> [ 06-02-20 10:49:00 ] 作者:张泉山 </P><P>摘要:CASIO系列可编程<A href="http://www.studa.net/pc/" target="_blank" >计算</A>器在公路施工测量工作中,只需输入里程,即可提供线路任意点坐标、高程。并解决了缓和曲线段以知线外任意点坐标,求对应线路里程的难点<A href="http://www.studa.cn/" target="_blank" >问题</A>。 <BR></P>
<P>关键词:公路 测量 CASIO 程序 <A href="http://soft.studa.com/" target="_blank" >应用</A> </P>
<P class=MsoNormal style="MARGIN: 0cm 5.25pt 0pt 2.55pt"><B>0</B><B>前言</B>:传统公路测量中,使用的仪器设备和<A href="http://www.studa.cn/" target="_blank" >方法</A>都很落后,需带着数学用表、曲线用表、<A href="http://www.studa.net/pc/" target="_blank" >计算</A>盘、<A href="http://www.studa.net/pc/" target="_blank" >计算</A>尺和算盘等一类的工具,完成外业测量工作。<A href="http://www.studa.net/pc/" target="_blank" >计算</A>器的出现,改变了这一局面。高速公路建设中,长大曲线比比皆是,传统中对公路中线的测设<A href="http://www.studa.cn/" target="_blank" >方法</A>,被极坐标法彻底的否定与取代,但大量的<A href="http://www.studa.net/pc/" target="_blank" >计算</A>工作,只能带着提前<A href="http://www.studa.net/pc/" target="_blank" >计算</A>好的线路逐桩坐标、高程资料,进行外业测量工作,机动性很差,现场查找也不方便。这些<A href="http://www.studa.cn/" target="_blank" >问题</A>都能在CASIO系列可编程<A href="http://www.studa.net/pc/" target="_blank" >计算</A>器上得到很好的解决,对CASIO系列可编程<A href="http://www.studa.net/pc/" target="_blank" >计算</A>器如何使用,直接<A href="http://www.studa.net/" target="_blank" >影响</A>到测量成果的质量和工作效率,本文将对CASIO系列可编程<A href="http://www.studa.net/pc/" target="_blank" >计算</A>器快捷的<A href="http://www.studa.net/pc/" target="_blank" >计算</A><A href="http://www.studa.cn/" target="_blank" >方法</A>进行<A href="http://www.studa.net/" target="_blank" >分析</A>与介绍。</P>
<P class=MsoNormal style="MARGIN: 0cm 5.25pt 0pt 2.55pt"><B>1</B><B>:以知线外任意点坐标,求对应线路里程</B></P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"><IMG height=201 alt="文本框:" hspace=12 src="http://www.studa.net/Newspic/2006220/1049359998.gif" width=269 align=left></P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"> </P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"> </P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"> </P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"> </P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"> </P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt"> 图<SPAN lang=EN-US>—1</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; MARGIN-RIGHT: 5.25pt">在缓和曲线上,要计算任意里程的法线方向及任意宽度的边线坐标,非常简单。但要计算任意一个已知坐标点,是对应哪一个里程法线方向上的点,就有一些困难。很难推导一个这样的计算公式。唯一的<A href="http://www.studa.cn/" target="_blank" >方法</A><SPAN lang=EN-US>“渐进”,如果手工计算这可不是一个好<A href="http://www.studa.cn/" target="_blank" >方法</A>。但在有CASIO系列可编程计算器,如:FX-4500的情况下就变的非常简单了。亦可用于直线和圆曲线的计算。</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 21pt">首先在缓和曲线上任选一点<SPAN lang=EN-US>A为起始点,(图—1)计算该点的坐标和切线方位角,通过坐标反算求起始点A与计算点B的方位角和距离,B点肯定对应A点切线方向上有一个垂足C点,把三点看成一个直角三角形,通过解直角三角形计算AC的距离,当该距离大于某一数值,如0。001m,A点里程加AC的距离等于C点的里程,回到开始重新进入新一轮的计算,如果AC的距离小于某一规定值,则计算C点的里程与BC的距离即可。</SPAN></P> <P class=MsoNormal><B>求对应线路里程</B><B>程序</B>:<SPAN lang=EN-US> </SPAN> </P>
<P class=MsoNormal><B>主程序<SPAN lang=EN-US>QLC </SPAN></B> (已知坐标求里程<SPAN lang=EN-US>)</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">Lb1 0:{<SPAN lang=EN-US>LD</SPAN>E}:Prog XH:Goto 0</P>
<P class=MsoNormal><B>子程序:<SPAN lang=EN-US>XH (循环)</SPAN></B></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L1 Lb1 1 </P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L2 Norm: Prog LYYD:</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L3 PO1(D-X,E-Y):W≤<SPAN lang=EN-US>0=> W=W+360⊿</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L4 Z=W-I: A=V×cos Z:L=L+A </P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L5 Abs A≥<SPAN lang=EN-US>0.001=>Goto 1:≠=>B=V×sinZ:Fix 3:“FXJL=” ◢</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L6 <SPAN style="FONT-FAMILY: 宋体">L</SPAN>:Fix3:“DYLC=” ◢</P>
<P class=MsoNormal>程序中字母代表</P>
<P class=MsoNormal style="MARGIN-LEFT: 31.5pt">D 任意点<SPAN lang=EN-US>X坐标 , E 任意点Y坐标,DYLC 对应里程, FXJL 中线法线距离。程序中有坐标反算功能。</SPAN></P>
<P class=MsoNormal>使用<SPAN style="COLOR: #333333"><A href="http://www.studa.cn/" target="_blank" >方法</A>:只需输入计算点坐标、和较为接近的桩号。桩号越接近计算速度越快</SPAN></P>
<P class=MsoNormal><B>2</B><B>:逐桩坐标计算<SPAN lang=EN-US> </SPAN></B></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><B>2.1编制<A href="http://www.studa.cn/" target="_blank" >方法</A></B>:线路坐标程序是按照平曲线为单元,直线部分归属在曲线两端的<A href="http://www.studa.cn/" target="_blank" >方法</A>,把整段路线分段装进数据库,根据桩号判断采用数据通过共用程序,进行任意点的坐标计算,图<SPAN lang=EN-US>---2是</SPAN>坐标转换示意土,第一直线段,是通过方位角和距离直接计算大地坐标,第一缓和曲线和圆曲线段,是先计算任意点切线支距和方位角然后转换大地坐标,第二缓和曲线段和直线段是先计算任意点切线支距和方位角。然后转换为ZH坐标系的坐标,通过ZH坐标系的坐标再转换为大地坐标。</P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><B>2.2使用<A href="http://www.studa.cn/" target="_blank" >方法</A></B></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><B>2.2.1</B><B>准备工作</B>:室内把已知曲线条件,装进数据库,曲线划分界线、判断条件装进<B>子程序<SPAN lang=EN-US>LYYD (</B>路由引导)。</SPAN></P> <P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><B>2.2.2</B><B>现场使用</B>:根据计算机提示输入相关数据即可。提示情况如下:</P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm">K 公里桩号如 312,启动程序出现一次。</P>
<P class=MsoBodyTextIndent2 style="MARGIN-LEFT: 63pt; TEXT-INDENT: -63pt">L 细部里程桩号如 518.如采用渐进只出现一次,否则逐桩输入。过千米桩时需输入1000确认。</P>
<P class=MsoBodyTextIndent2 style="MARGIN-LEFT: 63pt; TEXT-INDENT: -63pt">O 渐进长度,如20米一点,取O =20,公里桩号也自动渐进。否则O=0,启动程序出现一次。</P>
<P class=MsoNormal>Y 断链条件,执行<SPAN style="COLOR: #333333">输</SPAN>0不执行默认 ,不输入【 】以内的程序,Y不出现。</P>
<P class=MsoNormal>E 边线角度,法线为90度,分正负值,输E=0此后则不在出现计算边线的过程。<SPAN lang=EN-US> </SPAN></P>
<P class=MsoNormal>D 边线点至中线点的距离</P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><IMG height=343 alt="文本框:" hspace=12 src="http://www.studa.net/Newspic/2006220/1049364037.gif" width=381 align=left></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> </P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"> 图<SPAN lang=EN-US>---2</SPAN></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm">V W 输出的边线<SPAN lang=EN-US>1的大地坐标 </SPAN></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm">X Y 输出的边线<SPAN lang=EN-US>2和中线的大地坐标, </SPAN></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><B>2.3逐桩坐标计算程序</B></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm"><B>主程序:XLZB(线路坐标)</B></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 0cm">L1 Lbl 0:<B>L</B>≥1000=>P=P+1:<SPAN lang=EN-US>L=L-1000⊿</SPAN></P>
<P class=MsoNormal>L2 O=0 => prog FJJ⊿<SPAN lang=EN-US> L=L+</SPAN>O:<SPAN lang=EN-US> prog LYYD: </SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 21pt"> progXSZB:<SPAN lang=EN-US> E≠0 => progBX ⊿Goto 0</SPAN></P>
<P class=MsoNormal><B>子程序:<SPAN lang=EN-US>FJJ (</SPAN></B>非渐进<SPAN lang=EN-US>)</SPAN></P>
<P class=MsoNormal><B>{L}</B><B>:<SPAN lang=EN-US>L=L</SPAN></B></P>
<P class=MsoNormal><B>子程序:<SPAN lang=EN-US>LYYD (</SPAN></B>路由引导<SPAN lang=EN-US>)</SPAN></P>
<P class=MsoNormal>N=(<SPAN lang=EN-US>P“K”+L/1000)×1000:【<B>X=0:Y=6】</B></SPAN></P>
<P class=MsoNormal>N≥***.*** =>prog 1:<SPAN lang=EN-US> prog PQX: prog ZJ⊿</SPAN></P>
<P class=MsoNormal>N≤<SPAN lang=EN-US>***.*** =>prog 2: prog PQX: prog YJ⊿</SPAN></P>
<P class=MsoNormal>N≥***.*** =>prog 3:<SPAN lang=EN-US> prog PQX: prog ZJ⊿</SPAN></P>
<P class=MsoNormal>N≥***.*** =>prog 4:<SPAN lang=EN-US> prog PQX: prog YJ⊿</SPAN></P>
<P class=MsoNormal>N≤<SPAN lang=EN-US>***.***=> prog 5: prog PQX: prog YJ⊿ </SPAN></P>
<P class=MsoNormal>N≥*** ……</P>
<P class=MsoNormal style="TEXT-INDENT: 157.5pt">……progZB </P>
<P class=MsoNormal style="MARGIN-LEFT: 372.3pt; TEXT-INDENT: -372.3pt"><B>子程序:<SPAN lang=EN-US>PQX</SPAN></B>(单圆曲线及带缓和曲线的平曲线)<SPAN lang=EN-US> </SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L1 B=Z+Q-S:<SPAN lang=EN-US>H=Z+Q:A=S/2-S<SUP>3</SUP>/240 R<SUP>2</SUP>: T=A+(R+ S<SUP>2</SUP>/24 R)tan(F/2)</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L2 N≤<SPAN lang=EN-US>Z =>V=N-Z:W=0:I=0:Goto 1⊿</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 52.5pt; TEXT-INDENT: -21pt"><IMG height=13 src="http://www.studa.net/Newspic/2006220/1049368345.gif" width=15>L3 U=N-Z:<SPAN lang=EN-US>N≤(Z+S)=>V=U-U<SUP>5</SUP>/40R<SUP>2</SUP>S<SUP>2</SUP>:W=U<SUP>7</SUP>/336 R<SUP>3</SUP>S<SUP>3</SUP>-U<SUP>3</SUP>/6RS:I=90U<SUP>2</SUP>/πRS:Goto 1⊿</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 52.5pt; TEXT-INDENT: -21pt">【<B><SPAN lang=EN-US>L*{Y}:Y=0=>U=U+X⊿</B>】</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L4 N≤<SPAN lang=EN-US>B =>I=90(2U-S)/πR:V=RsinI+A:W=RcosI-R- S<SUP>2</SUP>/24R:Goto 1⊿</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L5 N≤<SPAN lang=EN-US>H =>U=H-N:C= U-U<SUP>5</SUP>/40R<SUP>2</SUP>S<SUP>2</SUP>:G= U<SUP>3</SUP>/6RS-U<SUP>7</SUP>/336 R<SUP>3</SUP>S<SUP>3</SUP>:</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 52.5pt">V=(<SPAN lang=EN-US>T-C)cosF-GsinF+T:W=(C-T)sinF-GcosF:I=F-90U<SUP>2</SUP>/πRS:Goto 1⊿</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L6 N≥<SPAN lang=EN-US>H =>V=T+(T+N-H)cosF:W=(H-T-N)sinF:I=F:Goto 1⊿</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L7 Lbl 1</P>
<P class=MsoNormal><B>子程序:</B>YJ(右角)</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">W=-W:<SPAN lang=EN-US> I=K+I </SPAN></P>
<P class=MsoNormal><B>子程序:</B>ZJ(左角)</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">I=K-I</P>
<P class=MsoNormal><B>子程序:</B>ZB(坐标)</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">X=J+VcosK-WsinK : Y=M+VsinK+WcosK</P>
<P class=MsoNormal><B>子程序:<SPAN lang=EN-US>XS</SPAN></B>ZB(显示坐标)</P>
<P class=MsoNormal> O≠<SPAN lang=EN-US>0=> L=L:pause 5⊿ X=X ◢Y=Y◢</SPAN></P>
<P class=MsoNormal><B>子程序:</B>BX(边线)</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt"><IMG height=14 src="http://www.studa.net/Newspic/2006220/1049365520.gif" width=15>{DE}:<SPAN lang=EN-US>I=I+E:V=X+DcosI ◢ W=Y+DsinI ◢ </SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">{DE}:<SPAN lang=EN-US>I=I+E:X=V+DcosI ◢ Y=W+DsinI ◢ </SPAN></P>
<P class=MsoNormal><B>2.4</B><B>数据库:</B>( 每一组曲线占用一个子程序<SPAN lang=EN-US>)</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">1 K=***:<SPAN lang=EN-US>F=***:R=***:J=***:M=***:Z=***: Q=***:S= ***:</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 49.5pt; TEXT-INDENT: -18pt">2<SPAN style="FONT: 7pt 'Times New Roman'"> </SPAN>K=***:<SPAN lang=EN-US>F=***:R=***:J=***:M=***:Z=***: Q=***:S= ***:【N≥***.*** =>X=*.**】</SPAN></P> <P class=MsoNormal><B>2.5</B><B>注解:</B></P>
<P class=MsoNormal style="MARGIN-LEFT: 21.1pt; TEXT-INDENT: -21.1pt"><B>程序<SPAN lang=EN-US>XLZB:</SPAN></B>线路坐标,它是<A href="http://www.studa.net/pc/" target="_blank" >计算</A>逐桩坐标的主程序。</P>
<P class=MsoNormal style="MARGIN-LEFT: 52.5pt; TEXT-INDENT: -52.5pt"><B>程序:<SPAN lang=EN-US>FJJ (</SPAN></B>非渐进<SPAN lang=EN-US>)</SPAN> O≠0时,只需输入起始点桩号如<A href="http://www.studa.net/pc/" target="_blank" >计算</A>为每20米一点时,取O=20,此后则自动渐进,公里桩号也自动渐进。起始桩号应输入第一个<A href="http://www.studa.net/pc/" target="_blank" >计算</A>点桩号减渐进长度。如<SPAN lang=EN-US>K36+700</SPAN>输入36+680即可。否则取O=0。每一个点均需输入细部点桩号。当公里桩号发生变化时,如:<A href="http://www.studa.net/pc/" target="_blank" >计算</A>K25+910---K26+110,每20米一点。K25+990完了便是K26+010,此时无需重新输入公里桩号,只需输入一个大于等于1000的桩号,此后则按正常<A href="http://www.studa.cn/" target="_blank" >方法</A>输入。</P>
<P class=MsoNormal style="MARGIN-LEFT: 146.35pt; TEXT-INDENT: -94.5pt">例<B>:</B>K25 +970 K25+990 K25+1000 K26+010 K26+050 ……</P>
<P class=MsoNormal style="MARGIN-LEFT: 52.5pt; TEXT-INDENT: -52.5pt"><B>程序<SPAN lang=EN-US>LYYD:</SPAN></B>路由引导,段数根据曲线数量确定增减。<SPAN lang=EN-US>L≥***·***是曲线间的分界点桩号。用‘≥’选ZH点或ZY点以前的桩号。用‘≤’选HZ点或YZ点以后的桩号。为了做为<B>QLC </B>(已知坐标求里程)的子程序,故于<B>XLZB:<SPAN lang=EN-US>(</SPAN></B></SPAN>线路坐标)分为两个程序。否则可和二为一。P显示K,为公里桩号,为输入方便,可省略公里桩号中的相同之处,如K315+200--- K395+800,输入公里桩号时,可省略百位的3,只输十位和个位的15---95 即可。L为细部桩号,如+660.318,</P>
<P class=MsoNormal><B>程序<SPAN lang=EN-US>PQX</SPAN></B>:<SPAN style="COLOR: #333333">(单圆曲线及带缓和曲线的平曲线)</SPAN></P>
<P class=MsoNormal>第一行,<A href="http://www.studa.net/pc/" target="_blank" >计算</A>曲线要素,<SPAN lang=EN-US> </SPAN></P>
<P class=MsoNormal>第二行,<A href="http://www.studa.net/pc/" target="_blank" >计算</A>第一直线段任意点坐标,</P>
<P class=MsoNormal>第三行,<A href="http://www.studa.net/pc/" target="_blank" >计算</A>第一缓和曲线上任意点坐标,</P>
<P class=MsoNormal>L* 断链;建议不采用</P>
<P class=MsoNormal>第四行,<A href="http://www.studa.net/pc/" target="_blank" >计算</A>圆曲线上任意点坐标。<SPAN lang=EN-US> </SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 21pt; TEXT-INDENT: -21pt">第五行,<A href="http://www.studa.net/pc/" target="_blank" >计算</A>第二缓和曲线上任意点坐标,<SPAN lang=EN-US> </SPAN></P>
<P class=MsoNormal>第六行,<A href="http://www.studa.net/pc/" target="_blank" >计算</A>第二直线段任意点坐标。</P>
<P class=MsoNormal style="MARGIN-LEFT: 21.1pt; TEXT-INDENT: -21.1pt"><B>程序Y<SPAN lang=EN-US>J</SPAN></B>:曲线偏角为右角时,进入该程序<SPAN lang=EN-US>W=-W,转换偏角F为左角,执行程序ZB后,ZH坐标系统的坐标(V,W)转换成大地坐标(X,Y),I为曲线上任意点到ZH坐标系统中X轴的夹角, K+I是该点切线沿线路前进方向的方位角。</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 21.1pt; TEXT-INDENT: -21.1pt"><B>程序Z<SPAN lang=EN-US>J:</SPAN></B>曲线偏角为左角时。进入该程序,其它意义同上。</P>
<P class=MsoNormal><B>程序ZB:</B>是坐标转换程序。计算线路坐标时不显示,以<B>程序<SPAN lang=EN-US>XS</SPAN></B>ZB:显示计算<SPAN style="COLOR: #333333">结果。</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 52.5pt; TEXT-INDENT: -52.5pt"><B>程序<SPAN lang=EN-US>XSZB</SPAN></B>: O=0时显示坐标,O≠0时显示桩号和坐标,为了做为<B><SPAN lang=EN-US>QLC </B>(已知坐标求里程)的子程序,故于<B>ZB:<SPAN lang=EN-US>(</SPAN></B></SPAN>坐标转换)分为两个程序。否则可以取消。</P>
<P class=MsoNormal><B>程序BX</B>:是求线路外任意点的坐标(<SPAN lang=EN-US>V,W)其中E为夹角,有正负之分,顺时针为正,逆时针为负,线路法线为正、负90度。D为线路中线点到计算点间的距离,</SPAN> (X ,Y) 线路外第二任意点的坐标,如斜交桥、涵的坐标计算,(<SPAN lang=EN-US>V,W)为涵口边墙或桥台坐标,</SPAN>(X ,Y)为八字墙端部坐标。输<SPAN lang=EN-US>E=0计算边线的过程此后则不出现。,</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 31.6pt; TEXT-INDENT: -31.6pt"><B>程序1.2.3</B>……:数据库程序,用数字1、2、3表示,根据曲线数量确定增减,其中<SPAN lang=EN-US>Q:曲</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 31.5pt; TEXT-INDENT: -31.5pt">线总长;<SPAN lang=EN-US>F:偏角;R:半径;S:缓和曲线长,在单圆曲线</SPAN>中输0;<SPAN lang=EN-US>Z:ZH点里程;(J,M)ZH点大</SPAN></P>
<P class=MsoNormal>地坐标;<SPAN lang=EN-US>K:ZH点至JD点的起始方位角。</SPAN>N﹥***<SPAN style="COLOR: #333333">=>X=***</SPAN>计算点桩号和断链长度,(下文详述) 程序中部分字符以标出,有些字符在不同位置意义不同,循环使用,不宜标出。只要把需输入和输出的字符搞对即可。</P> <P class=MsoNormal><B>2.6</B><B>单圆曲线的平曲线</B></P>
<P class=MsoBodyTextIndent2>是通过ZY点坐标计算圆心的坐标,通过圆心的坐标计算曲线上任意点坐标(X,Y),B:中线到边线的距离分正、负值。除S转向角为左角输+1转向角为右角输-1以外。数据库和<B>PQX</B>(单圆曲线及带缓和曲线的平曲线)基本相同,它可代替除数据库和路径引导程序外的所有子程序,未编第二直线段部分,因为本曲线第二直线段部分也就是下一个曲线的第一直线段部分。未考虑与其它程序的配合和对断链的处理。可根据所管工程线型情况选用该程序。</P>
<P class=MsoNormal><B>主程序:XLZB(</B><B>线路坐标)</B></P>
<P class=MsoNormal style="MARGIN-LEFT: 31.5pt">Lbl 0:<B><SPAN lang=EN-US>{L}:</B> L=L+</SPAN>O:<SPAN lang=EN-US>N=(P“K”+L/1000)×1000:N≥***.*** =>prog 1: prog PQXY: Goto 0</SPAN></P>
<P class=MsoNormal><B>子程序:<SPAN lang=EN-US>PQXY (</SPAN></B>单圆曲线的平曲线<SPAN lang=EN-US>)</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L1 U=N-Z:<SPAN lang=EN-US>N≤Z =>X=J+UcosK◢Y=M+UsinK◢X=X+Bcos(K+90)◢Y=Y+Bsin(K+90)◢Goto 1</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L2 ≠=>V=J+Rcos(K+90S):<SPAN lang=EN-US>W=M+Rsin(K+90S):E=180U/π/R</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L3 I=K-90S:<SPAN lang=EN-US>I<0 =>I=I+360⊿I=I+SE</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L4 {B}:<SPAN lang=EN-US>X=V+(R+B)cosI◢ Y=W+(R+B)sinI◢Goto 1</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L5 Lbl 1</P>
<P class=MsoNormal style="LINE-HEIGHT: 20pt"><B>3</B><B>:逐桩高程计算</B></P>
<P class=MsoNormal style="TEXT-INDENT: 21.1pt; LINE-HEIGHT: 20pt"><B>3.1</B><B>编制<SPAN style="COLOR: #333333"><A href="http://www.studa.cn/" target="_blank" >方法</A></SPAN></B>:纵断高程程序是按照<SPAN style="COLOR: #333333">竖曲线为单元,同坡部分归属在曲线两端,把整段路线分段装进数据库,根据桩号判断采用数据通过共用程序,进行任意点的高</SPAN>程计算,</P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 21pt"><B>3.2使用<A href="http://www.studa.cn/" target="_blank" >方法</A></B></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 21pt"><B>3.2.1</B>准备工作:室内把已知曲线条件,装进数据库,曲线划分界线、判断条件装进<B>子程序<SPAN lang=EN-US>LJYD (</B>路径引导)。</SPAN></P>
<P class=MsoBodyTextIndent2 style="TEXT-INDENT: 21pt"><B>3.2.2</B>现场使用:根据计算机提示输入相关数据即可。提示与输入情况如下:提示<SPAN lang=EN-US>K、</SPAN>L、O、 Y<SPAN style="COLOR: #333333"> </SPAN>同逐桩坐标计算程序,Z输出高程</P>
<P class=MsoNormal><B>3.3</B><B>:逐桩高程计算程序</B></P>
<P class=MsoNormal><B>主程序<SPAN lang=EN-US> ZDGC</SPAN></B> (纵断高程<SPAN lang=EN-US>) </SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">Lbl 0:<SPAN lang=EN-US>{L}:L=L+C“</SPAN>O”:<SPAN lang=EN-US>N=(K+L/1000)×1000: prog LJYD: Goto 0 </SPAN></P>
<P class=MsoNormal><B>子程序:</B>LJYD<B>(</B>路径引导<SPAN lang=EN-US>)</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 98.05pt; TEXT-INDENT: -73.5pt"><IMG height=13 src="http://www.studa.net/Newspic/2006220/1049368345.gif" width=15><IMG height=13 src="http://www.studa.net/Newspic/2006220/1049368345.gif" width=15>L1 【<SPAN lang=EN-US style="COLOR: #333333">V=0:<SPAN lang=EN-US>X=0:</SPAN> Y=9】</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 98.05pt; TEXT-INDENT: -73.5pt">L2 N≥***.*** =>prog A:⊿</P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≤<SPAN lang=EN-US>***.*** =>prog B:</SPAN>⊿</P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≥***.*** =>prog C:⊿ </P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≥***.*** =>prog D:⊿ </P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≤<SPAN lang=EN-US>***.***=> prog E:</SPAN>⊿ </P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≤<SPAN lang=EN-US> </SPAN>ProgSQX</P>
<P class=MsoNormal><B>子程序</B> <B><SPAN lang=EN-US>SQX </B> (竖曲线)</SPAN></P>
<P class=MsoNormal>L1 【<SPAN style="COLOR: black">{<SPAN lang=EN-US>Y}:Y=0</SPAN>=>V=X⊿】 M=A-T【-V】:<SPAN lang=EN-US>W=A+T</SPAN>【+V】:<SPAN lang=EN-US> U=Abs(A-N)</SPAN> 【-V】:</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≤<SPAN lang=EN-US>M=>Z=H-JU◢ Goto 1 ⊿</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≤<SPAN lang=EN-US>A=>Z=H-JU+F(N -M)<SUP>2</SUP>/2R◢ Goto 1⊿</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≤<SPAN lang=EN-US>W=>Z=H+IU+F(W- N)<SUP>2</SUP>/2R◢ Goto1⊿ </SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 42pt">N≥W=>Z=H+IU◢<SPAN lang=EN-US> Lb1 1</SPAN></P>
<P class=MsoNormal><B>3.4</B><B>数据库</B>:<SPAN lang=EN-US>( 每一组曲线占用一个子程序)</SPAN></P>
<P class=MsoNormal>A:<SPAN style="COLOR: #333333"> R=***:T=***:A=***:H=***:J=-***:I=-***: F=1:【N﹥***<SPAN style="COLOR: #333333">=>X=-*** </SPAN>】</SPAN></P>
<P class=MsoNormal>B: <SPAN lang=EN-US>R=***:T=***:A=***:H=***:J=-***: I=-***: F= -1</SPAN></P> <P class=MsoNormal><B>3.5</B><B>注解:</B></P>
<P class=MsoNormal style="MARGIN-LEFT: 42.05pt; TEXT-INDENT: -42.05pt"><B>主程序<SPAN lang=EN-US> ZDGC</SPAN></B> (纵断高程<SPAN lang=EN-US>)为了于</SPAN>三维坐标段落法隧道断面测量程序配合,于LJYD<B>(</B>路径引导<SPAN lang=EN-US>)一分为二,否则可合二为一。</SPAN></P>
<P class=MsoNormal><B>程序:</B>LJYD<B>(</B>路径引导<SPAN lang=EN-US>)</SPAN> 是路径引导程序,段数根据曲线数量确定增减。<SPAN lang=EN-US>L≥***·***是曲线间的分界点桩号。用‘≥’选曲线起点以前的桩号。用‘≤’选曲线终点以后的桩号。</SPAN></P>
<P class=MsoNormal><B>程序</B> <B><SPAN lang=EN-US>SQX </B> (竖曲线)第一段</SPAN>计算曲线起点以前的高程,<SPAN style="COLOR: black">第二段</SPAN>计算曲线起点以后的高程,<SPAN style="COLOR: black">第三段</SPAN>计算曲线终点以前的高程,<SPAN style="COLOR: black">第四段</SPAN>计算曲线终点以后的高程</P>
<P class=MsoNormal><B>程序A.B.C</B>……:数据库程序用字母A、B、C…表示,根据曲线数量确定增减。</P>
<P class=MsoNormal><B>程序中字母代表</B></P>
<P class=MsoNormal style="TEXT-INDENT: 21pt">R表示竖曲线半径,<SPAN lang=EN-US> T表示切线长, A表示变坡点里程, H表示变坡点高程,</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 21pt">F=-1表示凸曲线,<SPAN lang=EN-US> F=1表示凹曲线, J表示前一竖曲线坡度,下坡为负,上坡为正。</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 21pt">I表示后一竖曲线坡度,下坡为负,上坡为正<SPAN lang=EN-US> </SPAN>X断链长度,分正、负值, 。</P>
<P class=MsoNormal><B>4.</B><B>对断链的处理<A href="http://www.studa.cn/" target="_blank" >方法</A></B>:</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">高速公路中坐标法控制线路的平面位置,断链较少。设计上以考虑到<LABEL class=lb onclick="g('施工');">施工</LABEL>计算方便的<A href="http://www.studa.cn/" target="_blank" >问题</A>。<SPAN style="COLOR: #333333">平曲线内一般不会出现断链,尽可能也不设在竖曲线内,一般会将断链推到直线同坡段。直线部分归属和划分,应考虑到断链,依断链桩号为划分界线。有时能躲的开平曲线但躲不开竖曲线,程序</SPAN><B>ZDGC</B> (纵断高程)以考虑到<SPAN style="COLOR: #333333">竖曲线内出现断链的情况,处理<A href="http://www.studa.cn/" target="_blank" >方法</A>是:数据库中赋值,</SPAN>当计算点大于或小于某一桩号时,修正计算点到切点和变坡点的曲线长度,程序如下:<SPAN lang=EN-US>N≥***.*** =>X=*.**,N:为</SPAN>计算点桩号,***·***为断链点桩号,X:为<SPAN style="COLOR: #333333">断链距离。分正、负值。无断链时,程序自动赋值</SPAN>X=0,<SPAN style="COLOR: #333333">其中:</SPAN>N﹥***<SPAN style="COLOR: #333333">=>X=***</SPAN>。</P>
<P class=MsoBodyTextIndent2>变坡点以前出现长链,如:K***+530 =K***+480 N﹤***+530<SPAN style="COLOR: #333333">=>X=50</SPAN></P>
<P class=MsoBodyTextIndent2>变坡点以前出现短链,如:K***+480 =K***+530 N﹤***+530<SPAN style="COLOR: #333333">=>X=-50</SPAN></P>
<P class=MsoBodyTextIndent2>变坡点以后出现长链,如:K***+630 =K***+580 N﹥***+580<SPAN style="COLOR: #333333">=>X=-50</SPAN></P>
<P class=MsoBodyTextIndent2>变坡点以后出现短链,如:K***+580 =K***+630 N﹥***+580<SPAN style="COLOR: #333333">=>X=50</SPAN></P>
<P class=MsoBodyTextIndent2>当遇短链如:K***+480 =K***+530 ,+480至+530之间没有距离,输Y=0即可,当遇长链如:K***+530=K***+480 ,+480至+530之间有二倍的距离,有两个完全一样的里程,输Y=0只算了后一个+480至+530,若计算前一个+480至+530,取Y为任意值。偶遇平曲线内出现断链,要有就在圆曲线上,肯定不会在缓和曲线上。处理<A href="http://www.studa.cn/" target="_blank" >方法</A>类似竖曲线。程序中【 】符号并非计算机运算符,没有断链时,【 】符号内的程序不输入计算机。线路中断链不多的情况下,为了提高运算速度,建议不采用【】以内的程序处理断链。对断链进行单独的处理。</P> <P class=MsoNormal><B>5</B><B>坐标反算</B></P>
<P class=MsoNormal><B>主程序:<SPAN lang=EN-US>ZBFS</SPAN></B></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">L1 Lb1 0:{<SPAN lang=EN-US>DE}:Norm:</SPAN> PO1(D-X,E-Y): Fix 3:<SPAN lang=EN-US>“S=” ◢</SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 124.65pt; TEXT-INDENT: -93.15pt">L2 W≤<SPAN lang=EN-US>0=> W=W+360⊿IntW + Int (frac W×60) / 100 + frac </SPAN></P>
<P class=MsoNormal style="MARGIN-LEFT: 124.65pt; TEXT-INDENT: -61.65pt">( fracW×60 )×0.006:<SPAN lang=EN-US>Fix 4:“AV=” ◢ Goto 0</SPAN></P>
<P class=MsoNormal>程序中字母代表</P>
<P class=MsoNormal style="TEXT-INDENT: 30pt">D 任意点<SPAN lang=EN-US>X坐标 E 任意点Y坐标 AV 输出角度 S 输出距离</SPAN></P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt">坐标反算输出角度小数点后四位为分和秒,如:<SPAN lang=EN-US>168.3639为168度36分39秒。</SPAN></P>
<P class=MsoNormal style="MARGIN-RIGHT: 5.25pt"><B>6</B><B>结语</B>公路<LABEL class=lb onclick="g('施工');">施工</LABEL>测量工作,全站仪完全满足了极坐标法放样的硬件要求,CASIO系列可编程计算器完善了全站仪在公路测量中的<LABEL class=lb onclick="g('软件');">软件</LABEL>不足之处,珠联璧合。使的极坐标法在公路测量中得到了良好<A href="http://soft.studa.com/" target="_blank" >应用</A>。极坐标法放样和可编程计算器改变了<LABEL class=lb onclick="g('施工');">施工</LABEL>测量中的放样模式,解决了很多过去不好解决的<A href="http://www.studa.cn/" target="_blank" >问题</A>,对可编程计算器如何使用,直接<A href="http://www.studa.net/" target="_blank" >影响</A>到测量成果的质量和工作效率,对可编程计算器充分利用,公路外业测量工作不需要再带线路逐桩坐标、高程资料,只带一台CASIO系列可编程计算器即可。外业测量工作中,只需输入里程,即可提供线路任意点坐标、高程。不但方便而且及时准确。相当于把线路平面和纵断面装进了计算机。并解决了缓和曲线段以知线外任意点坐标,求对应线路里程的难点<A href="http://www.studa.cn/" target="_blank" >问题</A>,亦可用于直线和圆曲线的计算。</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt; MARGIN-RIGHT: 5.25pt">建议的程序排列顺序,<B>主程序:<SPAN lang=EN-US>1:</SPAN></B>线路坐标2:纵断高程、3:求里程4:坐标反算5隧道断面6---10预留空位或其它程序,<B>子程序:</B>11----17线路坐标的各子程序,18---19纵断高程的两个子程序。19以后为线路坐标和纵断高程的<B>数据库</B>。建议使用CASIO系列 FX-4800 或 FX-4850 大容量机型,FX-4500装不下常用的全部程序,即便装一部分或单个程序,数据库也无足够的空间装载线路数据<SPAN lang=EN-US>.正如一句话的描写,4500反应不快,4800即将淘汰,4850</SPAN>大容量风行<A href="http://news.studa.com/" target="_blank" >时代</A>。CASIO FX---4850有<SPAN lang=EN-US>28K字节的</SPAN>容量,以上所有程序不过1200字节。,所以上百公里的平、纵断面仅需一台CASIO FX---4850即可</P>
<P class=MsoNormal style="TEXT-INDENT: 31.5pt"><IMG height=378 src="http://www.studa.net/Newspic/2006220/1049364545.jpg" width=458> </P>
页:
[1]