高速公路测量计算casio程序全套

《高速公路测量计算casio程序全套》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、高速公路测量计算CASIO程序全套坐标主程序XY(坐标程序)LbI  2｛K｝PROG“SUB3”X=X◢Y=Y◢｛v｝v=√2èPROG“SUB2”：⊿GOTO2FANS｛MNWT｝M“X0=”：N“Y0=”W“X-=”：T“Y-=”Z=tan-1((T-N)/(W-M+0.19)LbI7｛UV｝U“JIAO=”V“JU=”W＞MèU=U+Z：GOTO3：⊿U=U+Z-180LbI3P=M+VcosU◢Q=N+VsinU◢｛K｝K“DGLC=”LbI6Prog“SUB3”O=（Q-Y+（P-X）/（tanE+0.19））×sinEK=

2、K+OO=AbsOO≥0.17èGOTO6：⊿K=K◢V=（Q-Y+（X-P）×tanE）×cosE◢GOTO7子程序ZHIX1H=K-80100      （80+100为起点里程，直线段）A=3026441.522（A、B为K80+100坐标）B=515965.236E=270.265为K80+100方位角X=A+HcosEY=B+HsinEQUX1（K80+100~K80+948.114曲线右偏）R=900：L=170H=K-80310.927（80+310.927为ZH点里程）I=K-80480.927（80+480.927为H

3、Y点里程）I≤0èA=3026442.499B=515754.311（A、B为ZH点坐标）PROG  “SUB1”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

4、.114S≤0èA=3026606.193：B=515149.157（A、B为HZ点坐标）H=-SPROG“SUB1”E=300.0072-3×G（300.0072为HZ点方位角）X=A+Fcos（E+180+2G）Y=B+Fsin（E+180+2G）Goto  2⊿LbI  2备注：曲线左偏与右偏，只有中间几个“＋－”号的区别。以下不再备注）QUX2（K80+948.114~K81+475.631曲线左偏）R=1000：L=174.535H=K-80948.114I=K-81122.649I≤0èA=3026606.193B=5151

5、49.157PROG  “SUB1”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“SUB1”E=279.783+3×GX=A+Fcos（E+180-2G）Y=B+

6、Fsin（E+180-2G）Goto  2⊿LbI  2ZHIX2H=K-81475.632A=3026784.297B=514657.014E=279.7828X=A+HcosEY=B+HsinEQUX3（K82+420.711~K83+354.430曲线左偏）R=1200：L=180H=K-82420.711I=K-82600.711I≤0èA=3026944.880B=513725.679PROG  “SUB1”E=279.7828-3×GX=A+Fcos（E+2G）Y=B+Fsin（E+2G）Goto  2⊿J=K-83174.

7、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“SUB1”E=243.7953+3×GX=A+Fcos（E+180-2G）Y=B+Fsin（E+180-2G）Goto  2⊿LbI  2SUB1C=H-H^5÷40÷R2÷L2D=H^3÷6÷R÷L-H^7÷336÷R^3÷L^3F

8、=√(C2+D2)G=H2×30÷π÷R÷LSUB2｛U“L=”｝M“XL”=X+Ucos（E-90°）◢N“YL”=Y+Usin（E-90°）◢｛V“R=”｝P“XR”=X+Vcos（E+90°）◢Q“Y