高速公路测计算CASIO程序全套.docVIP

下载本文档

0
0
约6.04千字
约 8页
2019-04-30 发布于浙江
举报
版权申诉

高速公路测计算CASIO程序全套.doc

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

?高速公路测量计算CASIO程序全套坐标主程序XY(坐标程序)LbI??2｛K｝PROG “SUB3”X=X◢Y=Y◢｛v｝v=√2 ? PROG “SUB 2”：⊿GOTO 2 FANS｛MNWT｝M“X0=” ： N“Y0=”W“X-=” ： T“Y-=”Z=tan-1((T-N)/(W-M+0.19)LbI 7｛UV｝U“JIAO=”V“JU=”W＞M?U=U+Z：GOTO 3：⊿U=U+Z-180LbI 3P=M+VcosU◢Q=N+VsinU◢｛K｝K“DGLC=”LbI 6Prog “SUB 3”O=（Q-Y+（P-X）/（tanE+0.19））×sinEK=K+OO=Abs OO≥0.17? GOTO 6：⊿K=K◢V=（Q-Y+（X-P）×tanE）×cosE ◢GOTO 7 子程序ZHIX 1H= K-80100??????（80+100为起点里程，直线段）A=3026441.522 （A、B为K80+100坐标）B=515965.236E=270.265 为K80+100方位角X=A+HcosEY=B+HsinE QUX 1 （K80+100~ K80+948.114曲线右偏）R=900：L=170H=K-80310.927 （80+310.927为ZH点里程）I=K-80480.927 （80+480.927为HY点里程）I≤0?A=3026442.499B=515754.311 （A、B为ZH点坐标）PROG??“SUB 1”E=270.265+3×G （270.265为ZH点方位角）X=A+Fcos（E-2G）Y=B+Fsin（E-2G）Goto??2 ⊿J=K-80778.114J≤0?A=3026448.633 ：B=515584.489 （A、B为HY点坐标）C=I×90÷π÷RD=2×R×sinCE=275.6763+2C （275.6763为HY点方位角）X=A+D×cos（E-C）Y=B+D×sin（E-C）Goto??2 ⊿S=K-80948.114S≤0?A=3026606.193 ：B=515149.157 （A、B为HZ点坐标）H=-SPROG “SUB 1”E=300.0072-3×G （300.0072为HZ点方位角）X=A+Fcos（E+180+2G）Y=B+Fsin（E+180+2G）Goto??2 ⊿LbI??2备注：曲线左偏与右偏，只有中间几个“＋－”号的区别。以下不再备注）QUX 2 （K80+948.114~ K81+475.631曲线左偏）R=1000：L=174.535H=K-80948.114I=K-81122.649I≤0?A=3026606.193B=515149.157PROG??“SUB 1”E=300.0072-3×GX=A+Fcos（E+2G）Y=B+Fsin（E+2G）Goto??2 ⊿J=K-81301.097J≤0?A=3026689.019 ：B=514995.593C=I×90÷π÷RD=2×R×sinCE=295.007-2CX=A+D×cos（E+C）Y=B+D×sin（E+C）Goto??2 ⊿S=K-81475.631S≤0?A=3026784.297 ：B=514657.014H=-SPROG “SUB 1”E=279.783+3×GX=A+Fcos（E+180-2G）Y=B+Fsin（E+180-2G）Goto??2 ⊿LbI??2 ZHIX 2H= K-81475.632A=3026784.297B=514657.014E=279.7828X=A+HcosEY=B+HsinE QUX 3 （K82+420.711~ K83+354.430曲线左偏）R=1200：L=180H=K-82420.711I=K-82600.711I≤0?A=3026944.880B=513725.679PROG??“SUB 1”E=279.7828-3×GX=A+Fcos（E+2G）Y=B+Fsin（E+2G）Goto??2 ⊿J=K-83174.43J≤0?A=3026971.015 ：B=513547.632C=I×90÷π÷RD=2×R×sinCE=275.4856-2CX=A+D×cos（E+C）Y=B+D×sin（E+C）Goto??2 ⊿S=K-83354.43S≤0?A=3026814.4519 ：B=512821.7913H=-SPROG “SUB 1”E=243.7