小型计算器编写的曲线计算程序.doc

PAGE PAGE 6应用工程计算器编写的实用曲线计算程序介绍 施工技术人员在现场计算受着环境的限制一般都应用最方便的是小型计算器，由于较多类型的工程计算器内增加了程序的处理，更加使现场施工技术人员受益也深受我们喜爱。当然一个复杂的程序编写、调试过程比较麻烦，对公式的使用需要很好地了解，但一个合格而实用的程序是在其应用中体现优越性的。通过程序处理计算使记忆复杂的公式用不着占用太多时间，需要的数据可以在极迅速的情况下提取，准确的结果变的一目了然，更可贵的是节约了技术人员的精力和时间去干其它重要的工作和学习。 在阳涉二期半坡1#、2#隧道和东皎沟大桥的施工中，我先用公式通过坐标法和偏角法计算了隧道线路中线每5m的坐标(为了满足开挖、衬砌的需要) 和大桥墩位中心放样资料，较多的重复公式计算使我受到启发，后来开始用CASIOfx-4800型计算器编写程序来处理计算的。在程序编写、调试过程中，小型计算器程序处理上也存在其局限性：1. 变量个数受限制，共26个字母仅对应26个变量；2. 条件转移比较简单，仅对两个变量或算式进行比较。例：，，，，，为成立条件，，，等均不成立；3. 嵌套次数太少，仅能完成10次。以上3点希望应用小型工程计算器编程的技术人员要注意，在处理以上限制时我用了不少心思，其中技巧可在下面程序中见到。经过艰难地程序反复调试，并通过原来计算资料和课本中例题的验证复核，我编写的以下程序是完全可以应用在实践中去的。现将我用CASIO系列小型计算器编写的实用曲线程序介绍给大家:程序一：曲线上任意3点拨角值计算⒈1程序说明：前视点、后视点和置镜点适用于整条曲线的初缓和曲线、圆曲线和未缓和曲线上，3点拔角值通过坐标计算来实现的。⒈2字母含义(参见图一和图二)R：圆曲线半径，L：缓和曲线长度，A：曲线夹角（可以输入度或度分秒），Z：ZH点里程，H：后视点里程，J：置镜点里程，Q：前视点里程，M：置镜J点后视H点前视Q点拔角值（输出为度值，可以转化成度分秒）⒈3程序内容：｛RLAZHJQ｝：：：S=R(A-2B)×π÷180+2L：E=T(1+Cos A) ：F=Tsin A：J≤Z+LC=J-Z：X=C-C∧5÷(40R2L2)：Y=C： 1：△Lb1 1：J 7：△Lb1 7：J＞Z+L D=J-L-Z∶G=D÷R×180÷π+B：X=R SinG+L÷2-L∧3÷(240R2) ∶Y=R(1- CosG)+L2÷(24R)∶≠Goto 2△Lb1 2：J＞Z+S-L：N=I-I∧5÷(40R2L2)∶O=I∧3÷(6RL) ∶X=E-NCosA-O SinA∶Y=F-NSinA+OCosA∶△Q≤Z+LC=Q-Z∶K=C-C)：U=C： 3：△Lb1 3：Q8：△LB1 8：Q＞Z+LD=Q-L-Z∶G=D÷R×180÷π+B：K=RSinG+L÷2-L∧3÷(240R2) ∶U=R(1-CosG)+L2÷(24R)∶≠Goto 4∶△Lb1 4：Q＞Z+S-L：N=I-I∧5÷(40R2L2)∶O=I∧3÷(6RL) ∶K=E-NCosA-OSinA∶U=F-NSinA+OCosA：△H≤Z+LC=H-Z∶V=C-C)：W=C∧3÷（6RL）：Goto 5：△Lb1 5：H9：△Lb1 9：H＞Z+LD=H-L-Z∶G=D÷R×180÷π+B：V=RSinG+L÷2-L∧3÷(240R2) ∶W=R(1- CosG)+L2÷(24R)∶≠Goto 6∶△Lb1 6：H＞Z+S-L：N=I-I∧5÷(40R2L2)∶O=I∧3÷(6RL) ∶V=E-NCosA-OSinA∶W=F-NSinA+OCosA：△“BOJIAOZHI”▲M=Tan-1((U-Y)÷(K-X))-Tan-1（（Y-W）÷（X-V））▲⒈4计算实例：输入：R？500，L？60，A？54°26′34″，J？390.82，Z？360.82，Q？410.82，H？370.82输出：M=1°08′46.13″输入：R？500，L？60，A？54°26′34″，J？628.37，Z？360.82，Q？680，H？480输出：M=11°27′32.96″输入：R？500，L？60，A？54°26′34″，J？628.37，Z？360.82，Q？865.92，H？400.82输出：M=26°36′05.71″输入：R？500，L？60，A？54°26′34″，J？628.37，Z？360.82，Q？865.92，H？820输出：M=2°35′43.35″2. 程序二：曲线上固定间隔距离各里程点相对坐标及长弦偏角值⒉1程序说明：本程序所参与计算的里程点从ZH点里程依次自动递增5.0m(递增值可调节)，在缓和曲线段未取整，在圆曲线段内取整。坐标值、偏角值与里