CASIOFX5800计算器测量程序集2.4版作者:蓝星1FX5800计算器测量程序集2.4版使用说明一、程序功能主要功能:采用交点法方式计算多条线路坐标正反算,可算任意复杂线型及立交匝道,包括C型,S型、卵型、回头曲线等;极坐标放样,全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度.隧道欠超挖放样计算。新版本优化:1、优化程序语句、2、以复数形式输入变量及数据库,取消原矩阵数据库;3、修改隧道超欠挖程序为通用形,不受圆心个数限制、4、新增测量资料表计算二、源程序(绿色为程序名;蓝色为输入计算器内容)紫色为新版改动处(可以根据自己标段情况用相关主程序及子程序,再在0程序中汇总)0.汇总程序(1、坐标计算放样程序(1XY、A、AB、HX、JS、DX、QX、F、XY、X1);2、坐标反算程序(2ZD、A、B、AB、HX、QX、F、ZD、X1);3、高程计算查阅程序(3GC、H、I、QX、S1、I1);4、路基半幅标准宽度查阅程序(4GD、C、QX、G1);5、路基边坡及开挖口放样程序(5BP、A、B、AB、HX、H、I、C、JS、DX、QX、F、ZD、X1、S1、I1、G1、W1);6、路基标准距离放样(6FM、A、AB、HX、H、I、JS、DX、QX、F、XY、X1、S1、I1);7、桥梁锥坡计算放样程序(7ZP、A、AB、HX、C、JS、DX、QX、F、XY、X1、G1);8、极坐标计算程序(8JS、JS、DS);9、隧道超欠挖计算程序(A、B、AB、HX、H、I、QX、S、SD、F、ZD、X1、S1、I1、SD1)运行后按1~9数子约半秒,选择程序,返回时,在桩号输入-1,返回选择计算类型,输入-2,返回选择线路。计算内程序排例:0、01(测量资料专用)、02、0XYH、1DAOXIAN、1SC(水准测量用)、1XY、2XY-S(由坐标计算面积)、2ZD、3GC、4GD、5BP、6FM、7ZP、8JS、9SD、A、AB、B、B6(测量表格检表6)、B7(检表7)、B8(检表8)、B9(检表9)、C、DX、DX0、F、G1、H、HX、I、I1、JS、MCASIOFX5800计算器测量程序集2.4版作者:蓝星2(度分秒转十进制)、QX、S、S1、SD0、SD1、T、W1、X1、XY、(五点通线元法计算坐标)、ZD带有不完整缓和曲线的线元转交点数据程序(T)。只为转交点的辅助程序,不参入任何主程序中运行。说明:运行后“QKM”?输入起点桩号;“XQ”?“YQ”?输入起点X、Y坐标;“LS1”?“LS2”?输入前段缓和曲线长度,后段缓和曲线长度;“A1”?“A2”?输入前段缓和曲线参数,后段缓和曲线参数;“FWJ“?输入起点切线方位角;”ZJ“?输入转角(终点方位角减起点方位角之差,左转为负,右转为正);计算结果要素同QX子程序中要素字母。以下全为数据子程序,根据自己标段设计数据修改黑色部分数据。①-1程序名:X1(线路1和线路2坐标计算要素程序,)Z[4]=0=>Return:Z[4]=1=>Goto1:Z[4]=2=>Goto2:LbI1:IfZ≤241.086:Then-336.478+60i→R:2600441.639+514392.519i→U:280。20’28.78”+203。08’28.32”i→G:106.667+81.667i→H:-270.668-283.056i→T:Prog"F":Return:IfEndLbI2:IfZ≤273.006:Then171.674+180i→R:2600784.547+514635.863i→U:58。49’17.2”+68。09’26.91"i→G:93.889+125i→H:171.674+184.771i→T:Prog"F":Return:IfEndIfZ≤466.227:Then341.96+445i→R:2600664.76+514799.865i→U:123。43’25.9”+15。58’49.5”i→G:138.211i→H:68.954+125.273i→T:Prog”F”:Return:IfEndZ[4]=0=>Return:Z[4]=1=>Goto1:Z[4]=2=>Goto2:CASIOFX5800计算器测量程序集2.4版作者:蓝星3LbI1:IfZ≤40.858:Then0→O:2600509.148→U:5144063.566→V:299。43’39”→G:40.857→H:97.25→P:60→R:1→Q:Return:IfEndIfZ≤159.42:Then40.857→O:2600537.297→U:514034.668→V:331。16’15.1”→G:118.562→H:60→P:60→R:1→Q:Return:IfEndIfZ≤241.087:Then159.419→O:2600625.86→U:514081.521→V:84。29’22.4”→G:81.667→H:60→P:1×1045→R:1→Q:Return:IfEndLbI2:IfZ≤93.89:Then0→O:2600695.67→U:514488.986→V:58。49’17.2”→G:93.889→H:1×1045→P:180→R:1→Q:Return:IfEndIfZ≤198.568:Then93.889→O:2600736.998→U:514572.974→V:73。45’51.6”→G:104.678→H:180→P:180→R:1→Q:Return:IfEndIfZ≤273.007:Then198.567→O:2600736.233→U:514676.181→V:107。5’4.3”→G:74.439→H:180→P:445→R:1→Q:Return:IfEnd程序字母说明:O-线元起点桩号;U-起点X坐标;V-起点Y坐标;G-线元起点桩号切线方位角;H-线元长度,P-线元起点曲率半径,R-线元终点曲率半径,Q-线元判别(以道路中线的前进方向(即里程增大的方向)区分左右;当线元往左偏时,Q=-1;当线元往右偏时,Q=1;当线元为直线时,Q=0)。说明:1、IfZ≤计算交点段终点桩号(或者直线段任意桩号):Then交点桩号+圆半径i→R:交点X坐标+交点Y坐标i→U:起点至交点方位角+交点转角i→G:交点前段缓和曲线长度+交点后段缓和曲线长度i→H:交点前段切线长度+交点后段切线长度i→T:Prog”F”:Return:IfEndCASIOFX5800计算器测量程序集2.4版作者:蓝星4(转角则为交点段终点方位角减起点方位角,分正负,左偏为负,右偏为正)如整条线无曲线,全为直线段,则交点为终点桩号,XY为终点坐标,方位角为起点方位角,转角和圆半径为1,其它全为0。②-1程序名:S1(线路1和线路2高程竖曲线要素子程序)Z[4]=1=>Goto1:Z[4]=2=>Goto2:LbI1:IfZ≤241.09:Then2000→R:95.356+40.742i→C:-3.155+.812i→I:Return:IfEnd:LbI2:IfZ≤133.601:Then1525→R:106+45.12i→C:-.64+2.98i→I:Return:IfEnd:IfZ≤466.23:Then1945→R:298+50.841i→C:2.98-1.968i→I:Return:IfEnd:程序字母说明:R-竖曲线半径:C-竖曲线交点桩号+交点桩号高程i(未竖曲线调整的);I-竖曲线前纵坡+竖曲线后纵坡i③-1程序名:I1(线路1和线路2高程超高参数子程序)0→K:1→W:Z[4]=1=>Goto1:Z[4]=2=>Goto2:LbI1:IfZ≤159.419:Then0→S:6-6i→M:Return:IfEnd:IfZ≤187.987:Then28.568+28.568i→S:159.419→C:6-6i→M:2-2i→N:Return:IfEnd:IfZ≤241.086:Then0→S:2-2i→M:Return:IfEnd:LbI2:IfZ≤77.872:Then0→S:2-2i→M:Return:IfEnd:IfZ≤93.889:Then16.017+16.017i→S:77.872→C:2-2i→M:5-5i→N:Return:IfEnd:IfZ≤198.567:Then0→S:5-5i→M:Return:IfEnd:IfZ≤273.006:Then74.439→S:198.567→C:5-5i→M:2-2i→N:Return:IfEnd:IfZ≤335:Then0→S:2-2i→M:Return:IfEnd:IfZ≤346.235:Then11.235+11.235i→S:335→C:2-2i→M:1.5-1.5i→N:Return:IfEnd子程序中字母表示说明:K-中央分隔带半幅宽(中桩标高至中桩中线距离,无分隔带则为0);W-超高方式参数(W=1为一般直线方式超高,W=2为三次抛物线方式超高);CASIOFX5800计算器测量程序集2.4版作者:蓝星5S-超高渐变段左距离+右距离i(不是渐变段则输入0);C-超高渐变段起点桩号(不是渐变段,无需输入);M-超高段起点左横坡+右横坡i,N-超高渐变段终点左横坡+右横坡i(不是渐变段,无需输入)。④-1程序名:G1(线路1和线路2路基标准半幅宽度参数子程序)Z[4]=1=>Goto1:Z[4]=2=>Goto2:LbI1:IfZ≤40.857:Then40.857i→S:0→C:3.5+5i→A:5.25i→B:Return:IfEnd:IfZ≤159.419:Then0→S:3.5+5.25i→A:Return:IfEnd:IfZ≤187.987:Then28.568i→S:159.419→C:3.5+5.25i→A:5.5i→B:Return:IfEnd:IfZ≤241.086:Then0→S:3.5+5.5i→A:Return:IfEnd:LbI2:IfZ≤321.611:Then0→S:3.5+5i→A:Return:IfEnd:IfZ≤346.235:Then24.624i→S:321.611→C:3.5+5i→A:5.75i→B:Return:IfEnd:IfZ≤466.227:Then0→S:3.5+5.75i→A:Return:IfEnd子程序中字母表示说明:C-宽度渐变段起点桩号(不是渐变段不输);A-宽度渐变段起点左侧宽度+右侧宽度i;B-宽度渐变段终点左侧宽度+右侧宽度i(不是渐变段,无需输入);S-宽度渐变段左侧距离+右侧距离i(不是渐变段输0)。⑤-1程序名:SD1(隧道1和隧道2参数子程序)IfZ[4]=1:Then5→I:1.4→V:12+19。16’i→Z[16]:1.4+51。42’18”i→Z[17]:5.1+218。3’i→Z[18]:1.4+51。42’18”i→Z[19]:12+19。16’i→Z[20]:Return:IfEnd:IfZ[4]=2:Then5+2.2i→I:3.825→V:4.355→Z[16]:4.355-251。18’46”i→Z[17]:6.07+217。22’28”i→Z[18]:4.355-108。41’14”i→Z[19]:4.355-180i→Z[20]:Return:IfEnd:子程序中字母表示说明:I-隧道开挖面里圆心个数和直线段共个数+隧道中线距设计路中线距离(左负右正)i;V-路中线标高至设计隧道中线底高差+底部圆心水平偏移CASIOFX5800计算器测量程序集2.4版作者:蓝星6距离(向左偏为负,向右偏为正);Z[16]-Z[16+I]-隧道中线型数据,直线段为:长度-起点方位角;圆曲线段为:圆半径+偏角(即圆心夹角).⑥-1程序名:W1(线路1和线路2路基填挖边坡参数子程序)10→E:10→F:2.6→M:2→N:2→U:1.5→I:1.75→J:8→W:2→V:Z[4]=1=>Goto1:Z[4]=