CASIOFX5800P 计算器公路测量常用程序集2.3版 一、程序功能 主要功能：采用交点法方式计算多条线路坐标正反算，可算任意复杂线型及立交匝道，包括 C 型，S 型、卵型、回头曲线等；极坐标放样，全线路基边坡开挖口及坡脚放样计算、路基任意点设计高程、横坡、设计半幅宽度。隧道欠超挖放样计算。 新版本优化：1、优化程序语句。2、取消原线元法计算，化线元法为交点法。3、高程计算修改。4、附计算坐标及高程参数设计要素输入实例。 二、源程序 0.总主程序（1、坐标计算放样程序；2、坐标反算程序；3、高程计算查阅程序；4、路基半幅标准宽度查阅程序；5、路基边坡及开挖口放样程序；6、路基标准距离放样；7、桥梁锥坡计算放样程序；8、极坐标计算程序；9、隧道超欠挖计算程序）运行后按1~9数子约半秒，则选择1至9的程序，返回时，在桩号输入-1，返回选择计算类型。输入-2，返回选择线路。 程序名：0（数字0） ClrMat：ClrVar：12→DimZ：Norm 2：Do：＂(XY=1，ZD=2，GC=3，GD=4，BP=5，FM=6，ZP=7，JS=8，SD=9)===>QING AN 1-9＂：Getkey→Z[3]：While Z[3]=35：Prog＂1XY＂：WhileEnd：While Z[3]=35：Prog＂1XY＂：WhileEnd： While Z[3]=36：Prog＂2ZD＂：WhileEnd：While Z[3]=37：Prog＂3GC＂：WhileEnd：While Z[3]=21：Prog＂4GD＂：WhileEnd：While Z[3]=22：Prog＂5BP＂：WhileEnd：While Z[3]=23：Prog＂6FM＂：WhileEnd：While Z[3]=31：Prog＂7ZP＂：WhileEnd：While Z[3]=32：Prog＂8JS＂：WhileEnd：While Z[3]=33：Prog＂9SD＂：WhileEnd：LpWhile Z[3]≠25：＂XIE XIE SHI YONG＂： 1.主程序：一般坐标计算及放样程序 程序名：1XY Prog＂DX＂：Prog＂QX＂：90→A：＂PJ1＂?A：A→B：＂PJ2＂?B：A→Z[1]：B→Z[9]：Do：＂KM＂?Z：Z=-1=>Stop：Z=-2=>Break：Prog＂K＂：?D： 0→L：＂L0＂?L：L→Z[10]：Porg＂A＂：Z[2]+Z[1] →A：A-Z[9]→E：I+Dcos(A)+Z[10]cos(E→X：J+Dsin(A)+Z[10]sin(E→Y：Prog＂XY＂：Prog＂JS＂：LpWhile Z≠-1 2.主程序：由大概桩号及坐标反算桩号及距离 程序名：2ZD Prog＂QX＂：Do：＂KM＂?Z：Z=-1=>Stop：Z=-2=>Break：Prog＂K＂：＂X0＂?X：＂Y0＂?Y：Porg＂B＂：Prog＂ZD＂：LpWhile Z≠-1 3.主程序：任意点高程计算及横坡 程序名：3GC Prog＂QX＂：0→B：＂H-B＂?B：B→Z[9]：Do：＂KM＂?Z：Z=-1=>Stop：Z=-2=>Break：?D：Prog＂H＂：Fix 3：＂H=＂：Lco...
