卡西欧5800计算器全线道路高程编程.

卡西欧5800计算器全线道路高程编程.
全线道路高程纵断面任意桩号高程计算.
麻烦把主程序发给我一下.子程序帮我编一小段,我不是很会,
起始桩号K0+031.34,起点高程506.55,切线点桩号K0+350,切线点高程508.23,切线点R=10000 T=41.36 E=0.09 道路两边是百分之1.5的横坡.请留上QQ或者其他联系方式,以便询问,

主程序：高程序横坡程序(设计任意点高程及横坡)
程序名：2GC
LbI 0:Norm 2
“KM”?Z:D:
Prog”H”:Fix 3:” H=”:Locate 6,4,H◢
“ I=”:Locate 6,4,I◢
Goto 0
高程计算子程序（H）
程序名：H
Prog “S0”:R:T:C:G:I:C-T→F:Z-F→L:C+T→E:G-TI→Q:If T=O:Then Q+LI→H:Goto 0:Else If Z