5800正反算边坡放样隧道测量程序.docVIP

正算主程序(ZS) FIX4：?S：?Z：Prog “PM-SJ”： Abs(S-O) → W：Prog?SUB1： XS=：X◢YS=：Y◢ F-90→F(需要时可以让他显示)：Prog“SQX-SJ”: Prog“SQX”：“H=”：H◢反算主程序(FS) FIX4: ?S：?X：？Y：Prog“PM-SJ”： X→ I： Y→ J：Prog?SUB2： S=：O+W→S◢Z=：Z◢Prog“SQX-SJ”：Prog“SQX” ：“H=”：H◢ 边坡放样主程序（BP-FY） Lb1 0：Prog“ZS”：“H-BG”（中桩与坡脚起算点高差值，比中桩高正，反之负）?A：H+A →B：?P（实测点高程）：?L（坡脚起算点到中桩的距离）：0.75（挖方时一级坡度） →C：1 （挖方时二级坡度）→D：1.5 （挖方时三级坡度）→E：8（挖方时一级坡高） →G：10（挖方时二级坡高） →M：15（挖方时三级坡高） →N：2 （平台宽度）→K：1 （填方时一级坡度）→I：1.5（填方时二级坡度） →J：2 （填方时三级坡度）→O：2 （填方时一级坡高）→Q：8 （填方时二级坡高）→R：10 （填方时三级坡高）→T：ifP＞B：thenGoto1：ElseGoto2 Lb1 1：ifP＞B：thenL+C（P-B）→U：P-B →F：IfEnd←┘ifP＞B+G：thenL+