S1（数据库）子程序
If K≤终点桩号：Then起点桩号→Q:终点桩号→Z：起点X坐标→A:起点Y坐标→B：
起点切线方位角→F：起点曲率1/R1→D:终点曲率1/R2→R: （如是直线均输0）
Goto 0:If End换行
下一个线元要素输入同上
说明：
曲率 “1/R1”? D: “1/R2”?R 为起终点半径的倒数. 左向为负右向为正.
若有多条路线数据库建如S2, S3。。。。。S5在使用时把主程序S1根据计算需要改为S2。。。。。S5要计算线路即可。
K为待求点里程, W为夹角，L为左边距，I为右边距。
