4850线路中边桩任意里程坐标正反算改编程序.docVIP

线路中边桩任意里程坐标正反算改编程序CASIO4850 含数据库、测站放样计算1.加编数据库及计算总调度程序,计算中不必逐项输入线元要素,提高运算速度，避免现场忙中出错2.可加入多条线路的数据库,内业输入数据,外业一目了然3.计算直观,人性化4.正算直接输入里程和边距,反算输入近似里程便可5.增加了“计算点与测站点”的距离和方位角计算语句，方便直接放样6.愿收获与大家共享,同时也希望大家提出心得和宝贵建议7.核心计算程序摘自“yshf”? ??? 一.改动后的程序清单，增设数据库程序,可输入n条线路的数据库??? 1.(QXZDJS?? 计算总调度程序)M=1=Prog SJK1:Prog SUBSJK△←┘...........M=n=Prog SJKn:Prog SUBSJK△←┘ ??2.(SJK1?? 数据库程序)1.SZ = XY：2.XY = SZ：｛N,S｝：N：SDKI←┘S≤本线元终点里程＝＞U=本线元起点X坐标：V=本线元起点Y坐标：G=本线元起点正切线方位角：P=本线元起点曲率半径：R=本线元终点曲率半径：O=本线元起点里程：H=本线元终点里程：Q=本线元左直右偏向(0或1、-1):Goto0Δ←┘S≤下一线元终点里程=＞O=。。。。。。。。。。。。。。。。： Goto0Δ←┘LB1 0 ??? 3.(SUBSJK?? 运算